davidson_diago.f90 39.1 KB