Symbol Description Uses
nipass number of passes in multi-dimensional method 14


File Line number Procedure Code
./pkg/seaice/seaice_advection.F 128 SEAICE_ADVECTION 
      INTEGER nipass,ipass
./pkg/seaice/seaice_advection.F 192 SEAICE_ADVECTION 
       nipass=3
./pkg/seaice/seaice_advection.F 194 SEAICE_ADVECTION 
       IF ( nipass.GT.maxcube ) STOP 'maxcube needs to be = 3'
./pkg/seaice/seaice_advection.F 211 SEAICE_ADVECTION 
       nipass=2
./pkg/seaice/seaice_advection.F 264 SEAICE_ADVECTION 
      DO ipass=1,nipass
./pkg/seaice/seaice_advection.F 268 SEAICE_ADVECTION 
       IF (nipass .GT. maxpass) THEN
./pkg/thsice/thsice_advection.F 133 THSICE_ADVECTION 
      INTEGER nipass,ipass
./pkg/thsice/thsice_advection.F 178 THSICE_ADVECTION 
       nipass=3
./pkg/thsice/thsice_advection.F 194 THSICE_ADVECTION 
       nipass=2
./pkg/thsice/thsice_advection.F 235 THSICE_ADVECTION 
      DO ipass=1,nipass
./pkg/thsice/thsice_advection.F 238 THSICE_ADVECTION 
     &         + nipass*act1
./pkg/thsice/thsice_advection.F 239 THSICE_ADVECTION 
     &         + nipass*max1*act2
./pkg/thsice/thsice_advection.F 240 THSICE_ADVECTION 
     &         + nipass*max1*max2*act3
./pkg/thsice/thsice_advection.F 241 THSICE_ADVECTION 
     &         + nipass*max1*max2*max3*act4