Catmull–Clark subdivision surface/OCaml: Difference between revisions
Content added Content deleted
(typo) |
m (comment) |
||
| Line 24: | Line 24: | ||
;; |
;; |
||
(* returns the index of the item that has been pushed *) |
(* returns the index of the item that has just been pushed *) |
||
let pushi da v = |
let pushi da v = |
||
let i = da.n in |
let i = da.n in |
||