Develop laser upgrade path slightly

2022-04-04 17:00:35 +01:00
parent 3698a738f3
commit 31d5bcd0bb
10 changed files with 108 additions and 22 deletions
@@ -54,6 +54,7 @@ data AttentionDir
 data AwarenessLevel
    = Suspicious Float
    | Cognizant Float
+  deriving (Eq,Ord)

 makeLenses ''AttentionDir
 makeLenses ''PerceptionState