 PROGRAM GWW: Version 0.3
 Number of intervals:           79
 Number of intervals for fit:         120
 Maximum imaginary time:    10.0000000000000     
 Print whole Sigma:  F
 Maximum state considered:          20
 Prefix:benzene
 Rows together in FFT:          50
 Uses contraction
 Accurate treatment of conduction states
 Uses reduced set for remainder
 Uses contractions on single states
 Uses no fft grid for time/space integrations
 Time grid :           2
 Frequency grid :           2
 Max frequency :   20.0000000000000     
 Consider states from:           1  to           20
 Maximum number of iterations in minpack:        10000
 Number of cycles over minpack:            1
 Uses LDA Hartree : T
 Uses LDA Exchange : T
 Uses SYMMETRIZED DIELECTRIC MATRIX
 Treatment of W divergence:           0
 Offset fit :           2
 Read vcprim terms from file
 Calculates the polarization directly from the overlaps
 Number of excluded conduction states           0
 min         -79           0           1          40
 max         -40           0          40          40
 min pola           0
 max pola          19
 min state           1
 max state           5
 min state range           1
 max state range           5
 ATT1
 ATT2
 starting_point <=1
 Routine go_exchange main1
 Routine go_exchange main2
 routine do_contraction_state_index allocate dimension         115         115
          20
 DO CONT INDEX 1
 Routine go_exchange main3
 ENE H (10.8474664688110,0.000000000000000E+000)
 (10.0972175598145,0.000000000000000E+000)
 (10.0961341857910,0.000000000000000E+000)
 (9.33705997467041,0.000000000000000E+000)
 (9.33006000518799,0.000000000000000E+000)
 (8.75080299377441,0.000000000000000E+000)
 (7.64307451248169,0.000000000000000E+000)
 (10.4880380630493,0.000000000000000E+000)
 (9.00598049163818,0.000000000000000E+000)
 (8.99735355377197,0.000000000000000E+000)
 (9.27032947540283,0.000000000000000E+000)
 (8.95681762695312,0.000000000000000E+000)
 (8.95338726043701,0.000000000000000E+000)
 (9.08302879333496,0.000000000000000E+000)
 (9.08179950714111,0.000000000000000E+000)
 (8.34864997863770,0.000000000000000E+000)
 (8.38973999023438,0.000000000000000E+000)
 (1.00560092926025,0.000000000000000E+000)
 (0.811966419219971,0.000000000000000E+000)
 (0.606516838073730,0.000000000000000E+000)
 starting_point <=2
 GO POLARIZATION
 Routine create_polarization_file
 STATE           1
 STATE           2
 STATE           3
 STATE           4
 STATE           5
 STATE           6
 STATE           7
 STATE           8
 STATE           9
 STATE          10
 STATE          11
 STATE          12
 STATE          13
 STATE          14
 STATE          15
 STATE           1
 STATE           2
 STATE           3
 STATE           4
 STATE           5
 STATE           6
 STATE           7
 STATE           8
 STATE           9
 STATE          10
 STATE          11
 STATE          12
 STATE          13
 STATE          14
 STATE          15
 STATE           1
 STATE           2
 STATE           3
 STATE           4
 STATE           5
 STATE           6
 STATE           7
 STATE           8
 STATE           9
 STATE          10
 STATE          11
 STATE          12
 STATE          13
 STATE          14
 STATE          15
 STATE           1
 STATE           2
 STATE           3
 STATE           4
 STATE           5
 STATE           6
 STATE           7
 STATE           8
 STATE           9
 STATE          10
 STATE          11
 STATE          12
 STATE          13
 STATE          14
 STATE          15
 STATE           1
 STATE           2
 STATE           3
 STATE           4
 STATE           5
 STATE           6
 STATE           7
 STATE           8
 STATE           9
 STATE          10
 STATE          11
 STATE          12
 STATE          13
 STATE          14
 STATE          15
 STATE           1
 STATE           2
 STATE           3
 STATE           4
 STATE           5
 STATE           6
 STATE           7
 STATE           8
 STATE           9
 STATE          10
 STATE          11
 STATE          12
 STATE          13
 STATE          14
 STATE          15
 STATE           1
 STATE           2
 STATE           3
 STATE           4
 STATE           5
 STATE           6
 STATE           7
 STATE           8
 STATE           9
 STATE          10
 STATE          11
 STATE          12
 STATE          13
 STATE          14
 STATE          15
 STATE           1
 STATE           2
 STATE           3
 STATE           4
 STATE           5
 STATE           6
 STATE           7
 STATE           8
 STATE           9
 STATE          10
 STATE          11
 STATE          12
 STATE          13
 STATE          14
 STATE          15
 STATE           1
 STATE           2
 STATE           3
 STATE           4
 STATE           5
 STATE           6
 STATE           7
 STATE           8
 STATE           9
 STATE          10
 STATE          11
 STATE          12
 STATE          13
 STATE          14
 STATE          15
 STATE           1
 STATE           2
 STATE           3
 STATE           4
 STATE           5
 STATE           6
 STATE           7
 STATE           8
 STATE           9
 STATE          10
 STATE          11
 STATE          12
 STATE          13
 STATE          14
 STATE          15
 STATE           1
 STATE           2
 STATE           3
 STATE           4
 STATE           5
 STATE           6
 STATE           7
 STATE           8
 STATE           9
 STATE          10
 STATE          11
 STATE          12
 STATE          13
 STATE          14
 STATE          15
 STATE           1
 STATE           2
 STATE           3
 STATE           4
 STATE           5
 STATE           6
 STATE           7
 STATE           8
 STATE           9
 STATE          10
 STATE          11
 STATE          12
 STATE          13
 STATE          14
 STATE          15
 STATE           1
 STATE           2
 STATE           3
 STATE           4
 STATE           5
 STATE           6
 STATE           7
 STATE           8
 STATE           9
 STATE          10
 STATE          11
 STATE          12
 STATE          13
 STATE          14
 STATE          15
 STATE           1
 STATE           2
 STATE           3
 STATE           4
 STATE           5
 STATE           6
 STATE           7
 STATE           8
 STATE           9
 STATE          10
 STATE          11
 STATE          12
 STATE          13
 STATE          14
 STATE          15
 STATE           1
 STATE           2
 STATE           3
 STATE           4
 STATE           5
 STATE           6
 STATE           7
 STATE           8
 STATE           9
 STATE          10
 STATE          11
 STATE          12
 STATE          13
 STATE          14
 STATE          15
 STATE           1
 STATE           2
 STATE           3
 STATE           4
 STATE           5
 STATE           6
 STATE           7
 STATE           8
 STATE           9
 STATE          10
 STATE          11
 STATE          12
 STATE          13
 STATE          14
 STATE          15
 STATE           1
 STATE           2
 STATE           3
 STATE           4
 STATE           5
 STATE           6
 STATE           7
 STATE           8
 STATE           9
 STATE          10
 STATE          11
 STATE          12
 STATE          13
 STATE          14
 STATE          15
 STATE           1
 STATE           2
 STATE           3
 STATE           4
 STATE           5
 STATE           6
 STATE           7
 STATE           8
 STATE           9
 STATE          10
 STATE          11
 STATE          12
 STATE          13
 STATE          14
 STATE          15
 STATE           1
 STATE           2
 STATE           3
 STATE           4
 STATE           5
 STATE           6
 STATE           7
 STATE           8
 STATE           9
 STATE          10
 STATE          11
 STATE          12
 STATE          13
 STATE          14
 STATE          15
 STATE           1
 STATE           2
 STATE           3
 STATE           4
 STATE           5
 STATE           6
 STATE           7
 STATE           8
 STATE           9
 STATE          10
 STATE          11
 STATE          12
 STATE          13
 STATE          14
 STATE          15
 starting_point <=3
 Call FFT
 Routine go_fft_para2
 Prima read_polaw_range
 Dopo read_polaw_range
 Prima (0.000000000000000E+000,-1.00000000000000)
 number_fft=           4
 VALUE TF F
 Transform
 Save
 VALUE TF F
 VALUE TF F
 Transform
 Save
 VALUE TF F
 VALUE TF F
 Transform
 Save
 VALUE TF F
 VALUE TF F
 Transform
 Save
 VALUE TF F
 starting_point <=4
 Call go_dressed_w
 ATTEZNIONE1
 SUBROUTINE read_data_pw_v
 After reading the .vpot_ files: vp%numpw=         159
 After the first mp_bcast
 After reading the potential matrix
 After the seconf mp_bcast
 END SUBROUTINE read_data_pw_v
 ATTEZNIONE2
 ATTEZNIONE2.5
 ATTEZNIONE3
 ATTEZNIONE4
           0
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 call calculate_w
 call calculate_w2
 Dimension   10176.0000000000     
 INV EPSI G=0,G=0  0.000000000000000E+000
 calculated w
           1
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 call calculate_w
 call calculate_w2
 Dimension   10176.0000000000     
 INV EPSI G=0,G=0  0.000000000000000E+000
 calculated w
           2
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 call calculate_w
 call calculate_w2
 Dimension   10176.0000000000     
 INV EPSI G=0,G=0  0.000000000000000E+000
 calculated w
           3
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 call calculate_w
 call calculate_w2
 Dimension   10176.0000000000     
 INV EPSI G=0,G=0  0.000000000000000E+000
 calculated w
           4
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 call calculate_w
 call calculate_w2
 Dimension   10176.0000000000     
 INV EPSI G=0,G=0  0.000000000000000E+000
 calculated w
           5
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 call calculate_w
 call calculate_w2
 Dimension   10176.0000000000     
 INV EPSI G=0,G=0  0.000000000000000E+000
 calculated w
           6
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 call calculate_w
 call calculate_w2
 Dimension   10176.0000000000     
 INV EPSI G=0,G=0  0.000000000000000E+000
 calculated w
           7
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 call calculate_w
 call calculate_w2
 Dimension   10176.0000000000     
 INV EPSI G=0,G=0  0.000000000000000E+000
 calculated w
           8
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 call calculate_w
 call calculate_w2
 Dimension   10176.0000000000     
 INV EPSI G=0,G=0  0.000000000000000E+000
 calculated w
           9
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 call calculate_w
 call calculate_w2
 Dimension   10176.0000000000     
 INV EPSI G=0,G=0  0.000000000000000E+000
 calculated w
          10
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 call calculate_w
 call calculate_w2
 Dimension   10176.0000000000     
 INV EPSI G=0,G=0  0.000000000000000E+000
 calculated w
          11
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 call calculate_w
 call calculate_w2
 Dimension   10176.0000000000     
 INV EPSI G=0,G=0  0.000000000000000E+000
 calculated w
          12
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 call calculate_w
 call calculate_w2
 Dimension   10176.0000000000     
 INV EPSI G=0,G=0  0.000000000000000E+000
 calculated w
          13
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 call calculate_w
 call calculate_w2
 Dimension   10176.0000000000     
 INV EPSI G=0,G=0  0.000000000000000E+000
 calculated w
          14
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 call calculate_w
 call calculate_w2
 Dimension   10176.0000000000     
 INV EPSI G=0,G=0  0.000000000000000E+000
 calculated w
          15
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 call calculate_w
 call calculate_w2
 Dimension   10176.0000000000     
 INV EPSI G=0,G=0  0.000000000000000E+000
 calculated w
          16
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 call calculate_w
 call calculate_w2
 Dimension   10176.0000000000     
 INV EPSI G=0,G=0  0.000000000000000E+000
 calculated w
          17
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 call calculate_w
 call calculate_w2
 Dimension   10176.0000000000     
 INV EPSI G=0,G=0  0.000000000000000E+000
 calculated w
          18
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 call calculate_w
 call calculate_w2
 Dimension   10176.0000000000     
 INV EPSI G=0,G=0  0.000000000000000E+000
 calculated w
          19
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 call calculate_w
 call calculate_w2
 Dimension   10176.0000000000     
 INV EPSI G=0,G=0  0.000000000000000E+000
 calculated w
 starting_point <=5
 Call FFT
 Routine go_fft_para2
 Prima read_polaw_range
 Dopo read_polaw_range
 Prima (1.00000000000000,0.000000000000000E+000)
 number_fft=           4
 VALUE TF F
 Transform
 Save
 VALUE TF F
 VALUE TF F
 Transform
 Save
 VALUE TF F
 VALUE TF F
 Transform
 Save
 VALUE TF F
 VALUE TF F
 Transform
 Save
 VALUE TF F
 ENE_HF2  -1.96203456698001     
 starting_point <=6
 check if the file prefix.self_energie_negative_time exist
 exist= F
 Do not exist => start first with the negative times and then do the positive ti
 mes
 selfenergy_on_split_time_file_1
 SUBROUTINE read_data_pw_v
 After reading the .vpot_ files: vp%numpw=         159
 After the first mp_bcast
 After reading the potential matrix
 After the seconf mp_bcast
 END SUBROUTINE read_data_pw_v
 SUBROUTINE invert_v_pot; before vpi%vmat(:,:)=vp%vmat(:,:)
 After vpi%vmat(:,:)=vp%vmat(:,:)
 selfenergy_on_split_time_file_2
 selfenergy_on_split_time_file_3 with op%numpw=           0
 selfenergy_on_split_time_file_5 with nbegin=         -79  and l_blk=
          20
 Negative imaginary time with it=         -79
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 CHECK 1
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -79 ,           1 ) = 
 (0.000000000000000E+000,5.090579545425975E-006)
 Conduction contribution         -79           1
 (0.000000000000000E+000,5.090579545425975E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -79 ,           2 ) = 
 (0.000000000000000E+000,7.200819216510514E-006)
 Conduction contribution         -79           2
 (0.000000000000000E+000,7.200819216510514E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -79 ,           3 ) = 
 (0.000000000000000E+000,7.209955010407038E-006)
 Conduction contribution         -79           3
 (0.000000000000000E+000,7.209955010407038E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -79 ,           4 ) = 
 (0.000000000000000E+000,8.050975648185090E-006)
 Conduction contribution         -79           4
 (0.000000000000000E+000,8.050975648185090E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -79 ,           5 ) = 
 (0.000000000000000E+000,7.993643726021985E-006)
 Conduction contribution         -79           5
 (0.000000000000000E+000,7.993643726021985E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -79 ,           6 ) = 
 (0.000000000000000E+000,4.205438624328137E-006)
 Conduction contribution         -79           6
 (0.000000000000000E+000,4.205438624328137E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -79 ,           7 ) = 
 (0.000000000000000E+000,6.375217327532165E-006)
 Conduction contribution         -79           7
 (0.000000000000000E+000,6.375217327532165E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -79 ,           8 ) = 
 (0.000000000000000E+000,2.043969600409355E-006)
 Conduction contribution         -79           8
 (0.000000000000000E+000,2.043969600409355E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -79 ,           9 ) = 
 (0.000000000000000E+000,2.761496161735500E-006)
 Conduction contribution         -79           9
 (0.000000000000000E+000,2.761496161735500E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -79 ,          10 ) = 
 (0.000000000000000E+000,2.745571512212024E-006)
 Conduction contribution         -79          10
 (0.000000000000000E+000,2.745571512212024E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -79 ,          11 ) = 
 (0.000000000000000E+000,2.983847575953466E-005)
 Conduction contribution         -79          11
 (0.000000000000000E+000,2.983847575953466E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -79 ,          12 ) = 
 (0.000000000000000E+000,2.218495905191309E-006)
 Conduction contribution         -79          12
 (0.000000000000000E+000,2.218495905191309E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -79 ,          13 ) = 
 (0.000000000000000E+000,2.023192083028947E-006)
 Conduction contribution         -79          13
 (0.000000000000000E+000,2.023192083028947E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -79 ,          14 ) = 
 (0.000000000000000E+000,4.318219617600387E-005)
 Conduction contribution         -79          14
 (0.000000000000000E+000,4.318219617600387E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -79 ,          15 ) = 
 (0.000000000000000E+000,4.320817636362881E-005)
 Conduction contribution         -79          15
 (0.000000000000000E+000,4.320817636362881E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -79 ,          16 ) = 
 (0.000000000000000E+000,4.115710507473206E-005)
 Conduction contribution         -79          16
 (0.000000000000000E+000,4.115710507473206E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -79 ,          17 ) = 
 (0.000000000000000E+000,4.175200316242672E-005)
 Conduction contribution         -79          17
 (0.000000000000000E+000,4.175200316242672E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -79 ,          18 ) = 
 (0.000000000000000E+000,7.575712482070682E-006)
 Conduction contribution         -79          18
 (0.000000000000000E+000,7.575712482070682E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -79 ,          19 ) = 
 (0.000000000000000E+000,5.574539254516063E-006)
 Conduction contribution         -79          19
 (0.000000000000000E+000,5.574539254516063E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -79 ,          20 ) = 
 (0.000000000000000E+000,2.976786962579224E-006)
 Conduction contribution         -79          20
 (0.000000000000000E+000,2.976786962579224E-006)
 Negative imaginary time with it=         -78
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 CHECK 1
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -78 ,           1 ) = 
 (0.000000000000000E+000,5.049019250490444E-006)
 Conduction contribution         -78           1
 (0.000000000000000E+000,5.049019250490444E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -78 ,           2 ) = 
 (0.000000000000000E+000,6.973661185765603E-006)
 Conduction contribution         -78           2
 (0.000000000000000E+000,6.973661185765603E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -78 ,           3 ) = 
 (0.000000000000000E+000,6.990603897956184E-006)
 Conduction contribution         -78           3
 (0.000000000000000E+000,6.990603897956184E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -78 ,           4 ) = 
 (0.000000000000000E+000,7.944352270975559E-006)
 Conduction contribution         -78           4
 (0.000000000000000E+000,7.944352270975559E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -78 ,           5 ) = 
 (0.000000000000000E+000,7.877479693584329E-006)
 Conduction contribution         -78           5
 (0.000000000000000E+000,7.877479693584329E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -78 ,           6 ) = 
 (0.000000000000000E+000,4.002793623423468E-006)
 Conduction contribution         -78           6
 (0.000000000000000E+000,4.002793623423468E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -78 ,           7 ) = 
 (0.000000000000000E+000,6.129822681326763E-006)
 Conduction contribution         -78           7
 (0.000000000000000E+000,6.129822681326763E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -78 ,           8 ) = 
 (0.000000000000000E+000,1.959748733409403E-006)
 Conduction contribution         -78           8
 (0.000000000000000E+000,1.959748733409403E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -78 ,           9 ) = 
 (0.000000000000000E+000,2.716311217399693E-006)
 Conduction contribution         -78           9
 (0.000000000000000E+000,2.716311217399693E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -78 ,          10 ) = 
 (0.000000000000000E+000,2.706615053693529E-006)
 Conduction contribution         -78          10
 (0.000000000000000E+000,2.706615053693529E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -78 ,          11 ) = 
 (0.000000000000000E+000,2.856558694041500E-005)
 Conduction contribution         -78          11
 (0.000000000000000E+000,2.856558694041500E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -78 ,          12 ) = 
 (0.000000000000000E+000,2.142396460044189E-006)
 Conduction contribution         -78          12
 (0.000000000000000E+000,2.142396460044189E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -78 ,          13 ) = 
 (0.000000000000000E+000,1.955240023683556E-006)
 Conduction contribution         -78          13
 (0.000000000000000E+000,1.955240023683556E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -78 ,          14 ) = 
 (0.000000000000000E+000,2.778775897582064E-005)
 Conduction contribution         -78          14
 (0.000000000000000E+000,2.778775897582064E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -78 ,          15 ) = 
 (0.000000000000000E+000,2.781551351110129E-005)
 Conduction contribution         -78          15
 (0.000000000000000E+000,2.781551351110129E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -78 ,          16 ) = 
 (0.000000000000000E+000,3.992213502106820E-005)
 Conduction contribution         -78          16
 (0.000000000000000E+000,3.992213502106820E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -78 ,          17 ) = 
 (0.000000000000000E+000,4.051276938528726E-005)
 Conduction contribution         -78          17
 (0.000000000000000E+000,4.051276938528726E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -78 ,          18 ) = 
 (0.000000000000000E+000,6.354315879891063E-006)
 Conduction contribution         -78          18
 (0.000000000000000E+000,6.354315879891063E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -78 ,          19 ) = 
 (0.000000000000000E+000,5.122912832770197E-006)
 Conduction contribution         -78          19
 (0.000000000000000E+000,5.122912832770197E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -78 ,          20 ) = 
 (0.000000000000000E+000,2.683126437567076E-006)
 Conduction contribution         -78          20
 (0.000000000000000E+000,2.683126437567076E-006)
 Negative imaginary time with it=         -77
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 CHECK 1
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -77 ,           1 ) = 
 (0.000000000000000E+000,4.970908997072169E-006)
 Conduction contribution         -77           1
 (0.000000000000000E+000,4.970908997072169E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -77 ,           2 ) = 
 (0.000000000000000E+000,6.574332833625201E-006)
 Conduction contribution         -77           2
 (0.000000000000000E+000,6.574332833625201E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -77 ,           3 ) = 
 (0.000000000000000E+000,6.605041032638068E-006)
 Conduction contribution         -77           3
 (0.000000000000000E+000,6.605041032638068E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -77 ,           4 ) = 
 (0.000000000000000E+000,7.760772061367869E-006)
 Conduction contribution         -77           4
 (0.000000000000000E+000,7.760772061367869E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -77 ,           5 ) = 
 (0.000000000000000E+000,7.677404121094605E-006)
 Conduction contribution         -77           5
 (0.000000000000000E+000,7.677404121094605E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -77 ,           6 ) = 
 (0.000000000000000E+000,3.648950896764398E-006)
 Conduction contribution         -77           6
 (0.000000000000000E+000,3.648950896764398E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -77 ,           7 ) = 
 (0.000000000000000E+000,5.701405010700740E-006)
 Conduction contribution         -77           7
 (0.000000000000000E+000,5.701405010700740E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -77 ,           8 ) = 
 (0.000000000000000E+000,1.812266343406721E-006)
 Conduction contribution         -77           8
 (0.000000000000000E+000,1.812266343406721E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -77 ,           9 ) = 
 (0.000000000000000E+000,2.637695362611267E-006)
 Conduction contribution         -77           9
 (0.000000000000000E+000,2.637695362611267E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -77 ,          10 ) = 
 (0.000000000000000E+000,2.639015866930300E-006)
 Conduction contribution         -77          10
 (0.000000000000000E+000,2.639015866930300E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -77 ,          11 ) = 
 (0.000000000000000E+000,2.636476088341674E-005)
 Conduction contribution         -77          11
 (0.000000000000000E+000,2.636476088341674E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -77 ,          12 ) = 
 (0.000000000000000E+000,2.008973495632583E-006)
 Conduction contribution         -77          12
 (0.000000000000000E+000,2.008973495632583E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -77 ,          13 ) = 
 (0.000000000000000E+000,1.836041056141152E-006)
 Conduction contribution         -77          13
 (0.000000000000000E+000,1.836041056141152E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -77 ,          14 ) = 
 (0.000000000000000E+000,9.090706169719838E-007)
 Conduction contribution         -77          14
 (0.000000000000000E+000,9.090706169719838E-007)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -77 ,          15 ) = 
 (0.000000000000000E+000,9.381075987107771E-007)
 Conduction contribution         -77          15
 (0.000000000000000E+000,9.381075987107771E-007)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -77 ,          16 ) = 
 (0.000000000000000E+000,3.779682798583342E-005)
 Conduction contribution         -77          16
 (0.000000000000000E+000,3.779682798583342E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -77 ,          17 ) = 
 (0.000000000000000E+000,3.838076031710465E-005)
 Conduction contribution         -77          17
 (0.000000000000000E+000,3.838076031710465E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -77 ,          18 ) = 
 (0.000000000000000E+000,4.218239776078744E-006)
 Conduction contribution         -77          18
 (0.000000000000000E+000,4.218239776078744E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -77 ,          19 ) = 
 (0.000000000000000E+000,4.333536278226925E-006)
 Conduction contribution         -77          19
 (0.000000000000000E+000,4.333536278226925E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -77 ,          20 ) = 
 (0.000000000000000E+000,2.168799385662808E-006)
 Conduction contribution         -77          20
 (0.000000000000000E+000,2.168799385662808E-006)
 Negative imaginary time with it=         -76
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 CHECK 1
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -76 ,           1 ) = 
 (0.000000000000000E+000,4.859011075583324E-006)
 Conduction contribution         -76           1
 (0.000000000000000E+000,4.859011075583324E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -76 ,           2 ) = 
 (0.000000000000000E+000,6.056630025817999E-006)
 Conduction contribution         -76           2
 (0.000000000000000E+000,6.056630025817999E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -76 ,           3 ) = 
 (0.000000000000000E+000,6.105361709484940E-006)
 Conduction contribution         -76           3
 (0.000000000000000E+000,6.105361709484940E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -76 ,           4 ) = 
 (0.000000000000000E+000,7.533840815718975E-006)
 Conduction contribution         -76           4
 (0.000000000000000E+000,7.533840815718975E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -76 ,           5 ) = 
 (0.000000000000000E+000,7.429595490859550E-006)
 Conduction contribution         -76           5
 (0.000000000000000E+000,7.429595490859550E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -76 ,           6 ) = 
 (0.000000000000000E+000,3.195779012263149E-006)
 Conduction contribution         -76           6
 (0.000000000000000E+000,3.195779012263149E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -76 ,           7 ) = 
 (0.000000000000000E+000,5.152908076002237E-006)
 Conduction contribution         -76           7
 (0.000000000000000E+000,5.152908076002237E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -76 ,           8 ) = 
 (0.000000000000000E+000,1.622087785261482E-006)
 Conduction contribution         -76           8
 (0.000000000000000E+000,1.622087785261482E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -76 ,           9 ) = 
 (0.000000000000000E+000,2.538596296568906E-006)
 Conduction contribution         -76           9
 (0.000000000000000E+000,2.538596296568906E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -76 ,          10 ) = 
 (0.000000000000000E+000,2.554391039397632E-006)
 Conduction contribution         -76          10
 (0.000000000000000E+000,2.554391039397632E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -76 ,          11 ) = 
 (0.000000000000000E+000,2.359269926980765E-005)
 Conduction contribution         -76          11
 (0.000000000000000E+000,2.359269926980765E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -76 ,          12 ) = 
 (0.000000000000000E+000,1.836670247633758E-006)
 Conduction contribution         -76          12
 (0.000000000000000E+000,1.836670247633758E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -76 ,          13 ) = 
 (0.000000000000000E+000,1.681986275329563E-006)
 Conduction contribution         -76          13
 (0.000000000000000E+000,1.681986275329563E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -76 ,          14 ) = 
 (0.000000000000000E+000,-3.370678742141532E-005)
 Conduction contribution         -76          14
 (0.000000000000000E+000,-3.370678742141532E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -76 ,          15 ) = 
 (0.000000000000000E+000,-3.368044822547449E-005)
 Conduction contribution         -76          15
 (0.000000000000000E+000,-3.368044822547449E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -76 ,          16 ) = 
 (0.000000000000000E+000,3.514745158017003E-005)
 Conduction contribution         -76          16
 (0.000000000000000E+000,3.514745158017003E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -76 ,          17 ) = 
 (0.000000000000000E+000,3.572467361362317E-005)
 Conduction contribution         -76          17
 (0.000000000000000E+000,3.572467361362317E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -76 ,          18 ) = 
 (0.000000000000000E+000,1.460842387994488E-006)
 Conduction contribution         -76          18
 (0.000000000000000E+000,1.460842387994488E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -76 ,          19 ) = 
 (0.000000000000000E+000,3.316991794834085E-006)
 Conduction contribution         -76          19
 (0.000000000000000E+000,3.316991794834085E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -76 ,          20 ) = 
 (0.000000000000000E+000,1.504064862211279E-006)
 Conduction contribution         -76          20
 (0.000000000000000E+000,1.504064862211279E-006)
 Negative imaginary time with it=         -75
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 CHECK 1
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -75 ,           1 ) = 
 (0.000000000000000E+000,4.737193029554884E-006)
 Conduction contribution         -75           1
 (0.000000000000000E+000,4.737193029554884E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -75 ,           2 ) = 
 (0.000000000000000E+000,5.566575351741836E-006)
 Conduction contribution         -75           2
 (0.000000000000000E+000,5.566575351741836E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -75 ,           3 ) = 
 (0.000000000000000E+000,5.632884745128454E-006)
 Conduction contribution         -75           3
 (0.000000000000000E+000,5.632884745128454E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -75 ,           4 ) = 
 (0.000000000000000E+000,7.344155556960420E-006)
 Conduction contribution         -75           4
 (0.000000000000000E+000,7.344155556960420E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -75 ,           5 ) = 
 (0.000000000000000E+000,7.220702743731265E-006)
 Conduction contribution         -75           5
 (0.000000000000000E+000,7.220702743731265E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -75 ,           6 ) = 
 (0.000000000000000E+000,2.776584002698037E-006)
 Conduction contribution         -75           6
 (0.000000000000000E+000,2.776584002698037E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -75 ,           7 ) = 
 (0.000000000000000E+000,4.645919646109120E-006)
 Conduction contribution         -75           7
 (0.000000000000000E+000,4.645919646109120E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -75 ,           8 ) = 
 (0.000000000000000E+000,1.442972423668939E-006)
 Conduction contribution         -75           8
 (0.000000000000000E+000,1.442972423668939E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -75 ,           9 ) = 
 (0.000000000000000E+000,2.452206975533616E-006)
 Conduction contribution         -75           9
 (0.000000000000000E+000,2.452206975533616E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -75 ,          10 ) = 
 (0.000000000000000E+000,2.482132360613423E-006)
 Conduction contribution         -75          10
 (0.000000000000000E+000,2.482132360613423E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -75 ,          11 ) = 
 (0.000000000000000E+000,2.109832986846307E-005)
 Conduction contribution         -75          11
 (0.000000000000000E+000,2.109832986846307E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -75 ,          12 ) = 
 (0.000000000000000E+000,1.674252550532638E-006)
 Conduction contribution         -75          12
 (0.000000000000000E+000,1.674252550532638E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -75 ,          13 ) = 
 (0.000000000000000E+000,1.536601938008882E-006)
 Conduction contribution         -75          13
 (0.000000000000000E+000,1.536601938008882E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -75 ,          14 ) = 
 (0.000000000000000E+000,-6.657505177150288E-005)
 Conduction contribution         -75          14
 (0.000000000000000E+000,-6.657505177150288E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -75 ,          15 ) = 
 (0.000000000000000E+000,-6.655926582886167E-005)
 Conduction contribution         -75          15
 (0.000000000000000E+000,-6.655926582886167E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -75 ,          16 ) = 
 (0.000000000000000E+000,3.282408002935169E-005)
 Conduction contribution         -75          16
 (0.000000000000000E+000,3.282408002935169E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -75 ,          17 ) = 
 (0.000000000000000E+000,3.339878284913914E-005)
 Conduction contribution         -75          17
 (0.000000000000000E+000,3.339878284913914E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -75 ,          18 ) = 
 (0.000000000000000E+000,-1.165573983154848E-006)
 Conduction contribution         -75          18
 (0.000000000000000E+000,-1.165573983154848E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -75 ,          19 ) = 
 (0.000000000000000E+000,2.356317217452165E-006)
 Conduction contribution         -75          19
 (0.000000000000000E+000,2.356317217452165E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -75 ,          20 ) = 
 (0.000000000000000E+000,8.717795122802156E-007)
 Conduction contribution         -75          20
 (0.000000000000000E+000,8.717795122802156E-007)
 Negative imaginary time with it=         -74
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 CHECK 1
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -74 ,           1 ) = 
 (0.000000000000000E+000,4.665279845660459E-006)
 Conduction contribution         -74           1
 (0.000000000000000E+000,4.665279845660459E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -74 ,           2 ) = 
 (0.000000000000000E+000,5.349956701438488E-006)
 Conduction contribution         -74           2
 (0.000000000000000E+000,5.349956701438488E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -74 ,           3 ) = 
 (0.000000000000000E+000,5.425328624304887E-006)
 Conduction contribution         -74           3
 (0.000000000000000E+000,5.425328624304887E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -74 ,           4 ) = 
 (0.000000000000000E+000,7.313793363135906E-006)
 Conduction contribution         -74           4
 (0.000000000000000E+000,7.313793363135906E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -74 ,           5 ) = 
 (0.000000000000000E+000,7.181921998444135E-006)
 Conduction contribution         -74           5
 (0.000000000000000E+000,7.181921998444135E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -74 ,           6 ) = 
 (0.000000000000000E+000,2.606454297888742E-006)
 Conduction contribution         -74           6
 (0.000000000000000E+000,2.606454297888742E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -74 ,           7 ) = 
 (0.000000000000000E+000,4.440961465102190E-006)
 Conduction contribution         -74           7
 (0.000000000000000E+000,4.440961465102190E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -74 ,           8 ) = 
 (0.000000000000000E+000,1.362780674601526E-006)
 Conduction contribution         -74           8
 (0.000000000000000E+000,1.362780674601526E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -74 ,           9 ) = 
 (0.000000000000000E+000,2.431734059501096E-006)
 Conduction contribution         -74           9
 (0.000000000000000E+000,2.431734059501096E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -74 ,          10 ) = 
 (0.000000000000000E+000,2.468803548140035E-006)
 Conduction contribution         -74          10
 (0.000000000000000E+000,2.468803548140035E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -74 ,          11 ) = 
 (0.000000000000000E+000,2.016218289009866E-005)
 Conduction contribution         -74          11
 (0.000000000000000E+000,2.016218289009866E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -74 ,          12 ) = 
 (0.000000000000000E+000,1.602057180093347E-006)
 Conduction contribution         -74          12
 (0.000000000000000E+000,1.602057180093347E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -74 ,          13 ) = 
 (0.000000000000000E+000,1.471800874005591E-006)
 Conduction contribution         -74          13
 (0.000000000000000E+000,1.471800874005591E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -74 ,          14 ) = 
 (0.000000000000000E+000,-8.249056566249259E-005)
 Conduction contribution         -74          14
 (0.000000000000000E+000,-8.249056566249259E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -74 ,          15 ) = 
 (0.000000000000000E+000,-8.249298469356263E-005)
 Conduction contribution         -74          15
 (0.000000000000000E+000,-8.249298469356263E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -74 ,          16 ) = 
 (0.000000000000000E+000,3.207707068644513E-005)
 Conduction contribution         -74          16
 (0.000000000000000E+000,3.207707068644513E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -74 ,          17 ) = 
 (0.000000000000000E+000,3.265750871203937E-005)
 Conduction contribution         -74          17
 (0.000000000000000E+000,3.265750871203937E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -74 ,          18 ) = 
 (0.000000000000000E+000,-2.446463773444973E-006)
 Conduction contribution         -74          18
 (0.000000000000000E+000,-2.446463773444973E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -74 ,          19 ) = 
 (0.000000000000000E+000,1.906711388813258E-006)
 Conduction contribution         -74          19
 (0.000000000000000E+000,1.906711388813258E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -74 ,          20 ) = 
 (0.000000000000000E+000,5.698375497496012E-007)
 Conduction contribution         -74          20
 (0.000000000000000E+000,5.698375497496012E-007)
 Negative imaginary time with it=         -73
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 CHECK 1
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -73 ,           1 ) = 
 (0.000000000000000E+000,4.726015071372071E-006)
 Conduction contribution         -73           1
 (0.000000000000000E+000,4.726015071372071E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -73 ,           2 ) = 
 (0.000000000000000E+000,5.632411774922500E-006)
 Conduction contribution         -73           2
 (0.000000000000000E+000,5.632411774922500E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -73 ,           3 ) = 
 (0.000000000000000E+000,5.700644189846155E-006)
 Conduction contribution         -73           3
 (0.000000000000000E+000,5.700644189846155E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -73 ,           4 ) = 
 (0.000000000000000E+000,7.534040759665692E-006)
 Conduction contribution         -73           4
 (0.000000000000000E+000,7.534040759665692E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -73 ,           5 ) = 
 (0.000000000000000E+000,7.411480443363952E-006)
 Conduction contribution         -73           5
 (0.000000000000000E+000,7.411480443363952E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -73 ,           6 ) = 
 (0.000000000000000E+000,2.869163134112926E-006)
 Conduction contribution         -73           6
 (0.000000000000000E+000,2.869163134112926E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -73 ,           7 ) = 
 (0.000000000000000E+000,4.760417696647370E-006)
 Conduction contribution         -73           7
 (0.000000000000000E+000,4.760417696647370E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -73 ,           8 ) = 
 (0.000000000000000E+000,1.458305067215065E-006)
 Conduction contribution         -73           8
 (0.000000000000000E+000,1.458305067215065E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -73 ,           9 ) = 
 (0.000000000000000E+000,2.521690034294944E-006)
 Conduction contribution         -73           9
 (0.000000000000000E+000,2.521690034294944E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -73 ,          10 ) = 
 (0.000000000000000E+000,2.552448255601199E-006)
 Conduction contribution         -73          10
 (0.000000000000000E+000,2.552448255601199E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -73 ,          11 ) = 
 (0.000000000000000E+000,2.174351816609120E-005)
 Conduction contribution         -73          11
 (0.000000000000000E+000,2.174351816609120E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -73 ,          12 ) = 
 (0.000000000000000E+000,1.691144010176077E-006)
 Conduction contribution         -73          12
 (0.000000000000000E+000,1.691144010176077E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -73 ,          13 ) = 
 (0.000000000000000E+000,1.551463343093478E-006)
 Conduction contribution         -73          13
 (0.000000000000000E+000,1.551463343093478E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -73 ,          14 ) = 
 (0.000000000000000E+000,-6.846021903092293E-005)
 Conduction contribution         -73          14
 (0.000000000000000E+000,-6.846021903092293E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -73 ,          15 ) = 
 (0.000000000000000E+000,-6.847876876359841E-005)
 Conduction contribution         -73          15
 (0.000000000000000E+000,-6.847876876359841E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -73 ,          16 ) = 
 (0.000000000000000E+000,3.378773927244664E-005)
 Conduction contribution         -73          16
 (0.000000000000000E+000,3.378773927244664E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -73 ,          17 ) = 
 (0.000000000000000E+000,3.438145007567629E-005)
 Conduction contribution         -73          17
 (0.000000000000000E+000,3.438145007567629E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -73 ,          18 ) = 
 (0.000000000000000E+000,-1.336810671947077E-006)
 Conduction contribution         -73          18
 (0.000000000000000E+000,-1.336810671947077E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -73 ,          19 ) = 
 (0.000000000000000E+000,2.355657414541119E-006)
 Conduction contribution         -73          19
 (0.000000000000000E+000,2.355657414541119E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -73 ,          20 ) = 
 (0.000000000000000E+000,8.573936398572966E-007)
 Conduction contribution         -73          20
 (0.000000000000000E+000,8.573936398572966E-007)
 Negative imaginary time with it=         -72
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 CHECK 1
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -72 ,           1 ) = 
 (0.000000000000000E+000,4.949311269604003E-006)
 Conduction contribution         -72           1
 (0.000000000000000E+000,4.949311269604003E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -72 ,           2 ) = 
 (0.000000000000000E+000,6.358502639560265E-006)
 Conduction contribution         -72           2
 (0.000000000000000E+000,6.358502639560265E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -72 ,           3 ) = 
 (0.000000000000000E+000,6.404737239041332E-006)
 Conduction contribution         -72           3
 (0.000000000000000E+000,6.404737239041332E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -72 ,           4 ) = 
 (0.000000000000000E+000,7.942823804593916E-006)
 Conduction contribution         -72           4
 (0.000000000000000E+000,7.942823804593916E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -72 ,           5 ) = 
 (0.000000000000000E+000,7.843108789364882E-006)
 Conduction contribution         -72           5
 (0.000000000000000E+000,7.843108789364882E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -72 ,           6 ) = 
 (0.000000000000000E+000,3.494260741720359E-006)
 Conduction contribution         -72           6
 (0.000000000000000E+000,3.494260741720359E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -72 ,           7 ) = 
 (0.000000000000000E+000,5.518820095838917E-006)
 Conduction contribution         -72           7
 (0.000000000000000E+000,5.518820095838917E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -72 ,           8 ) = 
 (0.000000000000000E+000,1.703767375448777E-006)
 Conduction contribution         -72           8
 (0.000000000000000E+000,1.703767375448777E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -72 ,           9 ) = 
 (0.000000000000000E+000,2.702624531490524E-006)
 Conduction contribution         -72           9
 (0.000000000000000E+000,2.702624531490524E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -72 ,          10 ) = 
 (0.000000000000000E+000,2.714520635213228E-006)
 Conduction contribution         -72          10
 (0.000000000000000E+000,2.714520635213228E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -72 ,          11 ) = 
 (0.000000000000000E+000,2.521074253778349E-005)
 Conduction contribution         -72          11
 (0.000000000000000E+000,2.521074253778349E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -72 ,          12 ) = 
 (0.000000000000000E+000,1.919115117310499E-006)
 Conduction contribution         -72          12
 (0.000000000000000E+000,1.919115117310499E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -72 ,          13 ) = 
 (0.000000000000000E+000,1.755937159760792E-006)
 Conduction contribution         -72          13
 (0.000000000000000E+000,1.755937159760792E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -72 ,          14 ) = 
 (0.000000000000000E+000,-2.927215925457690E-005)
 Conduction contribution         -72          14
 (0.000000000000000E+000,-2.927215925457690E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -72 ,          15 ) = 
 (0.000000000000000E+000,-2.929001316906056E-005)
 Conduction contribution         -72          15
 (0.000000000000000E+000,-2.929001316906056E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -72 ,          16 ) = 
 (0.000000000000000E+000,3.724688578970533E-005)
 Conduction contribution         -72          16
 (0.000000000000000E+000,3.724688578970533E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -72 ,          17 ) = 
 (0.000000000000000E+000,3.785338804827423E-005)
 Conduction contribution         -72          17
 (0.000000000000000E+000,3.785338804827423E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -72 ,          18 ) = 
 (0.000000000000000E+000,1.788811339336737E-006)
 Conduction contribution         -72          18
 (0.000000000000000E+000,1.788811339336737E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -72 ,          19 ) = 
 (0.000000000000000E+000,3.554554149713965E-006)
 Conduction contribution         -72          19
 (0.000000000000000E+000,3.554554149713965E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -72 ,          20 ) = 
 (0.000000000000000E+000,1.645905228749101E-006)
 Conduction contribution         -72          20
 (0.000000000000000E+000,1.645905228749101E-006)
 Negative imaginary time with it=         -71
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 CHECK 1
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -71 ,           1 ) = 
 (0.000000000000000E+000,5.211844255520193E-006)
 Conduction contribution         -71           1
 (0.000000000000000E+000,5.211844255520193E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -71 ,           2 ) = 
 (0.000000000000000E+000,7.049154074267931E-006)
 Conduction contribution         -71           2
 (0.000000000000000E+000,7.049154074267931E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -71 ,           3 ) = 
 (0.000000000000000E+000,7.074373773680627E-006)
 Conduction contribution         -71           3
 (0.000000000000000E+000,7.074373773680627E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -71 ,           4 ) = 
 (0.000000000000000E+000,8.303662904731188E-006)
 Conduction contribution         -71           4
 (0.000000000000000E+000,8.303662904731188E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -71 ,           5 ) = 
 (0.000000000000000E+000,8.223035033066189E-006)
 Conduction contribution         -71           5
 (0.000000000000000E+000,8.223035033066189E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -71 ,           6 ) = 
 (0.000000000000000E+000,4.065055764181394E-006)
 Conduction contribution         -71           6
 (0.000000000000000E+000,4.065055764181394E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -71 ,           7 ) = 
 (0.000000000000000E+000,6.212078380447062E-006)
 Conduction contribution         -71           7
 (0.000000000000000E+000,6.212078380447062E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -71 ,           8 ) = 
 (0.000000000000000E+000,1.929575482880220E-006)
 Conduction contribution         -71           8
 (0.000000000000000E+000,1.929575482880220E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -71 ,           9 ) = 
 (0.000000000000000E+000,2.870888145692378E-006)
 Conduction contribution         -71           9
 (0.000000000000000E+000,2.870888145692378E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -71 ,          10 ) = 
 (0.000000000000000E+000,2.864428617699486E-006)
 Conduction contribution         -71          10
 (0.000000000000000E+000,2.864428617699486E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -71 ,          11 ) = 
 (0.000000000000000E+000,2.811317744558296E-005)
 Conduction contribution         -71          11
 (0.000000000000000E+000,2.811317744558296E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -71 ,          12 ) = 
 (0.000000000000000E+000,2.130340797492613E-006)
 Conduction contribution         -71          12
 (0.000000000000000E+000,2.130340797492613E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -71 ,          13 ) = 
 (0.000000000000000E+000,1.945814809873182E-006)
 Conduction contribution         -71          13
 (0.000000000000000E+000,1.945814809873182E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -71 ,          14 ) = 
 (0.000000000000000E+000,5.944598757896182E-006)
 Conduction contribution         -71          14
 (0.000000000000000E+000,5.944598757896182E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -71 ,          15 ) = 
 (0.000000000000000E+000,5.941005246420624E-006)
 Conduction contribution         -71          15
 (0.000000000000000E+000,5.941005246420624E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -71 ,          16 ) = 
 (0.000000000000000E+000,4.006812541844840E-005)
 Conduction contribution         -71          16
 (0.000000000000000E+000,4.006812541844840E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -71 ,          17 ) = 
 (0.000000000000000E+000,4.068009156086648E-005)
 Conduction contribution         -71          17
 (0.000000000000000E+000,4.068009156086648E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -71 ,          18 ) = 
 (0.000000000000000E+000,4.606356914824559E-006)
 Conduction contribution         -71          18
 (0.000000000000000E+000,4.606356914824559E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -71 ,          19 ) = 
 (0.000000000000000E+000,4.631211448889468E-006)
 Conduction contribution         -71          19
 (0.000000000000000E+000,4.631211448889468E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -71 ,          20 ) = 
 (0.000000000000000E+000,2.363684432735524E-006)
 Conduction contribution         -71          20
 (0.000000000000000E+000,2.363684432735524E-006)
 Negative imaginary time with it=         -70
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 CHECK 1
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -70 ,           1 ) = 
 (0.000000000000000E+000,5.299281013135495E-006)
 Conduction contribution         -70           1
 (0.000000000000000E+000,5.299281013135495E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -70 ,           2 ) = 
 (0.000000000000000E+000,7.210898790735757E-006)
 Conduction contribution         -70           2
 (0.000000000000000E+000,7.210898790735757E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -70 ,           3 ) = 
 (0.000000000000000E+000,7.233680142885438E-006)
 Conduction contribution         -70           3
 (0.000000000000000E+000,7.233680142885438E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -70 ,           4 ) = 
 (0.000000000000000E+000,8.445783536797432E-006)
 Conduction contribution         -70           4
 (0.000000000000000E+000,8.445783536797432E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -70 ,           5 ) = 
 (0.000000000000000E+000,8.366814985652296E-006)
 Conduction contribution         -70           5
 (0.000000000000000E+000,8.366814985652296E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -70 ,           6 ) = 
 (0.000000000000000E+000,4.197602014448747E-006)
 Conduction contribution         -70           6
 (0.000000000000000E+000,4.197602014448747E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -70 ,           7 ) = 
 (0.000000000000000E+000,6.376521986547098E-006)
 Conduction contribution         -70           7
 (0.000000000000000E+000,6.376521986547098E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -70 ,           8 ) = 
 (0.000000000000000E+000,1.974206431610124E-006)
 Conduction contribution         -70           8
 (0.000000000000000E+000,1.974206431610124E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -70 ,           9 ) = 
 (0.000000000000000E+000,2.936100620485747E-006)
 Conduction contribution         -70           9
 (0.000000000000000E+000,2.936100620485747E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -70 ,          10 ) = 
 (0.000000000000000E+000,2.926577517106947E-006)
 Conduction contribution         -70          10
 (0.000000000000000E+000,2.926577517106947E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -70 ,          11 ) = 
 (0.000000000000000E+000,2.862436699854047E-005)
 Conduction contribution         -70          11
 (0.000000000000000E+000,2.862436699854047E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -70 ,          12 ) = 
 (0.000000000000000E+000,2.174099925497435E-006)
 Conduction contribution         -70          12
 (0.000000000000000E+000,2.174099925497435E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -70 ,          13 ) = 
 (0.000000000000000E+000,1.985325891109504E-006)
 Conduction contribution         -70          13
 (0.000000000000000E+000,1.985325891109504E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -70 ,          14 ) = 
 (0.000000000000000E+000,9.806992522201446E-006)
 Conduction contribution         -70          14
 (0.000000000000000E+000,9.806992522201446E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -70 ,          15 ) = 
 (0.000000000000000E+000,9.797025209079683E-006)
 Conduction contribution         -70          15
 (0.000000000000000E+000,9.797025209079683E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -70 ,          16 ) = 
 (0.000000000000000E+000,4.067915858860064E-005)
 Conduction contribution         -70          16
 (0.000000000000000E+000,4.067915858860064E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -70 ,          17 ) = 
 (0.000000000000000E+000,4.129743913942362E-005)
 Conduction contribution         -70          17
 (0.000000000000000E+000,4.129743913942362E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -70 ,          18 ) = 
 (0.000000000000000E+000,4.939742100571341E-006)
 Conduction contribution         -70          18
 (0.000000000000000E+000,4.939742100571341E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -70 ,          19 ) = 
 (0.000000000000000E+000,4.788617632800872E-006)
 Conduction contribution         -70          19
 (0.000000000000000E+000,4.788617632800872E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -70 ,          20 ) = 
 (0.000000000000000E+000,2.471602480383822E-006)
 Conduction contribution         -70          20
 (0.000000000000000E+000,2.471602480383822E-006)
 Negative imaginary time with it=         -69
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 CHECK 1
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -69 ,           1 ) = 
 (0.000000000000000E+000,5.229287368666796E-006)
 Conduction contribution         -69           1
 (0.000000000000000E+000,5.229287368666796E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -69 ,           2 ) = 
 (0.000000000000000E+000,7.080380224167598E-006)
 Conduction contribution         -69           2
 (0.000000000000000E+000,7.080380224167598E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -69 ,           3 ) = 
 (0.000000000000000E+000,7.112525969528387E-006)
 Conduction contribution         -69           3
 (0.000000000000000E+000,7.112525969528387E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -69 ,           4 ) = 
 (0.000000000000000E+000,8.532158433771769E-006)
 Conduction contribution         -69           4
 (0.000000000000000E+000,8.532158433771769E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -69 ,           5 ) = 
 (0.000000000000000E+000,8.447598877722281E-006)
 Conduction contribution         -69           5
 (0.000000000000000E+000,8.447598877722281E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -69 ,           6 ) = 
 (0.000000000000000E+000,4.122437179491971E-006)
 Conduction contribution         -69           6
 (0.000000000000000E+000,4.122437179491971E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -69 ,           7 ) = 
 (0.000000000000000E+000,6.291440769081482E-006)
 Conduction contribution         -69           7
 (0.000000000000000E+000,6.291440769081482E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -69 ,           8 ) = 
 (0.000000000000000E+000,1.928637838640773E-006)
 Conduction contribution         -69           8
 (0.000000000000000E+000,1.928637838640773E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -69 ,           9 ) = 
 (0.000000000000000E+000,2.960959240342998E-006)
 Conduction contribution         -69           9
 (0.000000000000000E+000,2.960959240342998E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -69 ,          10 ) = 
 (0.000000000000000E+000,2.958077755889455E-006)
 Conduction contribution         -69          10
 (0.000000000000000E+000,2.958077755889455E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -69 ,          11 ) = 
 (0.000000000000000E+000,2.831935372238382E-005)
 Conduction contribution         -69          11
 (0.000000000000000E+000,2.831935372238382E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -69 ,          12 ) = 
 (0.000000000000000E+000,2.132874786999433E-006)
 Conduction contribution         -69          12
 (0.000000000000000E+000,2.132874786999433E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -69 ,          13 ) = 
 (0.000000000000000E+000,1.948068350117468E-006)
 Conduction contribution         -69          13
 (0.000000000000000E+000,1.948068350117468E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -69 ,          14 ) = 
 (0.000000000000000E+000,-2.485243923472834E-006)
 Conduction contribution         -69          14
 (0.000000000000000E+000,-2.485243923472834E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -69 ,          15 ) = 
 (0.000000000000000E+000,-2.537038841092579E-006)
 Conduction contribution         -69          15
 (0.000000000000000E+000,-2.537038841092579E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -69 ,          16 ) = 
 (0.000000000000000E+000,4.075325303846360E-005)
 Conduction contribution         -69          16
 (0.000000000000000E+000,4.075325303846360E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -69 ,          17 ) = 
 (0.000000000000000E+000,4.139111826153649E-005)
 Conduction contribution         -69          17
 (0.000000000000000E+000,4.139111826153649E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -69 ,          18 ) = 
 (0.000000000000000E+000,4.030836845420215E-006)
 Conduction contribution         -69          18
 (0.000000000000000E+000,4.030836845420215E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -69 ,          19 ) = 
 (0.000000000000000E+000,4.509270305144415E-006)
 Conduction contribution         -69          19
 (0.000000000000000E+000,4.509270305144415E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -69 ,          20 ) = 
 (0.000000000000000E+000,2.278071980721836E-006)
 Conduction contribution         -69          20
 (0.000000000000000E+000,2.278071980721836E-006)
 Negative imaginary time with it=         -68
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 CHECK 1
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -68 ,           1 ) = 
 (0.000000000000000E+000,5.340819292616852E-006)
 Conduction contribution         -68           1
 (0.000000000000000E+000,5.340819292616852E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -68 ,           2 ) = 
 (0.000000000000000E+000,7.406163289399828E-006)
 Conduction contribution         -68           2
 (0.000000000000000E+000,7.406163289399828E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -68 ,           3 ) = 
 (0.000000000000000E+000,7.432888559444028E-006)
 Conduction contribution         -68           3
 (0.000000000000000E+000,7.432888559444028E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -68 ,           4 ) = 
 (0.000000000000000E+000,8.819456939441196E-006)
 Conduction contribution         -68           4
 (0.000000000000000E+000,8.819456939441196E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -68 ,           5 ) = 
 (0.000000000000000E+000,8.741668647330665E-006)
 Conduction contribution         -68           5
 (0.000000000000000E+000,8.741668647330665E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -68 ,           6 ) = 
 (0.000000000000000E+000,4.417094237206731E-006)
 Conduction contribution         -68           6
 (0.000000000000000E+000,4.417094237206731E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -68 ,           7 ) = 
 (0.000000000000000E+000,6.653204755910297E-006)
 Conduction contribution         -68           7
 (0.000000000000000E+000,6.653204755910297E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -68 ,           8 ) = 
 (0.000000000000000E+000,2.036244070341403E-006)
 Conduction contribution         -68           8
 (0.000000000000000E+000,2.036244070341403E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -68 ,           9 ) = 
 (0.000000000000000E+000,3.083028684904077E-006)
 Conduction contribution         -68           9
 (0.000000000000000E+000,3.083028684904077E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -68 ,          10 ) = 
 (0.000000000000000E+000,3.073967968412914E-006)
 Conduction contribution         -68          10
 (0.000000000000000E+000,3.073967968412914E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -68 ,          11 ) = 
 (0.000000000000000E+000,2.986610380371043E-005)
 Conduction contribution         -68          11
 (0.000000000000000E+000,2.986610380371043E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -68 ,          12 ) = 
 (0.000000000000000E+000,2.234176377458279E-006)
 Conduction contribution         -68          12
 (0.000000000000000E+000,2.234176377458279E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -68 ,          13 ) = 
 (0.000000000000000E+000,2.039234386630788E-006)
 Conduction contribution         -68          13
 (0.000000000000000E+000,2.039234386630788E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -68 ,          14 ) = 
 (0.000000000000000E+000,9.690090909363859E-006)
 Conduction contribution         -68          14
 (0.000000000000000E+000,9.690090909363859E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -68 ,          15 ) = 
 (0.000000000000000E+000,9.617259585673067E-006)
 Conduction contribution         -68          15
 (0.000000000000000E+000,9.617259585673067E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -68 ,          16 ) = 
 (0.000000000000000E+000,4.257685772148563E-005)
 Conduction contribution         -68          16
 (0.000000000000000E+000,4.257685772148563E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -68 ,          17 ) = 
 (0.000000000000000E+000,4.323373883772686E-005)
 Conduction contribution         -68          17
 (0.000000000000000E+000,4.323373883772686E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -68 ,          18 ) = 
 (0.000000000000000E+000,5.121664004340769E-006)
 Conduction contribution         -68          18
 (0.000000000000000E+000,5.121664004340769E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -68 ,          19 ) = 
 (0.000000000000000E+000,4.982718828748171E-006)
 Conduction contribution         -68          19
 (0.000000000000000E+000,4.982718828748171E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -68 ,          20 ) = 
 (0.000000000000000E+000,2.591040680569720E-006)
 Conduction contribution         -68          20
 (0.000000000000000E+000,2.591040680569720E-006)
 Negative imaginary time with it=         -67
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 CHECK 1
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -67 ,           1 ) = 
 (0.000000000000000E+000,5.653740642150442E-006)
 Conduction contribution         -67           1
 (0.000000000000000E+000,5.653740642150442E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -67 ,           2 ) = 
 (0.000000000000000E+000,8.066713505579506E-006)
 Conduction contribution         -67           2
 (0.000000000000000E+000,8.066713505579506E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -67 ,           3 ) = 
 (0.000000000000000E+000,8.075628649470938E-006)
 Conduction contribution         -67           3
 (0.000000000000000E+000,8.075628649470938E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -67 ,           4 ) = 
 (0.000000000000000E+000,9.183635343423559E-006)
 Conduction contribution         -67           4
 (0.000000000000000E+000,9.183635343423559E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -67 ,           5 ) = 
 (0.000000000000000E+000,9.118805238093948E-006)
 Conduction contribution         -67           5
 (0.000000000000000E+000,9.118805238093948E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -67 ,           6 ) = 
 (0.000000000000000E+000,4.947173045816664E-006)
 Conduction contribution         -67           6
 (0.000000000000000E+000,4.947173045816664E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -67 ,           7 ) = 
 (0.000000000000000E+000,7.296769291493304E-006)
 Conduction contribution         -67           7
 (0.000000000000000E+000,7.296769291493304E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -67 ,           8 ) = 
 (0.000000000000000E+000,2.245631697340745E-006)
 Conduction contribution         -67           8
 (0.000000000000000E+000,2.245631697340745E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -67 ,           9 ) = 
 (0.000000000000000E+000,3.260271577144216E-006)
 Conduction contribution         -67           9
 (0.000000000000000E+000,3.260271577144216E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -67 ,          10 ) = 
 (0.000000000000000E+000,3.234196384778173E-006)
 Conduction contribution         -67          10
 (0.000000000000000E+000,3.234196384778173E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -67 ,          11 ) = 
 (0.000000000000000E+000,3.217151827272214E-005)
 Conduction contribution         -67          11
 (0.000000000000000E+000,3.217151827272214E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -67 ,          12 ) = 
 (0.000000000000000E+000,2.431302641914196E-006)
 Conduction contribution         -67          12
 (0.000000000000000E+000,2.431302641914196E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -67 ,          13 ) = 
 (0.000000000000000E+000,2.217409307723351E-006)
 Conduction contribution         -67          13
 (0.000000000000000E+000,2.217409307723351E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -67 ,          14 ) = 
 (0.000000000000000E+000,3.825088608984239E-005)
 Conduction contribution         -67          14
 (0.000000000000000E+000,3.825088608984239E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -67 ,          15 ) = 
 (0.000000000000000E+000,3.819881608465769E-005)
 Conduction contribution         -67          15
 (0.000000000000000E+000,3.819881608465769E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -67 ,          16 ) = 
 (0.000000000000000E+000,4.489524316269780E-005)
 Conduction contribution         -67          16
 (0.000000000000000E+000,4.489524316269780E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -67 ,          17 ) = 
 (0.000000000000000E+000,4.555623936262734E-005)
 Conduction contribution         -67          17
 (0.000000000000000E+000,4.555623936262734E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -67 ,          18 ) = 
 (0.000000000000000E+000,7.525038910821574E-006)
 Conduction contribution         -67          18
 (0.000000000000000E+000,7.525038910821574E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -67 ,          19 ) = 
 (0.000000000000000E+000,5.928138960154060E-006)
 Conduction contribution         -67          19
 (0.000000000000000E+000,5.928138960154060E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -67 ,          20 ) = 
 (0.000000000000000E+000,3.237290374430906E-006)
 Conduction contribution         -67          20
 (0.000000000000000E+000,3.237290374430906E-006)
 Negative imaginary time with it=         -66
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 CHECK 1
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -66 ,           1 ) = 
 (0.000000000000000E+000,5.690702239687737E-006)
 Conduction contribution         -66           1
 (0.000000000000000E+000,5.690702239687737E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -66 ,           2 ) = 
 (0.000000000000000E+000,8.155779035833016E-006)
 Conduction contribution         -66           2
 (0.000000000000000E+000,8.155779035833016E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -66 ,           3 ) = 
 (0.000000000000000E+000,8.167329522299072E-006)
 Conduction contribution         -66           3
 (0.000000000000000E+000,8.167329522299072E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -66 ,           4 ) = 
 (0.000000000000000E+000,9.369670392693806E-006)
 Conduction contribution         -66           4
 (0.000000000000000E+000,9.369670392693806E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -66 ,           5 ) = 
 (0.000000000000000E+000,9.303855003651567E-006)
 Conduction contribution         -66           5
 (0.000000000000000E+000,9.303855003651567E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -66 ,           6 ) = 
 (0.000000000000000E+000,5.047820373420956E-006)
 Conduction contribution         -66           6
 (0.000000000000000E+000,5.047820373420956E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -66 ,           7 ) = 
 (0.000000000000000E+000,7.422376548859393E-006)
 Conduction contribution         -66           7
 (0.000000000000000E+000,7.422376548859393E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -66 ,           8 ) = 
 (0.000000000000000E+000,2.269786193474140E-006)
 Conduction contribution         -66           8
 (0.000000000000000E+000,2.269786193474140E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -66 ,           9 ) = 
 (0.000000000000000E+000,3.338969403209689E-006)
 Conduction contribution         -66           9
 (0.000000000000000E+000,3.338969403209689E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -66 ,          10 ) = 
 (0.000000000000000E+000,3.313312486660092E-006)
 Conduction contribution         -66          10
 (0.000000000000000E+000,3.313312486660092E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -66 ,          11 ) = 
 (0.000000000000000E+000,3.255368355952792E-005)
 Conduction contribution         -66          11
 (0.000000000000000E+000,3.255368355952792E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -66 ,          12 ) = 
 (0.000000000000000E+000,2.454734516226364E-006)
 Conduction contribution         -66          12
 (0.000000000000000E+000,2.454734516226364E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -66 ,          13 ) = 
 (0.000000000000000E+000,2.238707150475482E-006)
 Conduction contribution         -66          13
 (0.000000000000000E+000,2.238707150475482E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -66 ,          14 ) = 
 (0.000000000000000E+000,3.624194419960607E-005)
 Conduction contribution         -66          14
 (0.000000000000000E+000,3.624194419960607E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -66 ,          15 ) = 
 (0.000000000000000E+000,3.616197452538805E-005)
 Conduction contribution         -66          15
 (0.000000000000000E+000,3.616197452538805E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -66 ,          16 ) = 
 (0.000000000000000E+000,4.560094124983636E-005)
 Conduction contribution         -66          16
 (0.000000000000000E+000,4.560094124983636E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -66 ,          17 ) = 
 (0.000000000000000E+000,4.627943298541427E-005)
 Conduction contribution         -66          17
 (0.000000000000000E+000,4.627943298541427E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -66 ,          18 ) = 
 (0.000000000000000E+000,7.469114276111181E-006)
 Conduction contribution         -66          18
 (0.000000000000000E+000,7.469114276111181E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -66 ,          19 ) = 
 (0.000000000000000E+000,5.972906009486566E-006)
 Conduction contribution         -66          19
 (0.000000000000000E+000,5.972906009486566E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -66 ,          20 ) = 
 (0.000000000000000E+000,3.269351855480001E-006)
 Conduction contribution         -66          20
 (0.000000000000000E+000,3.269351855480001E-006)
 Negative imaginary time with it=         -65
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 CHECK 1
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -65 ,           1 ) = 
 (0.000000000000000E+000,5.604766961809598E-006)
 Conduction contribution         -65           1
 (0.000000000000000E+000,5.604766961809598E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -65 ,           2 ) = 
 (0.000000000000000E+000,7.835751155533164E-006)
 Conduction contribution         -65           2
 (0.000000000000000E+000,7.835751155533164E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -65 ,           3 ) = 
 (0.000000000000000E+000,7.863828702162194E-006)
 Conduction contribution         -65           3
 (0.000000000000000E+000,7.863828702162194E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -65 ,           4 ) = 
 (0.000000000000000E+000,9.405781201470709E-006)
 Conduction contribution         -65           4
 (0.000000000000000E+000,9.405781201470709E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -65 ,           5 ) = 
 (0.000000000000000E+000,9.325735501205692E-006)
 Conduction contribution         -65           5
 (0.000000000000000E+000,9.325735501205692E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -65 ,           6 ) = 
 (0.000000000000000E+000,4.795624599893855E-006)
 Conduction contribution         -65           6
 (0.000000000000000E+000,4.795624599893855E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -65 ,           7 ) = 
 (0.000000000000000E+000,7.129545082033113E-006)
 Conduction contribution         -65           7
 (0.000000000000000E+000,7.129545082033113E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -65 ,           8 ) = 
 (0.000000000000000E+000,2.140493599203148E-006)
 Conduction contribution         -65           8
 (0.000000000000000E+000,2.140493599203148E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -65 ,           9 ) = 
 (0.000000000000000E+000,3.341080749748609E-006)
 Conduction contribution         -65           9
 (0.000000000000000E+000,3.341080749748609E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -65 ,          10 ) = 
 (0.000000000000000E+000,3.328206479379673E-006)
 Conduction contribution         -65          10
 (0.000000000000000E+000,3.328206479379673E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -65 ,          11 ) = 
 (0.000000000000000E+000,3.114937122074929E-005)
 Conduction contribution         -65          11
 (0.000000000000000E+000,3.114937122074929E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -65 ,          12 ) = 
 (0.000000000000000E+000,2.340703423430961E-006)
 Conduction contribution         -65          12
 (0.000000000000000E+000,2.340703423430961E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -65 ,          13 ) = 
 (0.000000000000000E+000,2.135713769028666E-006)
 Conduction contribution         -65          13
 (0.000000000000000E+000,2.135713769028666E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -65 ,          14 ) = 
 (0.000000000000000E+000,9.512236830405794E-006)
 Conduction contribution         -65          14
 (0.000000000000000E+000,9.512236830405794E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -65 ,          15 ) = 
 (0.000000000000000E+000,9.389770762258726E-006)
 Conduction contribution         -65          15
 (0.000000000000000E+000,9.389770762258726E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -65 ,          16 ) = 
 (0.000000000000000E+000,4.457355082615345E-005)
 Conduction contribution         -65          16
 (0.000000000000000E+000,4.457355082615345E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -65 ,          17 ) = 
 (0.000000000000000E+000,4.527228582815769E-005)
 Conduction contribution         -65          17
 (0.000000000000000E+000,4.527228582815769E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -65 ,          18 ) = 
 (0.000000000000000E+000,5.293418468168811E-006)
 Conduction contribution         -65          18
 (0.000000000000000E+000,5.293418468168811E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -65 ,          19 ) = 
 (0.000000000000000E+000,5.213583556355207E-006)
 Conduction contribution         -65          19
 (0.000000000000000E+000,5.213583556355207E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -65 ,          20 ) = 
 (0.000000000000000E+000,2.757366756665221E-006)
 Conduction contribution         -65          20
 (0.000000000000000E+000,2.757366756665221E-006)
 Negative imaginary time with it=         -64
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 CHECK 1
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -64 ,           1 ) = 
 (0.000000000000000E+000,5.804716177773002E-006)
 Conduction contribution         -64           1
 (0.000000000000000E+000,5.804716177773002E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -64 ,           2 ) = 
 (0.000000000000000E+000,7.804372053509680E-006)
 Conduction contribution         -64           2
 (0.000000000000000E+000,7.804372053509680E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -64 ,           3 ) = 
 (0.000000000000000E+000,7.836086105128382E-006)
 Conduction contribution         -64           3
 (0.000000000000000E+000,7.836086105128382E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -64 ,           4 ) = 
 (0.000000000000000E+000,9.424471263080151E-006)
 Conduction contribution         -64           4
 (0.000000000000000E+000,9.424471263080151E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -64 ,           5 ) = 
 (0.000000000000000E+000,9.331087902370259E-006)
 Conduction contribution         -64           5
 (0.000000000000000E+000,9.331087902370259E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -64 ,           6 ) = 
 (0.000000000000000E+000,4.678613509755116E-006)
 Conduction contribution         -64           6
 (0.000000000000000E+000,4.678613509755116E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -64 ,           7 ) = 
 (0.000000000000000E+000,7.001355363964422E-006)
 Conduction contribution         -64           7
 (0.000000000000000E+000,7.001355363964422E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -64 ,           8 ) = 
 (0.000000000000000E+000,2.073291851184594E-006)
 Conduction contribution         -64           8
 (0.000000000000000E+000,2.073291851184594E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -64 ,           9 ) = 
 (0.000000000000000E+000,3.368552122432710E-006)
 Conduction contribution         -64           9
 (0.000000000000000E+000,3.368552122432710E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -64 ,          10 ) = 
 (0.000000000000000E+000,3.357758808222180E-006)
 Conduction contribution         -64          10
 (0.000000000000000E+000,3.357758808222180E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -64 ,          11 ) = 
 (0.000000000000000E+000,2.962972861177591E-005)
 Conduction contribution         -64          11
 (0.000000000000000E+000,2.962972861177591E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -64 ,          12 ) = 
 (0.000000000000000E+000,2.290879211422582E-006)
 Conduction contribution         -64          12
 (0.000000000000000E+000,2.290879211422582E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -64 ,          13 ) = 
 (0.000000000000000E+000,2.091390086857220E-006)
 Conduction contribution         -64          13
 (0.000000000000000E+000,2.091390086857220E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -64 ,          14 ) = 
 (0.000000000000000E+000,-5.983944810208539E-006)
 Conduction contribution         -64          14
 (0.000000000000000E+000,-5.983944810208539E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -64 ,          15 ) = 
 (0.000000000000000E+000,-6.074870248363067E-006)
 Conduction contribution         -64          15
 (0.000000000000000E+000,-6.074870248363067E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -64 ,          16 ) = 
 (0.000000000000000E+000,4.286095266637067E-005)
 Conduction contribution         -64          16
 (0.000000000000000E+000,4.286095266637067E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -64 ,          17 ) = 
 (0.000000000000000E+000,4.354897363043806E-005)
 Conduction contribution         -64          17
 (0.000000000000000E+000,4.354897363043806E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -64 ,          18 ) = 
 (0.000000000000000E+000,3.853408423272834E-006)
 Conduction contribution         -64          18
 (0.000000000000000E+000,3.853408423272834E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -64 ,          19 ) = 
 (0.000000000000000E+000,4.666335379407487E-006)
 Conduction contribution         -64          19
 (0.000000000000000E+000,4.666335379407487E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -64 ,          20 ) = 
 (0.000000000000000E+000,2.413013669370828E-006)
 Conduction contribution         -64          20
 (0.000000000000000E+000,2.413013669370828E-006)
 Negative imaginary time with it=         -63
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 CHECK 1
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -63 ,           1 ) = 
 (0.000000000000000E+000,5.811781111136019E-006)
 Conduction contribution         -63           1
 (0.000000000000000E+000,5.811781111136019E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -63 ,           2 ) = 
 (0.000000000000000E+000,7.868165525777687E-006)
 Conduction contribution         -63           2
 (0.000000000000000E+000,7.868165525777687E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -63 ,           3 ) = 
 (0.000000000000000E+000,7.904778387096841E-006)
 Conduction contribution         -63           3
 (0.000000000000000E+000,7.904778387096841E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -63 ,           4 ) = 
 (0.000000000000000E+000,9.663083450184777E-006)
 Conduction contribution         -63           4
 (0.000000000000000E+000,9.663083450184777E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -63 ,           5 ) = 
 (0.000000000000000E+000,9.568579893806868E-006)
 Conduction contribution         -63           5
 (0.000000000000000E+000,9.568579893806868E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -63 ,           6 ) = 
 (0.000000000000000E+000,4.779949767312129E-006)
 Conduction contribution         -63           6
 (0.000000000000000E+000,4.779949767312129E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -63 ,           7 ) = 
 (0.000000000000000E+000,7.129677382117220E-006)
 Conduction contribution         -63           7
 (0.000000000000000E+000,7.129677382117220E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -63 ,           8 ) = 
 (0.000000000000000E+000,2.086006827236658E-006)
 Conduction contribution         -63           8
 (0.000000000000000E+000,2.086006827236658E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -63 ,           9 ) = 
 (0.000000000000000E+000,3.465918313624446E-006)
 Conduction contribution         -63           9
 (0.000000000000000E+000,3.465918313624446E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -63 ,          10 ) = 
 (0.000000000000000E+000,3.457487524491054E-006)
 Conduction contribution         -63          10
 (0.000000000000000E+000,3.457487524491054E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -63 ,          11 ) = 
 (0.000000000000000E+000,3.018363362123338E-005)
 Conduction contribution         -63          11
 (0.000000000000000E+000,3.018363362123338E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -63 ,          12 ) = 
 (0.000000000000000E+000,2.304745072595884E-006)
 Conduction contribution         -63          12
 (0.000000000000000E+000,2.304745072595884E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -63 ,          13 ) = 
 (0.000000000000000E+000,2.103706291733843E-006)
 Conduction contribution         -63          13
 (0.000000000000000E+000,2.103706291733843E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -63 ,          14 ) = 
 (0.000000000000000E+000,-1.026548841850254E-005)
 Conduction contribution         -63          14
 (0.000000000000000E+000,-1.026548841850254E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -63 ,          15 ) = 
 (0.000000000000000E+000,-1.039739164907624E-005)
 Conduction contribution         -63          15
 (0.000000000000000E+000,-1.039739164907624E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -63 ,          16 ) = 
 (0.000000000000000E+000,4.378087317139074E-005)
 Conduction contribution         -63          16
 (0.000000000000000E+000,4.378087317139074E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -63 ,          17 ) = 
 (0.000000000000000E+000,4.449564727247356E-005)
 Conduction contribution         -63          17
 (0.000000000000000E+000,4.449564727247356E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -63 ,          18 ) = 
 (0.000000000000000E+000,3.578935875903354E-006)
 Conduction contribution         -63          18
 (0.000000000000000E+000,3.578935875903354E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -63 ,          19 ) = 
 (0.000000000000000E+000,4.640346195634634E-006)
 Conduction contribution         -63          19
 (0.000000000000000E+000,4.640346195634634E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -63 ,          20 ) = 
 (0.000000000000000E+000,2.390749418609955E-006)
 Conduction contribution         -63          20
 (0.000000000000000E+000,2.390749418609955E-006)
 Negative imaginary time with it=         -62
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 CHECK 1
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -62 ,           1 ) = 
 (0.000000000000000E+000,5.863199231280980E-006)
 Conduction contribution         -62           1
 (0.000000000000000E+000,5.863199231280980E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -62 ,           2 ) = 
 (0.000000000000000E+000,7.770552217641098E-006)
 Conduction contribution         -62           2
 (0.000000000000000E+000,7.770552217641098E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -62 ,           3 ) = 
 (0.000000000000000E+000,7.816727370085608E-006)
 Conduction contribution         -62           3
 (0.000000000000000E+000,7.816727370085608E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -62 ,           4 ) = 
 (0.000000000000000E+000,9.802346437894072E-006)
 Conduction contribution         -62           4
 (0.000000000000000E+000,9.802346437894072E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -62 ,           5 ) = 
 (0.000000000000000E+000,9.697572966996337E-006)
 Conduction contribution         -62           5
 (0.000000000000000E+000,9.697572966996337E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -62 ,           6 ) = 
 (0.000000000000000E+000,4.686122462637118E-006)
 Conduction contribution         -62           6
 (0.000000000000000E+000,4.686122462637118E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -62 ,           7 ) = 
 (0.000000000000000E+000,7.033017298768256E-006)
 Conduction contribution         -62           7
 (0.000000000000000E+000,7.033017298768256E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -62 ,           8 ) = 
 (0.000000000000000E+000,2.015403511931253E-006)
 Conduction contribution         -62           8
 (0.000000000000000E+000,2.015403511931253E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -62 ,           9 ) = 
 (0.000000000000000E+000,3.523059295092316E-006)
 Conduction contribution         -62           9
 (0.000000000000000E+000,3.523059295092316E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -62 ,          10 ) = 
 (0.000000000000000E+000,3.521523604836294E-006)
 Conduction contribution         -62          10
 (0.000000000000000E+000,3.521523604836294E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -62 ,          11 ) = 
 (0.000000000000000E+000,2.945374498610323E-005)
 Conduction contribution         -62          11
 (0.000000000000000E+000,2.945374498610323E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -62 ,          12 ) = 
 (0.000000000000000E+000,2.248765901828089E-006)
 Conduction contribution         -62          12
 (0.000000000000000E+000,2.248765901828089E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -62 ,          13 ) = 
 (0.000000000000000E+000,2.052734642138543E-006)
 Conduction contribution         -62          13
 (0.000000000000000E+000,2.052734642138543E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -62 ,          14 ) = 
 (0.000000000000000E+000,-2.722875821133615E-005)
 Conduction contribution         -62          14
 (0.000000000000000E+000,-2.722875821133615E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -62 ,          15 ) = 
 (0.000000000000000E+000,-2.738230477782139E-005)
 Conduction contribution         -62          15
 (0.000000000000000E+000,-2.738230477782139E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -62 ,          16 ) = 
 (0.000000000000000E+000,4.322584624382219E-005)
 Conduction contribution         -62          16
 (0.000000000000000E+000,4.322584624382219E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -62 ,          17 ) = 
 (0.000000000000000E+000,4.395923366671427E-005)
 Conduction contribution         -62          17
 (0.000000000000000E+000,4.395923366671427E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -62 ,          18 ) = 
 (0.000000000000000E+000,2.107973389629522E-006)
 Conduction contribution         -62          18
 (0.000000000000000E+000,2.107973389629522E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -62 ,          19 ) = 
 (0.000000000000000E+000,4.127353351567959E-006)
 Conduction contribution         -62          19
 (0.000000000000000E+000,4.127353351567959E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -62 ,          20 ) = 
 (0.000000000000000E+000,2.046539197478811E-006)
 Conduction contribution         -62          20
 (0.000000000000000E+000,2.046539197478811E-006)
 Negative imaginary time with it=         -61
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 CHECK 1
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -61 ,           1 ) = 
 (0.000000000000000E+000,6.004597383398835E-006)
 Conduction contribution         -61           1
 (0.000000000000000E+000,6.004597383398835E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -61 ,           2 ) = 
 (0.000000000000000E+000,7.545779618918463E-006)
 Conduction contribution         -61           2
 (0.000000000000000E+000,7.545779618918463E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -61 ,           3 ) = 
 (0.000000000000000E+000,7.602344831721707E-006)
 Conduction contribution         -61           3
 (0.000000000000000E+000,7.602344831721707E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -61 ,           4 ) = 
 (0.000000000000000E+000,9.756096573632905E-006)
 Conduction contribution         -61           4
 (0.000000000000000E+000,9.756096573632905E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -61 ,           5 ) = 
 (0.000000000000000E+000,9.633746759998755E-006)
 Conduction contribution         -61           5
 (0.000000000000000E+000,9.633746759998755E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -61 ,           6 ) = 
 (0.000000000000000E+000,4.396119778922083E-006)
 Conduction contribution         -61           6
 (0.000000000000000E+000,4.396119778922083E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -61 ,           7 ) = 
 (0.000000000000000E+000,6.708541902791866E-006)
 Conduction contribution         -61           7
 (0.000000000000000E+000,6.708541902791866E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -61 ,           8 ) = 
 (0.000000000000000E+000,1.867818767008778E-006)
 Conduction contribution         -61           8
 (0.000000000000000E+000,1.867818767008778E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -61 ,           9 ) = 
 (0.000000000000000E+000,3.517205769624635E-006)
 Conduction contribution         -61           9
 (0.000000000000000E+000,3.517205769624635E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -61 ,          10 ) = 
 (0.000000000000000E+000,3.524216215784143E-006)
 Conduction contribution         -61          10
 (0.000000000000000E+000,3.524216215784143E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -61 ,          11 ) = 
 (0.000000000000000E+000,2.719809016857415E-005)
 Conduction contribution         -61          11
 (0.000000000000000E+000,2.719809016857415E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -61 ,          12 ) = 
 (0.000000000000000E+000,2.125612689812384E-006)
 Conduction contribution         -61          12
 (0.000000000000000E+000,2.125612689812384E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -61 ,          13 ) = 
 (0.000000000000000E+000,1.940700976717422E-006)
 Conduction contribution         -61          13
 (0.000000000000000E+000,1.940700976717422E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -61 ,          14 ) = 
 (0.000000000000000E+000,-5.271447535286852E-005)
 Conduction contribution         -61          14
 (0.000000000000000E+000,-5.271447535286852E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -61 ,          15 ) = 
 (0.000000000000000E+000,-5.284836676085819E-005)
 Conduction contribution         -61          15
 (0.000000000000000E+000,-5.284836676085819E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -61 ,          16 ) = 
 (0.000000000000000E+000,4.063191044987991E-005)
 Conduction contribution         -61          16
 (0.000000000000000E+000,4.063191044987991E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -61 ,          17 ) = 
 (0.000000000000000E+000,4.136068303438273E-005)
 Conduction contribution         -61          17
 (0.000000000000000E+000,4.136068303438273E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -61 ,          18 ) = 
 (0.000000000000000E+000,-3.075865503936517E-007)
 Conduction contribution         -61          18
 (0.000000000000000E+000,-3.075865503936517E-007)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -61 ,          19 ) = 
 (0.000000000000000E+000,3.175830192867285E-006)
 Conduction contribution         -61          19
 (0.000000000000000E+000,3.175830192867285E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -61 ,          20 ) = 
 (0.000000000000000E+000,1.420819616670472E-006)
 Conduction contribution         -61          20
 (0.000000000000000E+000,1.420819616670472E-006)
 Negative imaginary time with it=         -60
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 CHECK 1
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -60 ,           1 ) = 
 (0.000000000000000E+000,6.122927297432015E-006)
 Conduction contribution         -60           1
 (0.000000000000000E+000,6.122927297432015E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -60 ,           2 ) = 
 (0.000000000000000E+000,8.320851661115617E-006)
 Conduction contribution         -60           2
 (0.000000000000000E+000,8.320851661115617E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -60 ,           3 ) = 
 (0.000000000000000E+000,8.367413112196547E-006)
 Conduction contribution         -60           3
 (0.000000000000000E+000,8.367413112196547E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -60 ,           4 ) = 
 (0.000000000000000E+000,1.050492115435475E-005)
 Conduction contribution         -60           4
 (0.000000000000000E+000,1.050492115435475E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -60 ,           5 ) = 
 (0.000000000000000E+000,1.040364418478720E-005)
 Conduction contribution         -60           5
 (0.000000000000000E+000,1.040364418478720E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -60 ,           6 ) = 
 (0.000000000000000E+000,5.210393193243973E-006)
 Conduction contribution         -60           6
 (0.000000000000000E+000,5.210393193243973E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -60 ,           7 ) = 
 (0.000000000000000E+000,7.687442701664857E-006)
 Conduction contribution         -60           7
 (0.000000000000000E+000,7.687442701664857E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -60 ,           8 ) = 
 (0.000000000000000E+000,2.177681458976654E-006)
 Conduction contribution         -60           8
 (0.000000000000000E+000,2.177681458976654E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -60 ,           9 ) = 
 (0.000000000000000E+000,3.836125405873635E-006)
 Conduction contribution         -60           9
 (0.000000000000000E+000,3.836125405873635E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -60 ,          10 ) = 
 (0.000000000000000E+000,3.829133350701219E-006)
 Conduction contribution         -60          10
 (0.000000000000000E+000,3.829133350701219E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -60 ,          11 ) = 
 (0.000000000000000E+000,3.190001013009639E-005)
 Conduction contribution         -60          11
 (0.000000000000000E+000,3.190001013009639E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -60 ,          12 ) = 
 (0.000000000000000E+000,2.404098634873052E-006)
 Conduction contribution         -60          12
 (0.000000000000000E+000,2.404098634873052E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -60 ,          13 ) = 
 (0.000000000000000E+000,2.192932925654961E-006)
 Conduction contribution         -60          13
 (0.000000000000000E+000,2.192932925654961E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -60 ,          14 ) = 
 (0.000000000000000E+000,-1.781674845946653E-005)
 Conduction contribution         -60          14
 (0.000000000000000E+000,-1.781674845946653E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -60 ,          15 ) = 
 (0.000000000000000E+000,-1.802681957308223E-005)
 Conduction contribution         -60          15
 (0.000000000000000E+000,-1.802681957308223E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -60 ,          16 ) = 
 (0.000000000000000E+000,4.634905093090085E-005)
 Conduction contribution         -60          16
 (0.000000000000000E+000,4.634905093090085E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -60 ,          17 ) = 
 (0.000000000000000E+000,4.714526331965795E-005)
 Conduction contribution         -60          17
 (0.000000000000000E+000,4.714526331965795E-005)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -60 ,          18 ) = 
 (0.000000000000000E+000,3.227572321331829E-006)
 Conduction contribution         -60          18
 (0.000000000000000E+000,3.227572321331829E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -60 ,          19 ) = 
 (0.000000000000000E+000,4.723545486588428E-006)
 Conduction contribution         -60          19
 (0.000000000000000E+000,4.723545486588428E-006)
 CHECK 2 and ok_read= T
 CHECK 2.1
 CHECK 2.1 cpp%numpw=         159  ww%numpw=         159
 CHECK 2.1 cpp%nums=         115
 CHECK 2.2: after allocate vtemp
 CHECK 3; after dgemm
 sene(         -60 ,          20 ) = 
 (0.000000000000000E+000,2.458872841839407E-006)
 Conduction contribution         -60          20
 (0.000000000000000E+000,2.458872841839407E-006)
 File written
 selfenergy_on_split_time_file_1
 SUBROUTINE read_data_pw_v
 After reading the .vpot_ files: vp%numpw=         159
 After the first mp_bcast
 After reading the potential matrix
 After the seconf mp_bcast
 END SUBROUTINE read_data_pw_v
 SUBROUTINE invert_v_pot; before vpi%vmat(:,:)=vp%vmat(:,:)
 After vpi%vmat(:,:)=vp%vmat(:,:)
 selfenergy_on_split_time_file_2
 selfenergy_on_split_time_file_3 with op%numpw=           0
 selfenergy_on_split_time_file_5 with nbegin=           1  and l_blk=
          20
 Positive imaginary time with it=           1
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 before allocate wtemp
 before collect_v_pot
 before dgemm1
 before dgemm2
 before free_memory
 deallocate
 CHECK 1
 START ii=           1
 ok_read= T
 sene(           1 ,           1 ) =  (0.000000000000000E+000,0.466684527032033)
 START ii=           2
 ok_read= T
 sene(           1 ,           2 ) =  (0.000000000000000E+000,0.431462435400452)
 START ii=           3
 ok_read= T
 sene(           1 ,           3 ) =  (0.000000000000000E+000,0.430484806694373)
 START ii=           4
 ok_read= T
 sene(           1 ,           4 ) =  (0.000000000000000E+000,0.365397267504513)
 START ii=           5
 ok_read= T
 sene(           1 ,           5 ) =  (0.000000000000000E+000,0.366688337852183)
 START ii=           6
 ok_read= T
 sene(           1 ,           6 ) =  (0.000000000000000E+000,0.295374993321114)
 START ii=           7
 ok_read= T
 sene(           1 ,           7 ) =  (0.000000000000000E+000,0.278948715425215)
 START ii=           8
 ok_read= T
 sene(           1 ,           8 ) =  (0.000000000000000E+000,0.355464637381810)
 START ii=           9
 ok_read= T
 sene(           1 ,           9 ) =  (0.000000000000000E+000,0.289624107909637)
 START ii=          10
 ok_read= T
 sene(           1 ,          10 ) =  (0.000000000000000E+000,0.290103963192900)
 START ii=          11
 ok_read= T
 sene(           1 ,          11 ) =  (0.000000000000000E+000,0.271091533322533)
 START ii=          12
 ok_read= T
 sene(           1 ,          12 ) =  (0.000000000000000E+000,0.282627223314513)
 START ii=          13
 ok_read= T
 sene(           1 ,          13 ) =  (0.000000000000000E+000,0.284305180629678)
 START ii=          14
 ok_read= T
 sene(           1 ,          14 ) =  (0.000000000000000E+000,0.232824111522137)
 START ii=          15
 ok_read= T
 sene(           1 ,          15 ) =  (0.000000000000000E+000,0.232542485213468)
 START ii=          16
 ok_read= T
 sene(           1 ,          16 ) =  (0.000000000000000E+000,0.151859674961584)
 START ii=          17
 ok_read= T
 sene(           1 ,          17 ) =  (0.000000000000000E+000,0.152219788795009)
 START ii=          18
 ok_read= T
 sene(           1 ,          18 ) = 
 (0.000000000000000E+000,1.598889297092975E-002)
 START ii=          19
 ok_read= T
 sene(           1 ,          19 ) = 
 (0.000000000000000E+000,1.180863170352941E-002)
 START ii=          20
 ok_read= T
 sene(           1 ,          20 ) = 
 (0.000000000000000E+000,1.176259212400652E-002)
 Positive imaginary time with it=           2
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 before allocate wtemp
 before collect_v_pot
 before dgemm1
 before dgemm2
 before free_memory
 deallocate
 CHECK 1
 START ii=           1
 ok_read= T
 sene(           2 ,           1 ) =  (0.000000000000000E+000,0.462032385273744)
 START ii=           2
 ok_read= T
 sene(           2 ,           2 ) =  (0.000000000000000E+000,0.427522185675956)
 START ii=           3
 ok_read= T
 sene(           2 ,           3 ) =  (0.000000000000000E+000,0.426562768096763)
 START ii=           4
 ok_read= T
 sene(           2 ,           4 ) =  (0.000000000000000E+000,0.362481107391433)
 START ii=           5
 ok_read= T
 sene(           2 ,           5 ) =  (0.000000000000000E+000,0.363764612183885)
 START ii=           6
 ok_read= T
 sene(           2 ,           6 ) =  (0.000000000000000E+000,0.293308975600865)
 START ii=           7
 ok_read= T
 sene(           2 ,           7 ) =  (0.000000000000000E+000,0.277083376507107)
 START ii=           8
 ok_read= T
 sene(           2 ,           8 ) =  (0.000000000000000E+000,0.352963355734146)
 START ii=           9
 ok_read= T
 sene(           2 ,           9 ) =  (0.000000000000000E+000,0.287724004862874)
 START ii=          10
 ok_read= T
 sene(           2 ,          10 ) =  (0.000000000000000E+000,0.288202943289112)
 START ii=          11
 ok_read= T
 sene(           2 ,          11 ) =  (0.000000000000000E+000,0.269808240878361)
 START ii=          12
 ok_read= T
 sene(           2 ,          12 ) =  (0.000000000000000E+000,0.280866060104862)
 START ii=          13
 ok_read= T
 sene(           2 ,          13 ) =  (0.000000000000000E+000,0.282532560786544)
 START ii=          14
 ok_read= T
 sene(           2 ,          14 ) =  (0.000000000000000E+000,0.231733865386351)
 START ii=          15
 ok_read= T
 sene(           2 ,          15 ) =  (0.000000000000000E+000,0.231455589572090)
 START ii=          16
 ok_read= T
 sene(           2 ,          16 ) =  (0.000000000000000E+000,0.151149563600837)
 START ii=          17
 ok_read= T
 sene(           2 ,          17 ) =  (0.000000000000000E+000,0.151508651095443)
 START ii=          18
 ok_read= T
 sene(           2 ,          18 ) = 
 (0.000000000000000E+000,1.586674467304334E-002)
 START ii=          19
 ok_read= T
 sene(           2 ,          19 ) = 
 (0.000000000000000E+000,1.172313192828277E-002)
 START ii=          20
 ok_read= T
 sene(           2 ,          20 ) = 
 (0.000000000000000E+000,1.168550945251209E-002)
 Positive imaginary time with it=           3
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 before allocate wtemp
 before collect_v_pot
 before dgemm1
 before dgemm2
 before free_memory
 deallocate
 CHECK 1
 START ii=           1
 ok_read= T
 sene(           3 ,           1 ) =  (0.000000000000000E+000,0.452577048647585)
 START ii=           2
 ok_read= T
 sene(           3 ,           2 ) =  (0.000000000000000E+000,0.419437428758087)
 START ii=           3
 ok_read= T
 sene(           3 ,           3 ) =  (0.000000000000000E+000,0.418517544689556)
 START ii=           4
 ok_read= T
 sene(           3 ,           4 ) =  (0.000000000000000E+000,0.356401762243598)
 START ii=           5
 ok_read= T
 sene(           3 ,           5 ) =  (0.000000000000000E+000,0.357666203488551)
 START ii=           6
 ok_read= T
 sene(           3 ,           6 ) =  (0.000000000000000E+000,0.288910297090131)
 START ii=           7
 ok_read= T
 sene(           3 ,           7 ) =  (0.000000000000000E+000,0.273122020183295)
 START ii=           8
 ok_read= T
 sene(           3 ,           8 ) =  (0.000000000000000E+000,0.347602861671600)
 START ii=           9
 ok_read= T
 sene(           3 ,           9 ) =  (0.000000000000000E+000,0.283617546429649)
 START ii=          10
 ok_read= T
 sene(           3 ,          10 ) =  (0.000000000000000E+000,0.284095938783524)
 START ii=          11
 ok_read= T
 sene(           3 ,          11 ) =  (0.000000000000000E+000,0.266892337130684)
 START ii=          12
 ok_read= T
 sene(           3 ,          12 ) =  (0.000000000000000E+000,0.277033313227165)
 START ii=          13
 ok_read= T
 sene(           3 ,          13 ) =  (0.000000000000000E+000,0.278671697215785)
 START ii=          14
 ok_read= T
 sene(           3 ,          14 ) =  (0.000000000000000E+000,0.229220616877817)
 START ii=          15
 ok_read= T
 sene(           3 ,          15 ) =  (0.000000000000000E+000,0.228952660228117)
 START ii=          16
 ok_read= T
 sene(           3 ,          16 ) =  (0.000000000000000E+000,0.149531254628331)
 START ii=          17
 ok_read= T
 sene(           3 ,          17 ) =  (0.000000000000000E+000,0.149887775918270)
 START ii=          18
 ok_read= T
 sene(           3 ,          18 ) = 
 (0.000000000000000E+000,1.560409958711209E-002)
 START ii=          19
 ok_read= T
 sene(           3 ,          19 ) = 
 (0.000000000000000E+000,1.153843974590371E-002)
 START ii=          20
 ok_read= T
 sene(           3 ,          20 ) = 
 (0.000000000000000E+000,1.151511962977420E-002)
 Positive imaginary time with it=           4
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 before allocate wtemp
 before collect_v_pot
 before dgemm1
 before dgemm2
 before free_memory
 deallocate
 CHECK 1
 START ii=           1
 ok_read= T
 sene(           4 ,           1 ) =  (0.000000000000000E+000,0.436686047399988)
 START ii=           2
 ok_read= T
 sene(           4 ,           2 ) =  (0.000000000000000E+000,0.405695650783346)
 START ii=           3
 ok_read= T
 sene(           4 ,           3 ) =  (0.000000000000000E+000,0.404846066433017)
 START ii=           4
 ok_read= T
 sene(           4 ,           4 ) =  (0.000000000000000E+000,0.345878719825743)
 START ii=           5
 ok_read= T
 sene(           4 ,           5 ) =  (0.000000000000000E+000,0.347104182915598)
 START ii=           6
 ok_read= T
 sene(           4 ,           6 ) =  (0.000000000000000E+000,0.281123808157977)
 START ii=           7
 ok_read= T
 sene(           4 ,           7 ) =  (0.000000000000000E+000,0.266121691123863)
 START ii=           8
 ok_read= T
 sene(           4 ,           8 ) =  (0.000000000000000E+000,0.338050780985560)
 START ii=           9
 ok_read= T
 sene(           4 ,           9 ) =  (0.000000000000000E+000,0.276236355409123)
 START ii=          10
 ok_read= T
 sene(           4 ,          10 ) =  (0.000000000000000E+000,0.276716126758004)
 START ii=          11
 ok_read= T
 sene(           4 ,          11 ) =  (0.000000000000000E+000,0.261381251687014)
 START ii=          12
 ok_read= T
 sene(           4 ,          12 ) =  (0.000000000000000E+000,0.270092937664060)
 START ii=          13
 ok_read= T
 sene(           4 ,          13 ) =  (0.000000000000000E+000,0.271675180604732)
 START ii=          14
 ok_read= T
 sene(           4 ,          14 ) =  (0.000000000000000E+000,0.224410797465713)
 START ii=          15
 ok_read= T
 sene(           4 ,          15 ) =  (0.000000000000000E+000,0.224166691057511)
 START ii=          16
 ok_read= T
 sene(           4 ,          16 ) =  (0.000000000000000E+000,0.146464667160630)
 START ii=          17
 ok_read= T
 sene(           4 ,          17 ) =  (0.000000000000000E+000,0.146815910476725)
 START ii=          18
 ok_read= T
 sene(           4 ,          18 ) = 
 (0.000000000000000E+000,1.513543935624708E-002)
 START ii=          19
 ok_read= T
 sene(           4 ,          19 ) = 
 (0.000000000000000E+000,1.120709974092799E-002)
 START ii=          20
 ok_read= T
 sene(           4 ,          20 ) = 
 (0.000000000000000E+000,1.120258711928548E-002)
 Positive imaginary time with it=           5
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 before allocate wtemp
 before collect_v_pot
 before dgemm1
 before dgemm2
 before free_memory
 deallocate
 CHECK 1
 START ii=           1
 ok_read= T
 sene(           5 ,           1 ) =  (0.000000000000000E+000,0.412661738961681)
 START ii=           2
 ok_read= T
 sene(           5 ,           2 ) =  (0.000000000000000E+000,0.384682851607280)
 START ii=           3
 ok_read= T
 sene(           5 ,           3 ) =  (0.000000000000000E+000,0.383942060740238)
 START ii=           4
 ok_read= T
 sene(           5 ,           4 ) =  (0.000000000000000E+000,0.329502389286347)
 START ii=           5
 ok_read= T
 sene(           5 ,           5 ) =  (0.000000000000000E+000,0.330659936741425)
 START ii=           6
 ok_read= T
 sene(           5 ,           6 ) =  (0.000000000000000E+000,0.268770113685007)
 START ii=           7
 ok_read= T
 sene(           5 ,           7 ) =  (0.000000000000000E+000,0.255010131935827)
 START ii=           8
 ok_read= T
 sene(           5 ,           8 ) =  (0.000000000000000E+000,0.322818713371253)
 START ii=           9
 ok_read= T
 sene(           5 ,           9 ) =  (0.000000000000000E+000,0.264379643266455)
 START ii=          10
 ok_read= T
 sene(           5 ,          10 ) =  (0.000000000000000E+000,0.264863866387702)
 START ii=          11
 ok_read= T
 sene(           5 ,          11 ) =  (0.000000000000000E+000,0.252134869486289)
 START ii=          12
 ok_read= T
 sene(           5 ,          12 ) =  (0.000000000000000E+000,0.258867650205686)
 START ii=          13
 ok_read= T
 sene(           5 ,          13 ) =  (0.000000000000000E+000,0.260354076714842)
 START ii=          14
 ok_read= T
 sene(           5 ,          14 ) =  (0.000000000000000E+000,0.216279820800458)
 START ii=          15
 ok_read= T
 sene(           5 ,          15 ) =  (0.000000000000000E+000,0.216079842310489)
 START ii=          16
 ok_read= T
 sene(           5 ,          16 ) =  (0.000000000000000E+000,0.141311043340177)
 START ii=          17
 ok_read= T
 sene(           5 ,          17 ) =  (0.000000000000000E+000,0.141652908316334)
 START ii=          18
 ok_read= T
 sene(           5 ,          18 ) = 
 (0.000000000000000E+000,1.439067070288214E-002)
 START ii=          19
 ok_read= T
 sene(           5 ,          19 ) = 
 (0.000000000000000E+000,1.067741502639395E-002)
 START ii=          20
 ok_read= T
 sene(           5 ,          20 ) = 
 (0.000000000000000E+000,1.069475923097561E-002)
 Positive imaginary time with it=           6
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 before allocate wtemp
 before collect_v_pot
 before dgemm1
 before dgemm2
 before free_memory
 deallocate
 CHECK 1
 START ii=           1
 ok_read= T
 sene(           6 ,           1 ) =  (0.000000000000000E+000,0.379678223591063)
 START ii=           2
 ok_read= T
 sene(           6 ,           2 ) =  (0.000000000000000E+000,0.355514125180521)
 START ii=           3
 ok_read= T
 sene(           6 ,           3 ) =  (0.000000000000000E+000,0.354919324848279)
 START ii=           4
 ok_read= T
 sene(           6 ,           4 ) =  (0.000000000000000E+000,0.306394661066472)
 START ii=           5
 ok_read= T
 sene(           6 ,           5 ) =  (0.000000000000000E+000,0.307450788894028)
 START ii=           6
 ok_read= T
 sene(           6 ,           6 ) =  (0.000000000000000E+000,0.251072493989083)
 START ii=           7
 ok_read= T
 sene(           6 ,           7 ) =  (0.000000000000000E+000,0.239036627070180)
 START ii=           8
 ok_read= T
 sene(           6 ,           8 ) =  (0.000000000000000E+000,0.300933312913950)
 START ii=           9
 ok_read= T
 sene(           6 ,           9 ) =  (0.000000000000000E+000,0.247245714472624)
 START ii=          10
 ok_read= T
 sene(           6 ,          10 ) =  (0.000000000000000E+000,0.247736585687723)
 START ii=          11
 ok_read= T
 sene(           6 ,          11 ) =  (0.000000000000000E+000,0.238250554396478)
 START ii=          12
 ok_read= T
 sene(           6 ,          12 ) =  (0.000000000000000E+000,0.242541561046693)
 START ii=          13
 ok_read= T
 sene(           6 ,          13 ) =  (0.000000000000000E+000,0.243887748305693)
 START ii=          14
 ok_read= T
 sene(           6 ,          14 ) =  (0.000000000000000E+000,0.204049477830985)
 START ii=          15
 ok_read= T
 sene(           6 ,          15 ) =  (0.000000000000000E+000,0.203916382968420)
 START ii=          16
 ok_read= T
 sene(           6 ,          16 ) =  (0.000000000000000E+000,0.133567465264122)
 START ii=          17
 ok_read= T
 sene(           6 ,          17 ) =  (0.000000000000000E+000,0.133894896913639)
 START ii=          18
 ok_read= T
 sene(           6 ,          18 ) = 
 (0.000000000000000E+000,1.333198077098407E-002)
 START ii=          19
 ok_read= T
 sene(           6 ,          19 ) = 
 (0.000000000000000E+000,9.919127885808964E-003)
 START ii=          20
 ok_read= T
 sene(           6 ,          20 ) = 
 (0.000000000000000E+000,9.960992596347983E-003)
 Positive imaginary time with it=           7
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 before allocate wtemp
 before collect_v_pot
 before dgemm1
 before dgemm2
 before free_memory
 deallocate
 CHECK 1
 START ii=           1
 ok_read= T
 sene(           7 ,           1 ) =  (0.000000000000000E+000,0.338893280771120)
 START ii=           2
 ok_read= T
 sene(           7 ,           2 ) =  (0.000000000000000E+000,0.319055172243404)
 START ii=           3
 ok_read= T
 sene(           7 ,           3 ) =  (0.000000000000000E+000,0.318627243796915)
 START ii=           4
 ok_read= T
 sene(           7 ,           4 ) =  (0.000000000000000E+000,0.277057719473780)
 START ii=           5
 ok_read= T
 sene(           7 ,           5 ) =  (0.000000000000000E+000,0.277984672867358)
 START ii=           6
 ok_read= T
 sene(           7 ,           6 ) =  (0.000000000000000E+000,0.228341595108918)
 START ii=           7
 ok_read= T
 sene(           7 ,           7 ) =  (0.000000000000000E+000,0.218381791432918)
 START ii=           8
 ok_read= T
 sene(           7 ,           8 ) =  (0.000000000000000E+000,0.272808144885595)
 START ii=           9
 ok_read= T
 sene(           7 ,           9 ) =  (0.000000000000000E+000,0.225125201324144)
 START ii=          10
 ok_read= T
 sene(           7 ,          10 ) =  (0.000000000000000E+000,0.225620664552772)
 START ii=          11
 ok_read= T
 sene(           7 ,          11 ) =  (0.000000000000000E+000,0.219665410735972)
 START ii=          12
 ok_read= T
 sene(           7 ,          12 ) =  (0.000000000000000E+000,0.221330030837086)
 START ii=          13
 ok_read= T
 sene(           7 ,          13 ) =  (0.000000000000000E+000,0.222501437596458)
 START ii=          14
 ok_read= T
 sene(           7 ,          14 ) =  (0.000000000000000E+000,0.187746787219309)
 START ii=          15
 ok_read= T
 sene(           7 ,          15 ) =  (0.000000000000000E+000,0.187696575856831)
 START ii=          16
 ok_read= T
 sene(           7 ,          16 ) =  (0.000000000000000E+000,0.123205358667890)
 START ii=          17
 ok_read= T
 sene(           7 ,          17 ) =  (0.000000000000000E+000,0.123513711920445)
 START ii=          18
 ok_read= T
 sene(           7 ,          18 ) = 
 (0.000000000000000E+000,1.199747017916153E-002)
 START ii=          19
 ok_read= T
 sene(           7 ,          19 ) = 
 (0.000000000000000E+000,8.954884869635667E-003)
 START ii=          20
 ok_read= T
 sene(           7 ,          20 ) = 
 (0.000000000000000E+000,9.025419130370322E-003)
 Positive imaginary time with it=           8
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 before allocate wtemp
 before collect_v_pot
 before dgemm1
 before dgemm2
 before free_memory
 deallocate
 CHECK 1
 START ii=           1
 ok_read= T
 sene(           8 ,           1 ) =  (0.000000000000000E+000,0.293936642030856)
 START ii=           2
 ok_read= T
 sene(           8 ,           2 ) =  (0.000000000000000E+000,0.278445169244742)
 START ii=           3
 ok_read= T
 sene(           8 ,           3 ) =  (0.000000000000000E+000,0.278176901458061)
 START ii=           4
 ok_read= T
 sene(           8 ,           4 ) =  (0.000000000000000E+000,0.243888216696253)
 START ii=           5
 ok_read= T
 sene(           8 ,           5 ) =  (0.000000000000000E+000,0.244675404825583)
 START ii=           6
 ok_read= T
 sene(           8 ,           6 ) =  (0.000000000000000E+000,0.202404410153731)
 START ii=           7
 ok_read= T
 sene(           8 ,           7 ) =  (0.000000000000000E+000,0.194594041765914)
 START ii=           8
 ok_read= T
 sene(           8 ,           8 ) =  (0.000000000000000E+000,0.240779667269062)
 START ii=           9
 ok_read= T
 sene(           8 ,           9 ) =  (0.000000000000000E+000,0.199830148253103)
 START ii=          10
 ok_read= T
 sene(           8 ,          10 ) =  (0.000000000000000E+000,0.200321813960946)
 START ii=          11
 ok_read= T
 sene(           8 ,          11 ) =  (0.000000000000000E+000,0.197673289954861)
 START ii=          12
 ok_read= T
 sene(           8 ,          12 ) =  (0.000000000000000E+000,0.196924240866213)
 START ii=          13
 ok_read= T
 sene(           8 ,          13 ) =  (0.000000000000000E+000,0.197911224571112)
 START ii=          14
 ok_read= T
 sene(           8 ,          14 ) =  (0.000000000000000E+000,0.168624280860496)
 START ii=          15
 ok_read= T
 sene(           8 ,          15 ) =  (0.000000000000000E+000,0.168656814360528)
 START ii=          16
 ok_read= T
 sene(           8 ,          16 ) =  (0.000000000000000E+000,0.110956150293006)
 START ii=          17
 ok_read= T
 sene(           8 ,          17 ) =  (0.000000000000000E+000,0.111243008810743)
 START ii=          18
 ok_read= T
 sene(           8 ,          18 ) = 
 (0.000000000000000E+000,1.051705418139063E-002)
 START ii=          19
 ok_read= T
 sene(           8 ,          19 ) = 
 (0.000000000000000E+000,7.874416514612400E-003)
 START ii=          20
 ok_read= T
 sene(           8 ,          20 ) = 
 (0.000000000000000E+000,7.979203947345756E-003)
 Positive imaginary time with it=           9
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 before allocate wtemp
 before collect_v_pot
 before dgemm1
 before dgemm2
 before free_memory
 deallocate
 CHECK 1
 START ii=           1
 ok_read= T
 sene(           9 ,           1 ) =  (0.000000000000000E+000,0.249748884760009)
 START ii=           2
 ok_read= T
 sene(           9 ,           2 ) =  (0.000000000000000E+000,0.238161815998202)
 START ii=           3
 ok_read= T
 sene(           9 ,           3 ) =  (0.000000000000000E+000,0.238022312910854)
 START ii=           4
 ok_read= T
 sene(           9 ,           4 ) =  (0.000000000000000E+000,0.210550647325882)
 START ii=           5
 ok_read= T
 sene(           9 ,           5 ) =  (0.000000000000000E+000,0.211206817888075)
 START ii=           6
 ok_read= T
 sene(           9 ,           6 ) =  (0.000000000000000E+000,0.176134947610266)
 START ii=           7
 ok_read= T
 sene(           9 ,           7 ) =  (0.000000000000000E+000,0.170268705025286)
 START ii=           8
 ok_read= T
 sene(           9 ,           8 ) =  (0.000000000000000E+000,0.208481395328942)
 START ii=           9
 ok_read= T
 sene(           9 ,           9 ) =  (0.000000000000000E+000,0.174204609889205)
 START ii=          10
 ok_read= T
 sene(           9 ,          10 ) =  (0.000000000000000E+000,0.174680848695174)
 START ii=          11
 ok_read= T
 sene(           9 ,          11 ) =  (0.000000000000000E+000,0.174779259189082)
 START ii=          12
 ok_read= T
 sene(           9 ,          12 ) =  (0.000000000000000E+000,0.172071873529035)
 START ii=          13
 ok_read= T
 sene(           9 ,          13 ) =  (0.000000000000000E+000,0.172890953941059)
 START ii=          14
 ok_read= T
 sene(           9 ,          14 ) =  (0.000000000000000E+000,0.148897642384757)
 START ii=          15
 ok_read= T
 sene(           9 ,          15 ) =  (0.000000000000000E+000,0.148996862777009)
 START ii=          16
 ok_read= T
 sene(           9 ,          16 ) = 
 (0.000000000000000E+000,9.821987025625463E-002)
 START ii=          17
 ok_read= T
 sene(           9 ,          17 ) = 
 (0.000000000000000E+000,9.848572873312370E-002)
 START ii=          18
 ok_read= T
 sene(           9 ,          18 ) = 
 (0.000000000000000E+000,9.060596070584194E-003)
 START ii=          19
 ok_read= T
 sene(           9 ,          19 ) = 
 (0.000000000000000E+000,6.802083441391413E-003)
 START ii=          20
 ok_read= T
 sene(           9 ,          20 ) = 
 (0.000000000000000E+000,6.942929411302890E-003)
 Positive imaginary time with it=          10
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 before allocate wtemp
 before collect_v_pot
 before dgemm1
 before dgemm2
 before free_memory
 deallocate
 CHECK 1
 START ii=           1
 ok_read= T
 sene(          10 ,           1 ) =  (0.000000000000000E+000,0.209871925983868)
 START ii=           2
 ok_read= T
 sene(          10 ,           2 ) =  (0.000000000000000E+000,0.201573827380980)
 START ii=           3
 ok_read= T
 sene(          10 ,           3 ) =  (0.000000000000000E+000,0.201528929651058)
 START ii=           4
 ok_read= T
 sene(          10 ,           4 ) =  (0.000000000000000E+000,0.179999452208932)
 START ii=           5
 ok_read= T
 sene(          10 ,           5 ) =  (0.000000000000000E+000,0.180540558769254)
 START ii=           6
 ok_read= T
 sene(          10 ,           6 ) =  (0.000000000000000E+000,0.151897639586329)
 START ii=           7
 ok_read= T
 sene(          10 ,           7 ) =  (0.000000000000000E+000,0.147676909939525)
 START ii=           8
 ok_read= T
 sene(          10 ,           8 ) =  (0.000000000000000E+000,0.178845681985549)
 START ii=           9
 ok_read= T
 sene(          10 ,           9 ) =  (0.000000000000000E+000,0.150551297232347)
 START ii=          10
 ok_read= T
 sene(          10 ,          10 ) =  (0.000000000000000E+000,0.151004500562555)
 START ii=          11
 ok_read= T
 sene(          10 ,          11 ) =  (0.000000000000000E+000,0.153416081163331)
 START ii=          12
 ok_read= T
 sene(          10 ,          12 ) =  (0.000000000000000E+000,0.149068769818873)
 START ii=          13
 ok_read= T
 sene(          10 ,          13 ) =  (0.000000000000000E+000,0.149744825013511)
 START ii=          14
 ok_read= T
 sene(          10 ,          14 ) =  (0.000000000000000E+000,0.130519208333649)
 START ii=          15
 ok_read= T
 sene(          10 ,          15 ) =  (0.000000000000000E+000,0.130666370622979)
 START ii=          16
 ok_read= T
 sene(          10 ,          16 ) = 
 (0.000000000000000E+000,8.634182459135703E-002)
 START ii=          17
 ok_read= T
 sene(          10 ,          17 ) = 
 (0.000000000000000E+000,8.658835514725720E-002)
 START ii=          18
 ok_read= T
 sene(          10 ,          18 ) = 
 (0.000000000000000E+000,7.734385733419994E-003)
 START ii=          19
 ok_read= T
 sene(          10 ,          19 ) = 
 (0.000000000000000E+000,5.823043761519871E-003)
 START ii=          20
 ok_read= T
 sene(          10 ,          20 ) = 
 (0.000000000000000E+000,5.991033365503540E-003)
 Positive imaginary time with it=          11
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 before allocate wtemp
 before collect_v_pot
 before dgemm1
 before dgemm2
 before free_memory
 deallocate
 CHECK 1
 START ii=           1
 ok_read= T
 sene(          11 ,           1 ) =  (0.000000000000000E+000,0.174603955414468)
 START ii=           2
 ok_read= T
 sene(          11 ,           2 ) =  (0.000000000000000E+000,0.169065876560225)
 START ii=           3
 ok_read= T
 sene(          11 ,           3 ) =  (0.000000000000000E+000,0.169092375372670)
 START ii=           4
 ok_read= T
 sene(          11 ,           4 ) =  (0.000000000000000E+000,0.152702466457574)
 START ii=           5
 ok_read= T
 sene(          11 ,           5 ) =  (0.000000000000000E+000,0.153138486344394)
 START ii=           6
 ok_read= T
 sene(          11 ,           6 ) =  (0.000000000000000E+000,0.130093927957100)
 START ii=           7
 ok_read= T
 sene(          11 ,           7 ) =  (0.000000000000000E+000,0.127296195362281)
 START ii=           8
 ok_read= T
 sene(          11 ,           8 ) =  (0.000000000000000E+000,0.152309195684136)
 START ii=           9
 ok_read= T
 sene(          11 ,           9 ) =  (0.000000000000000E+000,0.129216366066104)
 START ii=          10
 ok_read= T
 sene(          11 ,          10 ) =  (0.000000000000000E+000,0.129644943572043)
 START ii=          11
 ok_read= T
 sene(          11 ,          11 ) =  (0.000000000000000E+000,0.134215022942109)
 START ii=          12
 ok_read= T
 sene(          11 ,          12 ) =  (0.000000000000000E+000,0.128303300651496)
 START ii=          13
 ok_read= T
 sene(          11 ,          13 ) =  (0.000000000000000E+000,0.128852012327112)
 START ii=          14
 ok_read= T
 sene(          11 ,          14 ) =  (0.000000000000000E+000,0.113849545187078)
 START ii=          15
 ok_read= T
 sene(          11 ,          15 ) =  (0.000000000000000E+000,0.114034415090705)
 START ii=          16
 ok_read= T
 sene(          11 ,          16 ) = 
 (0.000000000000000E+000,7.565985565469577E-002)
 START ii=          17
 ok_read= T
 sene(          11 ,          17 ) = 
 (0.000000000000000E+000,7.588753761929469E-002)
 START ii=          18
 ok_read= T
 sene(          11 ,          18 ) = 
 (0.000000000000000E+000,6.532090717155196E-003)
 START ii=          19
 ok_read= T
 sene(          11 ,          19 ) = 
 (0.000000000000000E+000,4.938533534580972E-003)
 START ii=          20
 ok_read= T
 sene(          11 ,          20 ) = 
 (0.000000000000000E+000,5.117130850678453E-003)
 Positive imaginary time with it=          12
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 before allocate wtemp
 before collect_v_pot
 before dgemm1
 before dgemm2
 before free_memory
 deallocate
 CHECK 1
 START ii=           1
 ok_read= T
 sene(          12 ,           1 ) =  (0.000000000000000E+000,0.142662480567174)
 START ii=           2
 ok_read= T
 sene(          12 ,           2 ) =  (0.000000000000000E+000,0.139387535545470)
 START ii=           3
 ok_read= T
 sene(          12 ,           3 ) =  (0.000000000000000E+000,0.139465470203465)
 START ii=           4
 ok_read= T
 sene(          12 ,           4 ) =  (0.000000000000000E+000,0.127516993553621)
 START ii=           5
 ok_read= T
 sene(          12 ,           5 ) =  (0.000000000000000E+000,0.127855807553967)
 START ii=           6
 ok_read= T
 sene(          12 ,           6 ) =  (0.000000000000000E+000,0.109790062197128)
 START ii=           7
 ok_read= T
 sene(          12 ,           7 ) =  (0.000000000000000E+000,0.108216188431471)
 START ii=           8
 ok_read= T
 sene(          12 ,           8 ) =  (0.000000000000000E+000,0.127696393831655)
 START ii=           9
 ok_read= T
 sene(          12 ,           9 ) =  (0.000000000000000E+000,0.109280920980142)
 START ii=          10
 ok_read= T
 sene(          12 ,          10 ) =  (0.000000000000000E+000,0.109681508371879)
 START ii=          11
 ok_read= T
 sene(          12 ,          11 ) =  (0.000000000000000E+000,0.116061470907855)
 START ii=          12
 ok_read= T
 sene(          12 ,          12 ) =  (0.000000000000000E+000,0.108843522661695)
 START ii=          13
 ok_read= T
 sene(          12 ,          13 ) =  (0.000000000000000E+000,0.109276945026830)
 START ii=          14
 ok_read= T
 sene(          12 ,          14 ) = 
 (0.000000000000000E+000,9.802682839903784E-002)
 START ii=          15
 ok_read= T
 sene(          12 ,          15 ) = 
 (0.000000000000000E+000,9.824034463098949E-002)
 START ii=          16
 ok_read= T
 sene(          12 ,          16 ) = 
 (0.000000000000000E+000,6.555514483544742E-002)
 START ii=          17
 ok_read= T
 sene(          12 ,          17 ) = 
 (0.000000000000000E+000,6.576386537858471E-002)
 START ii=          18
 ok_read= T
 sene(          12 ,          18 ) = 
 (0.000000000000000E+000,5.417862965210503E-003)
 START ii=          19
 ok_read= T
 sene(          12 ,          19 ) = 
 (0.000000000000000E+000,4.117252524059190E-003)
 START ii=          20
 ok_read= T
 sene(          12 ,          20 ) = 
 (0.000000000000000E+000,4.296408859636798E-003)
 Positive imaginary time with it=          13
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 before allocate wtemp
 before collect_v_pot
 before dgemm1
 before dgemm2
 before free_memory
 deallocate
 CHECK 1
 START ii=           1
 ok_read= T
 sene(          13 ,           1 ) =  (0.000000000000000E+000,0.114323676958778)
 START ii=           2
 ok_read= T
 sene(          13 ,           2 ) =  (0.000000000000000E+000,0.112732405377275)
 START ii=           3
 ok_read= T
 sene(          13 ,           3 ) =  (0.000000000000000E+000,0.112837257396067)
 START ii=           4
 ok_read= T
 sene(          13 ,           4 ) =  (0.000000000000000E+000,0.104496938935714)
 START ii=           5
 ok_read= T
 sene(          13 ,           5 ) =  (0.000000000000000E+000,0.104754317202953)
 START ii=           6
 ok_read= T
 sene(          13 ,           6 ) = 
 (0.000000000000000E+000,9.100737598475411E-002)
 START ii=           7
 ok_read= T
 sene(          13 ,           7 ) = 
 (0.000000000000000E+000,9.037679993018057E-002)
 START ii=           8
 ok_read= T
 sene(          13 ,           8 ) =  (0.000000000000000E+000,0.105069670754724)
 START ii=           9
 ok_read= T
 sene(          13 ,           9 ) = 
 (0.000000000000000E+000,9.081203263466310E-002)
 START ii=          10
 ok_read= T
 sene(          13 ,          10 ) = 
 (0.000000000000000E+000,9.117669755953590E-002)
 START ii=          11
 ok_read= T
 sene(          13 ,          11 ) = 
 (0.000000000000000E+000,9.865637734951933E-002)
 START ii=          12
 ok_read= T
 sene(          13 ,          12 ) = 
 (0.000000000000000E+000,9.071283741347483E-002)
 START ii=          13
 ok_read= T
 sene(          13 ,          13 ) = 
 (0.000000000000000E+000,9.105194814914322E-002)
 START ii=          14
 ok_read= T
 sene(          13 ,          14 ) = 
 (0.000000000000000E+000,8.300734737651932E-002)
 START ii=          15
 ok_read= T
 sene(          13 ,          15 ) = 
 (0.000000000000000E+000,8.323233428295980E-002)
 START ii=          16
 ok_read= T
 sene(          13 ,          16 ) = 
 (0.000000000000000E+000,5.587081661394426E-002)
 START ii=          17
 ok_read= T
 sene(          13 ,          17 ) = 
 (0.000000000000000E+000,5.606202371994032E-002)
 START ii=          18
 ok_read= T
 sene(          13 ,          18 ) = 
 (0.000000000000000E+000,4.420754975531131E-003)
 START ii=          19
 ok_read= T
 sene(          13 ,          19 ) = 
 (0.000000000000000E+000,3.374548714204843E-003)
 START ii=          20
 ok_read= T
 sene(          13 ,          20 ) = 
 (0.000000000000000E+000,3.553212126679450E-003)
 Positive imaginary time with it=          14
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 before allocate wtemp
 before collect_v_pot
 before dgemm1
 before dgemm2
 before free_memory
 deallocate
 CHECK 1
 START ii=           1
 ok_read= T
 sene(          14 ,           1 ) = 
 (0.000000000000000E+000,9.077967226348627E-002)
 START ii=           2
 ok_read= T
 sene(          14 ,           2 ) = 
 (0.000000000000000E+000,9.036999987769855E-002)
 START ii=           3
 ok_read= T
 sene(          14 ,           3 ) = 
 (0.000000000000000E+000,9.048333583197000E-002)
 START ii=           4
 ok_read= T
 sene(          14 ,           4 ) = 
 (0.000000000000000E+000,8.492514989131347E-002)
 START ii=           5
 ok_read= T
 sene(          14 ,           5 ) = 
 (0.000000000000000E+000,8.511751208616022E-002)
 START ii=           6
 ok_read= T
 sene(          14 ,           6 ) = 
 (0.000000000000000E+000,7.486745352907898E-002)
 START ii=           7
 ok_read= T
 sene(          14 ,           7 ) = 
 (0.000000000000000E+000,7.491108282619989E-002)
 START ii=           8
 ok_read= T
 sene(          14 ,           8 ) = 
 (0.000000000000000E+000,8.577837888793388E-002)
 START ii=           9
 ok_read= T
 sene(          14 ,           9 ) = 
 (0.000000000000000E+000,7.491255876405710E-002)
 START ii=          10
 ok_read= T
 sene(          14 ,          10 ) = 
 (0.000000000000000E+000,7.523863490743049E-002)
 START ii=          11
 ok_read= T
 sene(          14 ,          11 ) = 
 (0.000000000000000E+000,8.341204111135718E-002)
 START ii=          12
 ok_read= T
 sene(          14 ,          12 ) = 
 (0.000000000000000E+000,7.504790037486748E-002)
 START ii=          13
 ok_read= T
 sene(          14 ,          13 ) = 
 (0.000000000000000E+000,7.531337404598364E-002)
 START ii=          14
 ok_read= T
 sene(          14 ,          14 ) = 
 (0.000000000000000E+000,6.986792258449839E-002)
 START ii=          15
 ok_read= T
 sene(          14 ,          15 ) = 
 (0.000000000000000E+000,7.009062316629477E-002)
 START ii=          16
 ok_read= T
 sene(          14 ,          16 ) = 
 (0.000000000000000E+000,4.738599931627521E-002)
 START ii=          17
 ok_read= T
 sene(          14 ,          17 ) = 
 (0.000000000000000E+000,4.756131566400858E-002)
 START ii=          18
 ok_read= T
 sene(          14 ,          18 ) = 
 (0.000000000000000E+000,3.578146026413285E-003)
 START ii=          19
 ok_read= T
 sene(          14 ,          19 ) = 
 (0.000000000000000E+000,2.744278715793492E-003)
 START ii=          20
 ok_read= T
 sene(          14 ,          20 ) = 
 (0.000000000000000E+000,2.916268827218208E-003)
 Positive imaginary time with it=          15
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 before allocate wtemp
 before collect_v_pot
 before dgemm1
 before dgemm2
 before free_memory
 deallocate
 CHECK 1
 START ii=           1
 ok_read= T
 sene(          15 ,           1 ) = 
 (0.000000000000000E+000,7.140408153895061E-002)
 START ii=           2
 ok_read= T
 sene(          15 ,           2 ) = 
 (0.000000000000000E+000,7.182311110131716E-002)
 START ii=           3
 ok_read= T
 sene(          15 ,           3 ) = 
 (0.000000000000000E+000,7.193570769691537E-002)
 START ii=           4
 ok_read= T
 sene(          15 ,           4 ) = 
 (0.000000000000000E+000,6.853982867684112E-002)
 START ii=           5
 ok_read= T
 sene(          15 ,           5 ) = 
 (0.000000000000000E+000,6.867722284343823E-002)
 START ii=           6
 ok_read= T
 sene(          15 ,           6 ) = 
 (0.000000000000000E+000,6.122982426234995E-002)
 START ii=           7
 ok_read= T
 sene(          15 ,           7 ) = 
 (0.000000000000000E+000,6.176412440875872E-002)
 START ii=           8
 ok_read= T
 sene(          15 ,           8 ) = 
 (0.000000000000000E+000,6.958176380009566E-002)
 START ii=           9
 ok_read= T
 sene(          15 ,           9 ) = 
 (0.000000000000000E+000,6.142284518999303E-002)
 START ii=          10
 ok_read= T
 sene(          15 ,          10 ) = 
 (0.000000000000000E+000,6.171246790946300E-002)
 START ii=          11
 ok_read= T
 sene(          15 ,          11 ) = 
 (0.000000000000000E+000,7.043711887582836E-002)
 START ii=          12
 ok_read= T
 sene(          15 ,          12 ) = 
 (0.000000000000000E+000,6.172967824534000E-002)
 START ii=          13
 ok_read= T
 sene(          15 ,          13 ) = 
 (0.000000000000000E+000,6.193346477761605E-002)
 START ii=          14
 ok_read= T
 sene(          15 ,          14 ) = 
 (0.000000000000000E+000,5.857112644835676E-002)
 START ii=          15
 ok_read= T
 sene(          15 ,          15 ) = 
 (0.000000000000000E+000,5.878643883301875E-002)
 START ii=          16
 ok_read= T
 sene(          15 ,          16 ) = 
 (0.000000000000000E+000,4.015206151011503E-002)
 START ii=          17
 ok_read= T
 sene(          15 ,          17 ) = 
 (0.000000000000000E+000,4.031174586804106E-002)
 START ii=          18
 ok_read= T
 sene(          15 ,          18 ) = 
 (0.000000000000000E+000,2.863215790833707E-003)
 START ii=          19
 ok_read= T
 sene(          15 ,          19 ) = 
 (0.000000000000000E+000,2.210283879563504E-003)
 START ii=          20
 ok_read= T
 sene(          15 ,          20 ) = 
 (0.000000000000000E+000,2.366856972980230E-003)
 Positive imaginary time with it=          16
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 before allocate wtemp
 before collect_v_pot
 before dgemm1
 before dgemm2
 before free_memory
 deallocate
 CHECK 1
 START ii=           1
 ok_read= T
 sene(          16 ,           1 ) = 
 (0.000000000000000E+000,5.522401792540310E-002)
 START ii=           2
 ok_read= T
 sene(          16 ,           2 ) = 
 (0.000000000000000E+000,5.612195667509089E-002)
 START ii=           3
 ok_read= T
 sene(          16 ,           3 ) = 
 (0.000000000000000E+000,5.622472605028472E-002)
 START ii=           4
 ok_read= T
 sene(          16 ,           4 ) = 
 (0.000000000000000E+000,5.439292264188238E-002)
 START ii=           5
 ok_read= T
 sene(          16 ,           5 ) = 
 (0.000000000000000E+000,5.448785700792282E-002)
 START ii=           6
 ok_read= T
 sene(          16 ,           6 ) = 
 (0.000000000000000E+000,4.928108687220605E-002)
 START ii=           7
 ok_read= T
 sene(          16 ,           7 ) = 
 (0.000000000000000E+000,5.012250418432299E-002)
 START ii=           8
 ok_read= T
 sene(          16 ,           8 ) = 
 (0.000000000000000E+000,5.549982492743663E-002)
 START ii=           9
 ok_read= T
 sene(          16 ,           9 ) = 
 (0.000000000000000E+000,4.957715487834254E-002)
 START ii=          10
 ok_read= T
 sene(          16 ,          10 ) = 
 (0.000000000000000E+000,4.982825366289476E-002)
 START ii=          11
 ok_read= T
 sene(          16 ,          11 ) = 
 (0.000000000000000E+000,5.860132865556335E-002)
 START ii=          12
 ok_read= T
 sene(          16 ,          12 ) = 
 (0.000000000000000E+000,4.997108127442920E-002)
 START ii=          13
 ok_read= T
 sene(          16 ,          13 ) = 
 (0.000000000000000E+000,5.012693066221498E-002)
 START ii=          14
 ok_read= T
 sene(          16 ,          14 ) = 
 (0.000000000000000E+000,4.837390066624166E-002)
 START ii=          15
 ok_read= T
 sene(          16 ,          15 ) = 
 (0.000000000000000E+000,4.857254723692569E-002)
 START ii=          16
 ok_read= T
 sene(          16 ,          16 ) = 
 (0.000000000000000E+000,3.354748079766701E-002)
 START ii=          17
 ok_read= T
 sene(          16 ,          17 ) = 
 (0.000000000000000E+000,3.369281342392333E-002)
 START ii=          18
 ok_read= T
 sene(          16 ,          18 ) = 
 (0.000000000000000E+000,2.258062925411706E-003)
 START ii=          19
 ok_read= T
 sene(          16 ,          19 ) = 
 (0.000000000000000E+000,1.753157871334876E-003)
 START ii=          20
 ok_read= T
 sene(          16 ,          20 ) = 
 (0.000000000000000E+000,1.894847718796257E-003)
 Positive imaginary time with it=          17
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 before allocate wtemp
 before collect_v_pot
 before dgemm1
 before dgemm2
 before free_memory
 deallocate
 CHECK 1
 START ii=           1
 ok_read= T
 sene(          17 ,           1 ) = 
 (0.000000000000000E+000,4.244343488079227E-002)
 START ii=           2
 ok_read= T
 sene(          17 ,           2 ) = 
 (0.000000000000000E+000,4.357559678989022E-002)
 START ii=           3
 ok_read= T
 sene(          17 ,           3 ) = 
 (0.000000000000000E+000,4.366379024803299E-002)
 START ii=           4
 ok_read= T
 sene(          17 ,           4 ) = 
 (0.000000000000000E+000,4.290722508102039E-002)
 START ii=           5
 ok_read= T
 sene(          17 ,           5 ) = 
 (0.000000000000000E+000,4.297111854158874E-002)
 START ii=           6
 ok_read= T
 sene(          17 ,           6 ) = 
 (0.000000000000000E+000,3.945257896909232E-002)
 START ii=           7
 ok_read= T
 sene(          17 ,           7 ) = 
 (0.000000000000000E+000,4.044754942086690E-002)
 START ii=           8
 ok_read= T
 sene(          17 ,           8 ) = 
 (0.000000000000000E+000,4.403142134617790E-002)
 START ii=           9
 ok_read= T
 sene(          17 ,           9 ) = 
 (0.000000000000000E+000,3.980984327753768E-002)
 START ii=          10
 ok_read= T
 sene(          17 ,          10 ) = 
 (0.000000000000000E+000,4.002396562170968E-002)
 START ii=          11
 ok_read= T
 sene(          17 ,          11 ) = 
 (0.000000000000000E+000,4.861915781161347E-002)
 START ii=          12
 ok_read= T
 sene(          17 ,          12 ) = 
 (0.000000000000000E+000,4.023732294401549E-002)
 START ii=          13
 ok_read= T
 sene(          17 ,          13 ) = 
 (0.000000000000000E+000,4.035763468682155E-002)
 START ii=          14
 ok_read= T
 sene(          17 ,          14 ) = 
 (0.000000000000000E+000,3.979294335709896E-002)
 START ii=          15
 ok_read= T
 sene(          17 ,          15 ) = 
 (0.000000000000000E+000,3.996919850620360E-002)
 START ii=          16
 ok_read= T
 sene(          17 ,          16 ) = 
 (0.000000000000000E+000,2.796790982735177E-002)
 START ii=          17
 ok_read= T
 sene(          17 ,          17 ) = 
 (0.000000000000000E+000,2.810015882718310E-002)
 START ii=          18
 ok_read= T
 sene(          17 ,          18 ) = 
 (0.000000000000000E+000,1.770457480771168E-003)
 START ii=          19
 ok_read= T
 sene(          17 ,          19 ) = 
 (0.000000000000000E+000,1.382763041250447E-003)
 START ii=          20
 ok_read= T
 sene(          17 ,          20 ) = 
 (0.000000000000000E+000,1.508105043841906E-003)
 Positive imaginary time with it=          18
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 before allocate wtemp
 before collect_v_pot
 before dgemm1
 before dgemm2
 before free_memory
 deallocate
 CHECK 1
 START ii=           1
 ok_read= T
 sene(          18 ,           1 ) = 
 (0.000000000000000E+000,3.236727010552439E-002)
 START ii=           2
 ok_read= T
 sene(          18 ,           2 ) = 
 (0.000000000000000E+000,3.359166791664862E-002)
 START ii=           3
 ok_read= T
 sene(          18 ,           3 ) = 
 (0.000000000000000E+000,3.366492142303270E-002)
 START ii=           4
 ok_read= T
 sene(          18 ,           4 ) = 
 (0.000000000000000E+000,3.366016473694382E-002)
 START ii=           5
 ok_read= T
 sene(          18 ,           5 ) = 
 (0.000000000000000E+000,3.369959385580956E-002)
 START ii=           6
 ok_read= T
 sene(          18 ,           6 ) = 
 (0.000000000000000E+000,3.145300229742656E-002)
 START ii=           7
 ok_read= T
 sene(          18 ,           7 ) = 
 (0.000000000000000E+000,3.250993883273143E-002)
 START ii=           8
 ok_read= T
 sene(          18 ,           8 ) = 
 (0.000000000000000E+000,3.477247577655598E-002)
 START ii=           9
 ok_read= T
 sene(          18 ,           9 ) = 
 (0.000000000000000E+000,3.182438059510554E-002)
 START ii=          10
 ok_read= T
 sene(          18 ,          10 ) = 
 (0.000000000000000E+000,3.200575474958676E-002)
 START ii=          11
 ok_read= T
 sene(          18 ,          11 ) = 
 (0.000000000000000E+000,4.037237840506696E-002)
 START ii=          12
 ok_read= T
 sene(          18 ,          12 ) = 
 (0.000000000000000E+000,3.225726215004524E-002)
 START ii=          13
 ok_read= T
 sene(          18 ,          13 ) = 
 (0.000000000000000E+000,3.234870319123644E-002)
 START ii=          14
 ok_read= T
 sene(          18 ,          14 ) = 
 (0.000000000000000E+000,3.264618143406699E-002)
 START ii=          15
 ok_read= T
 sene(          18 ,          15 ) = 
 (0.000000000000000E+000,3.280029532967767E-002)
 START ii=          16
 ok_read= T
 sene(          18 ,          16 ) = 
 (0.000000000000000E+000,2.334288226460095E-002)
 START ii=          17
 ok_read= T
 sene(          18 ,          17 ) = 
 (0.000000000000000E+000,2.346228823578874E-002)
 START ii=          18
 ok_read= T
 sene(          18 ,          18 ) = 
 (0.000000000000000E+000,1.374051316430210E-003)
 START ii=          19
 ok_read= T
 sene(          18 ,          19 ) = 
 (0.000000000000000E+000,1.081471106505692E-003)
 START ii=          20
 ok_read= T
 sene(          18 ,          20 ) = 
 (0.000000000000000E+000,1.188074947248090E-003)
 Positive imaginary time with it=          19
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 before allocate wtemp
 before collect_v_pot
 before dgemm1
 before dgemm2
 before free_memory
 deallocate
 CHECK 1
 START ii=           1
 ok_read= T
 sene(          19 ,           1 ) = 
 (0.000000000000000E+000,2.438510264095382E-002)
 START ii=           2
 ok_read= T
 sene(          19 ,           2 ) = 
 (0.000000000000000E+000,2.555602434976670E-002)
 START ii=           3
 ok_read= T
 sene(          19 ,           3 ) = 
 (0.000000000000000E+000,2.561369356012399E-002)
 START ii=           4
 ok_read= T
 sene(          19 ,           4 ) = 
 (0.000000000000000E+000,2.603553423526551E-002)
 START ii=           5
 ok_read= T
 sene(          19 ,           5 ) = 
 (0.000000000000000E+000,2.605895190322728E-002)
 START ii=           6
 ok_read= T
 sene(          19 ,           6 ) = 
 (0.000000000000000E+000,2.473087661465861E-002)
 START ii=           7
 ok_read= T
 sene(          19 ,           7 ) = 
 (0.000000000000000E+000,2.576357213953816E-002)
 START ii=           8
 ok_read= T
 sene(          19 ,           8 ) = 
 (0.000000000000000E+000,2.707226114072636E-002)
 START ii=           9
 ok_read= T
 sene(          19 ,           9 ) = 
 (0.000000000000000E+000,2.510275939400528E-002)
 START ii=          10
 ok_read= T
 sene(          19 ,          10 ) = 
 (0.000000000000000E+000,2.525242723655861E-002)
 START ii=          11
 ok_read= T
 sene(          19 ,          11 ) = 
 (0.000000000000000E+000,3.306839209774668E-002)
 START ii=          12
 ok_read= T
 sene(          19 ,          12 ) = 
 (0.000000000000000E+000,2.550286872893250E-002)
 START ii=          13
 ok_read= T
 sene(          19 ,          13 ) = 
 (0.000000000000000E+000,2.557359340593196E-002)
 START ii=          14
 ok_read= T
 sene(          19 ,          14 ) = 
 (0.000000000000000E+000,2.643233618632957E-002)
 START ii=          15
 ok_read= T
 sene(          19 ,          15 ) = 
 (0.000000000000000E+000,2.656079995828475E-002)
 START ii=          16
 ok_read= T
 sene(          19 ,          16 ) = 
 (0.000000000000000E+000,1.923832581432529E-002)
 START ii=          17
 ok_read= T
 sene(          19 ,          17 ) = 
 (0.000000000000000E+000,1.934634636493575E-002)
 START ii=          18
 ok_read= T
 sene(          19 ,          18 ) = 
 (0.000000000000000E+000,1.056627457430290E-003)
 START ii=          19
 ok_read= T
 sene(          19 ,          19 ) = 
 (0.000000000000000E+000,8.365012854360518E-004)
 START ii=          20
 ok_read= T
 sene(          19 ,          20 ) = 
 (0.000000000000000E+000,9.275288893893660E-004)
 Positive imaginary time with it=          20
 Read polaw1
 Read polaw2
 Read polaw3         159
 Read polaw4
 Read polaw5
 Read polaw6
 after read_polaw
 before allocate wtemp
 before collect_v_pot
 before dgemm1
 before dgemm2
 before free_memory
 deallocate
 CHECK 1
 START ii=           1
 ok_read= T
 sene(          20 ,           1 ) = 
 (0.000000000000000E+000,1.837044636939927E-002)
 START ii=           2
 ok_read= T
 sene(          20 ,           2 ) = 
 (0.000000000000000E+000,1.945077455617193E-002)
 START ii=           3
 ok_read= T
 sene(          20 ,           3 ) = 
 (0.000000000000000E+000,1.949499250027745E-002)
 START ii=           4
 ok_read= T
 sene(          20 ,           4 ) = 
 (0.000000000000000E+000,2.018293687408269E-002)
 START ii=           5
 ok_read= T
 sene(          20 ,           5 ) = 
 (0.000000000000000E+000,2.019466964213011E-002)
 START ii=           6
 ok_read= T
 sene(          20 ,           6 ) = 
 (0.000000000000000E+000,1.951658689807173E-002)
 START ii=           7
 ok_read= T
 sene(          20 ,           7 ) = 
 (0.000000000000000E+000,2.048144272459250E-002)
 START ii=           8
 ok_read= T
 sene(          20 ,           8 ) = 
 (0.000000000000000E+000,2.116461959153490E-002)
 START ii=           9
 ok_read= T
 sene(          20 ,           9 ) = 
 (0.000000000000000E+000,1.986613561426337E-002)
 START ii=          10
 ok_read= T
 sene(          20 ,          10 ) = 
 (0.000000000000000E+000,1.998936640540752E-002)
 START ii=          11
 ok_read= T
 sene(          20 ,          11 ) = 
 (0.000000000000000E+000,2.734482704593102E-002)
 START ii=          12
 ok_read= T
 sene(          20 ,          12 ) = 
 (0.000000000000000E+000,2.022743306360136E-002)
 START ii=          13
 ok_read= T
 sene(          20 ,          13 ) = 
 (0.000000000000000E+000,2.028196714080900E-002)
 START ii=          14
 ok_read= T
 sene(          20 ,          14 ) = 
 (0.000000000000000E+000,2.150858718222502E-002)
 START ii=          15
 ok_read= T
 sene(          20 ,          15 ) = 
 (0.000000000000000E+000,2.161426507822461E-002)
 START ii=          16
 ok_read= T
 sene(          20 ,          16 ) = 
 (0.000000000000000E+000,1.600538771988204E-002)
 START ii=          17
 ok_read= T
 sene(          20 ,          17 ) = 
 (0.000000000000000E+000,1.610237238424968E-002)
 START ii=          18
 ok_read= T
 sene(          20 ,          18 ) = 
 (0.000000000000000E+000,8.096586044121076E-004)
 START ii=          19
 ok_read= T
 sene(          20 ,          19 ) = 
 (0.000000000000000E+000,6.462698606596487E-004)
 START ii=          20
 ok_read= T
 sene(          20 ,          20 ) = 
 (0.000000000000000E+000,7.210289912921814E-004)
 ENE_HF  -1.96203456698001     
 starting_point <=7
 a_0 (0.000000000000000E+000,0.000000000000000E+000)
 a (9.999999776482582E-003,0.000000000000000E+000)
 (1.999999955296516E-002,0.000000000000000E+000)
 b (-0.500000000000000,-9.999999776482582E-003)
 (1.00000000000000,-9.999999776482582E-003)
 z,s (0.000000000000000E+000,0.166666671633720)
 (0.178796866795599,-1.861839364282467E-002)
 (-1.614434534243436E-003,-9.708741989780291E-003)
 z,s (0.000000000000000E+000,10.0833330154419)
 (5.944684837709939E-003,-5.481610465758680E-002)
 (-1.454505572673048E-004,-2.950572381143110E-003)
 Grad a_0 (-6.50411305478198,9.41415082704177)
 Grad a (-5.03201326622848,-2.64831635374465)
 Grad a (-0.174371633548427,-3.26204834055216)
 Routine fit_multipole: chi1 > chi0 
 Routine fit_multipole: chi1 > chi0 
 Routine fit_multipole: maxiter reached   3.303008036794036E-002
 Calling minpack
 Chi0 initial:  3.303008036794036E-002
  INFO :           7  1.000000000000000E-180
 Minpack fit chi0 :  1.671616611472824E-006
 FIT state :           1
 FIT    a_0: (-7.241986226290464E-003,4.250601399689913E-003)
 FIT    a:           1 (0.558439135551453,6.464254111051559E-002)
 FIT    b:           1 (-2.34212446212769,-0.276398599147797)
 FIT    a:           2 (0.107342913746834,-2.954028546810150E-002)
 FIT    b:           2 (2.09144592285156,-0.684596359729767)
 a_0 (0.000000000000000E+000,0.000000000000000E+000)
 a (9.999999776482582E-003,0.000000000000000E+000)
 (1.999999955296516E-002,0.000000000000000E+000)
 b (-0.500000000000000,-9.999999776482582E-003)
 (1.00000000000000,-9.999999776482582E-003)
 z,s (0.000000000000000E+000,0.166666671633720)
 (0.163756886370703,-1.952045097929645E-002)
 (-1.614434534243436E-003,-9.708741989780291E-003)
 z,s (0.000000000000000E+000,10.0833330154419)
 (4.757915585419987E-003,-5.276221702737573E-002)
 (-1.454505572673048E-004,-2.950572381143110E-003)
 Grad a_0 (-5.75680108549703,9.27261042190360)
 Grad a (-4.83676384982809,-2.27818833758486)
 Grad a (-0.365438148572461,-3.04616541321496)
 Routine fit_multipole: chi1 > chi0 
 Routine fit_multipole: chi1 > chi0 
 Routine fit_multipole: maxiter reached   2.863788658487938E-002
 Calling minpack
 Chi0 initial:  2.863788658487938E-002
  INFO :           7  1.000000000000000E-180
 Minpack fit chi0 :  1.421027806723028E-006
 FIT state :           2
 FIT    a_0: (-6.558831781148911E-003,3.862700890749693E-003)
 FIT    a:           1 (0.513258039951324,6.031468883156776E-002)
 FIT    b:           1 (-2.22913050651550,-0.260088175535202)
 FIT    a:           2 (0.120084360241890,-2.819565124809742E-002)
 FIT    b:           2 (2.03287410736084,-0.575351476669312)
 a_0 (0.000000000000000E+000,0.000000000000000E+000)
 a (9.999999776482582E-003,0.000000000000000E+000)
 (1.999999955296516E-002,0.000000000000000E+000)
 b (-0.500000000000000,-9.999999776482582E-003)
 (1.00000000000000,-9.999999776482582E-003)
 z,s (0.000000000000000E+000,0.166666671633720)
 (0.163208164283744,-1.957046872663727E-002)
 (-1.614434534243436E-003,-9.708741989780291E-003)
 z,s (0.000000000000000E+000,10.0833330154419)
 (4.689033948899882E-003,-5.277887249083713E-002)
 (-1.454505572673048E-004,-2.950572381143110E-003)
 Grad a_0 (-5.72460919625791,9.28548270860957)
 Grad a (-4.83481134106716,-2.26221579320701)
 Grad a (-0.377101356382788,-3.03927323869092)
 Routine fit_multipole: chi1 > chi0 
 Routine fit_multipole: chi1 > chi0 
 Routine fit_multipole: maxiter reached   2.824979797253413E-002
 Calling minpack
 Chi0 initial:  2.824979797253413E-002
  INFO :           7  1.000000000000000E-180
 Minpack fit chi0 :  1.371625606312322E-006
 FIT state :           3
 FIT    a_0: (-6.463127210736275E-003,3.844562685117126E-003)
 FIT    a:           1 (0.511957228183746,5.923876911401749E-002)
 FIT    b:           1 (-2.22600698471069,-0.256364464759827)
 FIT    a:           2 (0.120916657149792,-2.835216373205185E-002)
 FIT    b:           2 (2.03441596031189,-0.571497738361359)
 a_0 (0.000000000000000E+000,0.000000000000000E+000)
 a (9.999999776482582E-003,0.000000000000000E+000)
 (1.999999955296516E-002,0.000000000000000E+000)
 b (-0.500000000000000,-9.999999776482582E-003)
 (1.00000000000000,-9.999999776482582E-003)
 z,s (0.000000000000000E+000,0.166666671633720)
 (0.136924941924772,-1.969656967069542E-002)
 (-1.614434534243436E-003,-9.708741989780291E-003)
 z,s (0.000000000000000E+000,10.0833330154419)
 (2.995085926234820E-003,-4.776163844288638E-002)
 (-1.454505572673048E-004,-2.950572381143110E-003)
 Grad a_0 (-4.47799025771693,8.58625453563880)
 Grad a (-4.31719954715429,-1.68836314347675)
 Grad a (-0.581134987099673,-2.58970992893783)
 Routine fit_multipole: chi1 > chi0 
 Routine fit_multipole: chi1 > chi0 
 Routine fit_multipole: maxiter reached   2.070718819167849E-002
 Calling minpack
 Chi0 initial:  2.070718819167849E-002
  INFO :           7  1.000000000000000E-180
 Minpack fit chi0 :  1.507761958938056E-006
 FIT state :           4
 FIT    a_0: (-5.562808364629745E-003,3.535952186211944E-003)
 FIT    a:           1 (0.434142649173737,5.444661527872086E-002)
 FIT    b:           1 (-2.07230710983276,-0.258662462234497)
 FIT    a:           2 (0.135502487421036,-2.531268447637558E-002)
 FIT    b:           2 (2.06471300125122,-0.460367172956467)
 a_0 (0.000000000000000E+000,0.000000000000000E+000)
 a (9.999999776482582E-003,0.000000000000000E+000)
 (1.999999955296516E-002,0.000000000000000E+000)
 b (-0.500000000000000,-9.999999776482582E-003)
 (1.00000000000000,-9.999999776482582E-003)
 z,s (0.000000000000000E+000,0.166666671633720)
 (0.136933565185425,-1.975798023573523E-002)
 (-1.614434534243436E-003,-9.708741989780291E-003)
 z,s (0.000000000000000E+000,10.0833330154419)
 (2.992312746217621E-003,-4.801153808080399E-002)
 (-1.454505572673048E-004,-2.950572381143110E-003)
 Grad a_0 (-4.48056870948920,8.63056541516444)
 Grad a (-4.33050012208463,-1.68584551522671)
 Grad a (-0.591279746343272,-2.59553375633887)
 Routine fit_multipole: chi1 > chi0 
 Routine fit_multipole: chi1 > chi0 
 Routine fit_multipole: maxiter reached   2.095865985318981E-002
 Calling minpack
 Chi0 initial:  2.095865985318981E-002
  INFO :           7  1.000000000000000E-180
 Minpack fit chi0 :  1.502369888161376E-006
 FIT state :           5
 FIT    a_0: (-5.553646478801966E-003,3.560745390132070E-003)
 FIT    a:           1 (0.435937583446503,5.445789173245430E-002)
 FIT    b:           1 (-2.07520079612732,-0.258619070053101)
 FIT    a:           2 (0.136818736791611,-2.563784085214138E-002)
 FIT    b:           2 (2.06713509559631,-0.460334926843643)
 value, zeta:           1 (0.466090898207525,6.402589121210683E-002)
 (-0.437793770382166,-0.175981637531046)
 XC-DFT energy           1  -1.13478824613261     
 H-DFT energy           1   147.587282087346     
 (147.587286998277,0.000000000000000E+000)
 GW-PERT energy           1  -22.9098600204742     
 Iteration energy           1 (0.567338612527591,6.329686996486676E-002)
 Iteration energy           2 (0.556906854425050,6.087487560821989E-002)
 Iteration energy           3 (0.562790650498945,6.465115504593688E-002)
 Iteration energy           4 (0.559985507896607,6.102179601745296E-002)
 Iteration energy           5 (0.560919941941546,6.387273652593650E-002)
 Iteration energy           6 (0.560970658914311,6.190773080743577E-002)
 Iteration energy           7 (0.560508698756816,6.310880524350121E-002)
 Iteration energy           8 (0.561057613068305,6.246946319835488E-002)
 Iteration energy           9 (0.560578653320555,6.274349893395151E-002)
 Iteration energy          10 (0.560934263172760,6.267964611361740E-002)
 value, zeta:           2 (0.387731286369780,3.955016574151107E-002)
 (-0.360297032388514,-0.115649272932898)
 XC-DFT energy           2  -1.14009906752104     
 H-DFT energy           2   137.379633822275     
 (137.379631471469,0.000000000000000E+000)
 GW-PERT energy           2  -20.4193010706408     
 Iteration energy           1 (0.475166348839399,4.634663187781180E-002)
 Iteration energy           2 (0.468331571954921,4.353192151669728E-002)
 Iteration energy           3 (0.471305758073369,4.602822473335484E-002)
 Iteration energy           4 (0.470211822108726,4.429792104533017E-002)
 Iteration energy           5 (0.470484832610160,4.534026024100841E-002)
 Iteration energy           6 (0.470514486800015,4.477353486867097E-002)
 Iteration energy           7 (0.470409156869974,4.505319558037828E-002)
 Iteration energy           8 (0.470506683596143,4.492969434192110E-002)
 Iteration energy           9 (0.470438022061281,4.497609693307162E-002)
 Iteration energy          10 (0.470479886357387,4.496377827073671E-002)
 value, zeta:           3 (0.387819010117641,3.922844589414708E-002)
 (-0.362059514552917,-0.114982071013830)
 XC-DFT energy           3  -1.14009625440481     
 H-DFT energy           3   137.364897830209     
 (137.364891418261,0.000000000000000E+000)
 GW-PERT energy           3  -20.4163463230894     
 Iteration energy           1 (0.475503917557038,4.591467025502953E-002)
 Iteration energy           2 (0.468592874751639,4.311484492576865E-002)
 Iteration energy           3 (0.471629238845216,4.561663994443470E-002)
 Iteration energy           4 (0.470494083097392,4.386972990234322E-002)
 Iteration energy           5 (0.470789975589847,4.493061949856120E-002)
 Iteration energy           6 (0.470809247814166,4.434830070521811E-002)
 Iteration energy           7 (0.470707167045674,4.463906097362939E-002)
 Iteration energy           8 (0.470804828462053,4.450857109697753E-002)
 Iteration energy           9 (0.470734845080357,4.455891490930294E-002)
 Iteration energy          10 (0.470778144276904,4.454462188522724E-002)
 value, zeta:           4 (0.284622972410047,2.120971514282127E-002)
 (-0.268077671992334,-6.980174758043245E-002)
 XC-DFT energy           4  -1.12374156401822     
 H-DFT energy           4   127.037167838181     
 (127.037161549562,0.000000000000000E+000)
 GW-PERT energy           4  -16.8413401232959     
 Iteration energy           1 (0.346676131237964,2.926776666876722E-002)
 Iteration energy           2 (0.343786848652580,2.766984353662039E-002)
 Iteration energy           3 (0.344654441672548,2.853700974303781E-002)
 Iteration energy           4 (0.344433750040955,2.813747093065308E-002)
 Iteration energy           5 (0.344471492108971,2.830298616370516E-002)
 Iteration energy           6 (0.344475058169782,2.823993969308386E-002)
 Iteration energy           7 (0.344467289168313,2.826210628750586E-002)
 Iteration energy           8 (0.344472349559686,2.825498404812207E-002)
 Iteration energy           9 (0.344469807174029,2.825700833450690E-002)
 Iteration energy          10 (0.344470924399745,2.825654674113609E-002)
 value, zeta:           5 (0.284840593369445,2.118981021326363E-002)
 (-0.268166974473805,-6.965459716986339E-002)
 XC-DFT energy           5  -1.12380579768034     
 H-DFT energy           5   126.941926930037     
 (126.941922121263,0.000000000000000E+000)
 GW-PERT energy           5  -16.8395002272061     
 Iteration energy           1 (0.346830736411925,2.920636351050494E-002)
 Iteration energy           2 (0.343955155871250,2.762109051809628E-002)
 Iteration energy           3 (0.344819013603686,2.848097141507412E-002)
 Iteration energy           4 (0.344598814687797,2.808493058360654E-002)
 Iteration energy           5 (0.344636824580227,2.824897353994547E-002)
 Iteration energy           6 (0.344640095508897,2.818647830843581E-002)
 Iteration energy           7 (0.344632511192616,2.820846437013020E-002)
 Iteration energy           8 (0.344637477539527,2.820139029258474E-002)
 Iteration energy           9 (0.344634977372529,2.820340707034887E-002)
 Iteration energy          10 (0.344636077435359,2.820294343107650E-002)
 value, zeta:           6 (0.218140635341056,1.586253852506177E-002)
 (-0.220431719356365,-5.779549066635920E-002)
 XC-DFT energy           6  -1.04525004833411     
 H-DFT energy           6   119.060730306779     
 (119.060729675537,0.000000000000000E+000)
 GW-PERT energy           6  -14.7920953493803     
 Iteration energy           1 (0.266298721545149,2.375292332561018E-002)
 Iteration energy           2 (0.264708210903822,2.263381137308300E-002)
 Iteration energy           3 (0.265066181039392,2.309424846836339E-002)
 Iteration energy           4 (0.265003986239617,2.293061874857424E-002)
 Iteration energy           5 (0.265007446813817,2.298303646938521E-002)
 Iteration energy           6 (0.265011063655393,2.296769211569029E-002)
 Iteration energy           7 (0.265008676583192,2.297177682402970E-002)
 Iteration energy           8 (0.265009720695473,2.297081471730582E-002)
 Iteration energy           9 (0.265009336505973,2.297099895840391E-002)
 Iteration energy          10 (0.265009462942295,2.297097987846348E-002)
 value, zeta:           7 (0.190503778404846,9.814426500796265E-003)
 (-0.202894461042118,-4.288533854484587E-002)
 XC-DFT energy           7  -1.06566566577594     
 H-DFT energy           7   103.989320095093     
 (103.989317216713,0.000000000000000E+000)
 GW-PERT energy           7  -13.3669419137118     
 Iteration energy           1 (0.239245055286565,1.780234989779170E-002)
 Iteration energy           2 (0.237691632856331,1.671715973622225E-002)
 Iteration energy           3 (0.238029250140711,1.711765237059735E-002)
 Iteration energy           4 (0.237967653635026,1.698648078225850E-002)
 Iteration energy           5 (0.237974746939797,1.702593264673383E-002)
 Iteration energy           6 (0.237975669660810,1.701488314764117E-002)
 Iteration energy           7 (0.237974633820252,1.701777003102659E-002)
 Iteration energy           8 (0.237975116843212,1.701707255368812E-002)
 Iteration energy           9 (0.237974937942473,1.701722443976926E-002)
 Iteration energy          10 (0.237974996599896,1.701719662987258E-002)
 value, zeta:           8 (0.229792771476260,9.870635666073902E-003)
 (-0.196288364957037,-4.000997017749471E-002)
 XC-DFT energy           8  -1.19191656179220     
 H-DFT energy           8   142.697013760709     
 (142.697014838505,0.000000000000000E+000)
 GW-PERT energy           8  -12.2102543629495     
 Iteration energy           1 (0.259369002711063,1.348045416206262E-002)
 Iteration energy           2 (0.258870371367107,1.320149331861022E-002)
 Iteration energy           3 (0.258970323227621,1.329228159807706E-002)
 Iteration energy           4 (0.258952145634608,1.326604485651056E-002)
 Iteration energy           5 (0.258954933210486,1.327305565341782E-002)
 Iteration energy           6 (0.258954664981037,1.327129257952754E-002)
 Iteration energy           7 (0.258954632771871,1.327171288712024E-002)
 Iteration energy           8 (0.258954662593226,1.327161781336978E-002)
 Iteration energy           9 (0.258954650658004,1.327163811785661E-002)
 Iteration energy          10 (0.258954654488818,1.327163407822720E-002)
 value, zeta:           9 (0.184434020114950,7.608287433673045E-003)
 (-0.177950105744516,-3.498511822554831E-002)
 XC-DFT energy           9  -1.09301617521517     
 H-DFT energy           9   122.532596851139     
 (122.532596099002,0.000000000000000E+000)
 GW-PERT energy           9  -11.9898432161430     
 Iteration energy           1 (0.218935007669987,1.283088872111622E-002)
 Iteration energy           2 (0.218248774390872,1.237328754972615E-002)
 Iteration energy           3 (0.218374633612253,1.250958240746719E-002)
 Iteration energy           4 (0.218354321749608,1.247311761787537E-002)
 Iteration energy           5 (0.218356834890669,1.248216588943627E-002)
 Iteration energy           6 (0.218356763925768,1.248005431004062E-002)
 Iteration energy           7 (0.218356667756266,1.248051981781442E-002)
 Iteration energy           8 (0.218356713408577,1.248042310865876E-002)
 Iteration energy           9 (0.218356698310199,1.248044184203799E-002)
 Iteration energy          10 (0.218356702602738,1.248043854407956E-002)
 value, zeta:          10 (0.184630101452915,7.590620575626101E-003)
 (-0.179263094026092,-3.504286039537619E-002)
 XC-DFT energy          10  -1.09298812318371     
 H-DFT energy          10   122.415221647479     
 (122.415220640093,0.000000000000000E+000)
 GW-PERT energy          10  -11.9895313994328     
 Iteration energy           1 (0.219393080410406,1.281880319651079E-002)
 Iteration energy           2 (0.218693427036303,1.235483127120978E-002)
 Iteration energy           3 (0.218823028719968,1.249415739840215E-002)
 Iteration energy           4 (0.218801855814879,1.245656565972215E-002)
 Iteration energy           5 (0.218804528290587,1.246597530068352E-002)
 Iteration energy           6 (0.218804438525371,1.246375934708829E-002)
 Iteration energy           7 (0.218804340725623,1.246425256684432E-002)
 Iteration energy           8 (0.218804388455475,1.246414903746712E-002)
 Iteration energy           9 (0.218804372440859,1.246416932542590E-002)
 Iteration energy          10 (0.218804377047471,1.246416570320562E-002)
 value, zeta:          11 (0.179965022763453,2.010798580068079E-002)
 (-0.247937460821034,-0.104996151934942)
 XC-DFT energy          11 -0.941317493978321     
 H-DFT energy          11   126.129251641883     
 (126.129246934176,0.000000000000000E+000)
 GW-PERT energy          11  -10.0222829304997     
 Iteration energy           1 (0.212225548139541,2.689873501820445E-002)
 Iteration energy           2 (0.211856759798637,2.621581047706874E-002)
 Iteration energy           3 (0.211865149886227,2.645699818044345E-002)
 Iteration energy           4 (0.211896161310203,2.638866251200821E-002)
 Iteration energy           5 (0.211878076372283,2.640341042907998E-002)
 Iteration energy           6 (0.211885152512909,2.640180268692146E-002)
 Iteration energy           7 (0.211882959250284,2.640127227874216E-002)
 Iteration energy           8 (0.211883496838721,2.640172322230668E-002)
 Iteration energy           9 (0.211883409438121,2.640152329794334E-002)
 Iteration energy          10 (0.211883406144608,2.640159106765293E-002)
 value, zeta:          12 (0.162328776948068,2.691486325166749E-003)
 (-0.156122493919087,-2.089667872707058E-002)
 XC-DFT energy          12  -1.13226660499385     
 H-DFT energy          12   121.863701589755     
 (121.863701307689,0.000000000000000E+000)
 GW-PERT energy          12  -9.77248776428063     
 Iteration energy           1 (0.188526537250418,5.883712705618729E-003)
 Iteration energy           2 (0.188165801986077,5.672448938936709E-003)
 Iteration energy           3 (0.188225421230616,5.723016326537341E-003)
 Iteration energy           4 (0.188216073701076,5.711772974024986E-003)
 Iteration energy           5 (0.188217432111418,5.714146369634732E-003)
 Iteration energy           6 (0.188217258614912,5.713665236660827E-003)
 Iteration energy           7 (0.188217275018587,5.713759477382681E-003)
 Iteration energy           8 (0.188217275043940,5.713741586620916E-003)
 Iteration energy           9 (0.188217274460800,5.713744881513712E-003)
 Iteration energy          10 (0.188217274674758,5.713744293406250E-003)
 value, zeta:          13 (0.163023111175200,2.712875590593672E-003)
 (-0.156640800315943,-2.109278247195877E-002)
 XC-DFT energy          13  -1.13290956904551     
 H-DFT energy          13   121.817032198223     
 (121.817028797663,0.000000000000000E+000)
 GW-PERT energy          13  -9.76592639318667     
 Iteration energy           1 (0.189226050509636,5.920431570678541E-003)
 Iteration energy           2 (0.188866132976714,5.708081914308312E-003)
 Iteration energy           3 (0.188925680816770,5.759017870963296E-003)
 Iteration energy           4 (0.188916343622576,5.747669203203673E-003)
 Iteration energy           5 (0.188917698151430,5.750069482825525E-003)
 Iteration energy           6 (0.188917526230426,5.749582032614234E-003)
 Iteration energy           7 (0.188917542092657,5.749677661645906E-003)
 Iteration energy           8 (0.188917542280294,5.749659483289699E-003)
 Iteration energy           9 (0.188917541653091,5.749662834453905E-003)
 Iteration energy          10 (0.188917541878162,5.749662235986721E-003)
 value, zeta:          14 (7.036104067140803E-002,-3.548489128328506E-003)
 (-0.212889153258418,-1.402724234214200E-002)
 XC-DFT energy          14 -0.957505009036466     
 H-DFT energy          14   123.580887021831     
 (123.580891555637,0.000000000000000E+000)
 GW-PERT energy          14  -7.13384396540170     
 Iteration energy           1 (9.180025548055251E-002,-9.408433536910438E-004)
 Iteration energy           2 (9.170604693579193E-002,-1.148311056161202E-003)
 Iteration energy           3 (9.172072194320333E-002,-1.098727238467777E-003)
 Iteration energy           4 (9.171897802299789E-002,-1.110331703314252E-003)
 Iteration energy           5 (9.171900624237631E-002,-1.107668799268969E-003)
 Iteration energy           6 (9.171908337180623E-002,-1.108268200928706E-003)
 Iteration energy           7 (9.171904724720156E-002,-1.108135896380032E-003)
 Iteration energy           8 (9.171905951384454E-002,-1.108164500940808E-003)
 Iteration energy           9 (9.171905586013740E-002,-1.108158456257144E-003)
 Iteration energy          10 (9.171905687082624E-002,-1.108159700337934E-003)
 value, zeta:          15 (7.045312945171192E-002,-3.664129547104479E-003)
 (-0.213423152702100,-1.319960659502971E-002)
 XC-DFT energy          15 -0.957502828833604     
 H-DFT energy          15   123.564163374593     
 (123.564166266389,0.000000000000000E+000)
 GW-PERT energy          15  -7.13195744171479     
 Iteration energy           1 (9.192897773458153E-002,-1.108461653381526E-003)
 Iteration energy           2 (9.183085869030380E-002,-1.315402305508272E-003)
 Iteration energy           3 (9.184670056112573E-002,-1.265737690513861E-003)
 Iteration energy           4 (9.184463803898657E-002,-1.277422489876030E-003)
 Iteration energy           5 (9.184474785230617E-002,-1.274723980177904E-003)
 Iteration energy           6 (9.184480516863150E-002,-1.275336028595223E-003)
 Iteration energy           7 (9.184477362160690E-002,-1.275199711078020E-003)
 Iteration energy           8 (9.184478488441622E-002,-1.275229500859963E-003)
 Iteration energy           9 (9.184478143765726E-002,-1.275223123724443E-003)
 Iteration energy          10 (9.184478240913774E-002,-1.275224457379986E-003)
 value, zeta:          16 (-5.044642512125760E-002,3.302126022163540E-003)
 (-0.178172570569845,-9.443426943040789E-003)
 XC-DFT energy          16 -0.907998796935259     
 H-DFT energy          16   113.589159224789     
 (113.589159642769,0.000000000000000E+000)
 GW-PERT energy          16   2.84687021363710     
 Iteration energy           1 (-0.100194094611059,-4.277559046780123E-003)
 Iteration energy           2 (-9.981588523936988E-002,-3.103845202923058E-003)
 Iteration energy           3 (-9.983598074872260E-002,-3.363662000755954E-003)
 Iteration energy           4 (-9.984463770307507E-002,-3.309287074271593E-003)
 Iteration energy           5 (-9.984018383333475E-002,-3.320034892829242E-003)
 Iteration energy           6 (-9.984162781265558E-002,-3.318045452258847E-003)
 Iteration energy           7 (-9.984123321595233E-002,-3.318383223538281E-003)
 Iteration energy           8 (-9.984133091867482E-002,-3.318333227804497E-003)
 Iteration energy           9 (-9.984130838215188E-002,-3.318338694780890E-003)
 Iteration energy          10 (-9.984131328213221E-002,-3.318338680091831E-003)
 value, zeta:          17 (-5.178371940295523E-002,2.491625580777118E-003)
 (-0.176692336534180,-1.372167311536550E-002)
 XC-DFT energy          17 -0.912926064234168     
 H-DFT energy          17   114.148212666096     
 (114.148217681964,0.000000000000000E+000)
 GW-PERT energy          17   2.86136358944496     
 Iteration energy           1 (-0.100876249729647,-5.679640936127545E-003)
 Iteration energy           2 (-0.100589193718211,-4.592588329605655E-003)
 Iteration energy           3 (-0.100590988106819,-4.825598779784489E-003)
 Iteration energy           4 (-0.100602617029801,-4.778735055386738E-003)
 Iteration energy           5 (-0.100597871962632,-4.787544418975893E-003)
 Iteration energy           6 (-0.100599277647407,-4.786020131172230E-003)
 Iteration energy           7 (-0.100598917059544,-4.786253806027397E-003)
 Iteration energy           8 (-0.100599001464269,-4.786225447338029E-003)
 Iteration energy           9 (-0.100598983062103,-4.786226798165490E-003)
 Iteration energy          10 (-0.100598986825632,-4.786227473630696E-003)
 value, zeta:          18 (-4.307668949705983E-002,-7.449243897006087E-004)
 (-4.459599345799672E-002,-6.487087031535361E-003)
 XC-DFT energy          18 -0.190280610182375     
 H-DFT energy          18   13.6818971512101     
 (13.6818964482805,0.000000000000000E+000)
 GW-PERT energy          18  0.737465325631414     
 Iteration energy           1 (-4.689366502514908E-002,-1.289071742289570E-003)
 Iteration energy           2 (-4.688459846069579E-002,-1.283822322738783E-003)
 Iteration energy           3 (-4.688500340755995E-002,-1.284158727178815E-003)
 Iteration energy           4 (-4.688498617961575E-002,-1.284138651567284E-003)
 Iteration energy           5 (-4.688498686401795E-002,-1.284139791190814E-003)
 Iteration energy           6 (-4.688498683971010E-002,-1.284139728970564E-003)
 Iteration energy           7 (-4.688498684039032E-002,-1.284139732257645E-003)
 Iteration energy           8 (-4.688498684038431E-002,-1.284139732089075E-003)
 Iteration energy           9 (-4.688498684038318E-002,-1.284139732097475E-003)
 Iteration energy          10 (-4.688498684038332E-002,-1.284139732097071E-003)
 value, zeta:          19 (-4.219634044033736E-002,-6.933200210008576E-004)
 (-4.210064332391687E-002,-5.487617840624522E-003)
 XC-DFT energy          19 -0.165852835055771     
 H-DFT energy          19   11.0473651748154     
 (11.0473649576090,0.000000000000000E+000)
 GW-PERT energy          19   1.81483011123882     
 Iteration energy           1 (-4.545899707482802E-002,-1.106362968467718E-003)
 Iteration energy           2 (-4.545169022325669E-002,-1.102660565754360E-003)
 Iteration energy           3 (-4.545200515023080E-002,-1.102885189888507E-003)
 Iteration energy           4 (-4.545199203759195E-002,-1.102872471281302E-003)
 Iteration energy           5 (-4.545199255971973E-002,-1.102873158000614E-003)
 Iteration energy           6 (-4.545199254020642E-002,-1.102873122239067E-003)
 Iteration energy           7 (-4.545199254086416E-002,-1.102873124046999E-003)
 Iteration energy           8 (-4.545199254084625E-002,-1.102873123957928E-003)
 Iteration energy           9 (-4.545199254084645E-002,-1.102873123962212E-003)
 Iteration energy          10 (-4.545199254084648E-002,-1.102873123962013E-003)
 value, zeta:          20 (-3.447520125452702E-002,-6.466946924710058E-004)
 (-3.434350352451605E-002,-4.567810339039225E-003)
 XC-DFT energy          20 -0.151121522134575     
 H-DFT energy          20   8.25208094682504     
 (8.25208124933588,0.000000000000000E+000)
 GW-PERT energy          20   1.82004013513195     
 Iteration energy           1 (-3.683588527431126E-002,-9.475049944844130E-004)
 Iteration energy           2 (-3.683240573732365E-002,-9.457655025583436E-004)
 Iteration energy           3 (-3.683252604984118E-002,-9.458500365012383E-004)
 Iteration energy           4 (-3.683252202652170E-002,-9.458462019378585E-004)
 Iteration energy           5 (-3.683252215541320E-002,-9.458463678361289E-004)
 Iteration energy           6 (-3.683252215152544E-002,-9.458463609120233E-004)
 Iteration energy           7 (-3.683252215163194E-002,-9.458463611926495E-004)
 Iteration energy           8 (-3.683252215162952E-002,-9.458463611815616E-004)
 Iteration energy           9 (-3.683252215162956E-002,-9.458463611819905E-004)
 Iteration energy          10 (-3.683252215162956E-002,-9.458463611819741E-004)
 QUASI-PARTICLES ENERGIES IN Ev:
State:    1LDA  : -20.62248 GW-PERT  : -22.90986 GW  : -22.77674 HF-pert : -30.40865
State:    2LDA  : -17.84064 GW-PERT  : -20.41930 GW  : -20.29364 HF-pert : -26.69484
State:    3LDA  : -17.84035 GW-PERT  : -20.41635 GW  : -20.29035 HF-pert : -26.69561
State:    4LDA  : -14.22640 GW-PERT  : -16.84134 GW  : -16.75400 HF-pert : -21.44076
State:    5LDA  : -14.22632 GW-PERT  : -16.83950 GW  : -16.75254 HF-pert : -21.44155
State:    6LDA  : -12.27653 GW-PERT  : -14.79210 GW  : -14.72603 HF-pert : -18.33166
State:    7LDA  : -10.57368 GW-PERT  : -13.36694 GW  : -13.29683 HF-pert : -16.53464
State:    8LDA  : -10.35648 GW-PERT  : -12.21025 GW  : -12.18433 HF-pert : -15.70759
State:    9LDA  :  -9.64586 GW-PERT  : -11.98984 GW  : -11.95092 HF-pert : -14.92182
State:   10LDA  :  -9.64558 GW-PERT  : -11.98953 GW  : -11.95026 HF-pert : -14.92724
State:   11LDA  :  -8.51054 GW-PERT  : -10.02228 GW  :  -9.99920 HF-pert : -12.88202
State:   12LDA  :  -7.68117 GW-PERT  :  -9.77249 GW  :  -9.74821 HF-pert : -12.30904
State:   13LDA  :  -7.68051 GW-PERT  :  -9.76593 GW  :  -9.74175 HF-pert : -12.31210
State:   14LDA  :  -5.79644 GW-PERT  :  -7.13384 GW  :  -7.12763 HF-pert :  -8.37554
State:   15LDA  :  -5.79624 GW-PERT  :  -7.13196 GW  :  -7.12563 HF-pert :  -8.37525
State:   16LDA  :  -0.71993 GW-PERT  :   2.84687 GW  :   2.81023 HF-pert :   4.16864
State:   17LDA  :  -0.71353 GW-PERT  :   2.86136 GW  :   2.82903 HF-pert :   4.19774
State:   18LDA  :  -0.36504 GW-PERT  :   0.73747 GW  :   0.73493 HF-pert :   1.37283
State:   19LDA  :   0.81553 GW-PERT  :   1.81483 GW  :   1.81268 HF-pert :   2.43109
State:   20LDA  :   0.92524 GW-PERT  :   1.82004 GW  :   1.81875 HF-pert :   2.31989
 IMAGINARY ENERGIES IN Ev:
State:    1 GW (Im) :   0.85280
State:    2 GW (Im) :   0.61176
State:    3 GW (Im) :   0.60606
State:    4 GW (Im) :   0.38445
State:    5 GW (Im) :   0.38372
State:    6 GW (Im) :   0.31254
State:    7 GW (Im) :   0.23153
State:    8 GW (Im) :   0.18057
State:    9 GW (Im) :   0.16981
State:   10 GW (Im) :   0.16958
State:   11 GW (Im) :   0.35921
State:   12 GW (Im) :   0.07774
State:   13 GW (Im) :   0.07823
State:   14 GW (Im) :  -0.01508
State:   15 GW (Im) :  -0.01735
State:   16 GW (Im) :  -0.04515
State:   17 GW (Im) :  -0.06512
State:   18 GW (Im) :  -0.01747
State:   19 GW (Im) :  -0.01501
State:   20 GW (Im) :  -0.01287
 ---------------------------------------------------------
 TIME REPORT : 
 ---------------------------------------------------------
 time between starting_point=0 and starting_point=1: TIME=
  3.000000000000003E-003
 time between starting_point=1 and starting_point=2: TIME=
  6.198999999999999E-002
 time between starting_point=2 and starting_point=3: TIME=
   1.10583200000000     
 time between starting_point=3 and starting_point=4: TIME=
   1.24281100000000     
 time between starting_point=4 and starting_point=5: TIME=
  0.410937000000000     
 time between starting_point=5 and starting_point=6: TIME=
   1.26580800000000     
 time between starting_point=6 and starting_point=7: TIME=
   2.76058000000000     
 ---------------------------------------------------------
 GWW :: FULL  TIME  =     46.9838570000000     
 ---------------------------------------------------------
 Stopping MPI environment
