#######################################
# MV Matematica - vettori.

# Lunghezza di un vettore reale.
Mv.lun = function (x)
sqrt(Mv.scalare(x,x))

# Prodotto scalare reale.
Mv.scalare = function (a,b)
{p=crossprod(a,b); drop(p)}