-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathmod_greet.mod
33 lines (25 loc) · 1.08 KB
/
mod_greet.mod
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
GFORTRAN module version '10' created from mod_greet.f90
MD5:a4417cf8a773a8bb56d4aadea0b077d6 -- If you edit this, you'll get what you deserve.
(() () () () () () () () () () () () () () () () () () () () () () () ()
() () ())
()
()
()
()
()
(2 'greet' 'mod_greet' '' 1 ((PROCEDURE UNKNOWN-INTENT MODULE-PROC DECL
UNKNOWN 0 0 FUNCTION IMPLICIT_PURE) (CHARACTER 1 0 0 0 CHARACTER ((OP (
INTEGER 4 0 0 0 INTEGER ()) 0 PLUS (FUNCTION (INTEGER 4 0 0 0 INTEGER ())
0 3 (('' (VARIABLE (CHARACTER 1 0 0 0 CHARACTER (())) 0 4 ())) ('' ()))
'__len_trim1' 0 'lnblnk') (CONSTANT (INTEGER 4 0 0 0 INTEGER ()) 0 '7'))))
5 0 (4) () 2 () () () 0 0)
6 'mod_greet' 'mod_greet' '' 1 ((MODULE UNKNOWN-INTENT UNKNOWN-PROC
UNKNOWN UNKNOWN 0 0) (UNKNOWN 0 0 0 0 UNKNOWN ()) 0 0 () () 0 () () () 0
0)
3 'len_trim' '(intrinsic)' '' 5 ((PROCEDURE UNKNOWN-INTENT UNKNOWN-PROC
UNKNOWN UNKNOWN 0 0 FUNCTION) (UNKNOWN 0 0 0 0 UNKNOWN ()) 0 0 () () 3 ()
() () 0 0)
4 'cname' '' '' 5 ((VARIABLE IN UNKNOWN-PROC UNKNOWN UNKNOWN 0 0 DUMMY)
(CHARACTER 1 0 0 0 CHARACTER (())) 0 0 () () 0 () () () 0 0)
)
('greet' 0 2 'mod_greet' 0 6)