arith009.hs\should_run\numeric\tests\testsuite - delta/haskell.git - gitlab.haskell.org: ghc/ghc.git

index : delta/haskell.git

gitlab.haskell.org: ghc/ghc.git

summary refs log tree commit diff

path: root/testsuite/tests/numeric/should_run/arith009.hs

blob: 43fe1b2923c84f73412a2c029d61fa27f600201b (plain)

-- a prefix minus precedence test

f :: Int -> Int -> Int -> Int
f x y z = - x * y ^ z

main = putStr (shows (f 5 2 3) "\n")