github/elm-mdl
1
0
Fork 0
mirror of https://github.com/correl/elm-mdl.git synced 2024-11-23 11:09:51 +00:00
Code Issues Projects Releases Packages Wiki Activity

Colors

Browse source
This commit is contained in:
Søren Debois 2016-04-12 15:31:52 +02:00
parent 26558d8ebb
commit 3fd16b2d9c
1 changed files with 10 additions and 10 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

20
demo/Demo/Grid.elm
View file

@ -6,7 +6,7 @@ import Array
import Material.Grid exposing (..) import Material.Grid exposing (..)
import Material.Style exposing (Style, css) import Material.Style exposing (Style, css)
import Material.Color as Color import Material.Color as Color
import Demo.Page as Page import Demo.Page as Page
@ -46,7 +46,7 @@ std = democell 200
color : Int -> Style color : Int -> Style
color k = color k =
Array.get ((k + 7) % Array.length Color.palette) Color.palette Array.get ((k + 11) % Array.length Color.palette) Color.palette
|> Maybe.withDefault Color.Teal |> Maybe.withDefault Color.Teal
|> flip Color.color Color.S500 |> flip Color.color Color.S500
|> Color.background |> Color.background
@ -59,18 +59,18 @@ view =
below. Note in particular what happens to the top and bottom rows.""" below. Note in particular what happens to the top and bottom rows."""
] ]
, [1..12 ] , [1..12 ]
|> List.map (\i -> small [size All 1, color i] [text "1"]) |> List.map (\i -> small [size All 1, color 4] [text "1"])
|> grid [] |> grid []
, [1 .. 3] , [1 .. 3]
|> List.map (\i -> std [size All 4, color i] [text <| "4"]) |> List.map (\i -> std [size All 4, color 5] [text <| "4"])
|> grid [] |> grid []
, [ std [size All 6, color 16] [text "6"] , [ std [size All 6, color 6] [text "6"]
, std [size All 4, color 17] [text "4"] , std [size All 4, color 6] [text "4"]
, std [size All 2, color 18] [text "2"] , std [size All 2, color 6] [text "2"]
] |> grid [] ] |> grid []
, [ std [size All 6, size Tablet 8, color 19] [text "6 (8 tablet)"] , [ std [size All 6, size Tablet 8, color 7] [text "6 (8 tablet)"]
, std [size All 4, size Tablet 6, color 20] [text "4 (6 tablet)"] , std [size All 4, size Tablet 6, color 8] [text "4 (6 tablet)"]
, std [size All 2, size Phone 4, color 21] [text "2 (4 phone)"] , std [size All 2, size Phone 4, color 9] [text "2 (4 phone)"]
] |> grid [] ] |> grid []
] ]
|> Page.body "Grid" srcUrl intro references |> Page.body "Grid" srcUrl intro references