mirror of
https://github.com/LCPQ/quantum_package
synced 2024-12-22 12:23:48 +01:00
Final print
This commit is contained in:
parent
38831926db
commit
6f68bc69e9
@ -10,8 +10,9 @@ program fci_zmq
|
||||
|
||||
double precision :: hf_energy_ref
|
||||
logical :: has
|
||||
double precision :: relative_error, absolute_error
|
||||
integer :: N_states_p
|
||||
double precision :: relative_error, absolute_error
|
||||
integer :: N_states_p
|
||||
character*(512) :: fmt
|
||||
|
||||
relative_error=PT2_relative_error
|
||||
absolute_error=PT2_absolute_error
|
||||
@ -87,7 +88,6 @@ program fci_zmq
|
||||
! call write_double(6,correlation_energy_ratio, 'Correlation ratio')
|
||||
! print *, ''
|
||||
!
|
||||
! character*(512) :: fmt
|
||||
! N_states_p = min(N_det,N_states)
|
||||
! print *, ''
|
||||
! write(fmt,*) '(''# ============'',', N_states_p, '(1X,''=========================''))'
|
||||
|
Loading…
Reference in New Issue
Block a user