deg2rad Function

private function deg2rad(x)

@brief Function that converts @f$x@f$ from degrees to radians.

@param x Angle @f$x@f$ in degrees. @param deg2rad Angle @f$x@f$ converted to radians.

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=rp),	intent(in)			::	x

Return Value real(kind=rp)

Contents

Source Code

deg2rad

Source Code

  FUNCTION deg2rad(x)
    REAL(rp), INTENT(IN) 	:: x
    REAL(rp) 				:: deg2rad

    deg2rad = C_PI*x/180.0_rp
  END FUNCTION deg2rad