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)
なし.