LCPQ/quantum_package
10
0
Fork 0
mirror of https://github.com/LCPQ/quantum_package synced 2024-06-23 05:32:13 +02:00
Code Issues Releases Wiki Activity

Merge branch 'master' of https://github.com/TApplencourt/quantum_package

Browse Source
This commit is contained in:
Thomas Applencourt 2014-10-23 19:06:46 +02:00
commit 0cbf2dd102
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -35,7 +35,7 @@ subroutine save_dets_qmcchem
call write_int(output_dets,N_det,'Determinants saved for QMC')
deallocate(occ)
open(unit=31,file=trim(ezfio_filename)//'/mo_basis/mo_classif')
write(31,*) 1
write(31,'(I1)') 1
write(31,*) mo_tot_num
do i=1,mo_tot_num
write(31,'(A)') 'a'