% skalarprodukt(+V,+W,-P)  P ist das Skalarprodukt der Vektoren V und W.
skalarprodukt([],[],0).
skalarprodukt([A|As],[B|Bs],P):-
    skalarprodukt(As,Bs,Q),
    P is A*B+Q.

% ?- skalarprodukt([2,5,1],[3,-4,2],P).
