---input
arguments:   v1     = first vector in the dot product
(double precision)
v2     = second vector in the dot product
(double precision)
n      = vector dimension
(integer)