PROGRAM FILE 95: GENERAL USE OF THE READ, DATA,
        AND RESTORE STATEMENTS.
    ANSI STANDARD 14.2, 14.4

SECTION 95.1: GENERAL SYNTAX AND SEMANTICS OF READ AND DATA

THIS SECTION EXERCISES SOME OF THE GENERAL CAPABILITIES
AND PROPERTIES OF THE READ AND DATA STATEMENTS, AS LISTED:
  1) READ AND DATA CAN MIX STRING AND NUMERIC DATA
  2) CONTROL FALLS THROUGH DATA STATEMENTS WITHOUT EFFECT
  3) DATA STATEMENTS MAY BE SCATTERED THROUGHOUT SOURCE
  4) READ AND DATA LISTS CAN OVERLAP
  5) READ CAN ACCESS DATA ANYWHERE IN SOURCE

                BEGIN TEST


SHOULD BE:      1             A               2             B
ACTUAL:         1             A               2             B
READ OK

SHOULD BE:      3              4              5             C
ACTUAL:         3              4              5             C
READ OK

SHOULD BE:     D              E              F              6              7
 8 
ACTUAL:        D              E              F              6              7
 8 
READ OK

SHOULD BE:     9
ACTUAL:        9
READ OK

SHOULD BE:      10             11 
ACTUAL:         10             11 
READ OK

*** TEST PASSED ***

               END TEST

SECTION 95.2: RESTORE STATEMENT

THIS SECTION TESTS THE CAPABILITY OF THE RESTORE STATEMENT
TO ENABLE READING FROM THE BEGINNING OF THE DATA SEQUENCE.
FURTHERMORE, DATA VALUES WHICH WERE ORIGINALLY READ AS
NUMERIC MAY BE SUBSEQUENTLY READ AS STRINGS, AND 
VICE-VERSA, AS LONG AS DATA-TYPE IS COMPATIBLE WITH
VARIABLE-TYPE.

               BEGIN TEST

EXECUTE FIRST RESTORE

SHOULD BE:     1              A              2              B              3
4              5
ACTUAL:        1              A              2              B              3
4              5
READ OK

SHOULD BE:     C              D              E              F               6 
 7             8
ACTUAL:        C              D              E              F               6 
 7             8
READ OK

EXECUTE SECOND RESTORE


SHOULD BE:      1             A              2              B               3 
ACTUAL:         1             A              2              B               3 
READ OK


*** TEST PASSED ***

              END TEST

END PROGRAM 95
