type distance = float

val float_sum : int -> int -> (int -> float) -> float

val int_sum : int -> int -> (int -> int) -> int

val solve : float -> float -> float -> float list

val pi : float

val deg_to_rad : float
