Linting, refactor random angle walk for flamer

This commit is contained in:
2021-04-30 13:21:37 +02:00
parent 619756dd73
commit c8e84c775f
14 changed files with 460 additions and 377 deletions
+3 -7
View File
@@ -6,8 +6,7 @@ Description : Instances of data structures
This module contains prototypical data structures.
-}
module Dodge.Default where
import Dodge.Item.Weapon.Recock
import Dodge.Item.Weapon.ExtraEffect
import Dodge.Data
import Dodge.Data.Menu
import Dodge.SoundLogic
@@ -24,10 +23,8 @@ import qualified Data.Map as M
import qualified Data.Set as S
import Data.Graph.Inductive.Graph hiding ((&))
import Data.List
{-
Indestructible wall.
-}
Indestructible wall. -}
defaultWall = Wall
{ _wlLine = [(0,0),(50,0)]
, _wlID = 0
@@ -37,8 +34,7 @@ defaultWall = Wall
}
{-
Door that opens on approach.
Pathable.
-}
Pathable. -}
defaultAutoDoor = Door
{ _wlLine = [(0,0),(50,0)]
, _wlID = 0