mo_jeuv.F90 File Reference

Modules
module	mo_jeuv

Functions/Subroutines
subroutine, public	mo_jeuv::jeuv_init (euvacdat_file, photon_file, electron_file, indexer)
subroutine, public	mo_jeuv::jeuv (nlev, zen, occ, o2cc, n2cc, zkm, euv_prates)
subroutine, public	mo_jeuv::heuv (nlev, zen, occ, o2cc, n2cc, o_vmr, o2_vmr, n2_vmr, cparg, mw, zkm, euv_hrates, kbot)

Variables
integer, parameter, public	mo_jeuv::neuv = 26
integer, parameter, public	mo_jeuv::nionrates = 11
integer, parameter	mo_jeuv::nmaj = 3
integer, parameter	mo_jeuv::nspecies = 5
integer, parameter	mo_jeuv::nstat = 6
integer, parameter	mo_jeuv::lmax = 23
real(r8), parameter	mo_jeuv::heat_eff_fac = .05_r8
real(r8), parameter	mo_jeuv::hc = 6.62608e-34_r8 * 2.9979e8_r8 / 1.e-9_r8
real(r8)	mo_jeuv::d2r
real(r8), dimension(lmax, nspecies)	mo_jeuv::sigabs
real(r8), dimension(lmax, nstat, nmaj)	mo_jeuv::branch_p = 0._r8
real(r8), dimension(lmax, nstat, nmaj)	mo_jeuv::branch_e = 0._r8
real(r8), dimension(lmax)	mo_jeuv::energy