| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/SEAICE_TRACER.h |
38 |
NO PROCEDURE |
_RL SItrFromOcean0(SItrMaxNum), SItrFromOceanFrac(SItrMaxNum), |
|
./pkg/seaice/SEAICE_TRACER.h |
42 |
NO PROCEDURE |
& SItrFromOcean0, SItrFromOceanFrac, SItrFromFlood0, |
|
./pkg/seaice/seaice_check.F |
214 |
SEAICE_CHECK |
IF ( ( SItrFromOceanFrac(iTracer) .LT. 0. _d 0 ) .OR. |
|
./pkg/seaice/seaice_check.F |
215 |
SEAICE_CHECK |
& ( SItrFromOceanFrac(iTracer) .GT. 1. _d 0 ) ) THEN |
|
./pkg/seaice/seaice_check.F |
242 |
SEAICE_CHECK |
& ( (SItrFromOceanFrac(iTracer).NE.ZERO).OR. |
|
./pkg/seaice/seaice_init_fixed.F |
109 |
SEAICE_INIT_FIXED |
SItrFromOceanFrac(iTracer) =ZERO |
|
./pkg/seaice/seaice_init_fixed.F |
117 |
SEAICE_INIT_FIXED |
SItrFromOceanFrac(iTracer) =ZERO |
|
./pkg/seaice/seaice_init_fixed.F |
135 |
SEAICE_INIT_FIXED |
SItrFromOceanFrac(iTracer) =ZERO |
|
./pkg/seaice/seaice_init_fixed.F |
146 |
SEAICE_INIT_FIXED |
SItrFromOceanFrac(iTracer) =ZERO |
|
./pkg/seaice/seaice_readparms.F |
196 |
SEAICE_READPARMS |
& SItrFromOcean0, SItrFromOceanFrac, SItrFromFlood0, |
|
./pkg/seaice/seaice_readparms.F |
611 |
SEAICE_READPARMS |
SItrFromOceanFrac(iTracer) = ZERO |
|
./pkg/seaice/seaice_summary.F |
689 |
SEAICE_SUMMARY |
CALL WRITE_0D_RL ( SItrFromOceanFrac(iTracer), INDEX_NONE, |
|
./pkg/seaice/seaice_tracer_phys.F |
75 |
SEAICE_TRACER_PHYS |
& (SItrFromOceanFrac(iTr).GT.ZERO) ) then |
|
./pkg/seaice/seaice_tracer_phys.F |
78 |
SEAICE_TRACER_PHYS |
SItrFromOcean(i,j)=SItrFromOceanFrac(iTr)*salt(I,j,ks,bi,bj) |