v := 5*i - j + 2*k; w := 2*i + j - k; crossprod(v,w); crossprod([5,-1,2],[2,1,-1]); v :=[5,-1,2]: w := [2,1,-1]: [v[2]*w[3]-v[3]*w[2], v[3]*w[1]-v[1]*w[3], v[1]*w[2]-v[2]*w[1]];