20.3.6 CR2C

1.
機能
2次元直角座標を回転する.
2.
呼び出し方法
CALL CR2C(THETA,X0,Y0,X1,Y1)
3.
パラメーターの説明
theta (R) 回転角.
x0,y0 (R) 回転前の座標値.
x1,y1 (R) 回転後の座標値.
4.
備考
(a)
定義式
  
 x1 =  cos(θ)x0 sin(θ)y0
 y1 =  -sin(θ)x0 cos(θ)y0