cosd Function

public elemental function cosd(x) result(c)

Arguments

Type IntentOptional Attributes Name
real(kind=REAL64), intent(in) :: x

Return Value real(kind=REAL64)


Called by

proc~~cosd~~CalledByGraph proc~cosd cosd proc~write_data~2 RegridSupport%write_data proc~write_data~2->proc~cosd program~main~9 main program~main~9->proc~write_data~2

Source Code

   elemental function cosd(x) result(c)
      real(kind=REAL64), intent(in) :: x
      real(kind=REAL64) :: c

      c = cos(x * MAPL_DEGREES_TO_RADIANS_R8)

   end function cosd