GFORTRAN module version '10' created from phcom.f90
MD5:dc916259b98e8e1f4aba2cdd7e46dd59 -- If you edit this, you'll get what you deserve.

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

()

()

()

()

()

(2 'dp' 'kinds' '' 1 ((PARAMETER UNKNOWN-INTENT UNKNOWN-PROC UNKNOWN
IMPLICIT-SAVE 0 0) (INTEGER 4 0 0 0 INTEGER ()) 0 0 () (CONSTANT (
INTEGER 4 0 0 0 INTEGER ()) 0 '8') () 0 () () () 0 0)
3 'modes' 'modes' '' 1 ((MODULE UNKNOWN-INTENT UNKNOWN-PROC UNKNOWN
UNKNOWN 0 0) (UNKNOWN 0 0 0 0 UNKNOWN ()) 0 0 () () 0 () () () 0 0)
4 'name_rap_mode' 'modes' '' 1 ((VARIABLE UNKNOWN-INTENT UNKNOWN-PROC
UNKNOWN EXPLICIT-SAVE 0 0 ALLOCATABLE DIMENSION) (CHARACTER 1 0 0 0
CHARACTER ((CONSTANT (INTEGER 4 0 0 0 INTEGER ()) 0 '15'))) 0 0 () (1 0
DEFERRED () ()) 0 () () () 0 0)
5 'nirr' 'modes' '' 1 ((VARIABLE UNKNOWN-INTENT UNKNOWN-PROC UNKNOWN
EXPLICIT-SAVE 0 0) (INTEGER 4 0 0 0 INTEGER ()) 0 0 () () 0 () () () 0 0)
6 'nmodes' 'modes' '' 1 ((VARIABLE UNKNOWN-INTENT UNKNOWN-PROC UNKNOWN
EXPLICIT-SAVE 0 0) (INTEGER 4 0 0 0 INTEGER ()) 0 0 () () 0 () () () 0 0)
7 'npert' 'modes' '' 1 ((VARIABLE UNKNOWN-INTENT UNKNOWN-PROC UNKNOWN
EXPLICIT-SAVE 0 0 ALLOCATABLE DIMENSION TARGET) (INTEGER 4 0 0 0 INTEGER
()) 0 0 () (1 0 DEFERRED () ()) 0 () () () 0 0)
8 'npertx' 'modes' '' 1 ((VARIABLE UNKNOWN-INTENT UNKNOWN-PROC UNKNOWN
EXPLICIT-SAVE 0 0) (INTEGER 4 0 0 0 INTEGER ()) 0 0 () () 0 () () () 0 0)
9 'num_rap_mode' 'modes' '' 1 ((VARIABLE UNKNOWN-INTENT UNKNOWN-PROC
UNKNOWN EXPLICIT-SAVE 0 0 ALLOCATABLE DIMENSION) (INTEGER 4 0 0 0
INTEGER ()) 0 0 () (1 0 DEFERRED () ()) 0 () () () 0 0)
10 't' 'modes' '' 1 ((VARIABLE UNKNOWN-INTENT UNKNOWN-PROC UNKNOWN
EXPLICIT-SAVE 0 0 DIMENSION POINTER) (COMPLEX 8 0 0 0 COMPLEX ()) 0 0 ()
(4 0 DEFERRED () () () () () () () ()) 0 () () () 0 0)
11 'tmq' 'modes' '' 1 ((VARIABLE UNKNOWN-INTENT UNKNOWN-PROC UNKNOWN
EXPLICIT-SAVE 0 0 DIMENSION POINTER) (COMPLEX 8 0 0 0 COMPLEX ()) 0 0 ()
(3 0 DEFERRED () () () () () ()) 0 () () () 0 0)
12 'u' 'modes' '' 1 ((VARIABLE UNKNOWN-INTENT UNKNOWN-PROC UNKNOWN
EXPLICIT-SAVE 0 0 DIMENSION POINTER) (COMPLEX 8 0 0 0 COMPLEX ()) 0 0 ()
(2 0 DEFERRED () () () ()) 0 () () () 0 0)
)

('dp' 0 2 'modes' 0 3 'name_rap_mode' 0 4 'nirr' 0 5 'nmodes' 0 6 'npert'
0 7 'npertx' 0 8 'num_rap_mode' 0 9 't' 0 10 'tmq' 0 11 'u' 0 12)