Skip to content

Commit

Permalink
Density fit returns best possible values even if not converged.
Browse files Browse the repository at this point in the history
Is needed for Hirshfeld charges using density shape function.
  • Loading branch information
juerghutter committed Sep 7, 2020
1 parent 1777f50 commit 538497f
Showing 1 changed file with 1 addition and 0 deletions.
1 change: 1 addition & 0 deletions src/atom_fit.F
Original file line number Diff line number Diff line change
Expand Up @@ -139,6 +139,7 @@ SUBROUTINE atom_fit_density(atom, num_gto, norder, iunit, powell_section, result

ostate%state = 8
CALL powell_optimize(ostate%nvar, x, ostate)
CALL density_fit(density, atom, num_gto, x(1), x(2), co, ostate%f)

CALL release_opgrid(density)

Expand Down

0 comments on commit 538497f

Please sign in to comment.