Skip to content

Instantly share code, notes, and snippets.

Embed
What would you like to do?
Elm Day Two: Car
import Color exposing (..)
import Collage exposing (..)
import Element exposing (..)
carBottom = filled black (rect 160 50)
carTop = filled black (rect 100 60)
tire = filled red (circle 24)
car = collage 300 300
[ carBottom
, carTop |> moveY 30
, tire |> move (-40, -28)
, tire |> move (40, -28) ]
main = toHtml car
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
You can’t perform that action at this time.