anchor.diff:        CALL CheckRealVar( Var, ExpVarName, ErrStat, ErrMsg)
         
         IF ( PRESENT(UnEc) )  THEN
  -         IF ( UnEc > 0 )  WRITE (UnEc,'(1X,A15," = ",A20)')  Words
  +         IF ( UnEc > 0 )  WRITE (UnEc,'(1X,A15," = ",A20)')  Words !bjj: not sure this is the best way to echo the number being read (in case of truncation, etc)
         END IF
   
         LineNum = LineNum + 1
  
positive.code:    END INTERFACE
  
        !> \copydoc nwtc_io::parsechvarwdefault
     INTERFACE ParseVarWDefault                                                 ! Parses a boolean variable name and value from a string, potentially sets to a default value if "Default" is parsed.
        MODULE PROCEDURE ParseChVarWDefault                                     ! Parses a character string from a string, potentially sets to a default value if "Default" is parsed.
        MODULE PROCEDURE ParseDbVarWDefault                                     ! Parses a double-precision REAL from a string, potentially sets to a default value if "Default" is parsed.
        MODULE PROCEDURE ParseInVarWDefault                                     ! Parses an INTEGER from a string, potentially sets to a default value if "Default" is parsed.
  
negative.code:    END IF
     RETURN
     END SUBROUTINE ReadR4AryFromStr
  !=======================================================================
  !> \copydoc nwtc_io::readcary
     SUBROUTINE ReadR8Ary ( UnIn, Fil, Ary, AryLen, AryName, AryDescr, ErrStat, ErrMsg, UnEc )
  