setStartingMana :: Int -> Int -> State GameBuilder ()
setStartingMana i newMana = do
    zoom (heroAt i) $ do
        mana .= newMana
        maxMana .= newMana
setStartingMana :: Int -> Int -> State GameBuilder ()
setStartingMana i newMana = do
    zoom (heroAt i) $ do
        mana .= newMana
        maxMana .= newMana
setStartingMana i newMana = do
    zoom (heroAt i) $ do
        mana .= newMana
        maxMana .= newMana