1 files changed, 13 insertions, 0 deletions

diff --git a/src/Wavefront/Types.hs b/src/Wavefront/Types.hs
index 2ab48ba..fe49a57 100644
--- a/src/Wavefront/Types.hs
+++ b/src/Wavefront/Types.hs
@@ -132,7 +132,20 @@ data EmbeddedCurve = EmbeddedCurve
 data Curve = Curve
   deriving (Eq,Ord,Show)
 
+data CSType = Bmatrix | Bezier | Bspline | Cardinal | Taylor
+ deriving (Eq,Ord,Show,Enum)
+
 data Surface = Surface
+  { surfIsRational :: !Bool
+  , surfDegree     :: !(Int,Int)
+  , surfType       :: !CSType
+  , surfPoints     :: [FaceIndex]
+  , surfRangeU     :: !(Float,Float)
+  , surfRangeV     :: !(Float,Float)
+  , surfKnotsU     :: ![Float]
+  , surfKnotsV     :: ![Float]
+  -- TODO: trim/hole/special
+  }
   deriving (Eq,Ord,Show)
 
 -- | A point is a single index that references the locations. It’s a canonical