summaryrefslogtreecommitdiff
path: root/utils/check-exact/cases/RmDecl2.expected.hs
blob: d77b760dca6d363c03d3fa107f68fae97d3f32db (plain)
1
2
3
4
5
6
7
8
9
module RmDecl2 where

sumSquares x y = let sq 0=0
                     sq z=z^pow
                 in sq x + sq y

anotherFun 0 y = sq y
     where  sq x = x^2