20.3.8 CR3S

1.
機能
球面座標を回転する.
2.
呼び出し方法
CALL CR3S(THETA,PHI,PSI,THETA0,PHI0,THETA1,PHI1)
3.
パラメーターの説明
THETA,PHI,PSI (R) Euler の回転角 (θ,φ,ψ).
THETA0,PHI0 (R) 回転前の座標値.
THETA1,PHI1 (R) 回転後の座標値.
4.
備考
(a)
なし.