Skip to content
Snippets Groups Projects
Commit ce993800 authored by WAUTELET Philippe's avatar WAUTELET Philippe
Browse files

Merge branch 'MNH-57-branch' into MNH-57X-dev-IO

parents f943a483 e34dc8c3
No related branches found
No related tags found
No related merge requests found
Showing
with 762 additions and 683 deletions
This diff is collapsed.
......@@ -345,7 +345,7 @@ DO JK=IKTB,IKTE
ENDIF
END DO
DO JIJ=IIJB,IIJE
CALL COMPUTE_FRAC_ICE(HFRAC_ICE, NEBN, ZFRAC(JIJ), PT(JIJ,JK), IERR) !error code IERR cannot be checked here to not break vectorization
CALL COMPUTE_FRAC_ICE(CST, HFRAC_ICE, NEBN, ZFRAC(JIJ), PT(JIJ,JK), IERR) !error code IERR cannot be checked here to not break vectorization
ENDDO
ENDIF
DO JIJ=IIJB,IIJE
......
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
File moved
File moved
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment