Haskell Filterリストからサブリストへの3の倍数

Question

私はまだHaskellとFunctional Programmingの仕組みを理解しようとしています。私の機能がうまくいかない理由を理解するのに役立つ必要があります。私は、整数のリストをパラメータとして取り、最初のリストから3の倍数を含むサブリストをフィルタリング/返す関数を作成しようとしています。ここに私のコードは次のとおりです。

module Main where 

sublist = [] 

myFunc :: [Int] -> [Int] 

myFunc [] = [] 

myFunc [t] = do 
    if t `mod` 3 == 0 
     then t : sublist 
    else myFunc [] 

myFunc (h:t) = do 
    if h `mod` 3 /= 0 
     then myFunc t 
     else do 
      h : sublist 
      myFunc t 

これは[] =のみの関数に渡された最後の値を含むリストを返し、まだサブリスト。あなたが私に事前に与えることができる任意のアドバイスありがとう。

Answer 1

まず、精神的に機能的なスタイルに切り替える必要があると思います。例えば

が、これはあなたが

filter' :: (a -> Bool) -> [a] -> [a] 
filter' _ [] = [] 
filter' condition (x:xs) = if condition x 
           then x : filter' condition xs 
           else  filter' condition xs 

divisibleBy3 n = mod n 3 == 0 

今、あなたのプログラムが

のように書くことができ、同じ機能を実装することができ、既存の機能を使用せずにリスト

> filter even [1..10] 
[2,4,6,8,10] 

から偶数を取得することです

filter' divisibleBy3 inputList