~albertog/siesta/trunk-elsi-dm

« back to all changes in this revision

Viewing changes to Src/compute_dm.F

  • Committer: Alberto Garcia
  • Date: 2018-05-25 16:48:32 UTC
  • Revision ID: albertog@icmab.es-20180525164832-rr8jgbddewa09aoh
Sync with elsi_integration/master at commit cfa0c0f39

(Latest: Some PEXSI refinements, including updates to bounds based
on potential changes.)

Show diffs side-by-side

added added

removed removed

Lines of Context:
148
148
     $               "non-coll spins or Spin-orbit yet")
149
149
         endif
150
150
         call elsi_solver(iscf, no_u, no_l, spin%spinor,
151
 
     $              maxnh, listhptr, listh,
152
 
     $              qtot, temp, H, S, Dscf, Escf,
153
 
     $              ef, Entropy)
 
151
     $              maxnh, listhptr, listh, qtot, temp,
 
152
     $              H, S, Dscf, Escf, ef, Entropy)
154
153
      endif
155
154
      if (.not. SIESTA_worker) RETURN
156
155
#endif