on 5928af6 help sign in
9 lines 144 B history raw
1{-# LANGUAGE LambdaCase #-}
3foo = bar (\case JKey {} -> True; _ -> False)
5foo :: Int -> Int
6foo = \case
7 5 -> 10
8 i | i > 5 -> 11
9 _ -> 12