| File |
Line number |
Procedure |
Code |
|
./eesupp/src/exch_jam.F |
1122 |
EXCH_XYZ_R4_JAM |
exchBuf2(I0+I-iLo) = arr(I,1+J-1 ,K) |
|
./eesupp/src/exch_jam.F |
1132 |
EXCH_XYZ_R4_JAM |
exchBuf2(I0+I-iLo) = arr(I,sNy-OLy+J,K) |
|
./eesupp/src/exch_jam.F |
1157 |
EXCH_XYZ_R4_JAM |
CALL MPI_SENDRECV_REPLACE(exchBuf2,OLy*(sNx+2*OLx),MPI_REAL8, |
|
./eesupp/src/exch_jam.F |
1172 |
EXCH_XYZ_R4_JAM |
arr(I,1-OLy+J-1,K) = exchBuf2(I0+I-iLo) |
|
./eesupp/src/exch_jam.F |
1181 |
EXCH_XYZ_R4_JAM |
arr(I,sNy+J ,K) = exchBuf2(I0+I-iLo) |
|
./eesupp/src/exch_jam.F |
120 |
EXCH_XY_O1_R8_JAM |
CALL MPI_SENDRECV_REPLACE(exchBuf2,sNx,MPI_REAL8, |
|
./eesupp/src/exch_jam.F |
181 |
EXCH_XY_O1_R8_JAM |
arr(I,0 ) = exchBuf2(I) |
|
./eesupp/src/exch_jam.F |
185 |
EXCH_XY_O1_R8_JAM |
arr(I,sNy+1) = exchBuf2(I) |
|
./eesupp/src/exch_jam.F |
284 |
EXCH_XY_R8_JAM |
exchBuf2(I0+I-iLo) = arr(I,1+J-1 ) |
|
./eesupp/src/exch_jam.F |
294 |
EXCH_XY_R8_JAM |
exchBuf2(I0+I-iLo) = arr(I,sNy-OLy+J) |
|
./eesupp/src/exch_jam.F |
320 |
EXCH_XY_R8_JAM |
CALL MPI_SENDRECV_REPLACE(exchBuf2,OLy*(sNx+2*OLx),MPI_REAL8, |
|
./eesupp/src/exch_jam.F |
335 |
EXCH_XY_R8_JAM |
arr(I,1-OLy+J-1) = exchBuf2(I0+I-iLo) |
|
./eesupp/src/exch_jam.F |
344 |
EXCH_XY_R8_JAM |
arr(I,sNy+J ) = exchBuf2(I0+I-iLo) |
|
./eesupp/src/exch_jam.F |
501 |
EXCH_XYZ_R8_JAM |
exchBuf2(I0+I-iLo) = arr(I,1+J-1 ,K) |
|
./eesupp/src/exch_jam.F |
511 |
EXCH_XYZ_R8_JAM |
exchBuf2(I0+I-iLo) = arr(I,sNy-OLy+J,K) |
|
./eesupp/src/exch_jam.F |
536 |
EXCH_XYZ_R8_JAM |
CALL MPI_SENDRECV_REPLACE(exchBuf2,OLy*(sNx+2*OLx),MPI_REAL8, |
|
./eesupp/src/exch_jam.F |
551 |
EXCH_XYZ_R8_JAM |
arr(I,1-OLy+J-1,K) = exchBuf2(I0+I-iLo) |
|
./eesupp/src/exch_jam.F |
560 |
EXCH_XYZ_R8_JAM |
arr(I,sNy+J ,K) = exchBuf2(I0+I-iLo) |
|
./eesupp/src/exch_jam.F |
715 |
EXCH_XY_O1_R4_JAM |
exchBuf2(I) = arr(I,1 ) |
|
./eesupp/src/exch_jam.F |
720 |
EXCH_XY_O1_R4_JAM |
exchBuf2(I) = arr(I,sNy) |
|
./eesupp/src/exch_jam.F |
744 |
EXCH_XY_O1_R4_JAM |
CALL MPI_SENDRECV_REPLACE(exchBuf2,sNx,MPI_REAL8, |
|
./eesupp/src/exch_jam.F |
805 |
EXCH_XY_O1_R4_JAM |
arr(I,0 ) = exchBuf2(I) |
|
./eesupp/src/exch_jam.F |
809 |
EXCH_XY_O1_R4_JAM |
arr(I,sNy+1) = exchBuf2(I) |
|
./eesupp/src/exch_jam.F |
906 |
EXCH_XY_R4_JAM |
exchBuf2(I0+I-iLo) = arr(I,1+J-1 ) |
|
./eesupp/src/exch_jam.F |
916 |
EXCH_XY_R4_JAM |
exchBuf2(I0+I-iLo) = arr(I,sNy-OLy+J) |
|
./eesupp/src/exch_jam.F |
91 |
EXCH_XY_O1_R8_JAM |
exchBuf2(I) = arr(I,1 ) |
|
./eesupp/src/exch_jam.F |
942 |
EXCH_XY_R4_JAM |
CALL MPI_SENDRECV_REPLACE(exchBuf2,OLy*(sNx+2*OLx),MPI_REAL8, |
|
./eesupp/src/exch_jam.F |
957 |
EXCH_XY_R4_JAM |
arr(I,1-OLy+J-1) = exchBuf2(I0+I-iLo) |
|
./eesupp/src/exch_jam.F |
966 |
EXCH_XY_R4_JAM |
arr(I,sNy+J ) = exchBuf2(I0+I-iLo) |
|
./eesupp/src/exch_jam.F |
96 |
EXCH_XY_O1_R8_JAM |
exchBuf2(I) = arr(I,sNy) |
|
./eesupp/inc/EXCH_JAM.h |
12 |
NO PROCEDURE |
COMMON /EXCH_BUF/ exchBuf1, exchBuf2 |
|
./eesupp/inc/EXCH_JAM.h |
14 |
NO PROCEDURE |
Real*8 exchBuf2(((sNx+2*OLx)*OLy)*Nr) |