cvltr Subroutine

subroutine cvltr(pdtime, da, phi, phi2, d1a, dam, mpIN, epIN, sigd, sij, wght_cvfd, clw, elij, epmlmMm, eplaMm, pmflxrIN, pmflxsIN, ev, te, wdtrainA, wdtrainM, paprs, it, tr, upd, dnd, inb, icb, dtrcv, trsptd, dtrSscav, dtrsat, dtrUscav, qDi, qPr, qPa, qMel, qTrdi, dtrcvMA, Mint, zmfd1a, zmfphi2, zmfdam)

Uses

  • proc~~cvltr~~UsesGraph proc~cvltr cvltr module~yomcst_mod_h yomcst_mod_h proc~cvltr->module~yomcst_mod_h module~infotrac_phy~2 infotrac_phy proc~cvltr->module~infotrac_phy~2 module~dimphy~3 dimphy proc~cvltr->module~dimphy~3 IOIPSL IOIPSL proc~cvltr->IOIPSL module~conema3_mod_h conema3_mod_h proc~cvltr->module~conema3_mod_h module~yoecumf_mod_h yoecumf_mod_h proc~cvltr->module~yoecumf_mod_h module~strings_mod strings_mod module~infotrac_phy~2->module~strings_mod module~readtracfiles_mod readTracFiles_mod module~infotrac_phy~2->module~readtracfiles_mod iso_fortran_env iso_fortran_env module~strings_mod->iso_fortran_env module~readtracfiles_mod->module~strings_mod module~ioipsl_getin_p_mod ioipsl_getin_p_mod module~readtracfiles_mod->module~ioipsl_getin_p_mod module~ioipsl_getin_p_mod->module~strings_mod module~mod_phys_lmdz_transfert_para mod_phys_lmdz_transfert_para module~ioipsl_getin_p_mod->module~mod_phys_lmdz_transfert_para module~mod_phys_lmdz_para mod_phys_lmdz_para module~ioipsl_getin_p_mod->module~mod_phys_lmdz_para ioipsl ioipsl module~ioipsl_getin_p_mod->ioipsl module~mod_phys_lmdz_omp_transfert mod_phys_lmdz_omp_transfert module~mod_phys_lmdz_transfert_para->module~mod_phys_lmdz_omp_transfert module~mod_phys_lmdz_mpi_transfert mod_phys_lmdz_mpi_transfert module~mod_phys_lmdz_transfert_para->module~mod_phys_lmdz_mpi_transfert module~mod_phys_lmdz_para->module~mod_phys_lmdz_transfert_para module~mod_phys_lmdz_omp_data mod_phys_lmdz_omp_data module~mod_phys_lmdz_para->module~mod_phys_lmdz_omp_data module~mod_phys_lmdz_mpi_data mod_phys_lmdz_mpi_data module~mod_phys_lmdz_para->module~mod_phys_lmdz_mpi_data module~lmdz_mpi lmdz_mpi module~mod_phys_lmdz_mpi_data->module~lmdz_mpi module~lmdz_cppkeys_wrapper lmdz_cppkeys_wrapper module~mod_phys_lmdz_mpi_data->module~lmdz_cppkeys_wrapper module~lmdz_cppkeys_wrapper->iso_fortran_env netcdf netcdf module~lmdz_cppkeys_wrapper->netcdf
       sigd,sij,clw,elij,epmlmMm,eplaMm,              &   !RL

!!! quantite de traceur dans la descente d'air insaturee : 4 juin 2012 !!!

    zmfa(i,j,it)=da(i,j)*(tr(i,1,it)-tr(i,j,it))                     ! da

jyg (20130119) correction pour le sommet du nuage if(j.ge.inb(i)) then !au-dessus du nuage, sommet inclu print test descente insaturee

     'zmfdam',zmfdam(i,j,it),'zmfpsi',zmfphi2(i,j,it),&


      'zmfa',zmfa(i,j,it),'zmfp',zmfp(i,j,it),&

      'Pa',Pa(i,j),'eplaMm',eplaMm(i,j)
     'zmfd1a=da1*qa',zmfd1a(i,j,it),'Pa*qPa',wdtrainA(i,j)*qPa(i,j,it),'da1',d1a(i,j)

!!!!

Arguments

Type IntentOptional Attributes Name
real, intent(in) :: pdtime
real, intent(in), DIMENSION(klon,klev) :: da
real, intent(in), DIMENSION(klon,klev,klev) :: phi
real, intent(in), DIMENSION(klon,klev,klev) :: phi2
real, intent(in), DIMENSION(klon,klev) :: d1a
real, intent(in), DIMENSION(klon,klev) :: dam
real, intent(in), DIMENSION(klon,klev) :: mpIN
real, intent(in), DIMENSION(klon,klev) :: epIN
real, intent(in), DIMENSION(klon) :: sigd
real, intent(in), DIMENSION(klon,klev,klev) :: sij
real, intent(in), DIMENSION(klon,klev) :: wght_cvfd
real, intent(in), DIMENSION(klon,klev) :: clw
real, intent(in), DIMENSION(klon,klev,klev) :: elij
real, intent(in), DIMENSION(klon,klev,klev) :: epmlmMm
real, intent(in), DIMENSION(klon,klev) :: eplaMm
real, intent(in), DIMENSION(klon,klev) :: pmflxrIN
real, intent(in), DIMENSION(klon,klev) :: pmflxsIN
real, intent(in), DIMENSION(klon,klev) :: ev
real, intent(in), DIMENSION(klon,klev) :: te
real, intent(in), DIMENSION(klon,klev) :: wdtrainA
real, intent(in), DIMENSION(klon,klev) :: wdtrainM
real, intent(in), DIMENSION(klon,klev+1) :: paprs
integer, intent(in) :: it
real, intent(in), DIMENSION(klon,klev,nbtr) :: tr
real, intent(in), DIMENSION(klon,klev) :: upd
real, intent(in), DIMENSION(klon,klev) :: dnd
integer, intent(in), DIMENSION(klon) :: inb
integer, intent(in), DIMENSION(klon) :: icb
real, intent(out), DIMENSION(klon,klev,nbtr) :: dtrcv
real, intent(out), DIMENSION(klon,klev,nbtr) :: trsptd
real, intent(out), DIMENSION(klon,klev,nbtr) :: dtrSscav
real, intent(out), DIMENSION(klon,klev,nbtr) :: dtrsat
real, intent(out), DIMENSION(klon,klev,nbtr) :: dtrUscav
real, intent(out), DIMENSION(klon,klev,nbtr) :: qDi
real, intent(out), DIMENSION(klon,klev,nbtr) :: qPr
real, intent(out), DIMENSION(klon,klev,nbtr) :: qPa
real, intent(out), DIMENSION(klon,klev,nbtr) :: qMel
real, intent(out), DIMENSION(klon,klev,nbtr) :: qTrdi
real, intent(out), DIMENSION(klon,klev,nbtr) :: dtrcvMA
real, intent(out), DIMENSION(klon,klev) :: Mint
real, intent(out), DIMENSION(klon,klev,nbtr) :: zmfd1a
real, intent(out), DIMENSION(klon,klev,nbtr) :: zmfphi2
real, intent(out), DIMENSION(klon,klev,nbtr) :: zmfdam

Calls

proc~~cvltr~~CallsGraph proc~cvltr cvltr getin getin proc~cvltr->getin

Contents