subroutine module_plumerise::ebu_driver |
( |
real(kind=kind_phys), dimension( ims:ime, jms:jme ), intent(out) | flam_frac, |
|
|
real(kind=kind_phys), dimension( ims:ime, jms:jme ), intent(in) | ebu_in, |
|
|
real(kind=kind_phys), dimension( ims:ime, kms:kme, jms:jme ), intent(inout) | ebu, |
|
|
real(kind=kind_phys), dimension( ims:ime , kms:kme , jms:jme ), intent(in) | theta_phy, |
|
|
real(kind=kind_phys), dimension( ims:ime , kms:kme , jms:jme ), intent(in) | q_vap, |
|
|
real(kind=kind_phys), dimension( ims:ime , kms:kme , jms:jme ), intent(in) | rho_phy, |
|
|
real(kind=kind_phys), dimension( ims:ime , kms:kme , jms:jme ), intent(in) | vvel, |
|
|
real(kind=kind_phys), dimension( ims:ime , kms:kme , jms:jme ), intent(in) | u_phy, |
|
|
real(kind=kind_phys), dimension( ims:ime , kms:kme , jms:jme ), intent(in) | v_phy, |
|
|
real(kind=kind_phys), dimension( ims:ime , kms:kme , jms:jme ), intent(in) | pi_phy, |
|
|
real(kind=kind_phys), dimension( ims:ime , kms:kme , jms:jme ), intent(in) | wind_phy, |
|
|
real(kind=kind_phys), dimension( ims:ime , kms:kme , jms:jme ), intent(in) | z_at_w, |
|
|
real(kind=kind_phys), dimension( ims:ime , kms:kme , jms:jme ), intent(in) | z, |
|
|
real(kind=kind_phys), intent(in) | g, |
|
|
real(kind=kind_phys), intent(in) | con_cp, |
|
|
real(kind=kind_phys), intent(in) | con_rd, |
|
|
real(kind=kind_phys), dimension( ims:ime, jms:jme), intent(in) | frp_inst, |
|
|
integer, dimension(ims:ime, jms:jme), intent(out) | k_min, |
|
|
integer, dimension(ims:ime, jms:jme), intent(out) | k_max, |
|
|
integer, intent(in) | wind_eff_opt, |
|
|
integer, dimension(ims:ime, jms:jme), intent(in) | kpbl_thetav, |
|
|
integer, dimension(ims:ime, jms:jme), intent(in) | kpbl, |
|
|
real(kind_phys) | curr_secs, |
|
|
real(kind_phys), dimension(ims:ime,jms:jme), intent(in) | xlat, |
|
|
real(kind_phys), dimension(ims:ime,jms:jme), intent(in) | xlong, |
|
|
real, dimension(ims:ime, jms:jme), intent(in) | uspdavg2d, |
|
|
real, dimension(ims:ime, jms:jme), intent(in) | hpbl2d, |
|
|
integer, intent(in) | mpiid, |
|
|
real(kind_phys), intent(in) | alpha, |
|
|
real(kind_phys), intent(in) | frp_min, |
|
|
real(kind_phys), intent(in) | frp_wthreshold, |
|
|
real(kind_phys), intent(in) | zpbl_lim, |
|
|
real(kind_phys), intent(in) | uspd_lim, |
|
|
integer, intent(in) | ids, |
|
|
integer, intent(in) | ide, |
|
|
integer, intent(in) | jds, |
|
|
integer, intent(in) | jde, |
|
|
integer, intent(in) | kds, |
|
|
integer, intent(in) | kde, |
|
|
integer, intent(in) | ims, |
|
|
integer, intent(in) | ime, |
|
|
integer, intent(in) | jms, |
|
|
integer, intent(in) | jme, |
|
|
integer, intent(in) | kms, |
|
|
integer, intent(in) | kme, |
|
|
integer, intent(in) | its, |
|
|
integer, intent(in) | ite, |
|
|
integer, intent(in) | jts, |
|
|
integer, intent(in) | jte, |
|
|
integer, intent(in) | kts, |
|
|
integer, intent(in) | kte, |
|
|
character(*), intent(inout) | errmsg, |
|
|
integer, intent(inout) | errflg ) |