R:
case Url.toString model.url of
"/" ->
Page.Root.render model
"/home" ->
Page.Home.render model
_ ->
Page.NotFound.render modelSize: a a a
R:
case Url.toString model.url of
"/" ->
Page.Root.render model
"/home" ->
Page.Home.render model
_ ->
Page.NotFound.render modelR:
R:
AY
R:
R:
R:
AY
R:
R:
AY
R:
R:
R:
R:
R:
R:
type Model = {
pages : {
root : Root
home : Home
notFound : NotFound
}
}
R:
R:
AY