zeus_python_old/root.h at master · Higginbottom/zeus_python_old · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
      REAL
     . b1floor   ,b2floor   ,b3floor   ,ciso
     .,courno    ,dfloor
     .,dt        ,dtal      ,dtcs      ,dtdump
     .,dthdf     ,dthist    ,dtmin     ,dtnew
     .,dtqq      ,dtqqi2
     .,dtusr     ,dtv1      ,dtv2
     .,efloor    ,emffloor  ,erfloor   ,gamma
     .,qcon      ,qlin
     .,tdump
     .,thdf      ,thist     ,time      ,tlim
     .,trem
     .,tused     ,tusr
     .,v1floor   ,v2floor   ,v3floor

      integer
     . ifsen
     .,iordb1    ,iordb2    ,iordb3    ,iordd
     .,iorde     ,iorder    ,iords1    ,iords2
     .,iords3
     .,istpb1    ,istpb2    ,istpb3    ,istpd     ,istpe     ,istper
     .,istps1    ,istps2    ,istps3
     .,isymm
     .,ix1x2
     .,nhy
     .,nlim      ,nred
     .,nwarn

      common /rootr/
     . b1floor ,b2floor ,b3floor ,ciso    ,courno
     .,dfloor
     .,dt      ,dtal    ,dtcs    ,dtdump  ,dthdf
     .,dthist  ,dtmin   ,dtnew
     .,dtqq    ,dtqqi2  ,dtusr   ,dtv1    ,dtv2
     .,efloor  ,emffloor,erfloor ,gamma
     .,qcon    ,qlin
     .,tdump   ,thdf    ,thist
     .,time    ,tlim    ,trem
     .,tused   ,tusr    ,v1floor ,v2floor
     .,v3floor

      common /rooti/
     . ifsen
     .,iordb1  ,iordb2
     .,iordb3  ,iordd   ,iorde   ,iorder  ,iords1
     .,iords2  ,iords3
     .,istpb1  ,istpb2  ,istpb3  ,istpd   ,istpe   ,istper
     .,istps1  ,istps2  ,istps3
     .,isymm   ,ix1x2
     .,nhy
     .,nlim    ,nred
     .,nwarn

      character*8  id
      character*18  hdffile, hstfile, resfile, usrfile
      common /chroot2/  id
      common /chroot1/  hdffile, hstfile, resfile, usrfile