anchor.diff:  CHARACTER(20)                         :: FlagArg                                 ! flag argument from command line
   INTEGER(IntKi)                        :: Restart_step                            ! step to start on (for restart) 
   
  +   ! data for SimStatus/RunTimes:
  +REAL(DbKi)                            :: PrevSimTime        !< Previous time message was written to screen (s > 0)
  +REAL(ReKi)                            :: PrevClockTime      !< Previous clock time in seconds past midnight
  +INTEGER                               :: SimStrtTime (8)    !< An array containing the elements of the start time (after initialization).
  +INTEGER                               :: ProgStrtTime (8)   !< An array containing the elements of the program start time (before initialization).
  +REAL(ReKi)                            :: SimStrtCPU         !< User CPU time for simulation (without intialization)
  +REAL(ReKi)                            :: ProgStrtCPU        !< User CPU time for program (with intialization)
  +
   ! these should probably go in the FAST.Farm registry:
   type(All_FastFarm_Data)               :: farm  
    
  -type(FWrap_InitInputType)             :: FWrap_InitInp
  -type(FWrap_InitOutputType)            :: FWrap_InitOut
  -
   !FAST.Farm Driver
   !     Initialization
   !     Initial Calculate Output
  
positive.code:       CALL FARM_CalcOutput(t, farm, ErrStat, ErrMsg)      
           CALL CheckError( ErrStat, ErrMsg  )
        
     END DO ! n_t_global
     
     
  
negative.code:    
     call FARM_End(farm, ErrStat, ErrMsg)
     
     CALL RunTimes( ProgStrtTime, ProgStrtCPU, SimStrtTime, SimStrtCPU, t )   
     call NormStop()
     
  CONTAINS
  