Vector products: Difference between revisions
Content added Content deleted
(Add Seed7 example) |
|||
| Line 744: | Line 744: | ||
6 |
6 |
||
-267 204 -3</pre> |
-267 204 -3</pre> |
||
=={{header|Mathematica}}== |
|||
<lang Mathematica> |
|||
a={3,4,5}; |
|||
b={4,3,5}; |
|||
c,{-5,-12,-13}; |
|||
a.b |
|||
Cross[a,b] |
|||
a.Cross[b,c] |
|||
Cross[a,Cross[b,c]] |
|||
</lang> |
|||
=={{header|Nemerle}}== |
=={{header|Nemerle}}== |
||