anchor.diff:        INTEGER(IntKi)                         :: ErrStatLcl                    ! Error status local to this routine.
         INTEGER(IntKi)                         :: NameIndx                      ! The index into the Words array that points to the variable name.
   
  -      CHARACTER(200)                         :: Words       (2)               ! The two "words" parsed from the line.
  +      CHARACTER(NWTC_SizeOfNumWord)          :: Words       (2)               ! The two "words" parsed from the line.
         CHARACTER(ErrMsgLen)                   :: ErrMsg2
         CHARACTER(*), PARAMETER                :: RoutineName = 'ParseDbVar'
   
  
positive.code:       INTEGER(IntKi)                         :: ErrStatLcl                    ! Error status local to this routine.
        INTEGER(IntKi)                         :: NameIndx                      ! The index into the Words array that points to the variable name.
  
        CHARACTER(200)                         :: Words       (2)               ! The two "words" parsed from the line.
        CHARACTER(ErrMsgLen)                   :: ErrMsg2
        CHARACTER(*), PARAMETER                :: RoutineName = 'ParseInVar'
  
  
negative.code:       INTEGER(IntKi)                         :: ErrStatLcl                    ! Error status local to this routine.
        INTEGER(IntKi)                         :: NameIndx                      ! The index into the Words array that points to the variable name.
  
        CHARACTER(NWTC_SizeOfNumWord)          :: Words       (2)               ! The two "words" parsed from the line.
        CHARACTER(ErrMsgLen)                   :: ErrMsg2
        CHARACTER(*), PARAMETER                :: RoutineName = 'ParseLoVar'
  
  