Commit 852c87fa authored by Daniel Wortmann's avatar Daniel Wortmann

Merge branch 'develop' of fleur-git:fleur into develop

parents ccb33eaa 599c3c26
...@@ -64,10 +64,10 @@ CONTAINS ...@@ -64,10 +64,10 @@ CONTAINS
call packed_to_full(nsize,b_r,largeb_r) call packed_to_full(nsize,b_r,largeb_r)
DEALLOCATE (b_r) DEALLOCATE (b_r)
ELSE ELSE
call packed_to_full(nsize,a_r,largea_r) call packed_to_full(nsize,a_c,largea_c)
DEALLOCATE (a_r) DEALLOCATE (a_c)
call packed_to_full(nsize,b_r,largeb_r) call packed_to_full(nsize,b_c,largeb_c)
DEALLOCATE (b_r) DEALLOCATE (b_c)
ENDIF ENDIF
......
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