program save_fock_inactiv_virt_mos
 implicit none
 call diag_inactive_virt_and_update_mos
 call save_mos


end