1 INTEGER MAXTAB 2 PARAMETER (MAXTAB = 33) 3 CHARACTER*(3) VTABLE(MAXTAB) 4 DATA VTABLE /'R0 ','R1 ','R2 ','R3 ', 5 & 'L0 ','L1 ','L2 ','L3 ', 6 & 'O1 ','O2 ','O3 ', 7 & 'X1 ','X2 ','X3 ', 8 & 'RC ','CR2', 9 & 'LC ','CL2', 10 & 'RE ','ER1','ER2', 11 & 'LE ','EL1','EL2', 12 & 'EO1','EO2', 13 & 'EX1','EX2', 14 & 'PL1', 15 & 'QL', 16 & 'M1 ', 17 & 'N2 ', 18 & 'D0 ' 19 & / 20 21