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