Commit before static wall overhaul

This commit is contained in:
2021-07-19 01:33:52 +02:00
parent e657d8e852
commit 6905c6f154
17 changed files with 58 additions and 51 deletions
+1 -1
View File
@@ -8,7 +8,7 @@ import Geometry
import Control.Monad.Reader
import Control.Lens
import qualified Data.IntMap as IM
import qualified Data.IntMap.Strict as IM
interpWith :: Float -> Point2 -> Point2 -> Point2
interpWith x a b = x *.* a +.+ (1 - x) *.* b