Description:
Determine whether the two given
strings are the same, with case distinction. Their lengths must be identical after removing trailing
blanks.
Invocation
RESULT = CHR_EQUAL( STR1, STR2 )
Arguments
STR1 = CHARACTER
∗ (
∗ ) (Given)
The first string.
STR2 = CHARACTER ∗
( ∗ )
(Given)
The second string.
Returned Value
CHR_EQUAL = LOGICAL
Returned as .TRUE. if the
two given strings are the same, otherwise .FALSE.
Notes:
This routine is OBSOLETE. It exists
for historical reasons. Its function is better performed by a Fortran relational expression.
Copyright © 2018 East Asian Observatory