GFORTRAN module version '9' created from m_chars.F90
MD5:3274b055c86df6c67d622c7dc02904ad -- If you edit this, you'll get what you deserve.

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

(('lower' '' 2) ('upper' '' 3))

(('uppercase' 'm_chars' 3) ('lowercase' 'm_chars' 2))

()

()

()

(3 'upper_case' 'm_chars' '' 1 ((PROCEDURE UNKNOWN-INTENT MODULE-PROC
DECL UNKNOWN 0 0 FUNCTION IMPLICIT_PURE) (CHARACTER 1 0 0 0 CHARACTER (
(FUNCTION (INTEGER 4 0 0 0 INTEGER ()) 0 4 (('' (VARIABLE (CHARACTER 1 0
0 0 CHARACTER (())) 0 5 ())) ('' ())) '__len_1_i4' 0 'len'))) 6 0 (5) ()
7 () () () 0 0)
2 'lower_case' 'm_chars' '' 1 ((PROCEDURE UNKNOWN-INTENT MODULE-PROC
DECL UNKNOWN 0 0 FUNCTION IMPLICIT_PURE) (CHARACTER 1 0 0 0 CHARACTER (
(FUNCTION (INTEGER 4 0 0 0 INTEGER ()) 0 8 (('' (VARIABLE (CHARACTER 1 0
0 0 CHARACTER (())) 0 9 ())) ('' ())) '__len_1_i4' 0 'len'))) 10 0 (9) ()
11 () () () 0 0)
5 'str' '' '' 6 ((VARIABLE IN UNKNOWN-PROC UNKNOWN UNKNOWN 0 0 DUMMY) (
CHARACTER 1 0 0 0 CHARACTER (())) 0 0 () () 0 () () () 0 0)
7 'ustr' '' '' 6 ((VARIABLE UNKNOWN-INTENT UNKNOWN-PROC UNKNOWN UNKNOWN
0 0 RESULT) (CHARACTER 1 0 0 0 CHARACTER ((FUNCTION (INTEGER 4 0 0 0
INTEGER ()) 0 4 (('' (VARIABLE (CHARACTER 1 0 0 0 CHARACTER (())) 0 5 ()))
('' ())) '__len_1_i4' 0 'len'))) 0 0 () () 0 () () () 0 0)
4 'len' '(intrinsic)' '' 6 ((PROCEDURE UNKNOWN-INTENT UNKNOWN-PROC
UNKNOWN UNKNOWN 0 0 FUNCTION) (UNKNOWN 0 0 0 0 UNKNOWN ()) 0 0 () () 4 ()
() () 0 0)
11 'lstr' '' '' 10 ((VARIABLE UNKNOWN-INTENT UNKNOWN-PROC UNKNOWN
UNKNOWN 0 0 RESULT) (CHARACTER 1 0 0 0 CHARACTER ((FUNCTION (INTEGER 4 0
0 0 INTEGER ()) 0 8 (('' (VARIABLE (CHARACTER 1 0 0 0 CHARACTER (())) 0
9 ())) ('' ())) '__len_1_i4' 0 'len'))) 0 0 () () 0 () () () 0 0)
9 'str' '' '' 10 ((VARIABLE IN UNKNOWN-PROC UNKNOWN UNKNOWN 0 0 DUMMY) (
CHARACTER 1 0 0 0 CHARACTER (())) 0 0 () () 0 () () () 0 0)
8 'len' '(intrinsic)' '' 10 ((PROCEDURE UNKNOWN-INTENT UNKNOWN-PROC
UNKNOWN UNKNOWN 0 0 FUNCTION) (UNKNOWN 0 0 0 0 UNKNOWN ()) 0 0 () () 8 ()
() () 0 0)
)

()