ghc-exactprint-0.5.0.0: tests/examples/transform/LocToName.hs

module LocToName where

{-








-}







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

sumSquares [] = 0