public subroutine alpale_wk(dtime, cell_area, zoccur, sigmaw, wdens, fip, fip_cond)
Uses
proc~~alpale_wk~2~~UsesGraph
proc~alpale_wk~2
alpale_wk
module~ioipsl_getin_p_mod
ioipsl_getin_p_mod
proc~alpale_wk~2->module~ioipsl_getin_p_mod
module~print_control_mod
print_control_mod
proc~alpale_wk~2->module~print_control_mod
module~yomcst_mod_h
yomcst_mod_h
proc~alpale_wk~2->module~yomcst_mod_h
module~dimphy~3
dimphy
proc~alpale_wk~2->module~dimphy~3
module~mod_phys_lmdz_transfert_para
mod_phys_lmdz_transfert_para
module~ioipsl_getin_p_mod->module~mod_phys_lmdz_transfert_para
module~strings_mod
strings_mod
module~ioipsl_getin_p_mod->module~strings_mod
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_mpi_transfert
mod_phys_lmdz_mpi_transfert
module~mod_phys_lmdz_transfert_para->module~mod_phys_lmdz_mpi_transfert
module~mod_phys_lmdz_omp_transfert
mod_phys_lmdz_omp_transfert
module~mod_phys_lmdz_transfert_para->module~mod_phys_lmdz_omp_transfert
iso_fortran_env
iso_fortran_env
module~strings_mod->iso_fortran_env
module~mod_phys_lmdz_para->module~mod_phys_lmdz_transfert_para
module~mod_phys_lmdz_mpi_data
mod_phys_lmdz_mpi_data
module~mod_phys_lmdz_para->module~mod_phys_lmdz_mpi_data
module~mod_phys_lmdz_omp_data
mod_phys_lmdz_omp_data
module~mod_phys_lmdz_para->module~mod_phys_lmdz_omp_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
Nodes of different colours represent the following:
Graph Key
Module
Module
Submodule
Submodule
Subroutine
Subroutine
Function
Function
Program
Program
This Page's Entity
This Page's Entity
Solid arrows point from a submodule to the (sub)module which it is
descended from. Dashed arrows point from a module or program unit to
modules which it uses.
print ,'alpale_wk: wkrad(1), cellrad(1) ', wkrad(1), cellrad(1)
proba_gf(:) = exp(-wdens(:) rpimax(wkrad(:)-cellrad(:),0.) 2) - & ! Formules
exp(-wdens(:) rpi(wkrad(:)+cellrad(:)) 2) ! fausses !
print ,'alpale_wk: proba_gf(1), fip(1), ', proba_gf(1), fip(1)
print *,'alpale_wk: wkrad(1), cellrad(1), proba_gf(1), fip(1), fip_cond(1) ', &
wkrad(1), cellrad(1), proba_gf(1), fip(1), fip_cond(1)
Arguments
Type
Intent Optional Attributes
Name
intent(in)
::
dtime
intent(in),
DIMENSION(klon)
::
cell_area
intent(in),
DIMENSION(klon)
::
zoccur
intent(in),
DIMENSION(klon)
::
sigmaw
intent(in),
DIMENSION(klon)
::
wdens
intent(in),
DIMENSION(klon)
::
fip
intent(out),
DIMENSION(klon)
::
fip_cond