mirror of
https://gitlab.com/scemama/qp_plugins_scemama.git
synced 2024-07-26 12:47:30 +02:00
9 lines
109 B
Fortran
9 lines
109 B
Fortran
program overwrite_w_cas
|
|
read_wf = .True.
|
|
TOUCH read_wf
|
|
call extract_cas
|
|
call save_wavefunction
|
|
end
|
|
|
|
|