pgaci()

subroutine gfdl_cloud_microphys_v3_mod::pgaci ( integer, intent(in) ks, integer, intent(in) ke, real(kind_phys), intent(in) dts, real(kind_phys), dimension (ks:ke), intent(inout) qv, real(kind_phys), dimension (ks:ke), intent(inout) ql, real(kind_phys), dimension (ks:ke), intent(inout) qr, real(kind_phys), dimension (ks:ke), intent(inout) qi, real(kind_phys), dimension (ks:ke), intent(inout) qs, real(kind_phys), dimension (ks:ke), intent(inout) qg, real (kind = r8), dimension (ks:ke), intent(inout) tz, real(kind_phys), dimension (ks:ke), intent(in) den, real(kind_phys), dimension (ks:ke), intent(in) denfac, real(kind_phys), dimension (ks:ke), intent(in) vti, real(kind_phys), dimension (ks:ke), intent(in) vtg )

private