Symbol Description Uses
expandFact 5


File Line number Procedure Code
./pkg/seaice/seaice_tracer_phys.F 147 SEAICE_TRACER_PHYS 
        expandFact=1. _d 0
./pkg/seaice/seaice_tracer_phys.F 148 SEAICE_TRACER_PHYS 
        if (AREApost.GT.AREAprev) expandFact=AREAprev/AREApost
./pkg/seaice/seaice_tracer_phys.F 150 SEAICE_TRACER_PHYS 
         SItracer(i,j,bi,bj,iTr)=SItracer(i,j,bi,bj,iTr)*expandFact
./pkg/seaice/seaice_tracer_phys.F 151 SEAICE_TRACER_PHYS 
     &                      +SItrExpand(i,j)*(1. _d 0 - expandFact)
./pkg/seaice/seaice_tracer_phys.F 47 SEAICE_TRACER_PHYS 
      _RL AREAprev, AREApost, expandFact