cires_ugwp_init()

subroutine, public cires_ugwp::cires_ugwp_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=*), intent(in)	fn_nml2,
		integer, intent(in)	lonr,
		integer, intent(in)	latr,
		integer, intent(in)	levs,
		real(kind=kind_phys), dimension(:), intent(in)	ak,
		real(kind=kind_phys), dimension(:), intent(in)	bk,
		real(kind=kind_phys), intent(in)	dtp,
		real(kind=kind_phys), dimension(:), intent(in)	cdmbgwd,
		real(kind=kind_phys), dimension(:), intent(in)	cgwf,
		real(kind=kind_phys), intent(in)	pa_rf_in,
		real(kind=kind_phys), intent(in)	tau_rf_in,
		real(kind=kind_phys), intent(in)	con_p0,
		integer, intent(in)	gwd_opt,
		logical, intent(in)	do_ugwp,
		character(len=*), intent(out)	errmsg,
		integer, intent(out)	errflg )

Argument Table