9
1
mirror of https://github.com/QuantumPackage/qp2.git synced 2024-12-13 07:03:29 +01:00
qp2/src/perturbation/var_pt2_ratio_provider.irp.f

11 lines
266 B
Fortran
Raw Normal View History

2019-01-25 11:39:31 +01:00
BEGIN_PROVIDER [ double precision, var_pt2_ratio ]
implicit none
BEGIN_DOC
! The selection process stops when the energy ratio variational/(variational+PT2)
! is equal to var_pt2_ratio
END_DOC
var_pt2_ratio = correlation_energy_ratio_max
END_PROVIDER