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