mirror of
https://gitlab.com/scemama/QCaml.git
synced 2024-11-06 22:23:42 +01:00
13 lines
126 B
Standard ML
13 lines
126 B
Standard ML
type t = {
|
|
x : float ;
|
|
y : float ;
|
|
z : float ;
|
|
}
|
|
|
|
|
|
let make { Point.x ; y ; z } = { x ; y ; z }
|
|
(* = %identity *)
|
|
|
|
|
|
|