Symbol Description Uses
runtimesecs 9


File Line number Procedure Code
./pkg/cal/cal_set.F 112 CAL_SET 
      _RL     runtimesecs
./pkg/cal/cal_set.F 381 CAL_SET 
        runtimesecs = float(modelintsteps)*modelstep
./pkg/cal/cal_set.F 382 CAL_SET 
        modelend    = modelstart + runtimesecs
./pkg/cal/cal_set.F 392 CAL_SET 
        call CAL_TOSECONDS( datediff, runtimesecs, mythid )
./pkg/cal/cal_set.F 394 CAL_SET 
        if ( runtimesecs .lt. 0.) then
./pkg/cal/cal_set.F 400 CAL_SET 
        modelintsteps = int(runtimesecs/modelstep)
./pkg/cal/cal_set.F 401 CAL_SET 
        runtimesecs   = modelintsteps*modelstep
./pkg/cal/cal_set.F 402 CAL_SET 
        modelend      = modelstart + runtimesecs
./pkg/cal/cal_set.F 419 CAL_SET 
      call CAL_TIMEINTERVAL( runtimesecs, 'secs', timediff, mythid )