← Back to branch summary

~jose-soler/siesta/unfolding

« back to all changes in this revision

Viewing changes to Src/state_init.F

  • Committer: Jose M Soler
  • Date: 2018-10-29 18:09:36 UTC
  • mfrom: (718.1.26 trunk)
  • Revision ID: jose.soler@uam.es-20181029180936-7p8z2sbde0mkvxoz
Merged with trunk-744

modified:
  Docs/Contributors.txt
  Docs/siesta.bib
  Docs/siesta.tex
  Docs/tbtrans.tex
  Docs/tex/fdf.tex
  Docs/tex/setup.tex
  RELEASE_NOTES
  Src/final_H_f_stress.F
  Src/grdsam.F
  Src/m_ts_options.F90
  Src/m_ts_tri_init.F90
  Src/m_ts_weight.F90
  Src/save_density_matrix.F90
  Src/state_init.F
  Util/TS/TBtrans/Makefile
  Util/TS/TBtrans/m_tbt_tri_init.F90

Show diffs side-by-side

added added

removed removed

Lines of Context:
Src/state_init.F
78
78
      use domain_decom,      only: domainDecom, use_dd, use_dd_perm
79
79
      use ldau_specs,        only: switch_ldau, ldau_init
80
80
      use fdf,               only: fdf_get
81
 
      use sys,               only: message, die
 
81
      use sys,               only: message, die, bye
82
82
      use m_sparse, only : xij_offset
83
83
 
84
84
      use ts_kpoint_scf_m, only: setup_ts_kpoint_scf, ts_kpoint_scf
88
88
      use m_ts_options, only : N_Elec, Elecs, IsVolt
89
89
      use m_ts_electype
90
90
      use m_ts_global_vars, only: TSrun, TSmode, onlyS
91
 
      use sys, only : bye
92
91
      use m_ts_io, only : fname_TSHS, ts_write_tshs
93
92
      use m_ts_sparse, only : ts_sparse_init
94
93
      use m_ts_tri_init, only : ts_tri_init, ts_tri_analyze
570
569
     &        BTD_method )
571
570
 
572
571
         ! Print-out timers
573
 
         call timer('TS-rgn2tri',3)
 
572
         call timer('TS-analyze',3)
574
573
 
575
574
         ! Bye also waits for all processors
576
575
         call bye('transiesta analyzation performed')