View.Page
The implementation was based on the .page block.
View Options
type alias ViewOptions msg =
{ calculator : Calculator.ViewOptions msg
, attribution : Attribution.ViewOptions
}
View Function
view : ViewOptions msg -> H.Html msg
view { calculator, attribution } =
H.div [ HA.class "page" ]
[ H.div [ HA.class "page__wrapper" ]
[ H.div [ HA.class "page__content" ]
[ H.main_ [] [ Calculator.view calculator ]
, H.footer [] [ Attribution.view attribution ]
]
]
]