1
0
mirror of https://gitlab.com/scemama/qp_plugins_scemama.git synced 2024-12-22 20:34:05 +01:00
qp_plugins_scemama/stable/cassd/overwrite_with_cas.irp.f

9 lines
109 B
Fortran

program overwrite_w_cas
read_wf = .True.
TOUCH read_wf
call extract_cas
call save_wavefunction
end