\( \DeclareMathOperator{\abs}{abs} \newcommand{\ensuremath}[1]{\mbox{$#1$}} \)
| (%i1) | load ( "vect" ) $ |
| (%i3) |
f1
:
[
sin
(
x3
)
,
cos
(
x3
)
,
0
]
;
f2 : [ 0 , 0 , 1 ] ; |
\[\operatorname{(f1) }\left[ \sin{\left( \ensuremath{\mathrm{x3}}\right) }\operatorname{,}\cos{\left( \ensuremath{\mathrm{x3}}\right) }\operatorname{,}0\right] \]
\[\operatorname{(f2) }\left[ 0\operatorname{,}0\operatorname{,}1\right] \]
| (%i4) | express ( f1 ~ f2 ) ; |
\[\operatorname{ }\left[ \cos{\left( \ensuremath{\mathrm{x3}}\right) }\operatorname{,}-\sin{\left( \ensuremath{\mathrm{x3}}\right) }\operatorname{,}0\right] \]
Created with wxMaxima.