Orbital elements: Difference between revisions

Content deleted Content added
Rdm (talk | contribs)
Rdm (talk | contribs)
Line 740: Line 740:


=={{header|J}}==
=={{header|J}}==
{{trans|Raku}}<lang J>NB. euler rotation matrix le,ft hand rule
{{trans|Raku}}<lang J>NB. euler rotation matrix left hand rule
NB. x: axis (0, 1 or 2), y: angle in radians
NB. x: axis (0, 1 or 2), y: angle in radians
R=: {{ ((2 1,:1 2) o.(,-)y*_1^2|x)(,&.>/~0 1 2-.x)} =i.3 }}
R=: {{ ((2 1,:1 2) o.(,-)y*_1^2|x)(,&.>/~0 1 2-.x)} =i.3 }}