subroutine cires_ugwpv1_module::cires_ugwpv1_init | ( | integer, intent(in) | me, |
integer, intent(in) | master, | ||
integer, intent(in) | nlunit, | ||
integer, intent(in) | logunit, | ||
integer, dimension(8), intent(in) | jdat_gfs, | ||
real(kind=kind_phys), intent(in) | con_pi, | ||
real(kind=kind_phys), intent(in) | con_rerth, | ||
character(len=64), intent(in) | fn_nml2, | ||
character(len=*), dimension(:), intent(in) | input_nml_file, | ||
integer, intent(in) | lonr, | ||
integer, intent(in) | latr, | ||
integer, intent(in) | levs, | ||
real(kind=kind_phys), dimension(levs+1), intent(in) | ak, | ||
real(kind=kind_phys), dimension(levs+1), intent(in) | bk, | ||
real(kind=kind_phys), intent(in) | pref, | ||
real(kind=kind_phys), intent(in) | dtp, | ||
character(len=*), intent(out) | errmsg, | ||
integer, intent(out) | errflg ) |
Definition at line 147 of file cires_ugwpv1_module.F90.