Example 1.2.4

> restart;

> with(linalg):

Warning, new definition for norm

Warning, new definition for trace

> A:=vector(3, [-1,2,7]);

> B:=vector(3, [-3,1,5]);

> innerprod(A-B,A-B);

> sqrt(%);

> norm(A-B, 2);