implicit-0.0.2: Graphics/Implicit/Export/Render/Definitions.hs

-- Implicit CAD. Copyright (C) 2011, Christopher Olah (chris@colah.ca)
-- Released under the GNU GPL, see LICENSE

module Graphics.Implicit.Export.Render.Definitions where

import Graphics.Implicit.Definitions
import Control.DeepSeq

data TriSquare = Sq (ℝ3,ℝ3,ℝ3) ℝ ℝ2 ℝ2 | Tris [Triangle]

instance NFData TriSquare where
	rnf (Sq b z xS yS) = rnf (b,z,xS,yS)
	rnf (Tris tris) = rnf tris