hamming :: [Int]
hamming = 1:(samenvoegen (samenvoegen [2*a|a<-hamming] [3*a|a<-hamming]) [5*a|a<-hamming])
hamming :: [Int]
hamming = 1:(samenvoegen (samenvoegen [2*a|a<-hamming] [3*a|a<-hamming]) [5*a|a<-hamming])
hamming = 1:(samenvoegen (samenvoegen [2*a|a<-hamming] [3*a|a<-hamming]) [5*a|a<-hamming])