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

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

()

((2 2) (3 3))

()

()

(4 'summation' 'summation' 1 ((MODULE UNKNOWN UNKNOWN UNKNOWN) (UNKNOWN
0 ()) 0 0 () () () ())
3 'sumx' '(global)' 1 ((PROCEDURE UNKNOWN UNKNOWN BODY FUNCTION GENERIC)
(REAL 8 ()) 5 0 (6 NONE) () () ())
2 'sumxz' '(global)' 1 ((PROCEDURE UNKNOWN UNKNOWN BODY FUNCTION GENERIC)
(REAL 8 ()) 7 0 (8 NONE) () () ())
6 'var' '' 5 ((VARIABLE IN UNKNOWN UNKNOWN DUMMY DIMENSION) (REAL 8 ())
0 0 () (1 EXPLICIT (VARIABLE (INTEGER 4 ()) 0 9 ()) (VARIABLE (INTEGER 4
()) 0 10 ())) () ())
10 'dimxmax' 'gridset' 5 ((VARIABLE UNKNOWN UNKNOWN UNKNOWN) (INTEGER 4
()) 0 0 () () () ())
9 'dimxmin' 'gridset' 5 ((VARIABLE UNKNOWN UNKNOWN UNKNOWN) (INTEGER 4 ())
0 0 () () () ())
8 'var' '' 7 ((VARIABLE IN UNKNOWN UNKNOWN DUMMY DIMENSION) (REAL 8 ())
0 0 () (2 EXPLICIT (VARIABLE (INTEGER 4 ()) 0 11 ()) (VARIABLE (INTEGER
4 ()) 0 12 ()) (VARIABLE (INTEGER 4 ()) 0 13 ()) (VARIABLE (INTEGER 4 ())
0 14 ())) () ())
14 'dimzmax' 'gridset' 7 ((VARIABLE UNKNOWN UNKNOWN UNKNOWN) (INTEGER 4
()) 0 0 () () () ())
12 'dimxmax' 'gridset' 7 ((VARIABLE UNKNOWN UNKNOWN UNKNOWN) (INTEGER 4
()) 0 0 () () () ())
13 'dimzmin' 'gridset' 7 ((VARIABLE UNKNOWN UNKNOWN UNKNOWN) (INTEGER 4
()) 0 0 () () () ())
11 'dimxmin' 'gridset' 7 ((VARIABLE UNKNOWN UNKNOWN UNKNOWN) (INTEGER 4
()) 0 0 () () () ())
)

('sumxz' 0 2 'sumx' 0 3 'summation' 0 4)