Skip to content

Instantly share code, notes, and snippets.

@freakingawesome

freakingawesome/so-34554652-Main.elm

Created January 1, 2016 15:14
Show Gist options
  • Save freakingawesome/547bd36434868987bc4d to your computer and use it in GitHub Desktop.
Save freakingawesome/547bd36434868987bc4d to your computer and use it in GitHub Desktop.
Download ZIP
Raw
so-34554652-Main.elm
import Html exposing (..)
main =
let
line n =
div [] [ text <| "Line #" ++ (toString n) ]
in
div []
<| List.map line [0..100]
port scrollTop : Signal Int
port title : Signal String
port title =
Signal.map toString scrollTop
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment