Skip to content
Snippets Groups Projects
Commit 2f0a2fb4 authored by Lionel GUEZ's avatar Lionel GUEZ
Browse files

Avoid an addition

parent 3cc44c2e
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
Inst_eddies/get_1_outerm.f90
+ 1
− 1
View file @ 2f0a2fb4
......@@ -126,7 +126,7 @@ contains
if (n_cont == n_max_cont - 1) then
! Replace the previous good contour found
cont_list(n_cont) = cont_list(n_cont + 1)
cont_list(n_cont) = cont_list(n_max_cont)
else
n_cont = n_cont + 1
end if
......
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