| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/SEAICE_TRACER.h |
54 |
NO PROCEDURE |
CHARACTER*(4) SItrMate(SItrMaxNum) |
|
./pkg/seaice/SEAICE_TRACER.h |
55 |
NO PROCEDURE |
COMMON /SEAICE_SITR_C/ SItrFile, SItrName, SItrMate, |
|
./pkg/seaice/seaice_advdiff.F |
404 |
SEAICE_ADVDIFF |
IF ( (SEAICEadvHEFF.AND.(SItrMate(iTr).EQ.'HEFF')).OR. |
|
./pkg/seaice/seaice_advdiff.F |
405 |
SEAICE_ADVDIFF |
& (SEAICEadvAREA.AND.(SItrMate(iTr).EQ.'AREA')) ) THEN |
|
./pkg/seaice/seaice_advdiff.F |
407 |
SEAICE_ADVDIFF |
IF (SItrMate(iTr).EQ.'HEFF') THEN |
|
./pkg/seaice/seaice_advdiff.F |
464 |
SEAICE_ADVDIFF |
IF (SItrMate(iTr).EQ.'HEFF') THEN |
|
./pkg/seaice/seaice_diagnostics_init.F |
141 |
SEAICE_DIAGNOSTICS_INIT |
if (SItrMate(iTr).EQ.'HEFF') then |
|
./pkg/seaice/seaice_diagnostics_init.F |
171 |
SEAICE_DIAGNOSTICS_INIT |
& ' (associated with ',SItrMate(iTr),')' |
|
./pkg/seaice/seaice_diagnostics_init.F |
418 |
SEAICE_DIAGNOSTICS_INIT |
IF (SItrMate(iTr).EQ.'HEFF') then |
|
./pkg/seaice/seaice_diagnostics_state.F |
113 |
SEAICE_DIAGNOSTICS_STATE |
if (SItrMate(iTracer).EQ.'HEFF') then |
|
./pkg/seaice/seaice_growth.F |
575 |
SEAICE_GROWTH |
IF (SItrMate(iTr).EQ.'HEFF') THEN |
|
./pkg/seaice/seaice_init_fixed.F |
122 |
SEAICE_INIT_FIXED |
SItrMate(iTracer) ='HEFF' |
|
./pkg/seaice/seaice_init_fixed.F |
131 |
SEAICE_INIT_FIXED |
SItrMate(iTracer) ='AREA' |
|
./pkg/seaice/seaice_init_fixed.F |
142 |
SEAICE_INIT_FIXED |
SItrMate(iTracer) ='HEFF' |
|
./pkg/seaice/seaice_readparms.F |
195 |
SEAICE_READPARMS |
& SItrFile, SItrName, SItrNameLong, SItrUnit, SItrMate, |
|
./pkg/seaice/seaice_readparms.F |
609 |
SEAICE_READPARMS |
SItrMate(iTracer) = 'HEFF' |
|
./pkg/seaice/seaice_summary.F |
677 |
SEAICE_SUMMARY |
CALL WRITE_0D_C ( SItrMate(iTracer), -1, INDEX_NONE, |
|
./pkg/seaice/seaice_tracer_phys.F |
161 |
SEAICE_TRACER_PHYS |
if (( (SItrHEFF(i,j,bi,bj,5).GT.0. _d 0).AND.(SItrMate(iTr) |
|
./pkg/seaice/seaice_tracer_phys.F |
163 |
SEAICE_TRACER_PHYS |
& (SItrMate(iTr).EQ.'AREA') )) then |
|
./pkg/seaice/seaice_tracer_phys.F |
194 |
SEAICE_TRACER_PHYS |
IF ( useDiagnostics .AND. SItrMate(iTr).EQ.'HEFF') THEN |
|
./pkg/seaice/seaice_tracer_phys.F |
237 |
SEAICE_TRACER_PHYS |
if (SItrMate(iTr).EQ.'HEFF') then |
|
./pkg/seaice/seaice_tracer_phys.F |
85 |
SEAICE_TRACER_PHYS |
if (SItrMate(iTr).EQ.'HEFF') then |