Generating basic HTML, Elm style

gistfile1.elm

import List (..)
import Graphics.Element (..)
import Text (..)
import Html (..)
import Html.Attributes (..)
import Html.Events (..)

todos1 = ["A", "B", "C"]
todos2 = ["D", "E", "F"]

item name =
    li [ ] [ text name ]

list things =
    ol [ class "todos" ] (map item things)

title name =
    h1 [ ] [ text name ]

view =
    div
      [ class "container" ]
      [ title "Todos", list todos1,
        title "More Todos", list todos2 ]

scene =
    toElement 400 200 view

main = scene