Commit 00a6bc18 authored by Gregor Michalicek's avatar Gregor Michalicek

Added some more vacuumTemp%... initializations to io/cdn_io.F90

parent c241252e
......@@ -508,6 +508,7 @@ MODULE m_cdn_io
inputTemp%film = input%film
vacuumTemp%nvac = vacuum%nvac
vacuumTemp%nmzxy = vacuum%nmzxy
vacuumTemp%nmz = vacuum%nmz
starsTemp%ng2 = stars%ng2
symTemp%invs2 = sym%invs2
ALLOCATE (fpwTemp(stars%ng3,input%jspins))
......@@ -566,6 +567,8 @@ MODULE m_cdn_io
symTemp%invs = sym%invs
inputTemp%film = input%film
vacuumTemp%nvac = vacuum%nvac
vacuumTemp%nmzxy = vacuum%nmzxy
vacuumTemp%nmz = vacuum%nmz
starsTemp%ng2 = stars%ng2
symTemp%invs2 = sym%invs2
ALLOCATE (fpwTemp(stars%ng3,input%jspins))
......
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