V.I
val (<:>) : Float.Additive.Medial_Magma.t -> Float.Additive.Medial_Magma.t -> Float.Additive.Medial_Magma.t