Description:
The string
STR1 (or as much of it as there is room for) is copied into the part of STR2 beginning at position
IPOSN1.
IPOSN is updated to indicate the final length of STR2 after this operation. Trailing blanks in STR1 are
ignored.
Invocation
CALL CHR_APPND( STR1, STR2, IPOSN )
Arguments
STR1 = CHARACTER
(
) (Given)
The string to be copied.
STR2 = CHARACTER
(
)
(Given and Returned)
The string to be updated.
IPOSN = INTEGER (Given and Returned)
The
position in STR2 at which STR1 is to be appended. This value is returned updated to be the position of
the last non-blank character in STR2 after the copy.
Copyright © 2018 East Asian Observatory