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