path: root/testsuite/tests/ghc-regress/arityanal/f12.hs

module F12 where

f12 = let f g x = g x
          h = (+)
      in f h 4 5