diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/Sequence/Contact/Archetypes.hs | 4 | ||||
| -rw-r--r-- | src/Sequence/Contact/Types/Internal.hs | 4 |
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) | |||
| 99 | vitBar prop = sMaxVitality . mapping (scaled prop) | 99 | vitBar prop = sMaxVitality . mapping (scaled prop) |
| 100 | 100 | ||
| 101 | prop = Prop | 101 | prop = 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 | ||
| 87 | data Stats = Prop | 87 | data 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 |
