davidson_diago.f90 34.8 KB