ChildComponent.elm

import Effects exposing (Effects)


type alias Model = {}


type Action
  = Local Msg -- these are dealt with by this component
  | Remove -- these are dealt with in update of the parent (by pattern matching against ThisComponent.Remove?)


type Msg
  = DoA
  | DoB


update : Action -> Model -> (Model, Effects Action)
update action model =
  case action of
    Local msg ->
      updateLocal msg model
      
    otherwise ->
      ( model, Effects.none )


updateLocal : Msg -> Model -> (Model, Effects Action)
updateLocal msg model =
  case msg of
    DoA ->
      ( model, Effects.none )
      
    DoB ->
      ( model, Effects.none )