TimeToGo:

-------------------------------------------------------------------------------
   Computes the time left to go in the simulation, the predicted finish
   time and the ratio of simulation time to real time. This routine
   should be called at regular intervals.
-------------------------------------------------------------------------------
   Form:
  [ rRT, tToGoMem, tToGo, tDone ] = TimeToGo( totalSteps, stepsDone, tToGoMem, rRT, dT )
-------------------------------------------------------------------------------

   ------
   Inputs
   ------
   totalSteps             Total number of steps in the simulation
   stepsDone              Number of steps completed
   tToGoMem               Memory [lastJD, lastStepsDone, number of averages done]
   rRT                    Ratio of simulation time to real time
   dT                     Simulation time step (sec)           

   -------
   Outputs
   -------
   rRT                    Ratio of simulation time to real time
   tToGoMem               Memory [lastJD, lastStepsDone, number of averages done]
   tToGo                  Time left in the simulation
   tDone                  Predicted clock time of finish

-------------------------------------------------------------------------------

Children:

Common: Time/Date2JD
Common: Time/JD2Date