| File |
Line number |
Procedure |
Code |
|
./pkg/exf/EXF_FIELDS.h |
313 |
NO PROCEDURE |
COMMON /exf_iceFraction_r/ exf_iceFraction |
|
./pkg/exf/EXF_FIELDS.h |
314 |
NO PROCEDURE |
_RS exf_iceFraction(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/exf/exf_mapfields.F |
350 |
EXF_MAPFIELDS |
exf_iceFraction(i,j,bi,bj) = |
|
./pkg/exf/exf_mapfields.F |
352 |
EXF_MAPFIELDS |
exf_iceFraction(I,J,bi,bj) = |
|
./pkg/exf/exf_mapfields.F |
353 |
EXF_MAPFIELDS |
& MIN( MAX(exf_iceFraction(I,J,bi,bj),zeroRS), oneRS ) |
|
./pkg/exf/exf_mapfields.F |
383 |
EXF_MAPFIELDS |
_EXCH_XY_RS( exf_iceFraction, myThid ) |
|
./pkg/seaice/seaice_reg_ridge.F |
132 |
SEAICE_REG_RIDGE |
IF ( exf_iceFraction(I,J,bi,bj).GT.AREA(I,J,bi,bj) ) THEN |
|
./pkg/seaice/seaice_reg_ridge.F |
135 |
SEAICE_REG_RIDGE |
& * (exf_iceFraction(I,J,bi,bj) - AREA(I,J,bi,bj)) |
|
./pkg/seaice/seaice_reg_ridge.F |
137 |
SEAICE_REG_RIDGE |
IF ( exf_iceFraction(I,J,bi,bj).GT.zeroRS .AND. |