module Fold: sig .. end
sig
end
val fold : Uchar.t -> [ `Self | `Uchars of Uchar.t list ]
Uchar.t -> [ `Self | `Uchars of Uchar.t list ]
fold u
u