anchor.diff:           
      ELSEIF ( p_FAST%CompAero == Module_AD ) THEN
         
  -!debug_print2_unit = 92   
         CALL AD_InputSolve_NoIfW( p_FAST, AD%Input(1), ED%Output(1), BD, MeshMapData, ErrStat2, ErrMsg2 )   
            CALL SetErrStat( ErrStat2, ErrMsg2, ErrStat, ErrMsg, RoutineName )        
  -!debug_print2_unit = 90      
   
            ! because we're not calling InflowWind_CalcOutput or getting new values from OpenFOAM, 
            ! this probably can be skipped; 
  
positive.code:       ! blades
     IF (p_FAST%CompElast == Module_ED ) THEN
        
  !debug_print2 = .true.
        DO k=1,size(y_ED%BladeLn2Mesh)
           CALL Transfer_Line2_to_Line2( y_ED%BladeLn2Mesh(k), u_AD%BladeMotion(k), MeshMapData%BDED_L_2_AD_L_B(k), ErrStat2, ErrMsg2 )
              CALL SetErrStat(ErrStat2,ErrMsg2,ErrStat,ErrMsg,RoutineName//':u_AD%BladeMotion('//trim(num2lstr(k))//')' )   
  !debug_print2 = .false.            
        END DO
        
     ELSEIF (p_FAST%CompElast == Module_BD ) THEN
  
negative.code:       
     ELSE IF ( p_FAST%CompAero == Module_AD ) THEN 
                          
        CALL AD_InputSolve_NoIfW( p_FAST, AD%Input(1), ED%Output(1), BD, MeshMapData, ErrStat2, ErrMsg2 )
           CALL SetErrStat( ErrStat2, ErrMsg2, ErrStat, ErrMsg, RoutineName ) 
           
     END IF
     
  