From 7cfc2570c6b81ac0f2a720b59496f96c850a03e0 Mon Sep 17 00:00:00 2001 From: Antoine Hoffmann <antoine.hoffmann@epfl.ch> Date: Wed, 29 Mar 2023 12:22:23 +0200 Subject: [PATCH] typo --- src/processing_mod.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/processing_mod.F90 b/src/processing_mod.F90 index c7e8dbee..3046ad30 100644 --- a/src/processing_mod.F90 +++ b/src/processing_mod.F90 @@ -191,7 +191,7 @@ CONTAINS ENDDO ENDDO ELSE - interp_napj(:,:,:,:,:,1:local_nz) = nadiab_moments(:,:,:,:,:,1:local_nz) + interp_napj(:,:,:,:,:,1:local_nz) = nadiab_moments(:,:,:,:,:,(1+ngz/2):(local_nz+ngz/2)) ENDIF END SUBROUTINE compute_interp_z -- GitLab