Previous: pltej Up: ../plot79_p.html Next: pltex
SUBROUTINE PLTEU (O,E1,E2,E3)
C$ (Euler Angles)
C$ Construct an Euler angle rotation matrix, O = R1*R2*R3. R1
C$ and R3 are counterclockwise rotations in the X-Y plane
C$ through angles E1 and E3 respectively. R2 is a rotation in
C$ the Y-Z plane through the counterclockwise angle E2. The
C$ arguments are:
C$
C$ O(3,3).........Matrix in which rotation is stored.
C$ E1,E2,E3.......Euler angles (degrees) of rotation.
C$ (09-APR-82)