Commit 9d8502c6 authored by Matthias Redies's avatar Matthias Redies

initialize variable

parent 05d08055
...@@ -64,6 +64,7 @@ CONTAINS ...@@ -64,6 +64,7 @@ CONTAINS
CALL vCoul%resetPotDen() CALL vCoul%resetPotDen()
CALL vx%resetPotDen() CALL vx%resetPotDen()
ALLOCATE(vx%pw_w,mold=vTot%pw) ALLOCATE(vx%pw_w,mold=vTot%pw)
vx%pw_w = 0.0
#ifndef CPP_OLDINTEL #ifndef CPP_OLDINTEL
ALLOCATE(vTot%pw_w,mold=vTot%pw) ALLOCATE(vTot%pw_w,mold=vTot%pw)
#else #else
......
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