Skip to content
Snippets Groups Projects
Commit c3ea2308 authored by Antoine Cyril David Hoffmann's avatar Antoine Cyril David Hoffmann :seedling:
Browse files

small typo

parent 5cc6fc25
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
Showing
with 1 addition and 1 deletion
src/grid_mod.F90
+ 1
− 1
View file @ c3ea2308
...@@ -525,7 +525,7 @@ CONTAINS ...@@ -525,7 +525,7 @@ CONTAINS
! Ghosts boundaries (depend on the order of z operators) ! Ghosts boundaries (depend on the order of z operators)
IF(Nz .EQ. 1) THEN IF(Nz .EQ. 1) THEN
izgs = izs; izge = ize; izgs = izs; izge = ize;
zarray(izs) = 0; zarray_full(izs) = 0; zarray(izs,:) = 0; zarray_full(izs) = 0;
ELSEIF(Nz .GE. 4) THEN ELSEIF(Nz .GE. 4) THEN
izgs = izs - 2; izge = ize + 2; izgs = izs - 2; izge = ize + 2;
ELSE ELSE
......
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