eatnoteat update

eatnoteat-update.elm

type Msg
    = Idle
    | Eat (List Tags)
    | Damage Int
    | HpCheck Int
    | ChangeHero Hero
    | ShuffleFood
    | Shuffle (List Food)
    | Animate AnimatedObject Animation.Msg
    
update : Msg -> Model -> ( Model, Cmd Msg )
update action model =
    case action of
        Idle ->
            ( model, Cmd.none )

        Eat tags ->
            ...
            
        Damage points ->
            ...
            
        HpCheck points ->
            ...
            
        ChangeHero hero ->
            ( { model | hero = hero, screen = PlayScreen }, Cmd.none )

        ShuffleFood ->
            ( model, generate Shuffle <| shuffle model.foodPanel.foods )

        Shuffle randomFoods ->
            ...
            
        Animate aObj aMsg ->
            ...