mirror of
https://github.com/LCPQ/quantum_package
synced 2024-11-04 05:03:54 +01:00
delete plugin
This commit is contained in:
madgal
parent
894ac73dc5
commit
974dc7dbb1
@ -1,28 +0,0 @@
|
||||
[n_iter]
|
||||
interface: ezfio
|
||||
doc: Number of iterations needed
|
||||
type: integer
|
||||
|
||||
[n_det]
|
||||
interface: ezfio
|
||||
doc: number of determinants at iteration
|
||||
type: integer
|
||||
size: (fci_iterations.n_iter)
|
||||
|
||||
[energy]
|
||||
interface: ezfio
|
||||
doc: The energy without a pt2 correction for n_det
|
||||
type: double precision
|
||||
size: (fci_iterations.n_iter)
|
||||
|
||||
[pt2]
|
||||
interface: ezfio
|
||||
doc: The pt2 correction for n_det
|
||||
type: double precision
|
||||
size: (fci_iterations.n_iter)
|
||||
|
||||
[energy_pt2]
|
||||
interface: ezfio
|
||||
doc: The energy with pt2 correction for n_det
|
||||
type: double precision
|
||||
size: (fci_iterations.n_iter)
|
||||
@ -1 +0,0 @@
|
||||
Ezfio_files
|
||||
@ -1,23 +0,0 @@
|
||||
==============
|
||||
fci_iterations
|
||||
==============
|
||||
|
||||
Needed Modules
|
||||
==============
|
||||
.. Do not edit this section It was auto-generated
|
||||
.. by the `update_README.py` script.
|
||||
|
||||
|
||||
.. image:: tree_dependency.png
|
||||
|
||||
* `Ezfio_files <http://github.com/LCPQ/quantum_package/tree/master/src/Ezfio_files>`_
|
||||
|
||||
Documentation
|
||||
=============
|
||||
.. Do not edit this section It was auto-generated
|
||||
.. by the `update_README.py` script.
|
||||
|
||||
|
||||
`fci_iterations <http://github.com/LCPQ/quantum_package/tree/master/plugins/fci_iterations/fci_iterations.irp.f#L1>`_
|
||||
Output the number of determinants, energy, and pt2 correction at each iteration
|
||||
|
||||
@ -1,89 +0,0 @@
|
||||
subroutine fci_iterations(n_determinants,energy,pt2)
|
||||
implicit none
|
||||
BEGIN_DOC
|
||||
! Output the number of determinants, energy, and pt2 correction at each iteration
|
||||
END_DOC
|
||||
integer :: n_determinants
|
||||
double precision :: energy, pt2
|
||||
integer :: N_iterations_before
|
||||
integer :: N_iterations
|
||||
logical :: hasIter
|
||||
integer, allocatable :: n_determinants_list_before(:)
|
||||
double precision, allocatable :: energy_list_before(:)
|
||||
double precision, allocatable :: pt2_list_before(:)
|
||||
double precision, allocatable :: energy_pt2_list_before(:)
|
||||
integer, allocatable :: n_determinants_list(:)
|
||||
double precision, allocatable :: energy_list(:)
|
||||
double precision, allocatable :: pt2_list(:)
|
||||
double precision, allocatable :: energy_pt2_list(:)
|
||||
|
||||
|
||||
|
||||
!call ezfio_has_hartree_fock_energy(has)
|
||||
!call ezfio_get_hartree_fock_energy(hf_energy_ref)
|
||||
!call ezfio_set_full_ci_zmq_energy(CI_energy(1))
|
||||
|
||||
! IF THE ITERATION IS PAST 1
|
||||
! GET THE ITERATION NUMBER
|
||||
! AND INCREMENT BY 1
|
||||
call ezfio_has_fci_iterations_n_iter(hasIter)
|
||||
if (hasIter) then
|
||||
call ezfio_get_fci_iterations_n_iter(N_iterations_before)
|
||||
! OTHERWISE SET IT AT 1
|
||||
else
|
||||
N_iterations_before = 0
|
||||
endif
|
||||
|
||||
|
||||
|
||||
!! IF THERE HAS ALREADY BEEN AN ITERATION
|
||||
!! GET THE ARRAYS
|
||||
if (hasIter) then
|
||||
allocate(n_determinants_list_before(N_iterations_before))
|
||||
allocate(energy_list_before(N_iterations_before))
|
||||
allocate(pt2_list_before(N_iterations_before))
|
||||
allocate(energy_pt2_list_before(N_iterations_before))
|
||||
|
||||
call ezfio_get_fci_iterations_n_det(n_determinants_list_before)
|
||||
call ezfio_get_fci_iterations_energy(energy_list_before)
|
||||
call ezfio_get_fci_iterations_energy_pt2(energy_pt2_list_before)
|
||||
call ezfio_get_fci_iterations_pt2(pt2_list_before)
|
||||
endif
|
||||
|
||||
N_iterations = N_iterations_before +1
|
||||
! RESET THE ITERATION NUMBER
|
||||
call ezfio_set_fci_iterations_n_iter(N_iterations)
|
||||
|
||||
!!! NOW UPDATE ARRAY(N_iterations) = LATEST_UPDATE
|
||||
allocate(n_determinants_list(N_iterations))
|
||||
allocate(energy_list(N_iterations))
|
||||
allocate(pt2_list(N_iterations))
|
||||
allocate(energy_pt2_list(N_iterations))
|
||||
|
||||
if (hasIter) then
|
||||
n_determinants_list(1:N_iterations_before) = n_determinants_list_before
|
||||
energy_list(1:N_iterations_before) = energy_list_before
|
||||
pt2_list(1:N_iterations_before) = pt2_list_before
|
||||
energy_pt2_list(1:N_iterations_before) = energy_pt2_list_before
|
||||
|
||||
deallocate(n_determinants_list_before)
|
||||
deallocate(energy_list_before)
|
||||
deallocate(pt2_list_before)
|
||||
deallocate(energy_pt2_list_before)
|
||||
endif
|
||||
n_determinants_list(N_iterations) = n_determinants
|
||||
energy_list(N_iterations) = energy
|
||||
pt2_list(N_iterations) = pt2
|
||||
energy_pt2_list(N_iterations) = energy+pt2
|
||||
|
||||
!!!! NOW RESET THE EZFIO VALUES
|
||||
call ezfio_set_fci_iterations_n_det(n_determinants_list)
|
||||
call ezfio_set_fci_iterations_energy(energy_list)
|
||||
call ezfio_set_fci_iterations_pt2(pt2_list)
|
||||
call ezfio_set_fci_iterations_energy_pt2(energy_pt2_list)
|
||||
|
||||
deallocate(n_determinants_list)
|
||||
deallocate(energy_list)
|
||||
deallocate(pt2_list)
|
||||
deallocate(energy_pt2_list)
|
||||
end subroutine
|
||||
Loading…
Reference in New Issue
Block a user