Source file either.ml

1
2
3
let swap x =
  Stdlib.Either.fold ~left:Stdlib.Either.right ~right:Stdlib.Either.left x
;;