diff -Naur implicitcad-0.0.2/Graphics/Implicit/Definitions.hs implicitcad-0.0.2-orig/Graphics/Implicit/Definitions.hs
--- implicitcad-0.0.2/Graphics/Implicit/Definitions.hs	2012-10-26 22:12:23.345708183 -0400
+++ implicitcad-0.0.2-orig/Graphics/Implicit/Definitions.hs	2012-08-14 22:02:10.000000000 -0400
@@ -117,12 +117,12 @@
 	| ExtrudeR ℝ SymbolicObj2 ℝ
 	| ExtrudeRotateR ℝ ℝ SymbolicObj2 ℝ
 	| ExtrudeRM 
-		ℝ               
-		(Maybe (ℝ -> ℝ))  --  twist
-		(Maybe (ℝ -> ℝ))  --  scale
-		(Maybe (ℝ -> ℝ2)) --  translate
-		SymbolicObj2      --  object to extrude
-		(Either ℝ (ℝ2 -> ℝ)) --  height to extrude to
+		ℝ                 -- ^ rounding radius
+		(Maybe (ℝ -> ℝ))  -- ^ twist
+		(Maybe (ℝ -> ℝ))  -- ^ scale
+		(Maybe (ℝ -> ℝ2)) -- ^ translate
+		SymbolicObj2      -- ^ object to extrude
+		(Either ℝ (ℝ2 -> ℝ)) -- ^ height to extrude to
 	| ExtrudeOnEdgeOf SymbolicObj2 SymbolicObj2
 	deriving Show