sind Function

public elemental function sind(angle_in_degrees)

Arguments

Type IntentOptional Attributes Name
class(*), intent(in) :: angle_in_degrees

Return Value real


Contents

Source Code

sind

Source Code

elemental real function sind(angle_in_degrees)

! ident_60="@(#) M_pixel sind(3f) sin(3f) with degrees as input instead of radians"

class(*),intent(in)  :: angle_in_degrees
real                 :: angle_in_degrees_local
   angle_in_degrees_local=anyscalar_to_double(angle_in_degrees)
   sind=sin(angle_in_degrees_local*degrees_to_radians)
end function sind