module Sl_project:Datatype.Make
(
sig
include Datatype.Undefinedtypet =
SlicingTypes.sl_project
val reprs :SlicingInternals.project list
val name :string
val internal_pretty_code :Type.precedence -> Format.formatter -> SlicingInternals.project -> unit
val varname :SlicingInternals.project -> string
val mem_project :(Project.t -> 'a) -> SlicingInternals.project -> 'a
end
)
include Datatype.S_no_copy
val copy : Datatype.t -> Datatype.t
x
and copy x
.