module CPoint:sig
..end
type
t = {
|
x : |
|
y : |
val add : t ->
t -> t
val sub : t ->
t -> t
val opp : t -> t
val mult : float -> t -> t
val div : t -> float -> t
module Infix:sig
..end
val print : Format.formatter -> t -> unit