Symbol Description Uses
lastdiva 12


File Line number Procedure Code
./model/src/the_model_main.F 490 THE_MODEL_MAIN 
      logical  lastdiva
./model/src/the_model_main.F 493 THE_MODEL_MAIN 
      lastdiva = .TRUE.
./model/src/the_model_main.F 557 THE_MODEL_MAIN 
         CALL COST_FINAL_STORE ( mythid, lastdiva )
./model/src/the_model_main.F 562 THE_MODEL_MAIN 
         CALL COST_FINAL_RESTORE ( mythid, lastdiva )
./model/src/the_model_main.F 586 THE_MODEL_MAIN 
      IF ( myProcId .eq. 0 .AND. lastdiva ) THEN
./model/src/the_model_main.F 602 THE_MODEL_MAIN 
      IF ( useGrdchk .AND. lastdiva ) THEN
./pkg/cost/cost_final_store.F 32 COST_FINAL_STORE 
      logical lastdiva
./pkg/cost/cost_final_store.F 41 COST_FINAL_STORE 
      lastdiva = .FALSE.
./pkg/cost/cost_final_store.F 6 COST_FINAL_STORE 
      subroutine COST_FINAL_STORE ( mythid, lastdiva )
./pkg/cost/cost_final_restore.F 32 COST_FINAL_RESTORE 
      logical lastdiva
./pkg/cost/cost_final_restore.F 56 COST_FINAL_RESTORE 
              lastdiva = .TRUE.
./pkg/cost/cost_final_restore.F 6 COST_FINAL_RESTORE 
      subroutine COST_FINAL_RESTORE ( mythid, lastdiva )