SO

1
2
3
4
5
6
7
8
9
import AI.Probability.Example.Grass
import AI.Probability.Bayes
import System.Environment (getArgs)
  
main = do 
    args <- getArgs
    let n = read (head args) :: Int
    test <- likelihoodWeighting n grass [] "Rain"  
    print test