プログラミングHaskell 2.6 練習問題

2_6.hs

-- 3 エラー修正
n = a `div` length xs
    where
      a = 10
      xs = [1,2,3,4,5]

-- 4. 空でないリストの最後の要素
mylast1 list = list!!((length list) - 1)
mylast2 list = head (reverse list)

-- 5. 空でないリストから最後の要素を取り除く
myinit1 list = reverse (tail (reverse list))
myinit2 list = take ((length list) - 1) list