Statistiques
| Révision :

root / src / io_module.mod @ 1

Historique | Voir | Annoter | Télécharger (10,43 ko)

1 1 pfleura2
GFORTRAN module version '0' created from Io_module.f90 on Tue Aug  2 18:03:03 2011
2 1 pfleura2
MD5:556e278bb8a31990e8ceaeab7f61672f -- If you edit this, you'll get what you deserve.
3 1 pfleura2
4 1 pfleura2
(() () () () () ()
5 1 pfleura2
() () () () () () () () () () () () () () () () () () () () ())
6 1 pfleura2
7 1 pfleura2
()
8 1 pfleura2
9 1 pfleura2
()
10 1 pfleura2
11 1 pfleura2
()
12 1 pfleura2
13 1 pfleura2
()
14 1 pfleura2
15 1 pfleura2
(2 'attypes' 'io_module' 'attypes' 1 ((VARIABLE UNKNOWN-INTENT
16 1 pfleura2
UNKNOWN-PROC UNKNOWN EXPLICIT-SAVE DIMENSION) (CHARACTER 1 0 0 CHARACTER
17 1 pfleura2
((CONSTANT (INTEGER 4 0 0 INTEGER ()) 0 '2'))) 0 0 () (1 EXPLICIT (
18 1 pfleura2
CONSTANT (INTEGER 4 0 0 INTEGER ()) 0 '1') (CONSTANT (INTEGER 4 0 0
19 1 pfleura2
INTEGER ()) 0 '100')) 0 () () () 0 0)
20 1 pfleura2
3 'calcname' 'io_module' 'calcname' 1 ((VARIABLE UNKNOWN-INTENT
21 1 pfleura2
UNKNOWN-PROC UNKNOWN EXPLICIT-SAVE) (CHARACTER 1 0 0 CHARACTER ((
22 1 pfleura2
CONSTANT (INTEGER 4 0 0 INTEGER ()) 0 '132'))) 0 0 () () 0 () () () 0 0)
23 1 pfleura2
4 'curcom' 'io_module' 'curcom' 1 ((VARIABLE UNKNOWN-INTENT UNKNOWN-PROC
24 1 pfleura2
UNKNOWN EXPLICIT-SAVE POINTER) (DERIVED 5 0 0 DERIVED ()) 0 0 () () 0 ()
25 1 pfleura2
() () 0 0)
26 1 pfleura2
6 'current' 'io_module' 'current' 1 ((VARIABLE UNKNOWN-INTENT
27 1 pfleura2
UNKNOWN-PROC UNKNOWN EXPLICIT-SAVE POINTER) (DERIVED 5 0 0 DERIVED ()) 0
28 1 pfleura2
0 () () 0 () () () 0 0)
29 1 pfleura2
7 'debugfile' 'io_module' 'debugfile' 1 ((VARIABLE UNKNOWN-INTENT
30 1 pfleura2
UNKNOWN-PROC UNKNOWN EXPLICIT-SAVE) (CHARACTER 1 0 0 CHARACTER ((
31 1 pfleura2
CONSTANT (INTEGER 4 0 0 INTEGER ()) 0 '132'))) 0 0 () () 0 () () () 0 0)
32 1 pfleura2
8 'ev2au' 'io_module' 'ev2au' 1 ((PARAMETER UNKNOWN-INTENT UNKNOWN-PROC
33 1 pfleura2
UNKNOWN IMPLICIT-SAVE) (REAL 8 0 0 REAL ()) 0 0 () (CONSTANT (REAL 8 0 0
34 1 pfleura2
REAL ()) 0 '0.968675aa430b78@-1') () 0 () () () 0 0)
35 1 pfleura2
9 'fff' 'io_module' 'fff' 1 ((VARIABLE UNKNOWN-INTENT UNKNOWN-PROC
36 1 pfleura2
UNKNOWN EXPLICIT-SAVE ALLOCATABLE DIMENSION) (CHARACTER 1 0 0 CHARACTER
37 1 pfleura2
((CONSTANT (INTEGER 4 0 0 INTEGER ()) 0 '4'))) 0 0 () (2 DEFERRED () ()
38 1 pfleura2
() ()) 0 () () () 0 0)
39 1 pfleura2
10 'gauss_charge' 'io_module' 'gauss_charge' 1 ((VARIABLE UNKNOWN-INTENT
40 1 pfleura2
UNKNOWN-PROC UNKNOWN EXPLICIT-SAVE) (CHARACTER 1 0 0 CHARACTER ((
41 1 pfleura2
CONSTANT (INTEGER 4 0 0 INTEGER ()) 0 '132'))) 0 0 () () 0 () () () 0 0)
42 1 pfleura2
11 'gauss_comment' 'io_module' 'gauss_comment' 1 ((VARIABLE
43 1 pfleura2
UNKNOWN-INTENT UNKNOWN-PROC UNKNOWN EXPLICIT-SAVE POINTER) (DERIVED 5 0
44 1 pfleura2
0 DERIVED ()) 0 0 () () 0 () () () 0 0)
45 1 pfleura2
12 'gauss_end' 'io_module' 'gauss_end' 1 ((VARIABLE UNKNOWN-INTENT
46 1 pfleura2
UNKNOWN-PROC UNKNOWN EXPLICIT-SAVE POINTER) (DERIVED 5 0 0 DERIVED ()) 0
47 1 pfleura2
0 () () 0 () () () 0 0)
48 1 pfleura2
13 'gauss_paste' 'io_module' 'gauss_paste' 1 ((VARIABLE UNKNOWN-INTENT
49 1 pfleura2
UNKNOWN-PROC UNKNOWN EXPLICIT-SAVE ALLOCATABLE DIMENSION) (CHARACTER 1 0
50 1 pfleura2
0 CHARACTER ((CONSTANT (INTEGER 4 0 0 INTEGER ()) 0 '132'))) 0 0 () (1
51 1 pfleura2
DEFERRED () ()) 0 () () () 0 0)
52 1 pfleura2
14 'gauss_root' 'io_module' 'gauss_root' 1 ((VARIABLE UNKNOWN-INTENT
53 1 pfleura2
UNKNOWN-PROC UNKNOWN EXPLICIT-SAVE POINTER) (DERIVED 5 0 0 DERIVED ()) 0
54 1 pfleura2
0 () () 0 () () () 0 0)
55 1 pfleura2
5 'input_line' 'io_module' 'input_line' 1 ((DERIVED UNKNOWN-INTENT
56 1 pfleura2
UNKNOWN-PROC UNKNOWN UNKNOWN POINTER_COMP) (UNKNOWN 0 0 0 UNKNOWN ()) 0
57 1 pfleura2
0 () () 0 ((15 'line' (CHARACTER 1 0 0 CHARACTER ((CONSTANT (INTEGER 4 0
58 1 pfleura2
0 INTEGER ()) 0 '132'))) () (UNKNOWN-FL UNKNOWN-INTENT UNKNOWN-PROC
59 1 pfleura2
UNKNOWN UNKNOWN) UNKNOWN-ACCESS ()) (16 'next' (DERIVED 5 0 0 DERIVED ())
60 1 pfleura2
() (UNKNOWN-FL UNKNOWN-INTENT UNKNOWN-PROC UNKNOWN UNKNOWN POINTER)
61 1 pfleura2
UNKNOWN-ACCESS ())) PUBLIC (() ()) () 0 0)
62 1 pfleura2
17 'io_module' 'io_module' 'io_module' 1 ((MODULE UNKNOWN-INTENT
63 1 pfleura2
UNKNOWN-PROC UNKNOWN UNKNOWN) (UNKNOWN 0 0 0 UNKNOWN ()) 0 0 () () 0 ()
64 1 pfleura2
() () 0 0)
65 1 pfleura2
18 'iocart' 'io_module' 'iocart' 1 ((VARIABLE UNKNOWN-INTENT
66 1 pfleura2
UNKNOWN-PROC UNKNOWN EXPLICIT-SAVE) (INTEGER 4 0 0 INTEGER ()) 0 0 () ()
67 1 pfleura2
0 () () () 0 0)
68 1 pfleura2
19 'ioin' 'io_module' 'ioin' 1 ((VARIABLE UNKNOWN-INTENT UNKNOWN-PROC
69 1 pfleura2
UNKNOWN EXPLICIT-SAVE) (INTEGER 4 0 0 INTEGER ()) 0 0 () () 0 () () () 0
70 1 pfleura2
0)
71 1 pfleura2
20 'ioout' 'io_module' 'ioout' 1 ((VARIABLE UNKNOWN-INTENT UNKNOWN-PROC
72 1 pfleura2
UNKNOWN EXPLICIT-SAVE) (INTEGER 4 0 0 INTEGER ()) 0 0 () () 0 () () () 0
73 1 pfleura2
0)
74 1 pfleura2
21 'iotmp' 'io_module' 'iotmp' 1 ((PARAMETER UNKNOWN-INTENT UNKNOWN-PROC
75 1 pfleura2
UNKNOWN IMPLICIT-SAVE) (INTEGER 4 0 0 INTEGER ()) 0 0 () (CONSTANT (
76 1 pfleura2
INTEGER 4 0 0 INTEGER ()) 0 '21') () 0 () () () 0 0)
77 1 pfleura2
22 'iotmp2' 'io_module' 'iotmp2' 1 ((PARAMETER UNKNOWN-INTENT
78 1 pfleura2
UNKNOWN-PROC UNKNOWN IMPLICIT-SAVE) (INTEGER 4 0 0 INTEGER ()) 0 0 () (
79 1 pfleura2
CONSTANT (INTEGER 4 0 0 INTEGER ()) 0 '22') () 0 () () () 0 0)
80 1 pfleura2
23 'iotmp3' 'io_module' 'iotmp3' 1 ((PARAMETER UNKNOWN-INTENT
81 1 pfleura2
UNKNOWN-PROC UNKNOWN IMPLICIT-SAVE) (INTEGER 4 0 0 INTEGER ()) 0 0 () (
82 1 pfleura2
CONSTANT (INTEGER 4 0 0 INTEGER ()) 0 '23') () 0 () () () 0 0)
83 1 pfleura2
24 'isuffix' 'io_module' 'isuffix' 1 ((VARIABLE UNKNOWN-INTENT
84 1 pfleura2
UNKNOWN-PROC UNKNOWN EXPLICIT-SAVE) (CHARACTER 1 0 0 CHARACTER ((
85 1 pfleura2
CONSTANT (INTEGER 4 0 0 INTEGER ()) 0 '132'))) 0 0 () () 0 () () () 0 0)
86 1 pfleura2
25 'kind' '(intrinsic)' 'kind' 1 ((PROCEDURE UNKNOWN-INTENT UNKNOWN-PROC
87 1 pfleura2
UNKNOWN UNKNOWN FUNCTION) (INTEGER 4 0 0 INTEGER ()) 0 0 () () 25 () ()
88 1 pfleura2
() 0 0)
89 1 pfleura2
26 'kint' 'vartypes' 'kint' 1 ((PARAMETER UNKNOWN-INTENT UNKNOWN-PROC
90 1 pfleura2
UNKNOWN IMPLICIT-SAVE) (INTEGER 4 0 0 INTEGER ()) 0 0 () (CONSTANT (
91 1 pfleura2
INTEGER 4 0 0 INTEGER ()) 0 '4') () 0 () () () 0 0)
92 1 pfleura2
27 'kreal' 'vartypes' 'kreal' 1 ((PARAMETER UNKNOWN-INTENT UNKNOWN-PROC
93 1 pfleura2
UNKNOWN IMPLICIT-SAVE) (INTEGER 4 0 0 INTEGER ()) 0 0 () (CONSTANT (
94 1 pfleura2
INTEGER 4 0 0 INTEGER ()) 0 '8') () 0 () () () 0 0)
95 1 pfleura2
28 'lchars' 'vartypes' 'lchars' 1 ((PARAMETER UNKNOWN-INTENT
96 1 pfleura2
UNKNOWN-PROC UNKNOWN IMPLICIT-SAVE) (INTEGER 4 0 0 INTEGER ()) 0 0 () (
97 1 pfleura2
CONSTANT (INTEGER 4 0 0 INTEGER ()) 0 '132') () 0 () () () 0 0)
98 1 pfleura2
29 'listcoord' 'vartypes' 'listcoord' 1 ((DERIVED UNKNOWN-INTENT
99 1 pfleura2
UNKNOWN-PROC UNKNOWN UNKNOWN POINTER_COMP) (UNKNOWN 0 0 0 UNKNOWN ()) 0
100 1 pfleura2
0 () () 0 ((30 'type' (CHARACTER 1 0 0 CHARACTER ((CONSTANT (INTEGER 4 0
101 1 pfleura2
0 INTEGER ()) 0 '32'))) () (UNKNOWN-FL UNKNOWN-INTENT UNKNOWN-PROC
102 1 pfleura2
UNKNOWN UNKNOWN) UNKNOWN-ACCESS ()) (31 'at1' (INTEGER 4 0 0 INTEGER ())
103 1 pfleura2
() (UNKNOWN-FL UNKNOWN-INTENT UNKNOWN-PROC UNKNOWN UNKNOWN)
104 1 pfleura2
UNKNOWN-ACCESS ()) (32 'at2' (INTEGER 4 0 0 INTEGER ()) () (UNKNOWN-FL
105 1 pfleura2
UNKNOWN-INTENT UNKNOWN-PROC UNKNOWN UNKNOWN) UNKNOWN-ACCESS ()) (33 'at3'
106 1 pfleura2
(INTEGER 4 0 0 INTEGER ()) () (UNKNOWN-FL UNKNOWN-INTENT UNKNOWN-PROC
107 1 pfleura2
UNKNOWN UNKNOWN) UNKNOWN-ACCESS ()) (34 'at4' (INTEGER 4 0 0 INTEGER ())
108 1 pfleura2
() (UNKNOWN-FL UNKNOWN-INTENT UNKNOWN-PROC UNKNOWN UNKNOWN)
109 1 pfleura2
UNKNOWN-ACCESS ()) (35 'value' (REAL 8 0 0 REAL ()) () (UNKNOWN-FL
110 1 pfleura2
UNKNOWN-INTENT UNKNOWN-PROC UNKNOWN UNKNOWN) UNKNOWN-ACCESS ()) (36
111 1 pfleura2
'signdihedral' (INTEGER 4 0 0 INTEGER ()) () (UNKNOWN-FL UNKNOWN-INTENT
112 1 pfleura2
UNKNOWN-PROC UNKNOWN UNKNOWN) UNKNOWN-ACCESS ()) (37 'next' (DERIVED 29
113 1 pfleura2
0 0 DERIVED ()) () (UNKNOWN-FL UNKNOWN-INTENT UNKNOWN-PROC UNKNOWN
114 1 pfleura2
UNKNOWN POINTER) UNKNOWN-ACCESS ())) PUBLIC (() ()) () 0 0)
115 1 pfleura2
38 'maxtype' 'io_module' 'maxtype' 1 ((PARAMETER UNKNOWN-INTENT
116 1 pfleura2
UNKNOWN-PROC UNKNOWN IMPLICIT-SAVE) (INTEGER 4 0 0 INTEGER ()) 0 0 () (
117 1 pfleura2
CONSTANT (INTEGER 4 0 0 INTEGER ()) 0 '100') () 0 () () () 0 0)
118 1 pfleura2
39 'mopac_comment' 'io_module' 'mopac_comment' 1 ((VARIABLE
119 1 pfleura2
UNKNOWN-INTENT UNKNOWN-PROC UNKNOWN EXPLICIT-SAVE POINTER) (DERIVED 5 0
120 1 pfleura2
0 DERIVED ()) 0 0 () () 0 () () () 0 0)
121 1 pfleura2
40 'mopac_end' 'io_module' 'mopac_end' 1 ((VARIABLE UNKNOWN-INTENT
122 1 pfleura2
UNKNOWN-PROC UNKNOWN EXPLICIT-SAVE POINTER) (DERIVED 5 0 0 DERIVED ()) 0
123 1 pfleura2
0 () () 0 () () () 0 0)
124 1 pfleura2
41 'mopac_endgeom' 'io_module' 'mopac_endgeom' 1 ((VARIABLE
125 1 pfleura2
UNKNOWN-INTENT UNKNOWN-PROC UNKNOWN EXPLICIT-SAVE) (CHARACTER 1 0 0
126 1 pfleura2
CHARACTER ((CONSTANT (INTEGER 4 0 0 INTEGER ()) 0 '132'))) 0 0 () () 0 ()
127 1 pfleura2
() () 0 0)
128 1 pfleura2
42 'mopac_root' 'io_module' 'mopac_root' 1 ((VARIABLE UNKNOWN-INTENT
129 1 pfleura2
UNKNOWN-PROC UNKNOWN EXPLICIT-SAVE POINTER) (DERIVED 5 0 0 DERIVED ()) 0
130 1 pfleura2
0 () () 0 () () () 0 0)
131 1 pfleura2
43 'nbtypes' 'io_module' 'nbtypes' 1 ((VARIABLE UNKNOWN-INTENT
132 1 pfleura2
UNKNOWN-PROC UNKNOWN EXPLICIT-SAVE) (INTEGER 4 0 0 INTEGER ()) 0 0 () ()
133 1 pfleura2
0 () () () 0 0)
134 1 pfleura2
44 'osuffix' 'io_module' 'osuffix' 1 ((VARIABLE UNKNOWN-INTENT
135 1 pfleura2
UNKNOWN-PROC UNKNOWN EXPLICIT-SAVE) (CHARACTER 1 0 0 CHARACTER ((
136 1 pfleura2
CONSTANT (INTEGER 4 0 0 INTEGER ()) 0 '132'))) 0 0 () () 0 () () () 0 0)
137 1 pfleura2
45 'pathname' 'io_module' 'pathname' 1 ((VARIABLE UNKNOWN-INTENT
138 1 pfleura2
UNKNOWN-PROC UNKNOWN EXPLICIT-SAVE) (CHARACTER 1 0 0 CHARACTER ((
139 1 pfleura2
CONSTANT (INTEGER 4 0 0 INTEGER ()) 0 '132'))) 0 0 () () 0 () () () 0 0)
140 1 pfleura2
46 'previous' 'io_module' 'previous' 1 ((VARIABLE UNKNOWN-INTENT
141 1 pfleura2
UNKNOWN-PROC UNKNOWN EXPLICIT-SAVE POINTER) (DERIVED 5 0 0 DERIVED ()) 0
142 1 pfleura2
0 () () 0 () () () 0 0)
143 1 pfleura2
47 'runmode' 'io_module' 'runmode' 1 ((VARIABLE UNKNOWN-INTENT
144 1 pfleura2
UNKNOWN-PROC UNKNOWN EXPLICIT-SAVE) (CHARACTER 1 0 0 CHARACTER ((
145 1 pfleura2
CONSTANT (INTEGER 4 0 0 INTEGER ()) 0 '32'))) 0 0 () () 0 () () () 0 0)
146 1 pfleura2
48 'schars' 'vartypes' 'schars' 1 ((PARAMETER UNKNOWN-INTENT
147 1 pfleura2
UNKNOWN-PROC UNKNOWN IMPLICIT-SAVE) (INTEGER 4 0 0 INTEGER ()) 0 0 () (
148 1 pfleura2
CONSTANT (INTEGER 4 0 0 INTEGER ()) 0 '32') () 0 () () () 0 0)
149 1 pfleura2
49 'vartypes' 'vartypes' 'vartypes' 1 ((MODULE UNKNOWN-INTENT
150 1 pfleura2
UNKNOWN-PROC UNKNOWN UNKNOWN) (UNKNOWN 0 0 0 UNKNOWN ()) 0 0 () () 0 ()
151 1 pfleura2
() () 0 0)
152 1 pfleura2
50 'vasp_comment' 'io_module' 'vasp_comment' 1 ((VARIABLE UNKNOWN-INTENT
153 1 pfleura2
UNKNOWN-PROC UNKNOWN EXPLICIT-SAVE) (CHARACTER 1 0 0 CHARACTER ((
154 1 pfleura2
CONSTANT (INTEGER 4 0 0 INTEGER ()) 0 '132'))) 0 0 () () 0 () () () 0 0)
155 1 pfleura2
51 'vasp_direct' 'io_module' 'vasp_direct' 1 ((VARIABLE UNKNOWN-INTENT
156 1 pfleura2
UNKNOWN-PROC UNKNOWN EXPLICIT-SAVE) (CHARACTER 1 0 0 CHARACTER ((
157 1 pfleura2
CONSTANT (INTEGER 4 0 0 INTEGER ()) 0 '132'))) 0 0 () () 0 () () () 0 0)
158 1 pfleura2
52 'vasp_param' 'io_module' 'vasp_param' 1 ((VARIABLE UNKNOWN-INTENT
159 1 pfleura2
UNKNOWN-PROC UNKNOWN EXPLICIT-SAVE) (REAL 8 0 0 REAL ()) 0 0 () () 0 ()
160 1 pfleura2
() () 0 0)
161 1 pfleura2
53 'vasp_title' 'io_module' 'vasp_title' 1 ((VARIABLE UNKNOWN-INTENT
162 1 pfleura2
UNKNOWN-PROC UNKNOWN EXPLICIT-SAVE) (CHARACTER 1 0 0 CHARACTER ((
163 1 pfleura2
CONSTANT (INTEGER 4 0 0 INTEGER ()) 0 '132'))) 0 0 () () 0 () () () 0 0)
164 1 pfleura2
54 'vasp_types' 'io_module' 'vasp_types' 1 ((VARIABLE UNKNOWN-INTENT
165 1 pfleura2
UNKNOWN-PROC UNKNOWN EXPLICIT-SAVE) (CHARACTER 1 0 0 CHARACTER ((
166 1 pfleura2
CONSTANT (INTEGER 4 0 0 INTEGER ()) 0 '132'))) 0 0 () () 0 () () () 0 0)
167 1 pfleura2
55 'vlchars' 'vartypes' 'vlchars' 1 ((PARAMETER UNKNOWN-INTENT
168 1 pfleura2
UNKNOWN-PROC UNKNOWN IMPLICIT-SAVE) (INTEGER 4 0 0 INTEGER ()) 0 0 () (
169 1 pfleura2
CONSTANT (INTEGER 4 0 0 INTEGER ()) 0 '256') () 0 () () () 0 0)
170 1 pfleura2
56 'writevasp' 'io_module' 'writevasp' 1 ((VARIABLE UNKNOWN-INTENT
171 1 pfleura2
UNKNOWN-PROC UNKNOWN EXPLICIT-SAVE) (LOGICAL 4 0 0 LOGICAL ()) 0 0 () ()
172 1 pfleura2
0 () () () 0 0)
173 1 pfleura2
)
174 1 pfleura2
175 1 pfleura2
('attypes' 0 2 'calcname' 0 3 'curcom' 0 4 'current' 0 6 'debugfile' 0 7
176 1 pfleura2
'ev2au' 0 8 'fff' 0 9 'gauss_charge' 0 10 'gauss_comment' 0 11 'gauss_end'
177 1 pfleura2
0 12 'gauss_paste' 0 13 'gauss_root' 0 14 'input_line' 0 5 'io_module' 0
178 1 pfleura2
17 'iocart' 0 18 'ioin' 0 19 'ioout' 0 20 'iotmp' 0 21 'iotmp2' 0 22
179 1 pfleura2
'iotmp3' 0 23 'isuffix' 0 24 'kind' 0 25 'kint' 0 26 'kreal' 0 27 'lchars'
180 1 pfleura2
0 28 'listcoord' 0 29 'maxtype' 0 38 'mopac_comment' 0 39 'mopac_end' 0
181 1 pfleura2
40 'mopac_endgeom' 0 41 'mopac_root' 0 42 'nbtypes' 0 43 'osuffix' 0 44
182 1 pfleura2
'pathname' 0 45 'previous' 0 46 'runmode' 0 47 'schars' 0 48 'vartypes'
183 1 pfleura2
0 49 'vasp_comment' 0 50 'vasp_direct' 0 51 'vasp_param' 0 52 'vasp_title'
184 1 pfleura2
0 53 'vasp_types' 0 54 'vlchars' 0 55 'writevasp' 0 56)