subroutine cires_ugwpv0_module::cires_ugwpv0_mod_init |
( |
integer, intent(in) |
me, |
|
|
integer, intent(in) |
master, |
|
|
integer, intent(in) |
nlunit, |
|
|
character (len = *), dimension(:), intent(in) |
input_nml_file, |
|
|
integer, intent(in) |
logunit, |
|
|
character(len=64), intent(in) |
fn_nml, |
|
|
integer, intent(in) |
lonr, |
|
|
integer, intent(in) |
latr, |
|
|
integer, intent(in) |
levs, |
|
|
real, dimension(levs+1), intent(in) |
ak, |
|
|
real, dimension(levs+1), intent(in) |
bk, |
|
|
real, intent(in) |
pref, |
|
|
real, intent(in) |
dtp, |
|
|
real, dimension(2), intent(in) |
cdmvgwd, |
|
|
real, dimension(2), intent(in) |
cgwf, |
|
|
real, intent(in) |
pa_rf_in, |
|
|
real, intent(in) |
tau_rf_in |
|
) |
| |