| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_read_pickup.F |
247 |
SEAICE_READ_PICKUP |
DO iTrac = 1, SItrNumInUse |
|
./pkg/seaice/seaice_read_pickup.F |
248 |
SEAICE_READ_PICKUP |
WRITE(fldName,'(A6,I2.2)') 'siTrac', iTrac |
|
./pkg/seaice/seaice_read_pickup.F |
250 |
SEAICE_READ_PICKUP |
& SItracer(1-OLx,1-OLy,1,1,iTrac), |
|
./pkg/seaice/seaice_read_pickup.F |
252 |
SEAICE_READ_PICKUP |
_EXCH_XY_RL(SItracer(1-OLx,1-OLy,1,1,iTrac),myThid) |
|
./pkg/seaice/seaice_read_pickup.F |
62 |
SEAICE_READ_PICKUP |
INTEGER iTrac |
|
./pkg/seaice/seaice_write_pickup.F |
139 |
SEAICE_WRITE_PICKUP |
DO iTrac = 1, SItrNumInUse |
|
./pkg/seaice/seaice_write_pickup.F |
140 |
SEAICE_WRITE_PICKUP |
WRITE(fldName,'(A6,I2.2)') 'siTrac', iTrac |
|
./pkg/seaice/seaice_write_pickup.F |
144 |
SEAICE_WRITE_PICKUP |
& SItracer(1-OLx,1-OLy,1,1,iTrac), |
|
./pkg/seaice/seaice_write_pickup.F |
66 |
SEAICE_WRITE_PICKUP |
INTEGER iTrac |