RosettaCodeData/Task/Scope-Function-names-and-labels/Haskell/scope-function-names-and-labels-2.hs

getSquaredSum :: Int-> Int-> Int
getSquaredSum x y = g x + h y
	where
	g a = a*a
	h b = b*b