8e80217e59
Former-commit-id:a02aeb236c[formerly9f19e3f712] [formerly06a8b51d6d[formerly 64fa9254b946eae7e61bbc3f513b7c3696c4f54f]] Former-commit-id:06a8b51d6dFormer-commit-id:3360eb6c5f
10 lines
387 B
Text
10 lines
387 B
Text
C *--> FROM CMS(UERORX)
|
|
C ERROR AND WARNING COMMON BLOCK
|
|
COMMON /UERORX/ MAXCDE,IERPRT,ICDPRT,
|
|
* MXUERR,LUEROR(256),
|
|
* MAXERR,NERR(256),NTERR(256),
|
|
* MPGWRN(256),NPGWRN(256),LPGWRN(256,1000),
|
|
* MAXWRN,NWRN(256),NTWRN(256),
|
|
* MPGERR(256),NPGERR(256),LPGERR(256,1000)
|
|
INTEGER*2 LPGWRN,LPGERR
|
|
C
|