10
0
mirror of https://github.com/LCPQ/quantum_package synced 2024-11-12 17:13:54 +01:00

Write good format for the ezfio mo_classif

This commit is contained in:
Thomas APPLENCOURT 2014-10-22 09:59:50 +02:00
parent 410f564a04
commit ed977defac

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'