10
0
mirror of https://github.com/LCPQ/quantum_package synced 2024-11-19 04:22:36 +01:00

Travis did not compile

This commit is contained in:
Anthony Scemama 2016-07-13 09:06:06 +02:00
parent 4c436783ce
commit d49776cad7

View File

@ -728,6 +728,7 @@ END_PROVIDER
BEGIN_PROVIDER [ double precision, dij, (N_det_ref, N_det_non_ref, N_states) ] BEGIN_PROVIDER [ double precision, dij, (N_det_ref, N_det_non_ref, N_states) ]
integer :: s,i,j integer :: s,i,j
double precision, external :: get_dij_index
print *, "computing amplitudes..." print *, "computing amplitudes..."
do s=1, N_states do s=1, N_states
do i=1, N_det_non_ref do i=1, N_det_non_ref