deg2rad Function

  1. korc_avalanche.f90
  2. korc_avalanche
  3. deg2rad

public function deg2rad(x)

Arguments

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

Return Value real(kind=rp)


Called by

proc~~deg2rad~3~~CalledByGraph proc~deg2rad~3 deg2rad proc~spong_2d Spong_2D proc~spong_2d->proc~deg2rad~3 proc~sample_distribution~3 sample_distribution proc~sample_distribution~3->proc~deg2rad~3 proc~avalanche_4d Avalanche_4D proc~avalanche_4d->proc~deg2rad~3 proc~get_avalanche_distribution get_avalanche_distribution proc~get_avalanche_distribution->proc~sample_distribution~3 proc~get_avalanche_4d get_Avalanche_4D proc~get_avalanche_4d->proc~avalanche_4d proc~spong_3d Spong_3D proc~spong_3d->proc~spong_2d

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