Add math.geometry

2008-07-20 04:22:30 -05:00 · 2008-07-20 04:22:30 -05:00 · bb84e85d3d
parent 541cff7dca
commit bb84e85d3d
1 changed files with 8 additions and 0 deletions
--- a/extra/math/geometry/geometry.factor
+++ b/extra/math/geometry/geometry.factor
@ -0,0 +1,8 @@
+
+IN: math.geometry
+
+GENERIC: width  ( object -- width )
+GENERIC: height ( object -- width )
+
+GENERIC: set-x! ( object x -- object )
+GENERIC: set-y! ( object x -- object )