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

shift only if nonlinear

parent 8de2fd72
No related branches found
No related tags found
No related merge requests found
......@@ -128,6 +128,7 @@ CONTAINS
sky_ExB_full(iky) = sky_ExB_full(iky) - REAL(iky-1,xp)*deltaky*gamma_E*dt_sub
ENDDO
! Shift the arrays if the shear value sky is too high
IF(LINEARITY .EQ. 'nonlinear') &
CALL Array_shift_ExB_shear_flow
! We update the operators and grids
......
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