Quaternion type: Difference between revisions

Content deleted Content added
Rdm (talk | contribs)
m J: minor simplification
Rdm (talk | contribs)
m J: name change -- mag -> norm
Line 36: Line 36:


NB. task
NB. task
mag=: %:@ip~ NB. | y
norm=: %:@ip~ NB. | y
neg=: - NB. - y
neg=: - NB. - y
conj=: 1 _1 _1 _1 * ] NB. + y
conj=: 1 _1 _1 _1 * ] NB. + y
Line 49: Line 49:
r=: 7
r=: 7
mag q
norm q
5.47723
5.47723
neg q
neg q