Start simplifying tesla arcs

2025-01-09 11:01:17 +00:00
parent c355fe4f5f
commit 5fb71cec39
6 changed files with 35 additions and 37 deletions
@@ -23,8 +23,6 @@ data ItemParams
        , _newArcStep :: NextArcStep --ItemParams -> World -> ArcStep -> State StdGen (Maybe ArcStep)
        , _previousArcEffect :: PreviousArcEffect
        }
--    | ParamMID {_paramMID :: Maybe Int}
--    | BoostPropIX {_boostPropIX :: Maybe Int}

 data ShrinkGunStatus = FullSize | Shrunk
    --deriving (Eq, Ord, Show, Read) --Generic, Flat)