efield.F90 File Reference

Modules
module	efield

Functions/Subroutines
subroutine, public	efield::efield_init (efield_lflux_file, efield_hflux_file, efiel
subroutine, public	efield::get_efield
subroutine	efield::globalelpotential
subroutine	efield::ff (ph, mt, f)
subroutine	efield::pnm (ct, p)
subroutine	efield::prep_pnm
subroutine	efield::index_quiet
subroutine	efield::read_acoef (efield_lflux_file, efield_hflux_file)
subroutine	efield::adj_s_a
subroutine	efield::constants
subroutine	efield::prep_fk
subroutine	efield::set_fkflfs (fk, fl, fs)
subroutine	efield::efield_mid (mlat, mlon, pot)
subroutine	efield::prep_weimer
subroutine	efield::pot_latsmo (pot, idlat)
subroutine	efield::pot_latsmo2 (pot, idlat)
subroutine	efield::pot_lonsmo (pot, idlon)
subroutine	efield::highlat_getbnd (ihlat_bnd)
subroutine	efield::bnd_sinus (ihlat_bnd, itrans_width)
subroutine	efield::highlat_adjust (pot_highlats, pot_highlat, pot_midlat,
subroutine	efield::interp_poten (pot_highlats, pot_highlat, pot_midlat, ihlat_bnd, itrans_width)
subroutine	efield::derivpotential

Variables
integer	efield::iday
integer	efield::iyear
integer	efield::iday_m
integer	efield::imo
real(r8)	efield::ut
real(r8)	efield::f107d
real(r8)	efield::by
real(r8)	efield::bz
integer, parameter, public	efield::nmlon = 180
integer, parameter, public	efield::nmlat = 90
integer, parameter	efield::nmlath = nmlat/2
integer, parameter	efield::nmlonh = nmlon/2
integer, parameter	efield::nmlonp1 = nmlon+1
integer, parameter	efield::nmlatp1 = nmlat+1
real(r8), dimension(0:nmlat), public	efield::ylatm
real(r8), dimension(0:nmlon), public	efield::ylonm
real(r8), public	efield::dlonm
real(r8), public	efield::dlatm
real(r8), dimension(0:nmlon, 0:nmlat), public	efield::potent
real(r8), dimension(0:nmlon, 0:nmlat), public	efield::ed1
real(r8), dimension(0:nmlon, 0:nmlat), public	efield::ed2
real(r8)	efield::date
real(r8)	efield::day
logical, parameter	efield::iutav =.false.
real(r8), parameter	efield::v_sw = 400._r8
real(r8), parameter	efield::bnd_wei = 44._r8
integer	efield::nmlat_wei
integer, parameter	efield::iseasav = 0
real(r8), parameter	efield::r_e = 6.371e6_r8
real(r8), parameter	efield::h_r = 130.0e3_r8
real(r8), parameter	efield::dy2yr = 365.24_r8
real(r8), parameter	efield::dy2mo = 30.6001_r8
real(r8)	efield::rtd
real(r8)	efield::dtr
real(r8)	efield::sqr2
real(r8)	efield::hr2rd
real(r8)	efield::dy2rd
real(r8)	efield::deg2mlt
real(r8)	efield::mlt2deg
real(r8), dimension(0:nmlat)	efield::sinim_mag
integer	efield::jmin
integer	efield::jmax
integer, parameter	efield::nm = 19
integer, parameter	efield::mm = 18
integer, parameter	efield::nmp = nm + 1
integer, parameter	efield::mmp = mm + 1
real(r8), dimension(0:nm, 0:mm)	efield::r
real(r8), dimension(0:mm)	efield::pmopmmo
integer, parameter	efield::ni = 1091
integer	efield::imax
integer, dimension(0:ni)	efield::kf
integer, dimension(0:ni)	efield::lf
integer, dimension(0:ni)	efield::mf
integer, dimension(0:ni)	efield::nf
integer, dimension(0:ni)	efield::jf
real(r8), dimension(1:3, 0:2)	efield::ft
real(r8), dimension(0:ni)	efield::a_klnm
real(r8), dimension(0:ni)	efield::a_lf
real(r8), dimension(0:ni)	efield::a_hf
real(r8), parameter	efield::ef_max = 0.015_r8
real(r8), parameter	efield::lat_sft = 54._r8
integer	efield::ilat_sft
integer, parameter	efield::nmax_sin = 2
logical, parameter	efield::debug =.false.