Argh, sto diventando lento a postare XD.
Codice:
scalar_product xs ys = sum $ [ x*y | x <- xs, y <- ys ]
No dovresti usare le parallel list comprehension, che pero' non sono standard
(e togliere un $ di troppo)
Codice:
scalar_product xs ys = sum [ x*y | x <- xs | y <- ys ]
Oppure zippi come nel mio esempio.