anchor.diff:      ! Local variables
       REAL(ReKi)                                     :: AllOuts(MaxOutPts)     ! All the the available output channels
       INTEGER(IntKi)                                 :: I,J                    ! Generic loop index
  -    INTEGER(IntKi)                                 :: K                      ! Blade index
  -    INTEGER(IntKi)                                 :: ErrStat2
  -    CHARACTER(LEN(ErrMsg))                         :: ErrMsg2
  +!    INTEGER(IntKi)                                 :: K                      ! Blade index
  +!    INTEGER(IntKi)                                 :: ErrStat2
  +!    CHARACTER(LEN(ErrMsg))                         :: ErrMsg2
       INTEGER(IntKi)                                 :: LEG                    ! Generic index
       REAL(ReKi)                                     :: TEMP                   ! Temporary storage
   
  
positive.code:     INTEGER(IntKi)                                 :: NN,MM          ! Generic index
      INTEGER(IntKi)                                 :: NE             ! Generic index
      INTEGER(IntKi)                                 :: I              ! Generic loop index
      INTEGER(IntKi)                                 :: M              ! Generic loop index
      INTEGER(IntKi)                                 :: N              ! Generic loop index
      INTEGER(IntKi)                                 :: J              ! Generic loop index
      INTEGER(IntKi)                                 :: K              ! Generic loop index
      INTEGER(IntKi)                                 :: L              ! Generic loop index
      INTEGER(IntKi)                                 :: LEG            ! Generic loop index
  
  
  
negative.code:     
      INTEGER(IntKi)                  :: MM,NN,LEG,NE                  ! Generic index
      INTEGER(IntKi)                  :: I,J,K,L                       ! Generic index
  !    INTEGER(IntKi)                  :: Flag                          ! Generic index
  !    INTEGER(IntKi)                  :: Sttus                         ! Status returned by an attempted allocation or READ.
  
      ! Initialize variables
  
  