worked
add getProb but don't work
need join to get result from IO (IO a)
fix the key can't find problem
worked in sample with pipes
change problist stat to avoid get value again
performance tuning
change to 100,000
2snd sub  scor  3.9868524
init
ft3 sc = 3.9848600