Add various helpers for creating polyhedra

2021-06-27 18:53:06 +02:00
parent 06f22a3ea5
commit 089dcc3f5d
14 changed files with 155 additions and 65 deletions
@@ -14,7 +14,7 @@ lightAt (x,y,z) i =
    LS {_lsID = i
       ,_lsPos = (x,y,z)
       ,_lsDir = 0
-       ,_lsRad = 500
+       ,_lsRad = 300
       ,_lsIntensity = 0.75
       }
 basicLS :: PSType