|
| subroutine, parameter, public | mo_snoe::snoe_inti (snoe_ubc_file) |
| |
| subroutine | mo_snoe::snoe_rdeof (snoe_ubc_file) |
| |
| subroutine | mo_snoe::geo2mag |
| |
| subroutine, parameter, public | mo_snoe::snoe_timestep_init (kp, f107) |
| |
| subroutine, parameter, public | mo_snoe::set_no_ubc (lchunk, ncol, zint, mmr, rho) |
| |
| subroutine | mo_snoe::snoe_zm (doy, kp, f107, zm) |
| |
| subroutine | mo_snoe::snoe_zmto3d (lchunk, ncol, zm, nmlat, nlev) |
| |
| subroutine | mo_snoe::interpol (nin, xin, yin, nout, xout, yout) |
| |
|
| integer, parameter | mo_snoe::nmodes = 3 |
| |
| real(r8), parameter | mo_snoe::delz = 104.6_r8 |
| |
| real(r8), parameter | mo_snoe::re = 6471._r8 |
| |
| real(r8), parameter | mo_snoe::delx = -399.1_r8 |
| |
| real(r8), parameter | mo_snoe::dely = -286.1_r8 |
| |
| real(r8), parameter | mo_snoe::twopi = 2._r8*pi |
| |
| real(r8), parameter | mo_snoe::pid2 =0.5_r8*pi |
| |
| real(r8), parameter | mo_snoe::theta_n = d2r*(90._r8 - 78.98_r8) |
| |
| real(r8), parameter | mo_snoe::phi_n = d2r*289.1_r8 |
| |
| integer | mo_snoe::nmlat |
| |
| integer | mo_snoe::nlev |
| |
| integer, public | mo_snoe::ndx_no |
| |
| real(r8), dimension(:,:), allocatable | mo_snoe::mlat |
| |
| real(r8), dimension(:), allocatable | mo_snoe::mlat2d |
| |
| real(r8), dimension(:), allocatable | mo_snoe::lev |
| |
| real(r8), dimension(:,:), allocatable | mo_snoe::no_mean |
| |
| real(r8), dimension(:,:,:), allocatable | mo_snoe::eofs |
| |
| real(r8), dimension(:,:,:), allocatable | mo_snoe::snoe_no |
| |
| real(r8) | mo_snoe::cthetan |
| |
| real(r8) | mo_snoe::sthetan |
| |