File: work2.cmn

package info (click to toggle)
x13as 1.1-b59-1
  • links: PTS, VCS
  • area: non-free
  • in suites: bookworm
  • size: 9,088 kB
  • sloc: fortran: 114,121; makefile: 14
file content (9 lines) | stat: -rw-r--r-- 419 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
7
8
9
 
c-----------------------------------------------------------------------
      DOUBLE PRECISION Pbar,Autoc,Qu,Q2m2,Psq,Qual
      INTEGER Nn,Kfail,Nyrs
      LOGICAL Lstabl,L3x5
      DIMENSION Psq(PSP),Pbar(PSP),Autoc(PSP+2),Qu(11)
c-----------------------------------------------------------------------
      COMMON /work2 / Pbar,Autoc,Qu,Q2m2,Psq,Qual,Nn,Kfail,Nyrs,Lstabl,
     &                L3x5