We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent ecf7c66 commit 69cd3bfCopy full SHA for 69cd3bf
misc/minicern/src/pawc.inc
@@ -1,5 +1,4 @@
1
-C=== hcflag.inc ================================================
2
- INTEGER ID,IDBADD,LID,IDLAST,IDHOLD,NBIT,NBITCH,
3
- + NCHAR,NRHIST,IERR,NV
4
- COMMON /HCFLAG/ ID,IDBADD,LID,IDLAST,IDHOLD,NBIT,NBITCH,
5
- + NCHAR,NRHIST,IERR ,NV
+C=== pawc.inc ==================================================
+ INTEGER NWPAW,IXPAWC,IHDIV,IXHIGZ,IXKU,IFENCE,LMAIN,IPAW
+ COMMON /PAWC/ NWPAW,IXPAWC,IHDIV,IXHIGZ,IXKU,IFENCE(5),LMAIN,
+ + IPAW(4000000-11)
0 commit comments