Module Base.Validity

module Validity: Datatype.S  with type t = validity

include Datatype.S_no_copy
val copy : Datatype.t -> Datatype.t
Deep copy: no possible sharing between x and copy x.