Module Float_intf.S.Sign

module Sign: sig .. end

type t =

`\|`	`Neg`
`\|`	`Zero`
`\|`	`Pos`

val t_of_sexp : Sexplib.Sexp.t -> t

val sexp_of_t : t -> Sexplib.Sexp.t