Symbol Description Uses
resLoc 8


File Line number Procedure Code
./pkg/seaice/seaice_jfnk.F 487 SEAICE_JFNK_UPDATE 
      _RL     resLoc, facLS
./pkg/seaice/seaice_jfnk.F 500 SEAICE_JFNK_UPDATE 
      resLoc = JFNKresidual
./pkg/seaice/seaice_jfnk.F 524 SEAICE_JFNK_UPDATE 
       CALL SEAICE_SCALPROD(nVec,1,1,1,resTmp,resTmp,resLoc,myThid)
./pkg/seaice/seaice_jfnk.F 525 SEAICE_JFNK_UPDATE 
       resLoc = SQRT(resLoc)
./pkg/seaice/seaice_jfnk.F 527 SEAICE_JFNK_UPDATE 
       doLineSearch = resLoc .GE. JFNKresidual
./pkg/seaice/seaice_jfnk.F 544 SEAICE_JFNK_UPDATE 
     &        newtonIter, l, facLS, JFNKresidual, resLoc
./pkg/seaice/seaice_jfnk.F 555 SEAICE_JFNK_UPDATE 
      JFNKresidual = resLoc