module Before_after: functor (A : Datatype.S) -> Datatype.S with type t = A.t before_after
functor (
A
:
Datatype.S
) ->
with type t = A.t before_after
include Datatype.S_no_copy
val copy : Datatype.t -> Datatype.t
Datatype.t -> Datatype.t
x
copy x