LCPQ/quantum_package
10
0
Fork 0
mirror of https://github.com/LCPQ/quantum_package synced 2024-07-15 23:50:40 +02:00
Code Issues Releases Wiki Activity

Merge pull request #14 from TApplencourt/master

Browse Source 
Remove one useless if in N_det
This commit is contained in:
Anthony Scemama 2014-10-21 20:31:16 +02:00
commit 3c2bb87d1e
1 changed files with 0 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Dets/determinants.irp.f
View File

@ -10,7 +10,6 @@ BEGIN_PROVIDER [ integer, N_det ]
PROVIDE ezfio_filename PROVIDE ezfio_filename
if (read_wf) then if (read_wf) then
call ezfio_has_determinants_n_det(exists) call ezfio_has_determinants_n_det(exists)
if (exists) then
if (exists) then if (exists) then
call ezfio_has_determinants_mo_label(exists) call ezfio_has_determinants_mo_label(exists)
if (exists) then if (exists) then
@ -18,7 +17,6 @@ BEGIN_PROVIDER [ integer, N_det ]
exists = (label == mo_label) exists = (label == mo_label)
endif endif
endif endif
endif
if (exists) then if (exists) then
call ezfio_get_determinants_n_det(N_det) call ezfio_get_determinants_n_det(N_det)
else else