Symbol Description Uses
idivbeg 4


File Line number Procedure Code
./pkg/cost/cost_final_restore.F 40 COST_FINAL_RESTORE 
      integer idivbeg, idivend
./pkg/cost/cost_final_restore.F 50 COST_FINAL_RESTORE 
              read(unit=76,fmt=*) idivbeg,idivend
./pkg/cost/cost_final_restore.F 53 COST_FINAL_RESTORE 
              idivbeg = -2
./pkg/cost/cost_final_restore.F 56 COST_FINAL_RESTORE 
           if ( idivbeg .EQ. 0 ) then