anchor.diff:      INTEGER(IntKi)                                 :: I,J                    ! Generic loop index
   !    INTEGER(IntKi)                                 :: K                      ! Blade index
   !    INTEGER(IntKi)                                 :: ErrStat2
  -!    CHARACTER(LEN(ErrMsg))                         :: ErrMsg2
  +!    CHARACTER(ErrMsgLen)                           :: ErrMsg2
       INTEGER(IntKi)                                 :: LEG                    ! Generic index
       REAL(ReKi)                                     :: TEMP                   ! Temporary storage
   
  
positive.code: 
      ! Local variables  
      INTEGER(IntKi)                             :: ErrStat2       ! Temporary error ID   
      CHARACTER(LEN(ErrMsg))                     :: ErrMsg2        ! Temporary message describing error
  
      ! Initialize variables
  
  
negative.code: !    TYPE(FEAM_InputFile)                           :: InputFileData  ! Data stored in the module's input file
  
      INTEGER(IntKi)                                 :: ErrStat2        ! Error status of the operation (occurs after initial error)
      CHARACTER(ErrMsgLen)                           :: ErrMsg2         ! Error message if ErrStat2 /= ErrID_None
      INTEGER(IntKi)                                 :: I               ! Generic loop index
  
  
  