RethinkingMaybe2.elm

view : Model -> Html Msg
view model =
    case model.selectedGender of
    Just Masculine ->
        div []  
           [ button [onClick (SelectGender Masculine), style "background-color" "blue"] [text "Masculine"]    
           , button [onClick (SelectGender Feminine)] [text "Feminine"]   
           , button [onClick (SelectGender Neuter)] [text "Neuter"] 
        ,div [] [text (Debug.toString model)]
          ]
    _ ->
       div []
           [ button [onClick (SelectGender Masculine)] [text "Masculine"]    
           , button [onClick (SelectGender Feminine)] [text "Feminine"]   
           , button [onClick (SelectGender Neuter)] [text "Neuter"] 
        ,div [] [text (Debug.toString model)]
          ]