calcdustemission Subroutine

public subroutine calcdustemission(debutphy, nsurfwind, zu10m, zv10m, wstar, ale_bl, ale_wake, param_wstarBL, param_wstarWAKE, wind10ms, probu, emisbin)

Uses

  • proc~~calcdustemission~~UsesGraph proc~calcdustemission calcdustemission module~infotrac_phy~2 infotrac_phy proc~calcdustemission->module~infotrac_phy~2 module~dimphy~3 dimphy proc~calcdustemission->module~dimphy~3 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

,'zwstar=sqrt(2.(',flag_wstarBL,'ale_bl+0.01(',flag_wstar,'-100)*ale_wake))'

print *,k,i,fluxdust(k,i)

print *,k,j,emisbin(k,j)

Arguments

Type IntentOptional Attributes Name
logical, intent(in) :: debutphy
integer, intent(in) :: nsurfwind
real, intent(in), DIMENSION(klon) :: zu10m
real, intent(in), DIMENSION(klon) :: zv10m
real, intent(in), DIMENSION(klon) :: wstar
real, intent(in), DIMENSION(klon) :: ale_bl
real, intent(in), DIMENSION(klon) :: ale_wake
real, intent(in), DIMENSION(klon) :: param_wstarBL
real, intent(in), DIMENSION(klon) :: param_wstarWAKE
real, intent(in), DIMENSION(klon,nsurfwind) :: wind10ms
real, intent(in), DIMENSION(klon,nsurfwind) :: probu
real, DIMENSION(klon,nbins) :: emisbin

!$OMP THREADPRIVATE(wind10ms) !$OMP THREADPRIVATE(wind10cm)

Calls

proc~~calcdustemission~~CallsGraph proc~calcdustemission calcdustemission proc~def_copyncl def_copyncl proc~calcdustemission->proc~def_copyncl proc~def_dichotomy def_dichotomy proc~def_copyncl->proc~def_dichotomy

Called by

proc~~calcdustemission~~CalledByGraph proc~calcdustemission calcdustemission proc~dustemission dustemission proc~dustemission->proc~calcdustemission proc~coarsemission coarsemission proc~coarsemission->proc~dustemission proc~coarsemission~2 coarsemission proc~coarsemission~2->proc~dustemission proc~phytracr_spl phytracr_spl proc~phytracr_spl->proc~coarsemission proc~phytracr_spl~2 phytracr_spl proc~phytracr_spl~2->proc~coarsemission proc~physiq physiq proc~physiq->proc~phytracr_spl proc~physiq~2 physiq proc~physiq~2->proc~phytracr_spl proc~old_lmdz1d old_lmdz1d proc~old_lmdz1d->proc~physiq proc~call_physiq call_physiq proc~call_physiq->proc~physiq proc~call_physiq~2 call_physiq proc~call_physiq~2->proc~physiq proc~scm scm proc~scm->proc~physiq program~lmdz1d lmdz1d program~lmdz1d->proc~old_lmdz1d program~lmdz1d->proc~scm proc~calfis calfis proc~calfis->proc~call_physiq proc~leapfrog leapfrog proc~leapfrog->proc~calfis program~gcm~2 gcm program~gcm~2->proc~leapfrog

Contents