davidson_diago.f90 48.1 KB