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 ) |