Class Geometry
In: geometry.f90

幾何学に関するルーチン

Methods

rt_2_xy  

Public Instance methods

Subroutine :
r :real, intent(in)
: 中心からの距離
t :real, intent(in)
: x 軸からの角度 [rad]
x :real, intent(inout)
: x 座標
y :real, intent(inout)
: y 座標

平面極座標から平面デカルト座標への変換

この場合は座標の原点が r で自動的に指定されているので, 原点を指定する引数は必要ない. 逆に返される x, y の値は, r=0 を原点とした デカルト座標系として返されることに注意する.

[Source]

subroutine rt_2_xy( r, t, x, y )
! 平面極座標から平面デカルト座標への変換
!
! この場合は座標の原点が r で自動的に指定されているので,
! 原点を指定する引数は必要ない.
! 逆に返される x, y の値は, r=0 を原点とした
! デカルト座標系として返されることに注意する.
  implicit none
  real, intent(in) :: r  ! 中心からの距離
  real, intent(in) :: t  ! x 軸からの角度 [rad]
  real, intent(inout) :: x  ! x 座標
  real, intent(inout) :: y  ! y 座標

  x=r*cos(t)
  y=r*sin(t)

end subroutine