diff --git a/src/MNH/spawn_model2.f90 b/src/MNH/spawn_model2.f90 index 6c317cc5ae08c83af2487e6a30e77977815b95bc..25c056d34e89a9eefcf99c64b0d82eb2760f7911 100644 --- a/src/MNH/spawn_model2.f90 +++ b/src/MNH/spawn_model2.f90 @@ -370,7 +370,6 @@ LOGICAL :: GNOSON = .TRUE. REAL, DIMENSION(:,:,:), ALLOCATABLE :: ZWORK3D ! working array CHARACTER(LEN=28) :: YDAD_SON !$ -INTEGER :: IDIMX, IDIMY INTEGER :: IINFO_ll TYPE(LIST_ll), POINTER :: TZFIELDS_ll=>NULL() ! list of fields to exchange INTEGER :: NXOR_TMP, NYOR_TMP, NXEND_TMP, NYEND_TMP