anchor.diff:        ! Determine if any vortex we are tracking is continuing to separate or is reattaching to the airfoil
      TESF = fprimeprime < xd%fprimeprime_minus1(i,j) ! Separation point is moving towards the Leading Edge when .true.; otherwise separation point is moving toward trailing edge   
               
  -      ! Process VRTX-related quantities
  -      !!!!!!!!!!!!!!!!!!!!!
  -      !! NEW CODE 2/19/2015
  -      VRTX = (xd%tau_V(i,j) <= 2.0_ReKi*T_VL) .and. (xd%tau_V(i,j) > 0.0_ReKi)
  +      ! Is the vortex over the chord?  
  +   VRTX = (xd%tau_V(i,j) > 0.0_ReKi) .and. (xd%tau_V(i,j) <= T_VL)
         
   
      !---------------------------------------------------------
  
positive.code:       if (.not. TESF) then
              ! If we are reattaching the flow, then we when to diminish the current vortex's effects on Cn further
           OtherState%sigma3(i,j) = 4.0_ReKi
              if ( VRTX .and. (xd%tau_V(i,j) <= T_VL) ) then
              if (Kafactor < 0.0_ReKi) then
                 ! If we are moving towards alpha0, then we want to reduce the contribution of the vortex to Cn
                 OtherState%sigma3(i,j) = 2.0_ReKi
              else
                 OtherState%sigma3(i,j) = 1.0_ReKi
              end if
              end if
        end if
     else if (Kafactor < 0 ) then 
           ! In this case, we want to diminish the effects of this vortex on Cn by setting a high value of sigma3
        OtherState%sigma3(i,j) = 4.0_ReKi
  
negative.code:          OtherState%sigma1(i,j) = 0.5_ReKi
        end if
  
        if ( VRTX ) then  ! Still shedding a vortex, i.e., the current vortex is still over the chord?
           OtherState%sigma1(i,j) = 0.25_ReKi
        end if
  
  