練習問題 1.1.1

関数
square
を用いて引数を4乗する関数
squad
を設計せよ.



square :: Integer -> Integer
square x = x * x

quad :: Integer -> Integer
quad x = square (square x)