diff --git a/src/mesonh/aux/mode_fill_dimphyexn.F90 b/src/mesonh/aux/mode_fill_dimphyexn.F90 index 621482309c48e604dd727d010b4db39867d16dc3..1f5cc3c3c3381f78a01fc9e4a6cc8c6e62028e83 100644 --- a/src/mesonh/aux/mode_fill_dimphyexn.F90 +++ b/src/mesonh/aux/mode_fill_dimphyexn.F90 @@ -63,6 +63,9 @@ YDDIMPHYEX%NIJT=KIT*KJT CALL GET_INDICE_ll(YDDIMPHYEX%NIB, YDDIMPHYEX%NJB,& &YDDIMPHYEX%NIE, YDDIMPHYEX%NJE) ! +YDDIMPHYEX%NIJB=1 +YDDIMPHYEX%NIJE=KIT*KJT +! YDDIMPHYEX%NKL=1 YDDIMPHYEX%NKT=KKT YDDIMPHYEX%NKA=1