Go to the source code of this file.
subroutine user_initialise_mpi |
( |
| ) |
|
Subroutine to initialise mpi in a special way if the model is weird like HadCM3 for example.
Definition at line 3 of file user_initialise_mpi.f90.
subroutine user_mpi_irecv |
( |
integer, intent(in) |
stateDim, |
|
|
integer, intent(in) |
nrhs, |
|
|
real(kind=kind(1.0d0)), dimension(statedim,nrhs), intent(out) |
x, |
|
|
integer, dimension(nrhs), intent(inout) |
requests |
|
) |
| |
subroutine user_mpi_recv |
( |
integer, intent(in) |
stateDim, |
|
|
integer, intent(in) |
nrhs, |
|
|
real(kind=kind(1.0d0)), dimension(statedim,nrhs), intent(out) |
x |
|
) |
| |
subroutine user_mpi_send |
( |
integer, intent(in) |
stateDim, |
|
|
integer, intent(in) |
nrhs, |
|
|
real(kind=kind(1.0d0)), dimension(statedim,nrhs), intent(in) |
x, |
|
|
integer, intent(in) |
tag |
|
) |
| |