module AddOneParameter.A1 where import AddOneParameter.C1 import AddOneParameter.D1 sumSq xs = sum (map sq xs) + sumSquares xs + sumSquares1 xs main = sumSq [1..4]