Searched refs:microp_uniform (Results 1 – 2 of 2) sorted by relevance
/dports/math/libpgmath/flang-d07daf3/test/ncar_kernels/CAM5_mg2_pgi/src/ |
H A D | micro_mg_utils.F90 | 439 …elemental SUBROUTINE kk2000_liq_autoconversion(microp_uniform, qcic, ncic, rho, relvar, prc, nprc,… argument 440 LOGICAL, intent(in) :: microp_uniform local 450 IF (.not. microp_uniform) THEN 505 …elemental SUBROUTINE immersion_freezing(microp_uniform, t, pgam, lamc, qcic, ncic, relvar, mnuccc,… argument 506 LOGICAL, intent(in) :: microp_uniform local 522 IF (.not. microp_uniform) THEN 540 LOGICAL, intent(in) :: microp_uniform local 570 IF (.not. microp_uniform) THEN 760 …elemental SUBROUTINE accrete_cloud_water_rain(microp_uniform, qric, qcic, ncic, relvar, accre_enha… argument 761 LOGICAL, intent(in) :: microp_uniform local [all …]
|
H A D | micro_mg2_0.F90 | 164 LOGICAL :: microp_uniform variable 203 READ(UNIT=kgen_unit) microp_uniform 613 IF (microp_uniform) THEN 934 …CALL kk2000_liq_autoconversion(microp_uniform, qcic(:,k), ncic(:,k), rho(:,k), relvar(:,k), prc(:,… 1007 …CALL immersion_freezing(microp_uniform, t(:,k), pgam(:,k), lamc(:,k), qcic(:,k), ncic(:,k), relvar… 1018 …CALL contact_freezing(microp_uniform, t(:,k), p(:,k), rndst(:,k,:), nacon(:,k,:), pgam(:,k), lamc(… 1064 …CALL accrete_cloud_water_rain(microp_uniform, qric(:,k), qcic(:,k), ncic(:,k), relvar(:,k), accre_…
|