1               
   2               /EAE OVERLAY FOR ROGALGOL OPERATING SYSTEM
   3               
   4               POP=JMS I 72
   5               T4=4
   6               MUL=701
   7               DIV=711
   8               PNEXT=35
   9               SUBSA3=1625
  10               SUBSA2=1637
  11               PRINT=2027
  12               NFSPAD=23
  13               PRIN=2044
  14               GT10=2060
  15               ARNE=2302
  16               ARNW=2322
  17               XNEXT6=200
  18               
  19               FIELD 1
  20               
  21 010215  7417  *XNEXT6+15;     LSR; 5; JMP I XNEXT6
     010216  0005  
     010217  5600  
  22               
  23 010701  7344  *MUL;   CLA CLL CMA RAL; DCA T4; JMS SIGN1; DCA M1; JMS SIGN1
     010702  3004  
     010703  4325  
     010704  3307  
     010705  4325  
  24 010706  7425          MQL MUY
  25 010707  0000  M1,     0; JMP SIGN2
     010710  5320  
  26               
  27 010711  7344  *DIV;   CLA CLL CMA RAL; DCA T4; JMS SIGN1; DCA D1; JMS SIGN1
     010712  3004  
     010713  4325  
     010714  3317  
     010715  4325  
  28 010716  7427          MQL DVI
  29 010717  0000  D1,     0
  30 010720  7701  SIGN2,  CLA MQA; ISZ T4; SKP; CIA; JMP I PNEXT
     010721  2004  
     010722  7410  
     010723  7041  
     010724  5435  
  31 010725  0000  SIGN1,  0; POP; SPA; ISZ T4; NOP
     010726  4472  
     010727  7510  
     010730  2004  
     010731  7000  
  32 010732  7510          SPA; CIA; JMP I SIGN1
     010733  7041  
     010734  5725  
  33               
  34 011631  7421  *SUBSA3+4;      MQL
  35 011636  7405  *SUBSA2-1;      MUY; 0; CLA MQA
     011637  0000  
     011640  7701  
  36               
  37 012033  7421  *PRINT+4;       MQL
  38 012047  7701  *PRIN+3;        CLA MQA
  39 012053  7701  *PRIN+7;        CLA MQA
  40 012060  7407  *GT10;          DVI
  41               
  42 012300  7421  *ARNE-2;        MQL; MUY; 0; CLA MQA
     012301  7405  
     012302  0000  
     012303  7701  
  43 012320  7421  *ARNW-2;        MQL; MUY; 0; CLA MQA; TAD NFSPAD
     012321  7405  
     012322  0000  
     012323  7701  
     012324  1023  
  44               
  45               $

ARNE    2302
ARNW    2322
D1      0717
DIV     0711
GT10    2060
M1      0707
MUL     0701
NFSPAD  0023
PNEXT   0035
POP     4472
PRIN    2044
PRINT   2027
SIGN1   0725
SIGN2   0720
SUBSA2  1637
SUBSA3  1625
T4      0004
XNEXT6  0200