bastet
Float.Semiring
type t = float
val add : t -> t -> t
val zero : t
val multiply : t -> t -> t
val one : t