git.iko.soy/rowtype-yoga/purescript-native
on c193571 help sign in
rowtype-yoga/purescript-native/examples/passing/Patterns.purs
22 lines 374 B history raw
1module Main where
3import Prelude
5test = \x -> case x of
6 { str = "Foo", bool = true } -> true
7 { str = "Bar", bool = b } -> b
8 _ -> false
10f = \o -> case o of
11 { foo = "Foo" } -> o.bar
12 _ -> 0
14h = \o -> case o of
15 a@[_,_,_] -> a
16 _ -> []
18isDesc :: Array Number -> Boolean
19isDesc [x, y] | x > y = true
20isDesc _ = false
22main = Control.Monad.Eff.Console.log "Done"