git.iko.soy/rowtype-yoga/purescript-backend-optimizer
on main help sign in
rowtype-yoga/purescript-backend-optimizer/backend-es/test-snapshots/src/Snapshot.FunctionCompose03.purs
17 lines 436 B history raw
1module Snapshot.FunctionCompose03 (test1, test2, test3, test4) where
3import Prelude
5type F = Unit -> Int -> Int
7test1 :: F -> F -> Int -> Int
8test1 f g = f unit <<< g unit
10test2 :: F -> F -> Int -> Int
11test2 f g = g unit <<< (f unit <<< g unit)
13test3 :: F -> F -> Int -> Int
14test3 f g = (f unit <<< g unit) <<< (f unit <<< g unit)
16test4 :: F -> F -> Int -> Int
17test4 f g = ((g unit <<< f unit) <<< g unit) <<< (f unit <<< g unit)