G95 module created from lapack_linear.f90 on Fri Dec 30 19:12:25 2005
If you edit this, you'll get what you deserve.

(() () () () () () () () () () () () () () () () ()
() () ())

()

()

()

()

(2 'lapack_dgtsv' 'lapack_linear' 1 ((PROCEDURE UNKNOWN MODULE-PROC DECL
SUBROUTINE) (PROCEDURE 0 ()) 0 0 (3 NONE 4 NONE 5 NONE 6 NONE) () () ())
7 'lapack_dgttrf' 'lapack_linear' 1 ((PROCEDURE UNKNOWN MODULE-PROC DECL
SUBROUTINE) (PROCEDURE 0 ()) 0 0 (8 NONE 9 NONE 10 NONE 11 NONE 12 NONE)
() () ())
13 'lapack_dgttrs' 'lapack_linear' 1 ((PROCEDURE UNKNOWN MODULE-PROC
DECL SUBROUTINE) (PROCEDURE 0 ()) 0 0 (14 NONE 15 NONE 16 NONE 17 NONE
18 NONE 19 NONE) () () ())
20 'lapack_dgtsv_init' 'lapack_linear' 1 ((PROCEDURE UNKNOWN MODULE-PROC
DECL SUBROUTINE) (PROCEDURE 0 ()) 0 0 (21 NONE) () () ())
21 'm' '' 22 ((VARIABLE IN UNKNOWN UNKNOWN DUMMY) (INTEGER 4 ()) 0 0 ()
() () ())
4 'b' '' 23 ((VARIABLE INOUT UNKNOWN UNKNOWN DUMMY DIMENSION) (REAL 8 ())
0 0 () (1 EXPLICIT (CONSTANT (INTEGER 4 ()) 0 '1') (OP (INTEGER 4 ()) 0
MINUS (VARIABLE (INTEGER 4 ()) 0 24 ()) (CONSTANT (INTEGER 4 ()) 0 '1')))
() ())
24 'n' 'lapack_linear' 1 ((VARIABLE UNKNOWN UNKNOWN UNKNOWN) (INTEGER 4
()) 0 0 () () () ())
6 'd' '' 23 ((VARIABLE INOUT UNKNOWN UNKNOWN DUMMY DIMENSION) (REAL 8 ())
0 0 () (2 EXPLICIT (CONSTANT (INTEGER 4 ()) 0 '1') (CONSTANT (INTEGER 4
()) 0 '1') (CONSTANT (INTEGER 4 ()) 0 '1') (VARIABLE (INTEGER 4 ()) 0 24
())) () ())
5 'c' '' 23 ((VARIABLE INOUT UNKNOWN UNKNOWN DUMMY DIMENSION) (REAL 8 ())
0 0 () (1 EXPLICIT (CONSTANT (INTEGER 4 ()) 0 '1') (OP (INTEGER 4 ()) 0
MINUS (VARIABLE (INTEGER 4 ()) 0 24 ()) (CONSTANT (INTEGER 4 ()) 0 '1')))
() ())
10 'c' '' 25 ((VARIABLE INOUT UNKNOWN UNKNOWN DUMMY DIMENSION) (REAL 8 ())
0 0 () (1 EXPLICIT (CONSTANT (INTEGER 4 ()) 0 '1') (OP (INTEGER 4 ()) 0
MINUS (VARIABLE (INTEGER 4 ()) 0 24 ()) (CONSTANT (INTEGER 4 ()) 0 '1')))
() ())
9 'b' '' 25 ((VARIABLE INOUT UNKNOWN UNKNOWN DUMMY DIMENSION) (REAL 8 ())
0 0 () (1 EXPLICIT (CONSTANT (INTEGER 4 ()) 0 '1') (OP (INTEGER 4 ()) 0
MINUS (VARIABLE (INTEGER 4 ()) 0 24 ()) (CONSTANT (INTEGER 4 ()) 0 '1')))
() ())
8 'a' '' 25 ((VARIABLE INOUT UNKNOWN UNKNOWN DUMMY DIMENSION) (REAL 8 ())
0 0 () (1 EXPLICIT (CONSTANT (INTEGER 4 ()) 0 '1') (VARIABLE (INTEGER 4
()) 0 24 ())) () ())
16 'c' '' 26 ((VARIABLE INOUT UNKNOWN UNKNOWN DUMMY DIMENSION) (REAL 8 ())
0 0 () (1 EXPLICIT (CONSTANT (INTEGER 4 ()) 0 '1') (OP (INTEGER 4 ()) 0
MINUS (VARIABLE (INTEGER 4 ()) 0 24 ()) (CONSTANT (INTEGER 4 ()) 0 '1')))
() ())
15 'b' '' 26 ((VARIABLE INOUT UNKNOWN UNKNOWN DUMMY DIMENSION) (REAL 8 ())
0 0 () (1 EXPLICIT (CONSTANT (INTEGER 4 ()) 0 '1') (OP (INTEGER 4 ()) 0
MINUS (VARIABLE (INTEGER 4 ()) 0 24 ()) (CONSTANT (INTEGER 4 ()) 0 '1')))
() ())
14 'a' '' 26 ((VARIABLE INOUT UNKNOWN UNKNOWN DUMMY DIMENSION) (REAL 8 ())
0 0 () (1 EXPLICIT (CONSTANT (INTEGER 4 ()) 0 '1') (VARIABLE (INTEGER 4
()) 0 24 ())) () ())
12 'ipiv' '' 25 ((VARIABLE OUT UNKNOWN UNKNOWN DUMMY DIMENSION) (REAL 8
()) 0 0 () (1 EXPLICIT (CONSTANT (INTEGER 4 ()) 0 '1') (VARIABLE (
INTEGER 4 ()) 0 24 ())) () ())
11 'b2' '' 25 ((VARIABLE OUT UNKNOWN UNKNOWN DUMMY DIMENSION) (REAL 8 ())
0 0 () (1 EXPLICIT (CONSTANT (INTEGER 4 ()) 0 '1') (OP (INTEGER 4 ()) 0
MINUS (VARIABLE (INTEGER 4 ()) 0 24 ()) (CONSTANT (INTEGER 4 ()) 0 '2')))
() ())
19 'ipiv' '' 26 ((VARIABLE IN UNKNOWN UNKNOWN DUMMY DIMENSION) (REAL 8 ())
0 0 () (1 EXPLICIT (CONSTANT (INTEGER 4 ()) 0 '1') (VARIABLE (INTEGER 4
()) 0 24 ())) () ())
18 'b2' '' 26 ((VARIABLE INOUT UNKNOWN UNKNOWN DUMMY DIMENSION) (REAL 8
()) 0 0 () (1 EXPLICIT (CONSTANT (INTEGER 4 ()) 0 '1') (OP (INTEGER 4 ())
0 MINUS (VARIABLE (INTEGER 4 ()) 0 24 ()) (CONSTANT (INTEGER 4 ()) 0 '2')))
() ())
17 'd' '' 26 ((VARIABLE INOUT UNKNOWN UNKNOWN DUMMY DIMENSION) (REAL 8 ())
0 0 () (2 EXPLICIT (CONSTANT (INTEGER 4 ()) 0 '1') (CONSTANT (INTEGER 4
()) 0 '1') (CONSTANT (INTEGER 4 ()) 0 '1') (VARIABLE (INTEGER 4 ()) 0 24
())) () ())
3 'a' '' 23 ((VARIABLE INOUT UNKNOWN UNKNOWN DUMMY DIMENSION) (REAL 8 ())
0 0 () (1 EXPLICIT (CONSTANT (INTEGER 4 ()) 0 '1') (VARIABLE (INTEGER 4
()) 0 24 ())) () ())
)

('lapack_dgtsv_init' 0 20 'lapack_dgtsv' 0 2 'lapack_dgttrs' 0 13
'lapack_dgttrf' 0 7)