The scalar product of two lists of integers $xs$ and $ys$ of length $n$ is given by the sum of the products of their corresponding integers:

${\displaystyle \underset{i=0}{\overset{n-1}{}}}(x{s}_i*y{s}_i)$

In a similar manner to chisqr $($defined below$),$ show how a list comprehension can be used to define a function scalarproduct :: $[$Int$]$ Int