D2.expected.hs

module RmOneParameter.D2 where

{-remove parameter 'ys' from function 'sumSquares'. This refactoring
  affects module 'D1', and 'A1'. This aims to test removing a
  parameter from a recursion function-}

sumSquares (x:xs) = sq x + sumSquares xs

sumSquares [] = 0

sq x = x ^ pow

pow =2