anchor.diff:     
      
      
  -   integer(IntKi)                                :: j, k, n
  +   integer(IntKi)                                :: i, j, k, n
         ! Initialize variables for this routine
   
      errStat = ErrID_None
  
positive.code:       p%NTwOuts = 0
     end if
     
     
  end subroutine SetParameters
  !----------------------------------------------------------------------------------------------------------------------------------
  subroutine AD_End( u, p, x, xd, z, OtherState, y, ErrStat, ErrMsg )
  
negative.code:    p%numOuts          = InputFileData%NumOuts      
    !p%RootName       = TRIM(InitInp%RootName)//'.AD'   ! set earlier to it could be used   
     
     p%NBlOuts = InputFileData%NBlOuts      
     p%BlOutNd = InputFileData%BlOutNd
     
  