Vector products: Difference between revisions

</pre>

=={{header|Forth}}==

: 3f! ( &v - ) ( f: x y z - ) dup float+ dup float+ f! f! f! ;