Skip to content
Snippets Groups Projects
Commit f44d0c97 authored by ronesy's avatar ronesy
Browse files

Update mod_save.f90

parent 3c1c46fd
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
Showing
with 2 additions and 0 deletions
source/mod_save.f90
+ 2
− 0
View file @ f44d0c97
...@@ -466,6 +466,8 @@ module mod_save ...@@ -466,6 +466,8 @@ module mod_save
xpos(:,:,:) = 0. xpos(:,:,:) = 0.
epri(:,:,:) = 0. epri(:,:,:) = 0.
epos(:,:,:) = 0. epos(:,:,:) = 0.
mcpri(:,:,:) = 0.
mcpos(:,:,:) = 0.
do n = 1, ntstate do n = 1, ntstate
do jy = 1, nyregrid do jy = 1, nyregrid
do ix = 1, nxregrid do ix = 1, nxregrid
......
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