Catmull–Clark subdivision surface/OCaml: Difference between revisions

Content added Content deleted
m (libheader)
No edit summary
Line 24: Line 24:
;;
;;


(* returns the index of the item that have been pushed *)
(* returns the index of the item that has been pushed *)
let pushi da v =
let pushi da v =
let i = da.n in
let i = da.n in
Retrieved from "https://rosettacode.org/wiki/Catmull–Clark_subdivision_surface/OCaml"