C ----- H A E C S Z . F I ----- C PLOTTER & PAPER SIZE CONTROL COMMON BLOCK C INTEGER PLOTNO @ NUMBER OF PLOTTER UNIT (1 OR 2) REAL XLEN, @ SIZE OF ABZISSA * YLEN, @ ORDINATE * XOFSET,YOFSET, @ SOME SPACE FOR THE SCALES * YZ, @ SIZE OF SYMBOLS IN MM (FOR TEXT ONLY) * YN, @ SIZE OF NUMBERS ( AXIS SCALING ) * YSTEP @ SPACE BETWEEN THE DIAGRAMS (PAL,PRL,...) C COMMON /CPSIZE/ XLEN,YLEN,XOFSET,YOFSET,YZ,YN,YSTEP,PLOTNO C DATA XLEN,YLEN /24.,15./, @ A4Q FORMAT * XOFSET,YOFSET /2.8,2.8/, * YZ,YN,YSTEP /.56,.49,.75/ * ,PLOTNO /1/ C -----