subroutine | myjpbl_wrapper_run (restart, do_myjsfc, im, levs, dt_phs, kdt, ntrac, ntke, ntcw, ntiw, ntrw, ntsw, ntgl, ugrs, vgrs, tgrs, qgrs, prsl, prsi, phii, hprime1, prsik_1, prslk_1, prslki, tsfc, qsfc, phy_myj_qsfc, phy_myj_thz0, phy_myj_qz0, phy_myj_uz0, phy_myj_vz0, phy_myj_z0base, phy_myj_akhs, phy_myj_akms, phy_myj_chkqlm, phy_myj_elflx, phy_myj_a1u, phy_myj_a1t, phy_myj_a1q, pblh, kpbl, kinver, slmsk, garea, ustar, cm, ch, wind, snowd, zorl, evap, hflx, dudt, dvdt, dtdt, dqdt, dusfc, dvsfc, dtsfc, dqsfc, dkt, xkzm_m, xkzm_h, xkzm_s, gamt, gamq, con_cp, con_g, con_rd, me, lprnt, gen_tend, ldiag3d, dtend, dtidx, index_of_temperature, index_of_x_wind, index_of_y_wind, index_of_process_pbl, ntqv, errmsg, errflg) |