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

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

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