Stdlib.Quote
module Expr : sig ... end
val duplicate : 'a expr @ once -> ('a expr * 'a expr) @ once
val print : Format.formatter -> 'a expr -> unit
val string_of_expr : 'a expr @ once -> string