type_homework.hs

-- 1. リストを引数に取って、length に π (=3.1415)を返す関数
pieTime x = fromIntegral (length x)  + (pi :: Float)

-- 2. 2つの文字列を引数にとって、数値として足し算する関数
addString x y = (read x::Int) + (read y::Int)

-- 3. 文字列を逆する関数
reverse' x = [x !! z | z <- [((length x) - 1), ((length x) - 2)..0]]

-- 4. 文字列が回文かどうかを判定する関数 isPalindrome
isPalindrome x = reverse' x == x