anchor.diff:     nMax = nMax + (FWnSpan+1) * (p%nFWMax+1) * p%nWings   ! Far wake points
      call AllocAry( m%r_wind, 3, nMax, 'Requested wind points', ErrStat2, ErrMsg2 );call SetErrStat ( ErrStat2, ErrMsg2, ErrStat,ErrMsg,'FVW_InitMisc' )
      m%r_wind = 0.0_ReKi     ! set to zero so InflowWind can shortcut calculations
  +   m%OldTime = 0.0_DbKi-p%DTfvw    ! First time for wake interaction calculations
   end subroutine FVW_InitMiscVars
   ! ==============================================================================
   subroutine FVW_InitStates( x, p, m, ErrStat, ErrMsg )
  
positive.code:    print'(A,F10.3,A,F10.3,A,F10.3,A,I0,A,I0,A,I0)','Update states, t:',t,'  t_u:', utimes(1),' dtaero: ',dtaero,'   ',n,' nNW:',m%nNW,' nFW:',m%nFW
  
     ! We don't propagate the "Old"-> "New" if we we are not taking another timestep (such as during a correction step) 
     if (m%iStep /= m%iStepPrev) then 
         call PrepareNextTimeStep()
     endif
  
  
negative.code:    type(FVW_ConstraintStateType) :: z_guess                                                                              ! <
     integer(IntKi) :: iW, iSpan, iAge
     real(ReKi) :: dtaero
     real(DbKi), parameter      :: OneMinusEpsilon = 1 - 10000*EPSILON(t)
  
     ErrStat = ErrID_None
     ErrMsg  = ""
  
        ! dtaero is the timestep that FVW is called at (DTaero of AD15)
     dtaero=utimes(1)-t
        ! Increment step if we are not on a correction step (n also wouldn't change)
     if (t > m%OldTime) then
        m%iStepPrev = m%iStep
        m%iStep = n
     endif
  
        ! Compute Inuced wake effects only if time since last compute is > DTfvw
     if ( ( t - m%OldTime ) >= p%DTfvw*OneMinusEpsilon )  then
        m%OldTime = t
        m%ComputeWakeInduced = .TRUE.    ! It's time to update the induced velocities from wake
     else
  