| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/SEAICE.h |
123 |
NO PROCEDURE |
COMMON/SEAICE_AGE_R/ICEAGE |
|
./pkg/seaice/SEAICE.h |
124 |
NO PROCEDURE |
_RL ICEAGE (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/seaice_init_varia.F |
129 |
SEAICE_INIT_VARIA |
ICEAGE(i,j,bi,bj) = 0. _d 0 |
|
./pkg/seaice/seaice_init_varia.F |
412 |
SEAICE_INIT_VARIA |
CALL READ_FLD_XY_RL( IceAgeFile, ' ', ICEAGE, 0, myThid ) |
|
./pkg/seaice/seaice_init_varia.F |
413 |
SEAICE_INIT_VARIA |
_EXCH_XY_RL(ICEAGE,myThid) |
|
./pkg/seaice/seaice_init_varia.F |
435 |
SEAICE_INIT_VARIA |
CALL OBCS_COPY_TRACER( ICEAGE(1-Olx,1-Oly,bi,bj), |
|
./pkg/seaice/seaice_monitor.F |
126 |
SEAICE_MONITOR |
CALL MON_WRITESTATS_RL( 1,ICEAGE,'_iceage', |
|
./pkg/seaice/seaice_output.F |
127 |
SEAICE_OUTPUT |
CALL WRITE_FLD_XY_RL( 'ICEAGE.',suff,ICEAGE,myIter,myThid) |
|
./pkg/seaice/seaice_read_pickup.F |
165 |
SEAICE_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, 1, ICEAGE , nj, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
201 |
SEAICE_READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'siAGE ', ICEAGE, |
|
./pkg/seaice/seaice_read_pickup.F |
269 |
SEAICE_READ_PICKUP |
_EXCH_XY_RL(ICEAGE, myThid ) |
|
./pkg/seaice/seaice_write_pickup.F |
113 |
SEAICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, 1, ICEAGE, nj, myIter, myThid ) |