davidson_diago.f90 35.3 KB