scnc
/
quantum-espresso
mirror of https://gitlab.com/QEF/q-e.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Small problem with clocks. 

git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@3223 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
dalcorso 2006-06-29 13:18:47 +00:00
parent 45f996fae6
commit 94ff2edbb0
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
PW/c_bands.f90
View File

@ -72,9 +72,6 @@ SUBROUTINE c_bands( iter, ik_, dr2 )
REAL(DP), EXTERNAL :: erf
! error function
!
!
CALL start_clock( 'c_bands' )
!
IF ( ik_ == nks ) THEN
!
ik_ = 0
@ -83,6 +80,8 @@ SUBROUTINE c_bands( iter, ik_, dr2 )
!
END IF
!
CALL start_clock( 'c_bands' )
!
IF ( noncolin ) THEN
!
ALLOCATE( h_diag_nc( npwx, npol ) )