test_fang Program

  1. test_fang.f90
  2. test_fang

Uses

  • program~~test_fang~~UsesGraph program~test_fang test_fang module~phys_consts phys_consts program~test_fang->module~phys_consts module~ionrate ionrate program~test_fang->module~ionrate iso_fortran_env iso_fortran_env program~test_fang->iso_fortran_env module~phys_consts->iso_fortran_env module~ionrate->module~phys_consts module~ionrate->iso_fortran_env module~ionize_fang ionize_fang module~ionrate->module~ionize_fang module~ionize_fang->module~phys_consts module~ionize_fang->iso_fortran_env

Need program statement for FORD Reproduces data of: * Figure 3 in https://agupubs.onlinelibrary.wiley.com/doi/10.1029/2008JA013384 * Figure 2 in Fang 2010


Calls

program~~test_fang~~CallsGraph program~test_fang test_fang proc~ionization_fang2010 ionization_fang2010 program~test_fang->proc~ionization_fang2010 proc~parse_arg parse_arg program~test_fang->proc~parse_arg proc~ionization_fang2008 ionization_fang2008 program~test_fang->proc~ionization_fang2008 proc~meters METERS proc~ionization_fang2010->proc~meters proc~gravity_accel gravity_accel proc~ionization_fang2010->proc~gravity_accel proc~tselec TSELEC proc~ionization_fang2010->proc~tselec proc~fang2010 fang2010 proc~ionization_fang2010->proc~fang2010 proc~ionization_fang2008->proc~meters proc~ionization_fang2008->proc~gravity_accel proc~fang2008 fang2008 proc~ionization_fang2008->proc~fang2008 proc~ionization_fang2008->proc~tselec sw sw proc~tselec->sw sav sav proc~tselec->sav swc swc proc~tselec->swc svv svv proc~tselec->svv amod amod proc~tselec->amod

Contents

Variables

Subroutines


Variables

Type AttributesNameInitial
integer :: i
integer :: argc
real(kind=wp) :: Q0_erg
real(kind=wp) :: f107
real(kind=wp) :: f107a
real(kind=wp) :: Ap
real(kind=wp) :: glat
real(kind=wp) :: glon
real(kind=wp) :: UTsec
real(kind=wp) :: altrange(3)
real(kind=wp) :: a
real(kind=wp), allocatable:: alt_km(:)
real(kind=wp), allocatable:: E0_keV(:)
real(kind=wp), allocatable:: Qtot08(:,:)
real(kind=wp), allocatable:: Qtot10(:,:)
integer :: doy
real(kind=wp) :: massden_gcm3
real(kind=wp) :: meanmass_g

Subroutines

subroutine parse_arg(iarg, val)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: iarg
class(*), intent(out) :: val