| 1 | C ----- H A E C S Z . F I -----\r |
| 2 | C PLOTTER & PAPER SIZE CONTROL COMMON BLOCK\r |
| 3 | C\r |
| 4 | INTEGER PLOTNO @ NUMBER OF PLOTTER UNIT (1 OR 2)\r |
| 5 | REAL XLEN, @ SIZE OF ABZISSA\r |
| 6 | * YLEN, @ ORDINATE\r |
| 7 | * XOFSET,YOFSET, @ SOME SPACE FOR THE SCALES\r |
| 8 | * YZ, @ SIZE OF SYMBOLS IN MM (FOR TEXT ONLY)\r |
| 9 | * YN, @ SIZE OF NUMBERS ( AXIS SCALING )\r |
| 10 | * YSTEP @ SPACE BETWEEN THE DIAGRAMS (PAL,PRL,...)\r |
| 11 | C\r |
| 12 | COMMON /CPSIZE/ XLEN,YLEN,XOFSET,YOFSET,YZ,YN,YSTEP,PLOTNO\r |
| 13 | C\r |
| 14 | DATA XLEN,YLEN /24.,15./, @ A4Q FORMAT\r |
| 15 | * XOFSET,YOFSET /2.8,2.8/,\r |
| 16 | * YZ,YN,YSTEP /.56,.49,.75/\r |
| 17 | * ,PLOTNO /1/\r |
| 18 | C -----\r |
| 19 | \1a\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0 |