ScalarProduct(L: LIST, M: LIST): INT, RAT, or RINGELEM
/**/ ScalarProduct([1,2,3], [5,0,-1]); 2 /**/ use QQ[x,y,z]; /**/ ScalarProduct([x,y,z], [5,0,-1]); 5*x -z