type signatures

1 files changed, 2 insertions, 0 deletions

diff --git a/GenSCAD.hs b/GenSCAD.hs
index e5e99ab..548792f 100644
--- a/GenSCAD.hs
+++ b/GenSCAD.hs
@@ -18,11 +18,13 @@ import System.IO.Temp
 import System.Process
 
 
+v3tolist :: V3 a -> [a]
 v3tolist (V3 a b c) = [a,b,c]
 
 _V32l :: R3 c1 => c1 c -> [c]
 _V32l = view (_xyz . to v3tolist)
 
+_V32s :: Show a => [a] -> [Char]
 _V32s c = intercalate "," (map show c)
 
 -- placecube: OpenSCAD translate cube described by d to place designated by p