git.iko.soy/rowtype-yoga/purescript-backend-optimizer
on main help sign in
12 lines 229 B history raw
1module Snapshot.UncurriedLocalAbs01 where
3import Prelude
5import Data.Foldable (sum)
7test :: Int -> Int -> Int
8test x y =
9 fn x y + fn y x
10 where
11 fn a b =
12 sum [ x, a, b, a, b, a, b, a, b, a, b, a, b, a, b, a, b, a, b ]