module
X =
struct let
name =
"X"
end
;;
module
Y =
struct let
name =
"Y"
end
;;
module
PXY = Make2 (Int) (X) (Y);;