anchor.diff:  
      ! This module uses equations defined in the document "The Unsteady Aerodynamics Module for FAST 8" by Rick Damiani and Greg Hayman, 28-Feb-2017
   
  -use NWTC_Library   
  +   use NWTC_Library
      use UnsteadyAero_Types
      use AirfoilInfo
      
  
positive.code:                end if
              end if       ! Removed part of the code related to fprimeprime_m, which has been added in other part of the code        
           
              
              Cm_temp = 0.0_ReKi !reset this to zero, only for output purposes
           
           else
              KC%fprimeprime_m = 0.0
           end if
        
           !...........
  
negative.code:    integer,                 intent(in   ) :: UAMod
     real(ReKi),              intent(in   ) :: Re                    ! Reynolds number
     real(ReKi),              intent(in   ) :: UserProp              ! User property for interpolating AFI
     real(ReKi),              intent(in   ) :: alpha_in              ! angle of attack (radians)
     real(ReKi),              intent(in   ) :: alpha0_in
     real(ReKi),              intent(in   ) :: C_nalpha_circ
     type(AFI_ParameterType), intent(in   ) :: AFInfo                ! The airfoil parameter data
     integer(IntKi),          intent(  out) :: ErrStat               ! Error status of the operation
     character(*),            intent(  out) :: ErrMsg                ! Error message if ErrStat /= ErrID_None
     real(ReKi),optional,     intent(  out) :: f
     real(ReKi),optional,     intent(  out) :: cn_fs
     
     real(ReKi)                             :: f_st
     
     real(ReKi)                             :: Cn, tmpRoot, denom
     type(AFI_OutputType)                   :: AFI_Interp
  
  
     real(ReKi)                       :: alpha         ! angle of attack (radians)
     real(ReKi)                       :: alpha0
     real(ReKi)                       :: alpha_minus_alpha0
  
     ErrStat = ErrID_None
     ErrMsg  = ''
  