Tetris Brick Generator

TetrisBrickGenerator.elm

import Random
data Brick = Line | LeftSquiggle | RightSquiggle | LeftStick | RightStick | Square
rand a = Random.range 0 6 (constant a)
brick n = if | n == 0 -> Line
             | n == 2 -> LeftSquiggle
             | n == 3 -> RightSquiggle
             | n == 4 -> RightStick
             | n == 5 -> LeftStick
             | otherwise -> Square
main = asText <~ (brick <~ (rand 1))