Treat "fun" and "function" equally for monadic operators

Example:

  Console.connect "0" >>= function
  | `Error _ -> failwith "Failed to connect to console"
  | `Ok default_console ->
     Console.log_s default_console "Hello, world!"