Module Rational

module Rational: sig .. end

val gcd : int -> int -> int

type t = {

val make : int -> int -> t

val inv : t -> t

val neg : t -> t

val add : t -> t -> t

val sub : t -> t -> t

val mul : t -> t -> t

val div : t -> t -> t

val to_string : t -> string

val print : Format.formatter -> t -> unit