Module input_parameters should never be used except when reading data;

make.depend updated


git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@9204 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
giannozz 2012-07-20 09:57:32 +00:00
parent c69546aa12
commit 596292a950
3 changed files with 6 additions and 5 deletions

View File

@ -119,13 +119,12 @@ CONTAINS
USE ions_base, ONLY : nat, nsp, ityp, tau, if_pos, atm
USE cell_base, ONLY : alat, omega
USE ener, ONLY : etot
USE force_mod, ONLY : force
USE force_mod, ONLY : force, lstres
USE control_flags, ONLY : istep, nstep, conv_ions, lconstrain, &
lfixatom
!
USE constraints_module, ONLY : nconstr, check_constraint
USE constraints_module, ONLY : remove_constr_force, remove_constr_vec
USE input_parameters, ONLY : tstress
!
IMPLICIT NONE
!
@ -394,8 +393,8 @@ CONTAINS
& 5X,"temperature = ",F14.8," K ",/, &
& 5X,"Ekin + Etot (const) = ",F14.8," Ry")' ) &
ekin, temp_new, ( ekin + etot )
if (tstress) &
write(stdout,'(5X,"Ions kinetic stress = ",F10.2," (kbar)",/3(27X,3F10.2/)/)') &
IF (lstres) WRITE ( stdout, &
'(5X,"Ions kinetic stress = ",F10.2," (kbar)",/3(27X,3F10.2/)/)') &
((kstress(1,1)+kstress(2,2)+kstress(3,3))/3.d0*ry_kbar), &
(kstress(i,1)*ry_kbar,kstress(i,2)*ry_kbar,kstress(i,3)*ry_kbar, i=1,3)
!

View File

@ -146,7 +146,6 @@ subroutine h_epsi_her_set(pdir, e_field)
!determines the spin polarization
DO ik=1,nks
CALL get_buffer ( evcel, nwordwfc, iunwfc, nx_el(ik,pdir) )
if(nspin==2) then

View File

@ -711,6 +711,7 @@ init_ns.o : scf_mod.o
init_run.o : ../../Modules/cell_base.o
init_run.o : ../../Modules/control_flags.o
init_run.o : ../../Modules/fft_base.o
init_run.o : ../../Modules/funct.o
init_run.o : ../../Modules/ions_base.o
init_run.o : ../../Modules/paw_variables.o
init_run.o : ../../Modules/recvec_subs.o
@ -1084,8 +1085,10 @@ potinit.o : pw_restart.o
potinit.o : pwcom.o
potinit.o : scf_mod.o
print_clock_pw.o : ../../Modules/control_flags.o
print_clock_pw.o : ../../Modules/funct.o
print_clock_pw.o : ../../Modules/io_global.o
print_clock_pw.o : ../../Modules/paw_variables.o
print_clock_pw.o : pwcom.o
print_clock_pw.o : realus.o
print_ks_energies.o : ../../Modules/constants.o
print_ks_energies.o : ../../Modules/control_flags.o