Generalized function to handle updates of the Dictionary

UpdateDict.elm

import Graphics.Element exposing (show) 
import Dict exposing (Dict)


type alias Model = Dict String Int


initModel : Model
initModel =
  Dict.fromList
    [ ("x", 0)
    , ("y", 0)
    , ("z", 0)
    ]


updateModel : List (String, Int) -> Model -> Model
updateModel update model =
  Dict.union (Dict.fromList update) model


-- Custom infix operator for Tuples.
(=>) : a -> b -> ( a, b )
(=>) =
  (,)


main =
  initModel
  |> updateModel [ "x" => 1, "z" => 10 ]
  |> updateModel [ "x" => 5, "y" => 15, "z" => 0 ]
  |> updateModel [ "x" => 25 ]
  |> Dict.get "x"
  |> Maybe.withDefault 0
  |> show