mirror of
https://github.com/QuantumPackage/qp2.git
synced 2024-12-21 11:03:29 +01:00
Minor changes
This commit is contained in:
parent
0e576f519e
commit
f947412a16
@ -4,20 +4,19 @@
|
|||||||
|
|
||||||
** Changes
|
** Changes
|
||||||
|
|
||||||
|
- Introduced DFT-based basis set correction
|
||||||
|
- Use OpamPack for OCaml
|
||||||
|
- Configure adapted for ARM
|
||||||
|
- Added many types of integrals
|
||||||
|
|
||||||
*** TODO: take from dev
|
*** TODO: take from dev
|
||||||
- [ ] Added GTOs with complex exponent
|
- [ ] Added GTOs with complex exponent
|
||||||
- [ ] Added many types of integrals
|
|
||||||
- Updated version of f77-zmq
|
- Updated version of f77-zmq
|
||||||
- Added transcorrelated SCF
|
- Added transcorrelated SCF
|
||||||
- Added transcorrelated CIPSI
|
- Added transcorrelated CIPSI
|
||||||
- Started to introduce shells in AOs
|
- Started to introduce shells in AOs
|
||||||
- Added ECMD UEG functional
|
- Added ECMD UEG functional
|
||||||
- Introduced DFT-based basis set correction
|
- General Davidson algorithm
|
||||||
- General davidson algorithm
|
|
||||||
- Use OpamPack for OCaml
|
|
||||||
- Configure adapted for ARM
|
|
||||||
|
|
||||||
*** Done
|
|
||||||
|
|
||||||
* Version 2.2
|
* Version 2.2
|
||||||
|
|
||||||
|
@ -321,14 +321,15 @@ BEGIN_PROVIDER [ double precision, ao_integrals_cache, (0:64*64*64*64) ]
|
|||||||
!$OMP END PARALLEL DO
|
!$OMP END PARALLEL DO
|
||||||
END_PROVIDER
|
END_PROVIDER
|
||||||
|
|
||||||
|
! ---
|
||||||
|
|
||||||
double precision function get_ao_two_e_integral(i,j,k,l,map) result(result)
|
double precision function get_ao_two_e_integral(i, j, k, l, map) result(result)
|
||||||
use map_module
|
use map_module
|
||||||
implicit none
|
implicit none
|
||||||
BEGIN_DOC
|
BEGIN_DOC
|
||||||
! Gets one AO bi-electronic integral from the AO map
|
! Gets one AO bi-electronic integral from the AO map in PHYSICIST NOTATION
|
||||||
!
|
!
|
||||||
! i,j,k,l in physicist notation <ij|kl>
|
! <1:k, 2:l |1:i, 2:j>
|
||||||
END_DOC
|
END_DOC
|
||||||
integer, intent(in) :: i,j,k,l
|
integer, intent(in) :: i,j,k,l
|
||||||
integer(key_kind) :: idx
|
integer(key_kind) :: idx
|
||||||
|
@ -101,6 +101,7 @@ double precision function ao_two_e_integral(i,j,k,l)
|
|||||||
endif
|
endif
|
||||||
|
|
||||||
endif
|
endif
|
||||||
|
|
||||||
end
|
end
|
||||||
|
|
||||||
double precision function ao_two_e_integral_schwartz_accel(i,j,k,l)
|
double precision function ao_two_e_integral_schwartz_accel(i,j,k,l)
|
||||||
|
Loading…
Reference in New Issue
Block a user