anchor.diff:     call GetSteadyOutputs(AFInfo, alpha, Cl, Cd, Cm, Cd0, ErrStat, ErrMsg)
         if (ErrStat > ErrID_None) return
      
  -   denom = ( alpha-alpha0 )*tan(alpha)  !NOTE,NOTE: On 8/27/15 GJH Added back tan(alpha) because results for Fy did not match steady state without it. ! NOTE: We removed the tan(alpha) term from the equation and repace with another (alpha-alpha0) term, per Rick's suggestion 8/13/2015.    *tan(alpha)
  +   !denom = ( alpha-alpha0 )*tan(alpha)  !NOTE,NOTE: On 8/27/15 GJH Added back tan(alpha) because results for Fy did not match steady state without it. ! NOTE: We removed the tan(alpha) term from the equation and repace with another (alpha-alpha0) term, per Rick's suggestion 8/13/2015.    *tan(alpha)
  +   denom = ( alpha-alpha0 )**2  !testing again On 9/16/15
      if (abs(denom) < .015 ) then
         Get_f_c_from_Lookup = 1.0_ReKi
         return
  
positive.code:          
        end if
        
        if ( xd%tau_V(i,j) >= (T_VL + T_sh) ) then
           xd%tau_V(i,j)     = 0.0_ReKi
        end if
        
        OtherState%sigma1(i,j) = 1.0_ReKi
  
negative.code:       y%WriteOutput(iOffset+28) = C_V          
        y%WriteOutput(iOffset+29) = Cn_FS 
        y%WriteOutput(iOffset+30) = Cm_FS
  !      y%WriteOutput(iOffset+31) = u%U
     end if
     
  end subroutine UA_CalcOutput
  