module DatabaseType:Datatype.Make(sigtypet =LogicUsage.databaseinclude Datatype.Serializable_undefinedval reprs :LogicUsage.database listval name :stringend)
include Datatype.S_no_copy
val copy : Datatype.t -> Datatype.tx and copy x.