5 lines
232 B
Text
5 lines
232 B
Text
C *--> FROM PRDCOMMON.PICPTR
|
|
COMMON /PICPTR/ MTSICP,NTSICP,TSIDIC(2,50),TSTYPE(50),
|
|
* TSBUPT(50),TSPTNX(50),TSLENG(50),ICBPRF
|
|
INTEGER TSIDIC,TSTYPE,TSBUPT,TSPTNX,TSLENG
|
|
C
|