mirror of
https://github.com/tweag/ormolu.git
synced 2024-09-11 13:16:13 +03:00
23 lines
271 B
Haskell
23 lines
271 B
Haskell
{-# LANGUAGE LambdaCase #-}
|
|
|
|
module Foo (
|
|
foo, bar, baz) where
|
|
|
|
import Control.Category
|
|
|
|
foo :: Int
|
|
foo = 5
|
|
|
|
bar :: Int -> Int
|
|
bar = \case
|
|
0 -> foo
|
|
x -> x - foo
|
|
|
|
baz :: Int -> Int
|
|
baz = gege
|
|
where
|
|
gege = 1
|
|
>>> zeze +
|
|
2
|
|
>>> nona
|