| File |
Line number |
Procedure |
Code |
|
./pkg/grdchk/grdchk_main.F |
459 |
GRDCHK_MAIN |
if ( myProcId .EQ. grdchkwhichproc ) then |
|
./pkg/flt/flt_init.F |
265 |
FLT_INIT |
if (myProcId .eq. 0) then |
|
./pkg/flt/flt_restart.F |
90 |
FLT_RESTART |
if (myProcId .eq. 0) then |
|
./verification/aim.5l_Equatorial_Channel/code/EEPARAMS.h |
168 |
NO PROCEDURE |
& numberOfProcs, pidIO, myProcId, |
|
./verification/aim.5l_Equatorial_Channel/code/EEPARAMS.h |
180 |
NO PROCEDURE |
INTEGER myProcId |
|
./verification/aim.5l_cs/code/EEPARAMS.h |
168 |
NO PROCEDURE |
& numberOfProcs, pidIO, myProcId, |
|
./verification/aim.5l_cs/code/EEPARAMS.h |
180 |
NO PROCEDURE |
INTEGER myProcId |
|
./verification/aim.5l_LatLon/code/EEPARAMS.h |
168 |
NO PROCEDURE |
& numberOfProcs, pidIO, myProcId, |
|
./verification/aim.5l_LatLon/code/EEPARAMS.h |
180 |
NO PROCEDURE |
INTEGER myProcId |
|
./verification/cpl_aim+ocn/code_atm/EEPARAMS.h |
168 |
NO PROCEDURE |
& numberOfProcs, pidIO, myProcId, |
|
./verification/cpl_aim+ocn/code_atm/EEPARAMS.h |
180 |
NO PROCEDURE |
INTEGER myProcId |
|
./model/src/the_model_main.F |
522 |
THE_MODEL_MAIN |
IF (myProcId .eq. 0) THEN |
|
./model/src/the_model_main.F |
586 |
THE_MODEL_MAIN |
IF ( myProcId .eq. 0 .AND. lastdiva ) THEN |
|
./eesupp/src/exch_jam.F |
1006 |
EXCH_XY_R4_JAM |
IF ( farProc1 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
1014 |
EXCH_XY_R4_JAM |
IF ( farProc2 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
103 |
EXCH_XY_O1_R8_JAM |
IF ( MOD(myProcId,2) .EQ. 0 ) THEN |
|
./eesupp/src/exch_jam.F |
1115 |
EXCH_XYZ_R4_JAM |
IF ( MOD(myProcId,2) .EQ. 0 ) THEN |
|
./eesupp/src/exch_jam.F |
111 |
EXCH_XY_O1_R8_JAM |
IF ( farProc1 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
1140 |
EXCH_XYZ_R4_JAM |
IF ( MOD(myProcId,2) .EQ. 0 ) THEN |
|
./eesupp/src/exch_jam.F |
1148 |
EXCH_XYZ_R4_JAM |
IF ( farProc1 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
1156 |
EXCH_XYZ_R4_JAM |
IF ( farProc2 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
1165 |
EXCH_XYZ_R4_JAM |
IF ( MOD(myProcId,2) .EQ. 0 ) THEN |
|
./eesupp/src/exch_jam.F |
1193 |
EXCH_XYZ_R4_JAM |
IF ( MOD(myProcId,2) .EQ. 0 ) THEN |
|
./eesupp/src/exch_jam.F |
119 |
EXCH_XY_O1_R8_JAM |
IF ( farProc2 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
1200 |
EXCH_XYZ_R4_JAM |
IF ( farProc1 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
1208 |
EXCH_XYZ_R4_JAM |
IF ( farProc2 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
1223 |
EXCH_XYZ_R4_JAM |
IF ( farProc1 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
1231 |
EXCH_XYZ_R4_JAM |
IF ( farProc2 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
131 |
EXCH_XY_O1_R8_JAM |
IF ( MOD(myProcId,2) .EQ. 0 ) THEN |
|
./eesupp/src/exch_jam.F |
1343 |
EXCH_XY_O1_R8_JAM |
myFourWayRank = MOD(myProcId,4) |
|
./eesupp/src/exch_jam.F |
1345 |
EXCH_XY_O1_R8_JAM |
IF ( MOD(myProcId,2) .EQ. 0 ) THEN |
|
./eesupp/src/exch_jam.F |
1348 |
EXCH_XY_O1_R8_JAM |
IF ( farProc1 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
1362 |
EXCH_XY_O1_R8_JAM |
IF ( farProc2 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
1370 |
EXCH_XY_O1_R8_JAM |
IF ( farProc1 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
1383 |
EXCH_XY_O1_R8_JAM |
IF ( farProc2 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
138 |
EXCH_XY_O1_R8_JAM |
IF ( farProc1 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
143 |
EXCH_XY_O1_R8_JAM |
IF ( farProc2 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
1473 |
EXCH_XY_R8_JAM |
myFourWayRank = MOD(myProcId,4) |
|
./eesupp/src/exch_jam.F |
1475 |
EXCH_XY_R8_JAM |
IF ( MOD(myProcId,2) .EQ. 0 ) THEN |
|
./eesupp/src/exch_jam.F |
1482 |
EXCH_XY_R8_JAM |
IF ( farProc1 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
1499 |
EXCH_XY_R8_JAM |
IF ( farProc2 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
1515 |
EXCH_XY_R8_JAM |
IF ( farProc1 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
1532 |
EXCH_XY_R8_JAM |
IF ( farProc2 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
155 |
EXCH_XY_O1_R8_JAM |
IF ( farProc1 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
160 |
EXCH_XY_O1_R8_JAM |
IF ( farProc2 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
1631 |
EXCH_XYZ_R8_JAM |
myFourWayRank = MOD(myProcId,4) |
|
./eesupp/src/exch_jam.F |
1634 |
EXCH_XYZ_R8_JAM |
IF ( MOD(myProcId,2) .EQ. 0 ) THEN |
|
./eesupp/src/exch_jam.F |
1641 |
EXCH_XYZ_R8_JAM |
IF ( farProc1 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
1658 |
EXCH_XYZ_R8_JAM |
IF ( farProc2 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
1674 |
EXCH_XYZ_R8_JAM |
IF ( farProc1 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
1691 |
EXCH_XYZ_R8_JAM |
IF ( farProc2 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
178 |
EXCH_XY_O1_R8_JAM |
IF ( MOD(myProcId,2) .EQ. 0 ) THEN |
|
./eesupp/src/exch_jam.F |
277 |
EXCH_XY_R8_JAM |
IF ( MOD(myProcId,2) .EQ. 0 ) THEN |
|
./eesupp/src/exch_jam.F |
302 |
EXCH_XY_R8_JAM |
IF ( MOD(myProcId,2) .EQ. 0 ) THEN |
|
./eesupp/src/exch_jam.F |
311 |
EXCH_XY_R8_JAM |
IF ( farProc1 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
319 |
EXCH_XY_R8_JAM |
IF ( farProc2 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
328 |
EXCH_XY_R8_JAM |
IF ( MOD(myProcId,2) .EQ. 0 ) THEN |
|
./eesupp/src/exch_jam.F |
354 |
EXCH_XY_R8_JAM |
IF ( MOD(myProcId,2) .EQ. 0 ) THEN |
|
./eesupp/src/exch_jam.F |
361 |
EXCH_XY_R8_JAM |
IF ( farProc1 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
369 |
EXCH_XY_R8_JAM |
IF ( farProc2 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
384 |
EXCH_XY_R8_JAM |
IF ( farProc1 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
392 |
EXCH_XY_R8_JAM |
IF ( farProc2 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
494 |
EXCH_XYZ_R8_JAM |
IF ( MOD(myProcId,2) .EQ. 0 ) THEN |
|
./eesupp/src/exch_jam.F |
519 |
EXCH_XYZ_R8_JAM |
IF ( MOD(myProcId,2) .EQ. 0 ) THEN |
|
./eesupp/src/exch_jam.F |
527 |
EXCH_XYZ_R8_JAM |
IF ( farProc1 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
535 |
EXCH_XYZ_R8_JAM |
IF ( farProc2 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
544 |
EXCH_XYZ_R8_JAM |
IF ( MOD(myProcId,2) .EQ. 0 ) THEN |
|
./eesupp/src/exch_jam.F |
572 |
EXCH_XYZ_R8_JAM |
IF ( MOD(myProcId,2) .EQ. 0 ) THEN |
|
./eesupp/src/exch_jam.F |
579 |
EXCH_XYZ_R8_JAM |
IF ( farProc1 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
587 |
EXCH_XYZ_R8_JAM |
IF ( farProc2 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
602 |
EXCH_XYZ_R8_JAM |
IF ( farProc1 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
610 |
EXCH_XYZ_R8_JAM |
IF ( farProc2 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
712 |
EXCH_XY_O1_R4_JAM |
IF ( MOD(myProcId,2) .EQ. 0 ) THEN |
|
./eesupp/src/exch_jam.F |
727 |
EXCH_XY_O1_R4_JAM |
IF ( MOD(myProcId,2) .EQ. 0 ) THEN |
|
./eesupp/src/exch_jam.F |
735 |
EXCH_XY_O1_R4_JAM |
IF ( farProc1 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
743 |
EXCH_XY_O1_R4_JAM |
IF ( farProc2 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
755 |
EXCH_XY_O1_R4_JAM |
IF ( MOD(myProcId,2) .EQ. 0 ) THEN |
|
./eesupp/src/exch_jam.F |
762 |
EXCH_XY_O1_R4_JAM |
IF ( farProc1 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
767 |
EXCH_XY_O1_R4_JAM |
IF ( farProc2 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
779 |
EXCH_XY_O1_R4_JAM |
IF ( farProc1 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
784 |
EXCH_XY_O1_R4_JAM |
IF ( farProc2 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
802 |
EXCH_XY_O1_R4_JAM |
IF ( MOD(myProcId,2) .EQ. 0 ) THEN |
|
./eesupp/src/exch_jam.F |
88 |
EXCH_XY_O1_R8_JAM |
IF ( MOD(myProcId,2) .EQ. 0 ) THEN |
|
./eesupp/src/exch_jam.F |
899 |
EXCH_XY_R4_JAM |
IF ( MOD(myProcId,2) .EQ. 0 ) THEN |
|
./eesupp/src/exch_jam.F |
924 |
EXCH_XY_R4_JAM |
IF ( MOD(myProcId,2) .EQ. 0 ) THEN |
|
./eesupp/src/exch_jam.F |
933 |
EXCH_XY_R4_JAM |
IF ( farProc1 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
941 |
EXCH_XY_R4_JAM |
IF ( farProc2 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
950 |
EXCH_XY_R4_JAM |
IF ( MOD(myProcId,2) .EQ. 0 ) THEN |
|
./eesupp/src/exch_jam.F |
976 |
EXCH_XY_R4_JAM |
IF ( MOD(myProcId,2) .EQ. 0 ) THEN |
|
./eesupp/src/exch_jam.F |
983 |
EXCH_XY_R4_JAM |
IF ( farProc1 .NE. myProcId ) THEN |
|
./eesupp/src/exch_jam.F |
991 |
EXCH_XY_R4_JAM |
IF ( farProc2 .NE. myProcId ) THEN |
|
./eesupp/src/eeboot_minimal.F |
116 |
EEBOOT_MINIMAL |
myProcId = mpiMyId |
|
./eesupp/src/eeboot_minimal.F |
117 |
EEBOOT_MINIMAL |
WRITE(myProcessStr,'(I4.4)') myProcId |
|
./eesupp/src/eeboot_minimal.F |
118 |
EEBOOT_MINIMAL |
mpiPidIo = myProcId |
|
./eesupp/src/eeboot_minimal.F |
120 |
EEBOOT_MINIMAL |
IF ( mpiPidIo .EQ. myProcId ) THEN |
|
./eesupp/src/eeboot_minimal.F |
180 |
EEBOOT_MINIMAL |
WRITE(myProcessStr,'(I4.4)') myProcId |
|
./eesupp/src/eeboot_minimal.F |
58 |
EEBOOT_MINIMAL |
myProcId = 0 |
|
./eesupp/src/eeboot_minimal.F |
59 |
EEBOOT_MINIMAL |
pidIO = myProcId |
|
./eesupp/src/ini_jam.F |
61 |
INI_JAM |
myTwoProcRank = MOD(myProcId,2) |
|
./eesupp/src/ini_jam.F |
84 |
INI_JAM |
myProcId = jam_pid |
|
./pkg/sbo/sbo_writevector.F |
76 |
SBO_WRITEVECTOR |
IF( myProcId .EQ. 0 ) THEN |
|
./eesupp/inc/EEPARAMS.h |
168 |
NO PROCEDURE |
& numberOfProcs, pidIO, myProcId, |
|
./eesupp/inc/EEPARAMS.h |
180 |
NO PROCEDURE |
INTEGER myProcId |
|
./eesupp/src/print.F |
1418 |
PRINT_MESSAGE |
ELSEIF ( pidIO .EQ. myProcId ) THEN |
|
./eesupp/src/print.F |
1423 |
PRINT_MESSAGE |
WRITE(idString,'(I4.4,A,I4.4)') myProcId,'.',myThid |
|
./eesupp/src/print.F |
87 |
PRINT_ERROR |
ELSEIF ( pidIO .EQ. myProcId ) THEN |
|
./eesupp/src/print.F |
92 |
PRINT_ERROR |
WRITE(idString,'(I4.4,A,I4.4)') myProcId,'.',myThid |
|
./pkg/cost/cost_final_store.F |
43 |
COST_FINAL_STORE |
IF (myProcId .eq. 0) THEN |
|
./pkg/cost/cost_final_restore.F |
43 |
COST_FINAL_RESTORE |
IF (myProcId .eq. 0) THEN |