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