18.08.2013 Views

(SYSLIB) Programming Reference Manual - Public Support Login ...

(SYSLIB) Programming Reference Manual - Public Support Login ...

(SYSLIB) Programming Reference Manual - Public Support Login ...

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

Obsolete Entry Points, PROCs, and Routines<br />

Example 1<br />

The FORTRAN instruction<br />

PRINT 100,A,I,N,B,C<br />

100 FORMAT (6X,E20.7, I20, O20, 1P2F20.6)<br />

is equivalent to the following interpretive sequences:<br />

E$OUT<br />

E$E 26,7,A<br />

E$D 46,0,I<br />

E$0 66,36,N<br />

E$SCL 1<br />

E$F 86,6,B<br />

E$F 106,6,C<br />

E$WT 22,0,1<br />

Next machine language instruction.<br />

Example 2<br />

If this line is punched on a card punch whose output code is 1, then the last interpretive<br />

instruction is replaced by<br />

E$WS 14,1,0<br />

E$WT 22,0,1<br />

Only the first 80 columns of the image are punched.<br />

Example 3<br />

The FORTRAN statements<br />

PRINT 100 (J (I), K (I), L (I), M (I), I=1,4)<br />

100 FORMAT (20I6)<br />

are equivalent to the following interpretive sequences:<br />

E$RPT 30,4,1<br />

E$D 6,0,J,2<br />

E$RPT 30,4,1<br />

E$D 12,0,K,2<br />

E$RPT 30,4,1<br />

E$D 18,0,L,2<br />

E$RPT 30,4,1<br />

E$D 24,0,M,2<br />

E$WT 22,0,1<br />

J–10 7833 1733–004

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!