scemama/qp_plugins_scemama
1
0
Fork 0
mirror of https://gitlab.com/scemama/qp_plugins_scemama.git synced 2024-11-07 22:53:42 +01:00
Code Issues Releases Wiki Activity
a6e87526b1
qp_plugins_scemama/devel/cc/integral_batches.irp.f

178 lines
6.9 KiB
FortranFixed
Raw Normal View History

fork CC from mveril and pfloos
2019-09-09 16:51:15 +02:00
BEGIN_PROVIDER [ double precision, OOOO, (spin_occ_num,spin_occ_num,spin_occ_num,spin_occ_num) ]
implicit none
BEGIN_DOC
END_DOC
General CCSD
2019-09-11 17:09:30 +02:00
OOOO(:,:,:,:) = dbERI( &
1:spin_occ_num, &
1:spin_occ_num, &
1:spin_occ_num, &
1:spin_occ_num )
fork CC from mveril and pfloos
2019-09-09 16:51:15 +02:00
END_PROVIDER
BEGIN_PROVIDER [ double precision, OOOV, (spin_occ_num,spin_occ_num,spin_occ_num,spin_vir_num) ]
implicit none
BEGIN_DOC
END_DOC
General CCSD
2019-09-11 17:09:30 +02:00
OOOV(:,:,:,:) = dbERI( &
1:spin_occ_num, &
1:spin_occ_num, &
1:spin_occ_num, &
spin_occ_num+1:spin_mo_num)
END_PROVIDER
BEGIN_PROVIDER [ double precision, OOVO, (spin_occ_num,spin_occ_num,spin_vir_num,spin_occ_num) ]
implicit none
BEGIN_DOC
END_DOC
OOVO(:,:,:,:) = dbERI( &
1:spin_occ_num, &
1:spin_occ_num, &
spin_occ_num+1:spin_mo_num, &
1:spin_occ_num)
fork CC from mveril and pfloos
2019-09-09 16:51:15 +02:00
END_PROVIDER
BEGIN_PROVIDER [ double precision, OVOO, (spin_occ_num,spin_vir_num,spin_occ_num,spin_occ_num) ]
implicit none
BEGIN_DOC
END_DOC
General CCSD
2019-09-11 17:09:30 +02:00
OVOO(:,:,:,:) = dbERI( &
1:spin_occ_num, &
spin_occ_num+1:spin_mo_num, &
1:spin_occ_num, &
1:spin_occ_num)
fork CC from mveril and pfloos
2019-09-09 16:51:15 +02:00
END_PROVIDER
BEGIN_PROVIDER [ double precision, VOOO, (spin_vir_num,spin_occ_num,spin_occ_num,spin_occ_num) ]
implicit none
BEGIN_DOC
END_DOC
General CCSD
2019-09-11 17:09:30 +02:00
VOOO(:,:,:,:) = dbERI( &
spin_occ_num+1:spin_mo_num, &
1:spin_occ_num, &
1:spin_occ_num, &
1:spin_occ_num)
fork CC from mveril and pfloos
2019-09-09 16:51:15 +02:00
END_PROVIDER
BEGIN_PROVIDER [ double precision, OOVV, (spin_occ_num,spin_occ_num,spin_vir_num,spin_vir_num) ]
implicit none
BEGIN_DOC
END_DOC
General CCSD
2019-09-11 17:09:30 +02:00
OOVV(:,:,:,:) = dbERI( &
1:spin_occ_num, &
1:spin_occ_num, &
spin_occ_num+1:spin_mo_num, &
spin_occ_num+1:spin_mo_num)
END_PROVIDER
BEGIN_PROVIDER [ double precision, OVOV, (spin_occ_num,spin_vir_num,spin_occ_num,spin_vir_num) ]
implicit none
BEGIN_DOC
END_DOC
OVOV(:,:,:,:) = dbERI( &
1:spin_occ_num, &
spin_occ_num+1:spin_mo_num, &
1:spin_occ_num, &
spin_occ_num+1:spin_mo_num)
fork CC from mveril and pfloos
2019-09-09 16:51:15 +02:00
END_PROVIDER
BEGIN_PROVIDER [ double precision, OVVO, (spin_occ_num,spin_vir_num,spin_vir_num,spin_occ_num) ]
implicit none
BEGIN_DOC
END_DOC
General CCSD
2019-09-11 17:09:30 +02:00
OVVO(:,:,:,:) = dbERI( &
1:spin_occ_num, &
spin_occ_num+1:spin_mo_num, &
spin_occ_num+1:spin_mo_num, &
1:spin_occ_num)
fork CC from mveril and pfloos
2019-09-09 16:51:15 +02:00
END_PROVIDER
General CCSD
2019-09-11 17:09:30 +02:00
BEGIN_PROVIDER [ double precision, VOVO, (spin_vir_num,spin_occ_num,spin_vir_num,spin_occ_num) ]
implicit none
BEGIN_DOC
END_DOC
VOVO(:,:,:,:) = dbERI( &
spin_occ_num+1:spin_mo_num, &
1:spin_occ_num, &
spin_occ_num+1:spin_mo_num, &
1:spin_occ_num)
END_PROVIDER
BEGIN_PROVIDER [ double precision, VVOO, (spin_vir_num,spin_vir_num,spin_occ_num,spin_occ_num) ]
fork CC from mveril and pfloos
2019-09-09 16:51:15 +02:00
implicit none
BEGIN_DOC
END_DOC
General CCSD
2019-09-11 17:09:30 +02:00
VVOO(:,:,:,:) = dbERI( &
spin_occ_num+1:spin_mo_num, &
spin_occ_num+1:spin_mo_num, &
1:spin_occ_num, &
1:spin_occ_num)
fork CC from mveril and pfloos
2019-09-09 16:51:15 +02:00
END_PROVIDER
General CCSD
2019-09-11 17:09:30 +02:00
BEGIN_PROVIDER [ double precision, OVVV, (spin_occ_num,spin_vir_num,spin_vir_num,spin_vir_num) ]
implicit none
BEGIN_DOC
END_DOC
OVVV(:,:,:,:) = dbERI( &
1:spin_occ_num, &
spin_occ_num+1:spin_mo_num, &
spin_occ_num+1:spin_mo_num, &
spin_occ_num+1:spin_mo_num)
END_PROVIDER
fork CC from mveril and pfloos
2019-09-09 16:51:15 +02:00
BEGIN_PROVIDER [ double precision, VOVV, (spin_vir_num,spin_occ_num,spin_vir_num,spin_vir_num) ]
implicit none
BEGIN_DOC
END_DOC
General CCSD
2019-09-11 17:09:30 +02:00
VOVV(:,:,:,:) = dbERI( &
spin_occ_num+1:spin_mo_num, &
1:spin_occ_num, &
spin_occ_num+1:spin_mo_num, &
spin_occ_num+1:spin_mo_num)
fork CC from mveril and pfloos
2019-09-09 16:51:15 +02:00
END_PROVIDER
General CCSD
2019-09-11 17:09:30 +02:00
BEGIN_PROVIDER [ double precision, VVOV, (spin_vir_num,spin_vir_num,spin_occ_num,spin_vir_num) ]
fork CC from mveril and pfloos
2019-09-09 16:51:15 +02:00
implicit none
BEGIN_DOC
END_DOC
General CCSD
2019-09-11 17:09:30 +02:00
VVOV(:,:,:,:) = dbERI( &
spin_occ_num+1:spin_mo_num, &
spin_occ_num+1:spin_mo_num, &
1:spin_occ_num, &
spin_occ_num+1:spin_mo_num)
fork CC from mveril and pfloos
2019-09-09 16:51:15 +02:00
END_PROVIDER
General CCSD
2019-09-11 17:09:30 +02:00
BEGIN_PROVIDER [ double precision, VVVO, (spin_vir_num,spin_vir_num,spin_vir_num,spin_occ_num) ]
implicit none
BEGIN_DOC
END_DOC
VVVO(:,:,:,:) = dbERI( &
spin_occ_num+1:spin_mo_num, &
spin_occ_num+1:spin_mo_num, &
spin_occ_num+1:spin_mo_num, &
1:spin_occ_num)
END_PROVIDER
fork CC from mveril and pfloos
2019-09-09 16:51:15 +02:00
BEGIN_PROVIDER [ double precision, VVVV, (spin_vir_num,spin_vir_num,spin_vir_num,spin_vir_num) ]
implicit none
BEGIN_DOC
END_DOC
General CCSD
2019-09-11 17:09:30 +02:00
VVVV(:,:,:,:) = dbERI( &
spin_occ_num+1:spin_mo_num, &
spin_occ_num+1:spin_mo_num, &
spin_occ_num+1:spin_mo_num, &
spin_occ_num+1:spin_mo_num)
fork CC from mveril and pfloos
2019-09-09 16:51:15 +02:00
END_PROVIDER
Reference in New Issue Copy Permalink