The string STR1 (or as much of it as there is room for) is copied into the part of STR2 beginning at position IPOSN$+$1. IPOSN is updated to indicate the end position of the copy of STR1 within STR2 after this operation. If no copying is done, IPOSN is returned unchanged. The sizes of STR1 and STR2 are based on the declared Fortran 77 size given by the intrinsic function LEN.

CALL CHR_PUTC( STR1, STR2, IPOSN )

STR1 = CHARACTER $\ast$ ( $\ast$ ) (Given)

STR2 = CHARACTER $\ast$ ( $\ast$ ) (Given and Returned)

IPOSN = INTEGER (Given and Returned)