module Validated_intf:sig..end
Suppose one wants to have a type of positive integers:
      module Positive_int = Validated.Make (struct
        type t = int
        let here = _here_
        let validate = Int.validate_positive
      end)
    
    With this, one is certain that any value of type Positive_int.t has passed
    Int.validate_positive.
    One can call Positive_int.create_exn n to create a new positive int from an n,
    which will of course raise if n <= 0.  One can call Positive_int.raw positive_int
    to get the int from a Positive_int.t.
val __pa_ounit_275876e34cf609db118f3d84b799a790 : stringSuppose one wants to have a type of positive integers:
      module Positive_int = Validated.Make (struct
        type t = int
        let here = _here_
        let validate = Int.validate_positive
      end)
    
    With this, one is certain that any value of type Positive_int.t has passed
    Int.validate_positive.
    One can call Positive_int.create_exn n to create a new positive int from an n,
    which will of course raise if n <= 0.  One can call Positive_int.raw positive_int
    to get the int from a Positive_int.t.
module type Raw =sig..end
module type Raw_binable =sig..end
module type Validated =sig..end
module type Validated_binable =sig..end
module type S =sig..end
Suppose one wants to have a type of positive integers:
      module Positive_int = Validated.Make (struct
        type t = int
        let here = _here_
        let validate = Int.validate_positive
      end)
    
    With this, one is certain that any value of type Positive_int.t has passed
    Int.validate_positive.
    One can call Positive_int.create_exn n to create a new positive int from an n,
    which will of course raise if n <= 0.  One can call Positive_int.raw positive_int
    to get the int from a Positive_int.t.
here will appear in validation-failure error messages.