| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_tracer_phys.F |
103 |
SEAICE_TRACER_PHYS |
growFact=1. _d 0 |
|
./pkg/seaice/seaice_tracer_phys.F |
105 |
SEAICE_TRACER_PHYS |
if (HEFFpost.GT.HEFFprev) growFact=HEFFprev/HEFFpost |
|
./pkg/seaice/seaice_tracer_phys.F |
108 |
SEAICE_TRACER_PHYS |
SItracer(i,j,bi,bj,iTr)=SItracer(i,j,bi,bj,iTr)*growFact |
|
./pkg/seaice/seaice_tracer_phys.F |
109 |
SEAICE_TRACER_PHYS |
& +SItrFromOcean(i,j)*(1. _d 0 - growFact) |
|
./pkg/seaice/seaice_tracer_phys.F |
111 |
SEAICE_TRACER_PHYS |
& -HEFFpost*SItrFromOcean(i,j)*(1. _d 0 - growFact) |
|
./pkg/seaice/seaice_tracer_phys.F |
116 |
SEAICE_TRACER_PHYS |
growFact=1. _d 0 |
|
./pkg/seaice/seaice_tracer_phys.F |
119 |
SEAICE_TRACER_PHYS |
if (HEFFpost.GT.HEFFprev) growFact=HEFFprev/HEFFpost |
|
./pkg/seaice/seaice_tracer_phys.F |
120 |
SEAICE_TRACER_PHYS |
SItracer(i,j,bi,bj,iTr)=SItracer(i,j,bi,bj,iTr)*growFact |
|
./pkg/seaice/seaice_tracer_phys.F |
121 |
SEAICE_TRACER_PHYS |
& +SItrFromFlood(i,j) *(1. _d 0 - growFact) |
|
./pkg/seaice/seaice_tracer_phys.F |
125 |
SEAICE_TRACER_PHYS |
& -HEFFpost*SItrFromFlood(i,j)*(1. _d 0 - growFact) |
|
./pkg/seaice/seaice_tracer_phys.F |
45 |
SEAICE_TRACER_PHYS |
_RL HEFFprev, HEFFpost, growFact, meltPart, tmpscal1 |