Visible to Intel only — GUID: GUID-62AD904C-6AE8-4BAF-8FAA-2B9E2E123B12
Visible to Intel only — GUID: GUID-62AD904C-6AE8-4BAF-8FAA-2B9E2E123B12
Dollar-Sign ($) and Backslash ( \\ ) Editing
The dollar sign and backslash edit descriptors modify the output of carriage control specified by the first character of the record. They only affect carriage control for formatted files, and have no effect on input.
If the first character of the record is a blank or a plus sign (+), the dollar sign and backslash descriptors suppress carriage return (after printing the record).
For terminal device I/O, when this trailing carriage return is suppressed, a response follows output on the same line. For example, suppose the following statements are specified:
TYPE 100
100 FORMAT (' ENTER RADIUS VALUE ',$)
ACCEPT 200, RADIUS
200 FORMAT (F6.2)
The following prompt is displayed:
ENTER RADIUS VALUE
Any response (for example, "12.") is then displayed on the same line:
ENTER RADIUS VALUE 12.
If the first character of the record is 0, 1, or ASCII NUL, the dollar sign and backslash descriptors have no effect.
Consider the following:
CHARACTER(20) MYNAME
WRITE (*,9000)
9000 FORMAT ('Please type your name:',\)
READ (*,9001) MYNAME
9001 FORMAT (A20)
WRITE (*,9002) ' ',MYNAME
9002 FORMAT (1X,A20)
This example advances two lines, prompts for input, awaits input on the same line as the prompt, and prints the input.
The following shows the same example using Fortran standard constructs:
CHARACTER(20) MYNAME
WRITE (*,9000, ADVANCE='NO')
9000 FORMAT ('Please type your name:')
READ (*,9001) MYNAME
9001 FORMAT (A20)
WRITE (*,9002) ' ',MYNAME
9002 FORMAT (1X,A20)