anchor.diff:     INTEGER(IntKi)                               :: K           ! Loops through blades
      INTEGER(IntKi)                               :: NodeNum     ! Node number for blade/node on mesh
      INTEGER(IntKi)                               :: NumBl
  -   INTEGER(IntKi)                               :: NNodes
      INTEGER(IntKi)                               :: node
      INTEGER(IntKi)                               :: ErrStat2
      CHARACTER(ErrMsgLen)                         :: ErrMsg2 
  
positive.code:       
     ELSE IF ( p_FAST%CompAero == Module_AD ) THEN 
                          
        CALL AD_InputSolve_NoIfW( p_FAST, AD%Input(1), ED%Output(1), MeshMapData, ErrStat2, ErrMsg2 )
           CALL SetErrStat( ErrStat2, ErrMsg2, ErrStat, ErrMsg, RoutineName ) 
           
     END IF
     
  
negative.code:          
     ELSEIF ( p_FAST%CompAero == Module_AD ) THEN
        
  !debug_print2_unit = 92   
        CALL AD_InputSolve_NoIfW( p_FAST, AD%Input(1), ED%Output(1), MeshMapData, ErrStat2, ErrMsg2 )   
           CALL SetErrStat( ErrStat2, ErrMsg2, ErrStat, ErrMsg, RoutineName )        
  !debug_print2_unit = 90      
  
           ! because we're not calling InflowWind_CalcOutput, this probably can be skipped; 
           ! TODO: alternatively, we could call InflowWind_CalcOutput, too.
  