Commit ed21b111 authored by Gregor Michalicek's avatar Gregor Michalicek

Reorder some use statements for ifort12

...unfortunately ifort12 ist still not happy.
parent f80a5bd9
......@@ -8,10 +8,10 @@ MODULE m_mt_setup
CONTAINS
SUBROUTINE mt_setup(atoms,sym,sphhar,input,noco,enpara,inden,vTot,mpi,results,DIMENSION,td,ud)
USE m_types
USE m_usetup
USE m_tlmplm_cholesky
USE m_tlmplm_store
USE m_types
USE m_spnorb
IMPLICIT NONE
TYPE(t_results),INTENT(INOUT):: results
......
......@@ -34,10 +34,10 @@ CONTAINS
! istepnow . steps to be done in this run
!
! *********************************************************************
USE m_types
USE m_rwinp
USE m_bfgs
USE m_bfgs0
USE m_types
USE m_constants
USE m_rinpXML
USE m_winpXML
......
......@@ -20,13 +20,13 @@
& a1,a2,a3)
USE iso_c_binding
USE m_types
USE m_chkmt
USE m_constants
USE m_atominput
USE m_lapwinput
USE m_rwinp
USE m_winpXML
USE m_types
USE m_juDFT_init
USE m_kpoints
USE m_inv3
......
......@@ -18,7 +18,6 @@ MODULE m_types
USE m_types_usdus
USE m_types_enpara
USE m_types_potden
USE m_types_forcetheo
USE m_types_cdnval
USE m_types_field
USE m_types_xcpot_inbuild
......@@ -26,5 +25,6 @@ MODULE m_types
USE m_types_dos
USE m_types_denCoeffsOffdiag
USE m_types_force
USE m_types_forcetheo
END MODULE m_types
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment