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 |
(* 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 |