Temperature.mli

type t =
  | Frozen
  | Cold
  | Normal
  | Hot

val read : (string, string) result -> (t, string) result

val equal : t -> t -> bool

val compare : t -> t -> int

val to_enum : t -> int

val of_enum : int -> t option