CCPP SciDoc v7.0.0  v7.0.0
Common Community Physics Package Developed at DTC
 
Loading...
Searching...
No Matches

◆ unified_ugwp_init()

subroutine, public unified_ugwp::unified_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, dimension(:), intent(in) jdat,
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) con_pi,
real(kind=kind_phys), intent(in) con_rerth,
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,
logical, intent(in) do_ugwp,
logical, intent(in) do_ugwp_v0,
logical, intent(in) do_ugwp_v0_orog_only,
logical, intent(in) do_ugwp_v0_nst_only,
logical, intent(in) do_gsl_drag_ls_bl,
logical, intent(in) do_gsl_drag_ss,
logical, intent(in) do_gsl_drag_tofd,
integer, intent(in) gwd_opt,
character(len=*), intent(out) errmsg,
integer, intent(out) errflg )

Definition at line 65 of file unified_ugwp.F90.