Data Types | |
interface | mpp_lbc_north |
interface | mpp_max |
interface | mpp_maxloc |
interface | mpp_min |
interface | mpp_minloc |
interface | mpp_sum |
Public Member Functions | |
INTEGER function, public | lib_mpp_alloc (kumout) |
integer function, public | mynode (ldtxt, kumnam, kstop, localComm) |
subroutine, public | mpp_lnk_3d (ptab, cd_type, psgn, cd_mpp, pval) |
subroutine, public | mpp_lnk_2d (pt2d, cd_type, psgn, cd_mpp, pval) |
subroutine, public | mpp_lnk_3d_gather (ptab1, cd_type1, ptab2, cd_type2, psgn) |
subroutine, public | mpp_lnk_2d_e (pt2d, cd_type, psgn) |
subroutine, public | mppsend (ktyp, pmess, kbytes, kdest, md_req) |
subroutine, public | mpprecv (ktyp, pmess, kbytes, ksource) |
subroutine, public | mppgather (ptab, kp, pio) |
subroutine, public | mppscatter (pio, kp, ptab) |
subroutine, public | mppsync () |
subroutine, public | mppstop |
subroutine, public | mppobc (ptab, kd1, kd2, kl, kk, ktype, kij, kumout) |
subroutine, public | mpp_ini_ice (pindic, kumout) |
subroutine, public | mpp_ini_znl (kumout) |
subroutine, public | mpp_ini_north |
subroutine, public | mpp_lbc_north_e (pt2d, cd_type, psgn) |
INTEGER function, public | lib_mpp_alloc (kumout) |
function, public | mynode (ldtxt, kumnam, kstop, localComm) |
subroutine, public | mppsync |
subroutine, public | mppstop |
subroutine, public | mpp_ini_ice (kcom, knum) |
subroutine, public | mpp_ini_znl (knum) |
subroutine, public | ctl_stop (cd1, cd2, cd3, cd4, cd5, cd6, cd7, cd8, cd9, cd10) |
subroutine, public | ctl_warn (cd1, cd2, cd3, cd4, cd5, cd6, cd7, cd8, cd9, cd10) |
subroutine, public | ctl_opn (knum, cdfile, cdstat, cdform, cdacce, klengh, kout, ldwp, karea) |
INTEGER function, public | get_unit () |
Public Attributes | |
logical, parameter, public | lk_mpp = .TRUE. |
integer, public | mppsize |
integer, public | mpprank |
integer, public | mpi_comm_opa |
integer, public | ncomm_ice |
integer, public | ncomm_znl |
logical, public | l_znl_root |
integer, public | ngrp_world |
integer, public | ngrp_opa |
integer, public | ngrp_north |
integer, public | ncomm_north |
integer, public | ndim_rank_north |
integer, public | njmppmax |
integer, public | north_root |
integer, dimension(:), allocatable, save, public | nrank_north |
character(len=1), public | cn_mpi_send = 'S' |
logical, public | l_isend = .FALSE. |
integer, public | nn_buffer = 0 |
integer, parameter, public | jpmaxngh = 8 |
integer, parameter, public | jptyps = 5 |
integer, dimension(jpmaxngh, jptyps), public | isendto |
integer, dimension(jptyps), public | nsndto |
logical, public | ln_nnogather = .FALSE. |
logical, public | l_north_nogather = .FALSE. |
integer, public | ityp |
Private Member Functions | |
subroutine | mppmax_a_int (ktab, kdim, kcom) |
subroutine | mppmax_int (ktab, kcom) |
subroutine | mppmin_a_int (ktab, kdim, kcom) |
subroutine | mppmin_int (ktab, kcom) |
subroutine | mppsum_a_int (ktab, kdim) |
subroutine | mppsum_int (ktab) |
subroutine | mppmax_a_real (ptab, kdim, kcom) |
subroutine | mppmax_real (ptab, kcom) |
subroutine | mppmin_a_real (ptab, kdim, kcom) |
subroutine | mppmin_real (ptab, kcom) |
subroutine | mppsum_a_real (ptab, kdim, kcom) |
subroutine | mppsum_real (ptab, kcom) |
subroutine | mppsum_realdd (ytab, kcom) |
subroutine | mppsum_a_realdd (ytab, kdim, kcom) |
subroutine | mpp_minloc2d (ptab, pmask, pmin, ki, kj) |
subroutine | mpp_minloc3d (ptab, pmask, pmin, ki, kj, kk) |
subroutine | mpp_maxloc2d (ptab, pmask, pmax, ki, kj) |
subroutine | mpp_maxloc3d (ptab, pmask, pmax, ki, kj, kk) |
subroutine | mpp_lbc_north_3d (pt3d, cd_type, psgn) |
subroutine | mpp_lbc_north_2d (pt2d, cd_type, psgn) |
subroutine | mpi_init_opa (ldtxt, ksft, code) |
subroutine | ddpdd_mpi (ydda, yddb, ilen, itype) |
subroutine | mpp_sum_as (parr, kdim, kcom) |
subroutine | mpp_sum_a2s (parr, kdim, kcom) |
subroutine | mpp_sum_ai (karr, kdim, kcom) |
subroutine | mpp_sum_s (psca, kcom) |
subroutine | mpp_sum_i (kint, kcom) |
subroutine | mppsum_realdd (ytab, kcom) |
subroutine | mppsum_a_realdd (ytab, kdim, kcom) |
subroutine | mppmax_a_real (parr, kdim, kcom) |
subroutine | mppmax_real (psca, kcom) |
subroutine | mppmin_a_real (parr, kdim, kcom) |
subroutine | mppmin_real (psca, kcom) |
subroutine | mppmax_a_int (karr, kdim, kcom) |
subroutine | mppmax_int (kint, kcom) |
subroutine | mppmin_a_int (karr, kdim, kcom) |
subroutine | mppmin_int (kint, kcom) |
subroutine | mppobc_1d (parr, kd1, kd2, kl, kk, ktype, kij, knum) |
subroutine | mppobc_2d (parr, kd1, kd2, kl, kk, ktype, kij, knum) |
subroutine | mppobc_3d (parr, kd1, kd2, kl, kk, ktype, kij, knum) |
subroutine | mppobc_4d (parr, kd1, kd2, kl, kk, ktype, kij, knum) |
subroutine | mpp_minloc2d (ptab, pmask, pmin, ki, kj) |
subroutine | mpp_minloc3d (ptab, pmask, pmin, ki, kj, kk) |
subroutine | mpp_maxloc2d (ptab, pmask, pmax, ki, kj) |
subroutine | mpp_maxloc3d (ptab, pmask, pmax, ki, kj, kk) |
subroutine | mpp_comm_free (kcom) |
Private Attributes | |
integer, parameter | nprocmax = 2**10 |
integer | mpi_sumdd |
integer | ngrp_iworld |
integer | ngrp_ice |
integer | ndim_rank_ice |
integer | n_ice_root |
integer, dimension(:), allocatable, save | nrank_ice |
integer | ngrp_znl |
integer | ndim_rank_znl |
integer, dimension(:), allocatable, save | nrank_znl |
real(wp), dimension(:), allocatable, save | tampon |
real(wp), dimension(:,:,:,:,:), allocatable, save | t4ns |
real(wp), dimension(:,:,:,:,:), allocatable, save | t4sn |
real(wp), dimension(:,:,:,:,:), allocatable, save | t4ew |
real(wp), dimension(:,:,:,:,:), allocatable, save | t4we |
real(wp), dimension(:,:,:,:,:), allocatable, save | t4p1 |
real(wp), dimension(:,:,:,:,:), allocatable, save | t4p2 |
real(wp), dimension(:,:,:,:), allocatable, save | t3ns |
real(wp), dimension(:,:,:,:), allocatable, save | t3sn |
real(wp), dimension(:,:,:,:), allocatable, save | t3ew |
real(wp), dimension(:,:,:,:), allocatable, save | t3we |
real(wp), dimension(:,:,:,:), allocatable, save | t3p1 |
real(wp), dimension(:,:,:,:), allocatable, save | t3p2 |
real(wp), dimension(:,:,:), allocatable, save | t2ns |
real(wp), dimension(:,:,:), allocatable, save | t2sn |
real(wp), dimension(:,:,:), allocatable, save | t2ew |
real(wp), dimension(:,:,:), allocatable, save | t2we |
real(wp), dimension(:,:,:), allocatable, save | t2p1 |
real(wp), dimension(:,:,:), allocatable, save | t2p2 |
real(wp), dimension(:,:,:), allocatable, save | tr2ns |
real(wp), dimension(:,:,:), allocatable, save | tr2sn |
real(wp), dimension(:,:,:), allocatable, save | tr2ew |
real(wp), dimension(:,:,:), allocatable, save | tr2we |
real(wp), dimension(:,:,:), allocatable, save | ztab |
real(wp), dimension(:,:,:), allocatable, save | znorthloc |
real(wp), dimension(:,:,:,:), allocatable, save | znorthgloio |
real(wp), dimension(:,:,:), allocatable, save | zfoldwk |
real(wp), dimension(:,:), allocatable, save | ztab_2d |
real(wp), dimension(:,:), allocatable, save | znorthloc_2d |
real(wp), dimension(:,:,:), allocatable, save | znorthgloio_2d |
real(wp), dimension(:,:), allocatable, save | zfoldwk_2d |
real(wp), dimension(:,:), allocatable, save | ztab_e |
real(wp), dimension(:,:), allocatable, save | znorthloc_e |
real(wp), dimension(:,:,:), allocatable, save | znorthgloio_e |
Definition at line 39 of file lib_mpp.F90.
subroutine, public lib_mpp::ctl_opn | ( | integer, intent(out) | knum, |
character(len=*), intent(in) | cdfile, | ||
character(len=*), intent(in) | cdstat, | ||
character(len=*), intent(in) | cdform, | ||
character(len=*), intent(in) | cdacce, | ||
integer, intent(in) | klengh, | ||
integer, intent(in) | kout, | ||
logical, intent(in) | ldwp, | ||
integer, intent(in), optional | karea | ||
) |
subroutine, public lib_mpp::ctl_stop | ( | character(len=*), intent(in), optional | cd1, |
character(len=*), intent(in), optional | cd2, | ||
character(len=*), intent(in), optional | cd3, | ||
character(len=*), intent(in), optional | cd4, | ||
character(len=*), intent(in), optional | cd5, | ||
character(len=*), intent(in), optional | cd6, | ||
character(len=*), intent(in), optional | cd7, | ||
character(len=*), intent(in), optional | cd8, | ||
character(len=*), intent(in), optional | cd9, | ||
character(len=*), intent(in), optional | cd10 | ||
) |
Definition at line 3061 of file lib_mpp.F90.
subroutine, public lib_mpp::ctl_warn | ( | character(len=*), intent(in), optional | cd1, |
character(len=*), intent(in), optional | cd2, | ||
character(len=*), intent(in), optional | cd3, | ||
character(len=*), intent(in), optional | cd4, | ||
character(len=*), intent(in), optional | cd5, | ||
character(len=*), intent(in), optional | cd6, | ||
character(len=*), intent(in), optional | cd7, | ||
character(len=*), intent(in), optional | cd8, | ||
character(len=*), intent(in), optional | cd9, | ||
character(len=*), intent(in), optional | cd10 | ||
) |
Definition at line 3100 of file lib_mpp.F90.
|
private |
Definition at line 2806 of file lib_mpp.F90.
INTEGER function, public lib_mpp::get_unit | ( | ) |
Definition at line 3202 of file lib_mpp.F90.
INTEGER function, public lib_mpp::lib_mpp_alloc | ( | integer, intent(in) | kumout | ) |
INTEGER function, public lib_mpp::lib_mpp_alloc | ( | integer, intent(in) | kumout | ) |
|
private |
|
private |
Definition at line 3049 of file lib_mpp.F90.
subroutine, public lib_mpp::mpp_ini_ice | ( | integer | kcom, |
integer | knum | ||
) |
Definition at line 3039 of file lib_mpp.F90.
subroutine, public lib_mpp::mpp_ini_ice | ( | integer, intent(in) | pindic, |
integer, intent(in) | kumout | ||
) |
subroutine, public lib_mpp::mpp_ini_north | ( | ) |
Definition at line 2350 of file lib_mpp.F90.
subroutine, public lib_mpp::mpp_ini_znl | ( | integer, intent(in) | kumout | ) |
subroutine, public lib_mpp::mpp_ini_znl | ( | integer | knum | ) |
Definition at line 3044 of file lib_mpp.F90.
|
private |
|
private |
subroutine, public lib_mpp::mpp_lbc_north_e | ( | real(wp), dimension(1-jpr2di:jpi+jpr2di,1-jpr2dj:jpj+jpr2dj), intent(inout) | pt2d, |
character(len=1), intent(in) | cd_type, | ||
real(wp), intent(in) | psgn | ||
) |
subroutine, public lib_mpp::mpp_lnk_2d | ( | real(wp), dimension(jpi,jpj), intent(inout) | pt2d, |
character(len=1), intent(in) | cd_type, | ||
real(wp), intent(in) | psgn, | ||
character(len=3), intent(in), optional | cd_mpp, | ||
real(wp), intent(in), optional | pval | ||
) |
subroutine, public lib_mpp::mpp_lnk_2d_e | ( | real(wp), dimension(1-jpr2di:jpi+jpr2di,1-jpr2dj:jpj+jpr2dj), intent(inout) | pt2d, |
character(len=1), intent(in) | cd_type, | ||
real(wp), intent(in) | psgn | ||
) |
subroutine, public lib_mpp::mpp_lnk_3d | ( | real(wp), dimension(jpi,jpj,jpk), intent(inout) | ptab, |
character(len=1), intent(in) | cd_type, | ||
real(wp), intent(in) | psgn, | ||
character(len=3), intent(in), optional | cd_mpp, | ||
real(wp), intent(in), optional | pval | ||
) |
subroutine, public lib_mpp::mpp_lnk_3d_gather | ( | real(wp), dimension(jpi,jpj,jpk), intent(inout) | ptab1, |
character(len=1), intent(in) | cd_type1, | ||
real(wp), dimension(jpi,jpj,jpk), intent(inout) | ptab2, | ||
character(len=1), intent(in) | cd_type2, | ||
real(wp), intent(in) | psgn | ||
) |
|
private |
Definition at line 3019 of file lib_mpp.F90.
|
private |
Definition at line 1845 of file lib_mpp.F90.
|
private |
Definition at line 3026 of file lib_mpp.F90.
|
private |
Definition at line 1884 of file lib_mpp.F90.
|
private |
Definition at line 1765 of file lib_mpp.F90.
|
private |
Definition at line 3005 of file lib_mpp.F90.
|
private |
Definition at line 1804 of file lib_mpp.F90.
|
private |
Definition at line 3012 of file lib_mpp.F90.
|
private |
|
private |
|
private |
|
private |
|
private |
subroutine, public lib_mpp::mppgather | ( | real(wp), dimension(jpi,jpj), intent(in) | ptab, |
integer, intent(in) | kp, | ||
real(wp), dimension(jpi,jpj,jpnij), intent(out) | pio | ||
) |
Definition at line 1252 of file lib_mpp.F90.
|
private |
|
private |
Definition at line 2955 of file lib_mpp.F90.
|
private |
|
private |
Definition at line 2929 of file lib_mpp.F90.
|
private |
Definition at line 2962 of file lib_mpp.F90.
|
private |
Definition at line 1330 of file lib_mpp.F90.
|
private |
Definition at line 1531 of file lib_mpp.F90.
|
private |
Definition at line 2936 of file lib_mpp.F90.
|
private |
|
private |
Definition at line 2968 of file lib_mpp.F90.
|
private |
|
private |
Definition at line 2942 of file lib_mpp.F90.
|
private |
Definition at line 2975 of file lib_mpp.F90.
|
private |
Definition at line 1400 of file lib_mpp.F90.
|
private |
Definition at line 2949 of file lib_mpp.F90.
|
private |
Definition at line 1600 of file lib_mpp.F90.
subroutine, public lib_mpp::mppobc | ( | real(wp), dimension(kij,kk), intent(inout) | ptab, |
integer, intent(in) | kd1, | ||
integer, intent(in) | kd2, | ||
integer, intent(in) | kl, | ||
integer, intent(in) | kk, | ||
integer, intent(in) | ktype, | ||
integer, intent(in) | kij, | ||
integer, intent(in) | kumout | ||
) |
|
private |
|
private |
|
private |
|
private |
subroutine, public lib_mpp::mpprecv | ( | integer, intent(in) | ktyp, |
real(wp), dimension(*), intent(inout) | pmess, | ||
integer, intent(in) | kbytes, | ||
integer, intent(in), optional | ksource | ||
) |
subroutine, public lib_mpp::mppscatter | ( | real(wp), dimension(jpi,jpj,jpnij) | pio, |
integer | kp, | ||
real(wp), dimension(jpi,jpj) | ptab | ||
) |
Definition at line 1274 of file lib_mpp.F90.
subroutine, public lib_mpp::mppsend | ( | integer, intent(in) | ktyp, |
real(wp), dimension(*), intent(inout) | pmess, | ||
integer, intent(in) | kbytes, | ||
integer, intent(in) | kdest, | ||
integer, intent(in) | md_req | ||
) |
subroutine, public lib_mpp::mppstop | ( | ) |
Definition at line 3033 of file lib_mpp.F90.
subroutine, public lib_mpp::mppstop | ( | ) |
Definition at line 1940 of file lib_mpp.F90.
|
private |
|
private |
|
private |
Definition at line 1737 of file lib_mpp.F90.
|
private |
Definition at line 2922 of file lib_mpp.F90.
|
private |
Definition at line 1466 of file lib_mpp.F90.
|
private |
Definition at line 1671 of file lib_mpp.F90.
|
private |
Definition at line 1708 of file lib_mpp.F90.
|
private |
Definition at line 2916 of file lib_mpp.F90.
subroutine, public lib_mpp::mppsync | ( | ) |
Definition at line 2880 of file lib_mpp.F90.
subroutine, public lib_mpp::mppsync | ( | ) |
function, public lib_mpp::mynode | ( | character(len=*), dimension(:) | ldtxt, |
integer | kumnam, | ||
integer | kstop, | ||
integer, intent(in), optional | localComm | ||
) |
Definition at line 2872 of file lib_mpp.F90.
integer function, public lib_mpp::mynode | ( | character(len=*), dimension(:), intent(out) | ldtxt, |
integer, intent(in) | kumnam, | ||
integer, intent(inout) | kstop, | ||
integer, intent(in), optional | localComm | ||
) |
character(len=1), public lib_mpp::cn_mpi_send = 'S' |
Definition at line 213 of file lib_mpp.F90.
Definition at line 249 of file lib_mpp.F90.
integer, public lib_mpp::ityp |
Definition at line 253 of file lib_mpp.F90.
integer, parameter, public lib_mpp::jpmaxngh = 8 |
Definition at line 247 of file lib_mpp.F90.
integer, parameter, public lib_mpp::jptyps = 5 |
Definition at line 248 of file lib_mpp.F90.
logical, public lib_mpp::l_isend = .FALSE. |
Definition at line 214 of file lib_mpp.F90.
logical, public lib_mpp::l_north_nogather = .FALSE. |
Definition at line 252 of file lib_mpp.F90.
logical, public lib_mpp::l_znl_root |
Definition at line 197 of file lib_mpp.F90.
logical, parameter, public lib_mpp::lk_mpp = .TRUE. |
Definition at line 175 of file lib_mpp.F90.
logical, public lib_mpp::ln_nnogather = .FALSE. |
Definition at line 251 of file lib_mpp.F90.
integer, public lib_mpp::mpi_comm_opa |
Definition at line 182 of file lib_mpp.F90.
|
private |
Definition at line 185 of file lib_mpp.F90.
integer, public lib_mpp::mpprank |
Definition at line 180 of file lib_mpp.F90.
integer, public lib_mpp::mppsize |
Definition at line 179 of file lib_mpp.F90.
|
private |
Definition at line 192 of file lib_mpp.F90.
integer, public lib_mpp::ncomm_ice |
Definition at line 188 of file lib_mpp.F90.
integer, public lib_mpp::ncomm_north |
Definition at line 206 of file lib_mpp.F90.
integer, public lib_mpp::ncomm_znl |
Definition at line 196 of file lib_mpp.F90.
|
private |
Definition at line 191 of file lib_mpp.F90.
integer, public lib_mpp::ndim_rank_north |
Definition at line 207 of file lib_mpp.F90.
|
private |
Definition at line 199 of file lib_mpp.F90.
|
private |
Definition at line 190 of file lib_mpp.F90.
|
private |
Definition at line 189 of file lib_mpp.F90.
integer, public lib_mpp::ngrp_north |
Definition at line 205 of file lib_mpp.F90.
integer, public lib_mpp::ngrp_opa |
Definition at line 204 of file lib_mpp.F90.
integer, public lib_mpp::ngrp_world |
Definition at line 203 of file lib_mpp.F90.
|
private |
Definition at line 198 of file lib_mpp.F90.
integer, public lib_mpp::njmppmax |
Definition at line 208 of file lib_mpp.F90.
integer, public lib_mpp::nn_buffer = 0 |
Definition at line 215 of file lib_mpp.F90.
integer, public lib_mpp::north_root |
Definition at line 209 of file lib_mpp.F90.
|
private |
Definition at line 177 of file lib_mpp.F90.
|
private |
Definition at line 193 of file lib_mpp.F90.
integer, dimension(:), allocatable, save, public lib_mpp::nrank_north |
Definition at line 210 of file lib_mpp.F90.
|
private |
Definition at line 200 of file lib_mpp.F90.
integer, dimension (jptyps), public lib_mpp::nsndto |
Definition at line 250 of file lib_mpp.F90.
|
private |
Definition at line 227 of file lib_mpp.F90.
|
private |
Definition at line 226 of file lib_mpp.F90.
|
private |
Definition at line 228 of file lib_mpp.F90.
|
private |
Definition at line 228 of file lib_mpp.F90.
|
private |
Definition at line 226 of file lib_mpp.F90.
|
private |
Definition at line 227 of file lib_mpp.F90.
|
private |
Definition at line 224 of file lib_mpp.F90.
|
private |
Definition at line 223 of file lib_mpp.F90.
|
private |
Definition at line 225 of file lib_mpp.F90.
|
private |
Definition at line 225 of file lib_mpp.F90.
|
private |
Definition at line 223 of file lib_mpp.F90.
|
private |
Definition at line 224 of file lib_mpp.F90.
|
private |
Definition at line 221 of file lib_mpp.F90.
|
private |
Definition at line 220 of file lib_mpp.F90.
|
private |
Definition at line 222 of file lib_mpp.F90.
|
private |
Definition at line 222 of file lib_mpp.F90.
|
private |
Definition at line 220 of file lib_mpp.F90.
|
private |
Definition at line 221 of file lib_mpp.F90.
|
private |
Definition at line 217 of file lib_mpp.F90.
|
private |
Definition at line 230 of file lib_mpp.F90.
|
private |
Definition at line 229 of file lib_mpp.F90.
|
private |
Definition at line 229 of file lib_mpp.F90.
|
private |
Definition at line 230 of file lib_mpp.F90.
|
private |
Definition at line 235 of file lib_mpp.F90.
|
private |
Definition at line 240 of file lib_mpp.F90.
|
private |
Definition at line 234 of file lib_mpp.F90.
|
private |
Definition at line 239 of file lib_mpp.F90.
|
private |
Definition at line 244 of file lib_mpp.F90.
|
private |
Definition at line 233 of file lib_mpp.F90.
|
private |
Definition at line 238 of file lib_mpp.F90.
|
private |
Definition at line 243 of file lib_mpp.F90.
|
private |
Definition at line 233 of file lib_mpp.F90.
|
private |
Definition at line 238 of file lib_mpp.F90.
|
private |
Definition at line 243 of file lib_mpp.F90.