Sourcetype t = {mutable contents : float#;
} include Ref with type elt := float# and type t := t
Sourceval create_local : float# -> t @ local [@@zero_alloc] Sourceval get : t @ local -> float# [@@zero_alloc] Sourceval set : t @ local -> float# -> unit [@@zero_alloc] Sourceval add : t @ local -> float# -> unit [@@zero_alloc]