deg2rad Function

private function deg2rad(x)

Arguments

Type IntentOptional AttributesName
real(kind=rp), intent(in) :: x

Return Value real(kind=rp)


Called by

proc~~deg2rad~5~~CalledByGraph proc~deg2rad~5 deg2rad proc~fre_h_pitch fRE_H_pitch proc~fre_h_pitch->proc~deg2rad~5 proc~sample_hollmann_distribution_3d sample_Hollmann_distribution_3D proc~sample_hollmann_distribution_3d->proc~deg2rad~5 proc~fre_h_3d fRE_H_3D proc~sample_hollmann_distribution_3d->proc~fre_h_3d proc~sample_hollmann_distribution_3d_psi sample_Hollmann_distribution_3D_psi proc~sample_hollmann_distribution_3d_psi->proc~deg2rad~5 proc~sample_hollmann_distribution_3d_psi->proc~fre_h_3d proc~fre_h fRE_H proc~fre_h->proc~deg2rad~5 proc~sample_hollmann_distribution sample_Hollmann_distribution proc~sample_hollmann_distribution->proc~deg2rad~5 proc~sample_hollmann_distribution->proc~fre_h proc~pr~2 PR proc~pr~2->proc~deg2rad~5 proc~sample_hollmann_distribution_1dtransport sample_Hollmann_distribution_1Dtransport proc~sample_hollmann_distribution_1dtransport->proc~deg2rad~5 proc~sample_hollmann_distribution_1dtransport->proc~fre_h_pitch proc~fre_h_3d->proc~deg2rad~5 proc~fre~4 fRE proc~fre~4->proc~deg2rad~5 proc~get_hollmann_distribution_3d get_Hollmann_distribution_3D proc~get_hollmann_distribution_3d->proc~sample_hollmann_distribution_3d proc~sample_distribution~2 sample_distribution proc~sample_distribution~2->proc~fre~4 proc~fre_hxpr fRE_HxPR proc~fre_hxpr->proc~fre_h proc~fre_hxpr->proc~pr~2 proc~frexpr fRExPR proc~frexpr->proc~pr~2 proc~frexpr->proc~fre~4 proc~get_hollmann_distribution_1dtransport get_Hollmann_distribution_1Dtransport proc~get_hollmann_distribution_1dtransport->proc~sample_hollmann_distribution_1dtransport proc~get_hollmann_distribution_3d_psi get_Hollmann_distribution_3D_psi proc~get_hollmann_distribution_3d_psi->proc~sample_hollmann_distribution_3d_psi proc~get_hollmann_distribution get_Hollmann_distribution proc~get_hollmann_distribution->proc~sample_hollmann_distribution proc~get_experimentalg_distribution get_experimentalG_distribution proc~get_experimentalg_distribution->proc~sample_distribution~2

Contents

Source Code


Source Code

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

    deg2rad = C_PI*x/180.0_rp
  END FUNCTION deg2rad