summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/Sequence/Contact/Archetypes.hs4
-rw-r--r--src/Sequence/Contact/Types/Internal.hs4
2 files changed, 6 insertions, 2 deletions
diff --git a/src/Sequence/Contact/Archetypes.hs b/src/Sequence/Contact/Archetypes.hs
index 6c13738..c0c043a 100644
--- a/src/Sequence/Contact/Archetypes.hs
+++ b/src/Sequence/Contact/Archetypes.hs
@@ -99,7 +99,9 @@ vitBar :: Ratio Int -> Traversal' Stats (Formula Stats)
99vitBar prop = sMaxVitality . mapping (scaled prop) 99vitBar prop = sMaxVitality . mapping (scaled prop)
100 100
101prop = Prop 101prop = Prop
102 { _sSeqEpsilon = False 102 { _sRobustness = Nothing
103
104 , _sSeqEpsilon = False
103 105
104 , _sHitzones = [] 106 , _sHitzones = []
105 , _sArmor = const def 107 , _sArmor = const def
diff --git a/src/Sequence/Contact/Types/Internal.hs b/src/Sequence/Contact/Types/Internal.hs
index fef2792..e9bb268 100644
--- a/src/Sequence/Contact/Types/Internal.hs
+++ b/src/Sequence/Contact/Types/Internal.hs
@@ -85,7 +85,9 @@ data ShockEffect = ShockEffect
85 } 85 }
86 86
87data Stats = Prop 87data Stats = Prop
88 { _sSeqEpsilon :: Bool 88 { _sRobustness :: Maybe (Formula Stats)
89
90 , _sSeqEpsilon :: Bool
89 91
90 , _sHitzones :: Table Hitzone 92 , _sHitzones :: Table Hitzone
91 , _sArmor :: Hitzone -> Armor 93 , _sArmor :: Hitzone -> Armor