let wrap5 f a b c d e = try `Ok (f a b c d e) with | e' -> `Error e'