7dbd17a5aa
Former-commit-id:133dc97f67[formerlya02aeb236c] [formerly9f19e3f712] [formerly133dc97f67[formerlya02aeb236c] [formerly9f19e3f712] [formerly06a8b51d6d[formerly9f19e3f712[formerly 64fa9254b946eae7e61bbc3f513b7c3696c4f54f]]]] Former-commit-id:06a8b51d6dFormer-commit-id:9bb8decbcf[formerly8e80217e59] [formerly377dcd10b9[formerly3360eb6c5f]] Former-commit-id:377dcd10b9Former-commit-id:e2ecdcfe33
11 lines
418 B
Text
11 lines
418 B
Text
C *--> FROM CMS(UFREEX)
|
|
C FREE FORMAT INPUT COMMON BLOCK
|
|
COMMON /UFREEX/ NFIELD,
|
|
* IFTYPE(50),IFCNT(50),IFSTRT(50),IFSTOP(50),
|
|
* ICDBUF,ICDSTR,ICDSTP,NRDCRD,IPRBLN,IPRCRD,MAXFLD,IPRMPT,
|
|
* NPUCRD,PFCOMA,IPRTCD,ICKDAT,ICDTMP,IOPREP,ICDSPC,
|
|
* ICDQTE,NFLDNQ,CMTCHR
|
|
LOGICAL PFCOMA
|
|
CHARACTER*1 CMTCHR
|
|
CHARACTER*100 ICDBUF
|
|
C
|