CORFL - read/write the TSS UST core file.

Usage:

call corfil(data, count, index, rdflag)

Where:

data: is the integer array into which or from which the data is to be moved.
count: is the number of words to be moved (1<=count<=10).
index: is the relative location in the ten-word file at which the transfer is to begin. (1<=index < index+count <= 10)
rdflag: =0, data is transferred into the ten-word file. is 1 if data is being read from the corefile, and 0 if the data is being written into the corefile.

count, index and rdflag are integer expressions.

Description:

TSS provided 10 words in the UST for communication between programs. This space is called the COREFILE. CORFL allows the Fortran77 user to read or write this area.