Example of a SWITCH FILE Declaration

The following example declares CHOOSEUNIT to be a switch file identifier with a list of three file designators. CHOOSEUNIT[0] evaluates to file CARDOUT, CHOOSEUNIT[1] evaluates to file TAPEOUT, and CHOOSEUNIT[2] evaluates to file PRINTOUT. 

SWITCH FILE CHOOSEUNIT :=
   CARDOUT,
   TAPEOUT,
   PRINTOUT;
  .
  .
  .
WRITE(CHOOSEUNIT[0], 14, A[*]);   % WRITES TO CARDOUT
WRITE(CHOOSEUNIT[1], 14, A[*]);   % WRITES TO TAPEOUT
WRITE(CHOOSEUNIT[2], 14, A[*]);   % WRITES TO PRINTOUT
Prev  Up  Next
Switch File List  Home  SWITCH FORMAT Declaration