anchor.diff:        KC%C_V               = 0.0_ReKi
         KC%Cm_q_circ         = 0.0_ReKi
         KC%Cm_q_nc           = 0.0_ReKi
  -         alpha_prime_f     = 0.0_ReKi
         KC%Dalphaf           = 0.0_ReKi
         KC%T_f               = 0.0_ReKi
         KC%T_V               = 0.0_ReKi
  
positive.code:    
     
     !bjj: if cn = 0 or c_nalpha_circ = 0 or alpha=alpha0, f has infinitely many solutions to this equation
     
     if (EqualRealNos( real(c_nalpha_circ,SiKi), 0.0_SiKi )) then
        tmpRoot = 0.0_ReKi
  
negative.code:    
     real(ReKi)                                   :: Cm_FS  
     real(ReKi)                                   :: Cc_FS
     real(ReKi)                                   :: Cm_alpha_nc
     real(ReKi)                                   :: M, f, k2_hat
     real(ReKi)                                   :: Cm_v, alpha_prime_f
     real(ReKi)                                   :: x_cp_hat                      ! center-of-pressure distance from LE in chord fraction
  