prduct [] = 1
prduct (x:xs) = x * prduct xs