sumSquares y =let x = 1 in
                  (1 ^ pow) + sq y
     where sq 0=0
           sq x=x^pow
sumSquares y =let x = 1 in
                  (1 ^ pow) + sq y
     where sq 0=0
           sq x=x^pow
sumSquares y =let x = 1 in
                  (1 ^ pow) + sq y
     where sq 0=0
           sq x=x^pow