ghc-exactprint-0.2: tests/examples/LocToName.hs

module LocToName where

{-








-}







sumSquares (x:xs) = x ^2 + sumSquares xs
    -- where sq x = x ^pow 
    --       pow = 2

sumSquares [] = 0