Module Float_u.Ref

type t = {
  1. mutable contents : float;
}
include Ref with type elt := float and type t := t
val create : float -> t
val create_local : float -> t @ local
val create_zero : unit -> t
val get : t @ local -> float
val set : t @ local -> (float -> unit) @ local
val add : t @ local -> (float -> unit) @ local
module O : sig ... end