LVM1)!SieveStrict Bool* kind  data  False Bool type 1 True Bool type  1" List * -> * kind*( data.&,Nil List a type64 1280 Cons9+a -> List a -> List a type@> 1<B0AJJ(ne )HFAJJmod )NLAJJadd )TRaJN"M:N :.?6K":I. filter )ZX J5P7JN":1?6K"M take )`^qJN"I7 last )fdJN" I7test.11 )lhj1I= odds )rpi6=>6K"build.15 )xtvi:I(( noDiv )~|1:IF primes )JN":@B.?F>6K"sieve.18 )YC1?I4 main )LVM