Commit 3ae67d37 authored by Gregor Michalicek's avatar Gregor Michalicek

Add some array initializations to optional/stden.f90

This is to remove false Valgrind errors due to unused parts of those arrays.
parent 68b91cbc
......@@ -75,6 +75,8 @@ SUBROUTINE stden(mpi,sphhar,stars,atoms,sym,DIMENSION,vacuum,&
ALLOCATE ( vbar(2,atoms%ntype),sigm(vacuum%nmzd) )
ALLOCATE ( rhoss(DIMENSION%msh,DIMENSION%jspd) )
rh = 0.0
rhoss = 0.0
IF (mpi%irank == 0) THEN
! if sigma is not 0.0, then divide this charge among all atoms
......
  • Actually the problem solved here is real. It becomes relevant in xc-pot/vxcepbe.f.

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