Skip to content
Snippets Groups Projects
Commit 34851c9c authored by Renaud Person's avatar Renaud Person
Browse files

typo mppini

parent 518fbc54
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
Showing
with 0 additions and 22 deletions
src/OCE/LBC/mppini.F90
+ 0
− 22
View file @ 34851c9c
......@@ -1465,28 +1465,6 @@ ENDIF
nthb = 0
ntht = 0
!
ntile = 0 ! Initialise to full domain
nijtile = 1
ntsi = Nis0
ntsj = Njs0
ntei = Nie0
ntej = Nje0
nthl = 0
nthr = 0
nthb = 0
ntht = 0
!
ntile = 0 ! Initialise to full domain
nijtile = 1
ntsi = Nis0
ntsj = Njs0
ntei = Nie0
ntej = Nje0
nthl = 0
nthr = 0
nthb = 0
ntht = 0
!
END SUBROUTINE init_doloop
......
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