Symbol Description Uses
err_init 10


File Line number Procedure Code
./pkg/streamice/streamice_vel_solve.F 162 STREAMICE_VEL_SOLVE 
      err_init = 0. _d 0
./pkg/streamice/streamice_vel_solve.F 184 STREAMICE_VEL_SOLVE 
          IF (err_tempv .ge. err_init) THEN
./pkg/streamice/streamice_vel_solve.F 185 STREAMICE_VEL_SOLVE 
            err_init = err_tempv
./pkg/streamice/streamice_vel_solve.F 195 STREAMICE_VEL_SOLVE 
      CALL GLOBAL_MAX_R8 (err_init, myThid)
./pkg/streamice/streamice_vel_solve.F 198 STREAMICE_VEL_SOLVE 
     &                       err_init
./pkg/streamice/streamice_vel_solve.F 204 STREAMICE_VEL_SOLVE 
      err_max = err_init
./pkg/streamice/streamice_vel_solve.F 206 STREAMICE_VEL_SOLVE 
      err_lastchange = err_init
./pkg/streamice/streamice_vel_solve.F 242 STREAMICE_VEL_SOLVE 
       IF ((err_max .GT. streamice_nonlin_tol * err_init) .and.
./pkg/streamice/streamice_vel_solve.F 450 STREAMICE_VEL_SOLVE 
     &                       err_max/err_init
./pkg/streamice/streamice_vel_solve.F 50 STREAMICE_VEL_SOLVE 
      _RL err_max, err_tempu, err_tempv, err_init, area, err_max_fp