Source file: dcltest.f
I/O Operations: Unit ID Unit No Access Form Operation * SEQ FMTD W Operation codes A=rewind,B=backspace,C=close,E=endfile I=inquire,O=open,R=read,W=write
Parameter Variables Used CHARACTER*6 STRING1 (STRING1 = 'abc123') CHARACTER*(6) STRING2 (STRING2 = 'xyz789')