let
find_type _ = raise
Not_found