Attachment 58768 Details for Bug 135573

gauss_int_gen.mod

gauss_int_gen.mod (text/plain), 6.53 KB, created by Jürgen Wieferink on 2005-11-25 16:41:38 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: Jürgen Wieferink

Created: 2005-11-25 16:41:38 UTC

Size: 6.53 KB

patch

obsolete

>GFORTRAN module created from GAUSS_INT_GEN.f90 on Fri Nov 25 17:02:22 2005
>If you edit this, you'll get what you deserve.
>
>(() () () () () () ()
>() () () () () () () () () () () () ())
>
>()
>
>()
>
>()
>
>(2 'gen_potential_rx' 'gauss_int_gen' 1 ((PROCEDURE UNKNOWN-INTENT
>MODULE-PROC DECL SUBROUTINE) (UNKNOWN 0 ()) 3 0 (4 5 6 7 8 9 10) () 0 ()
>())
>10 'v' 'gauss_int_gen' 3 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DIMENSION
>DUMMY) (COMPLEX 8 ()) 0 0 () (3 EXPLICIT (OP (INTEGER 4 ()) 0 UMINUS (
>VARIABLE (INTEGER 4 ()) 0 9 ((COMPONENT 11 12 'md') (ARRAY (ELEMENT 1 (
>CONSTANT (INTEGER 4 ()) 0 '3') 1))))) (VARIABLE (INTEGER 4 ()) 0 9 ((
>COMPONENT 11 12 'md') (ARRAY (ELEMENT 1 (CONSTANT (INTEGER 4 ()) 0 '3')
>1)))) (OP (INTEGER 4 ()) 0 UMINUS (VARIABLE (INTEGER 4 ()) 0 9 ((
>COMPONENT 11 12 'md') (ARRAY (ELEMENT 1 (CONSTANT (INTEGER 4 ()) 0 '2')
>1))))) (VARIABLE (INTEGER 4 ()) 0 9 ((COMPONENT 11 12 'md') (ARRAY (
>ELEMENT 1 (CONSTANT (INTEGER 4 ()) 0 '2') 1)))) (OP (INTEGER 4 ()) 0
>UMINUS (VARIABLE (INTEGER 4 ()) 0 9 ((COMPONENT 11 12 'md') (ARRAY (
>ELEMENT 1 (CONSTANT (INTEGER 4 ()) 0 '1') 1))))) (VARIABLE (INTEGER 4 ())
>0 9 ((COMPONENT 11 12 'md') (ARRAY (ELEMENT 1 (CONSTANT (INTEGER 4 ()) 0
>'1') 1))))) 0 () ())
>9 'fp_para' 'gauss_int_gen' 3 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY)
>(DERIVED 11 ()) 0 0 () () 0 () ())
>7 'rvec_sp' 'gauss_int_gen' 3 ((VARIABLE IN UNKNOWN-PROC UNKNOWN
>DIMENSION DUMMY) (REAL 8 ()) 0 0 () (1 EXPLICIT (CONSTANT (INTEGER 4 ())
>0 '1') (CONSTANT (INTEGER 4 ()) 0 '3')) 0 () ())
>8 'gthres' 'gauss_int_gen' 3 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (
>REAL 8 ()) 0 0 () () 0 () ())
>5 'sh_ia' 'gauss_int_gen' 3 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DUMMY) (
>DERIVED 13 ()) 0 0 () () 0 () ())
>13 't_shell_ia' 'gauss_orb' 1 ((DERIVED UNKNOWN-INTENT UNKNOWN-PROC
>UNKNOWN) (UNKNOWN 0 ()) 0 0 () () 0 ((14 'gamma_1' (REAL 8 ()) () 0 0 ())
>(15 'gamma_2' (REAL 8 ()) () 0 0 ()) (16 'n_orb_1' (INTEGER 4 ()) () 0 0
>()) (17 'n_orb_2' (INTEGER 4 ()) () 0 0 ()) (18 'orbs_1' (LOGICAL 4 ())
>(1 EXPLICIT (CONSTANT (INTEGER 4 ()) 0 '1') (CONSTANT (INTEGER 4 ()) 0 '4'))
>1 0 ()) (19 'orbs_2' (LOGICAL 4 ()) (1 EXPLICIT (CONSTANT (INTEGER 4 ())
>0 '1') (CONSTANT (INTEGER 4 ()) 0 '4')) 1 0 ()) (20 'diffs_1' (LOGICAL 4
>()) (1 EXPLICIT (CONSTANT (INTEGER 4 ()) 0 '1') (CONSTANT (INTEGER 4 ())
>0 '5')) 1 0 ()) (21 'diffs_2' (LOGICAL 4 ()) (1 EXPLICIT (CONSTANT (
>INTEGER 4 ()) 0 '1') (CONSTANT (INTEGER 4 ()) 0 '5')) 1 0 ()) (22
>'n_ol_pow' (INTEGER 4 ()) () 0 0 ()) (23 'n_pow_1' (INTEGER 4 ()) () 0 0
>()) (24 'n_pow_2' (INTEGER 4 ()) () 0 0 ()) (25 'n_poly' (INTEGER 4 ())
>() 0 0 ()) (26 'n_poly_1' (INTEGER 4 ()) () 0 0 ()) (27 'n_poly_2' (
>INTEGER 4 ()) () 0 0 ()) (28 'sss_coeff' (REAL 8 ()) () 0 0 ()) (29
>'gamma_r' (REAL 8 ()) () 0 0 ()) (30 'gamma_x' (REAL 8 ()) () 0 0 ()) (
>31 'gamma_g' (REAL 8 ()) () 0 0 ()) (32 'xi' (REAL 8 ()) () 0 0 ()) (33
>'delta_1' (REAL 8 ()) () 0 0 ()) (34 'delta_2' (REAL 8 ()) () 0 0 ()) (
>35 'pt_deltas' (REAL 8 ()) (3 EXPLICIT (CONSTANT (INTEGER 4 ()) 0 '0') (
>CONSTANT (INTEGER 4 ()) 0 '3') (CONSTANT (INTEGER 4 ()) 0 '0') (
>CONSTANT (INTEGER 4 ()) 0 '3') (CONSTANT (INTEGER 4 ()) 0 '0') (
>CONSTANT (INTEGER 4 ()) 0 '5')) 1 0 ()) (36 'm1_s' (REAL 8 ()) () 0 0 ())
>(37 'm1_p' (REAL 8 ()) () 0 0 ()) (38 'm1_d1' (REAL 8 ()) () 0 0 ()) (
>39 'm1_d2x_to_da' (REAL 8 ()) () 0 0 ()) (40 'm1_d2y_to_da' (REAL 8 ())
>() 0 0 ()) (41 'm1_d2z_to_da' (REAL 8 ()) () 0 0 ()) (42 'm1_d2x_to_db'
>(REAL 8 ()) () 0 0 ()) (43 'm1_d2y_to_db' (REAL 8 ()) () 0 0 ()) (44
>'m1_d2x_to_ss' (REAL 8 ()) () 0 0 ()) (45 'm1_d2y_to_ss' (REAL 8 ()) ()
>0 0 ()) (46 'm1_d2z_to_ss' (REAL 8 ()) () 0 0 ()) (47 'm1_s_to_ss' (
>REAL 8 ()) () 0 0 ()) (48 'm2_s' (REAL 8 ()) () 0 0 ()) (49 'm2_p' (
>REAL 8 ()) () 0 0 ()) (50 'm2_d1' (REAL 8 ()) () 0 0 ()) (51
>'m2_d2x_to_da' (REAL 8 ()) () 0 0 ()) (52 'm2_d2y_to_da' (REAL 8 ()) ()
>0 0 ()) (53 'm2_d2z_to_da' (REAL 8 ()) () 0 0 ()) (54 'm2_d2x_to_db' (
>REAL 8 ()) () 0 0 ()) (55 'm2_d2y_to_db' (REAL 8 ()) () 0 0 ()) (56
>'m2_d2x_to_ss' (REAL 8 ()) () 0 0 ()) (57 'm2_d2y_to_ss' (REAL 8 ()) ()
>0 0 ()) (58 'm2_d2z_to_ss' (REAL 8 ()) () 0 0 ()) (59 'm2_s_to_ss' (
>REAL 8 ()) () 0 0 ()) (60 'm' (REAL 8 ()) (3 EXPLICIT (CONSTANT (
>INTEGER 4 ()) 0 '0') (CONSTANT (INTEGER 4 ()) 0 '3') (CONSTANT (INTEGER
>4 ()) 0 '0') (CONSTANT (INTEGER 4 ()) 0 '3') (CONSTANT (INTEGER 4 ()) 0
>'0') (CONSTANT (INTEGER 4 ()) 0 '5')) 1 0 ())) PUBLIC ())
>4 'u' 'gauss_int_gen' 3 ((VARIABLE OUT UNKNOWN-PROC UNKNOWN DIMENSION
>DUMMY) (REAL 8 ()) 0 0 () (2 EXPLICIT (CONSTANT (INTEGER 4 ()) 0 '1') (
>CONSTANT (INTEGER 4 ()) 0 '20') (CONSTANT (INTEGER 4 ()) 0 '1') (
>CONSTANT (INTEGER 4 ()) 0 '20')) 0 () ())
>6 'rvec' 'gauss_int_gen' 3 ((VARIABLE IN UNKNOWN-PROC UNKNOWN DIMENSION
>DUMMY) (REAL 8 ()) 0 0 () (1 EXPLICIT (CONSTANT (INTEGER 4 ()) 0 '1') (
>CONSTANT (INTEGER 4 ()) 0 '3')) 0 () ())
>11 't_fp_para' 'four_pot' 1 ((DERIVED UNKNOWN-INTENT UNKNOWN-PROC
>UNKNOWN) (UNKNOWN 0 ()) 0 0 () () 0 ((61 'rec' (REAL 8 ()) (2 EXPLICIT (
>CONSTANT (INTEGER 4 ()) 0 '1') (CONSTANT (INTEGER 4 ()) 0 '3') (
>CONSTANT (INTEGER 4 ()) 0 '1') (CONSTANT (INTEGER 4 ()) 0 '3')) 1 0 ())
>(62 'v_ec' (REAL 8 ()) () 0 0 ()) (12 'md' (INTEGER 4 ()) (1 EXPLICIT (
>CONSTANT (INTEGER 4 ()) 0 '1') (CONSTANT (INTEGER 4 ()) 0 '3')) 1 0 ())
>(63 'max_md' (INTEGER 4 ()) () 0 0 ()) (64 'symmetry' (LOGICAL 4 ()) (1
>EXPLICIT (CONSTANT (INTEGER 4 ()) 0 '1') (CONSTANT (INTEGER 4 ()) 0 '15'))
>1 0 ()) (65 'max_gsquare' (REAL 8 ()) () 0 0 ()) (66 'min_gcut' (REAL 8
>()) () 0 0 ()) (67 'big_rec_neigh' (DERIVED 68 ()) () 0 0 ()) (69
>'orth_len' (REAL 8 ()) (1 EXPLICIT (CONSTANT (INTEGER 4 ()) 0 '1') (
>CONSTANT (INTEGER 4 ()) 0 '3')) 1 0 ()) (70 'z' (INTEGER 4 ()) (2
>EXPLICIT (CONSTANT (INTEGER 4 ()) 0 '1') (CONSTANT (INTEGER 4 ()) 0 '3')
>(CONSTANT (INTEGER 4 ()) 0 '1') (CONSTANT (INTEGER 4 ()) 0 '3')) 1 0 ())
>(71 'detz' (INTEGER 4 ()) () 0 0 ()) (72 'dinvz' (INTEGER 4 ()) (2
>EXPLICIT (CONSTANT (INTEGER 4 ()) 0 '1') (CONSTANT (INTEGER 4 ()) 0 '3')
>(CONSTANT (INTEGER 4 ()) 0 '1') (CONSTANT (INTEGER 4 ()) 0 '3')) 1 0 ())
>(73 'omd' (INTEGER 4 ()) (1 EXPLICIT (CONSTANT (INTEGER 4 ()) 0 '1') (
>CONSTANT (INTEGER 4 ()) 0 '3')) 1 0 ()) (74 'max_omd' (INTEGER 4 ()) ()
>0 0 ()) (75 'o_step' (INTEGER 4 ()) (1 EXPLICIT (CONSTANT (INTEGER 4 ())
>0 '1') (CONSTANT (INTEGER 4 ()) 0 '3')) 1 0 ()) (76 'o_off' (INTEGER 4 ())
>(3 DEFERRED () () () () () ()) 1 1 ())) PUBLIC ())
>68 't_neigh' 'neighbours' 1 ((DERIVED UNKNOWN-INTENT UNKNOWN-PROC
>UNKNOWN) (UNKNOWN 0 ()) 0 0 () () 0 ((77 'n_vec' (INTEGER 4 ()) () 0 0 ())
>(78 'has_sym' (LOGICAL 4 ()) () 0 0 ()) (79 'vec' (REAL 8 ()) (2
>DEFERRED () () () ()) 1 1 ()) (80 'red' (REAL 8 ()) (2 DEFERRED () () ()
>()) 1 1 ())) PUBLIC ())
>)
>
>('gen_potential_rx' 0 2)

Actions: View

Attachments on bug 135573: 58768