| File |
Line number |
Procedure |
Code |
|
./pkg/shelfice/SHELFICE.h |
138 |
NO PROCEDURE |
& R_shelfIce, |
|
./pkg/shelfice/SHELFICE.h |
142 |
NO PROCEDURE |
_RS R_shelfIce (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/shelfice/shelfice_init_depths.F |
53 |
SHELFICE_INIT_DEPTHS |
R_shelfIce(i,j,bi,bj) = 0. _d 0 |
|
./pkg/shelfice/shelfice_init_depths.F |
63 |
SHELFICE_INIT_DEPTHS |
CALL READ_REC_XY_RS( SHELFICEtopoFile, R_shelfIce, |
|
./pkg/shelfice/shelfice_init_depths.F |
73 |
SHELFICE_INIT_DEPTHS |
_EXCH_XY_RS( R_shelfIce, myThid ) |
|
./pkg/shelfice/shelfice_init_depths.F |
82 |
SHELFICE_INIT_DEPTHS |
& MIN( rSurfC(i,j,bi,bj), R_shelfIce(i,j,bi,bj) ) |
|
./pkg/shelfice/shelfice_init_fixed.F |
105 |
SHELFICE_INIT_FIXED |
IF ( R_shelfIce(i,j,bi,bj).LT.zeroRS |
|
./pkg/shelfice/shelfice_init_fixed.F |
75 |
SHELFICE_INIT_FIXED |
& R_shelfIce(i,j,bi,bj).LT.zeroRS ) THEN |
|
./pkg/shelfice/shelfice_thermodynamics.F |
261 |
SHELFICE_THERMODYNAMICS |
pLoc(I,J) = ABS(R_shelfIce(I,J,bi,bj)) |