Symbol Description Uses
UPDATE_SURF_DR Update the surface-level thickness fraction. 4



File Line number Procedure Code
./model/src/initialise_varia.F 214 INITIALISE_VARIA
        CALL UPDATE_SURF_DR( startTime, nIter0, myThid )
./pkg/ecco/the_main_loop.F 565 THE_MAIN_LOOP
        CALL UPDATE_SURF_DR( myTime, myIter, myThid )
./model/src/forward_step.F 450 FORWARD_STEP
        CALL UPDATE_SURF_DR( myTime, myIter, myThid )
./model/src/update_surf_dr.F 10 UPDATE_SURF_DR
      SUBROUTINE UPDATE_SURF_DR( myTime, myIter, myThid )