V.I
val (<:>) : Float.Multiplicative.Loop.t -> Float.Multiplicative.Loop.t -> Float.Multiplicative.Loop.t