sig
  val pi : float
  val pi_2 : float
  val pi_4 : float
  val in_degrees : float -> float
  val in_raidans : 'a -> 'a
end