diff --git a/SURCOUCHE/mode_exchange_ll.f90 b/SURCOUCHE/mode_exchange_ll.f90 index 9b481f6102ab605d76f3d9dd8aaf70b0c3de22a2..96eed0ec8f80fe459c12fa63691ed3d9645ceb3c 100644 --- a/SURCOUCHE/mode_exchange_ll.f90 +++ b/SURCOUCHE/mode_exchange_ll.f90 @@ -2452,8 +2452,8 @@ CONTAINS GLX = .TRUE. ELSEIF ( HDIR == "S0_X" ) THEN !print*,"SSSSS0000_XXXXXXXXXXXXXXXX" - GDIR_ALL = .TRUE. - INX = JPHALO + !GDIR_ALL = .TRUE. + INX = -100. ! JPHALO GLX = .TRUE. ELSEIF ( HDIR == "Z0_Y" ) THEN !print*,"ZZZZZ0000_YYYYYYYYYYYYYYY" @@ -2462,8 +2462,8 @@ CONTAINS GLY = .TRUE. ELSEIF ( HDIR == "S0_Y" ) THEN !print*,"SSSS0000_YYYYYYYYYYYYYYY" - GDIR_ALL = .TRUE. - INY = JPHALO + !GDIR_ALL = .TRUE. + INY = -100. ! JPHALO GLY = .TRUE. ELSEIF ( HDIR == "01_X" ) THEN !print*,"01_X"