diff --git a/src/MNH/init_mnh.f90 b/src/MNH/init_mnh.f90 index f6f079048dc268e34a1967a1ff48face5e9a37b6..80d314b4c231de5d46f15270eed2abae8e37dd7f 100644 --- a/src/MNH/init_mnh.f90 +++ b/src/MNH/init_mnh.f90 @@ -74,6 +74,7 @@ !! V. Masson 15/03/99 call to ini_data_cover !! P.Jabouille 15/07/99 special initialisation for spawning !! J.P Chaboureau 2015 add ini_spectre_n +!! J.Escoabr 2/03/2016 bypass , reset NHALO=1 for SPAWNING !------------------------------------------------------------------------------- ! !* 0. DECLARATIONS @@ -171,6 +172,10 @@ DO JMI=1,JPMODELMAX CALL INI_SEG_n(JMI,YLUOUT(JMI),YINIFILE(JMI),YINIFILEPGD(JMI),ZTSTEP_ALL) IF (JMI.EQ.NMODEL) EXIT END DO +IF (CPROGRAM=='SPAWN ') THEN + !bypass + NHALO = 1 +END IF ! IF (CPROGRAM=='DIAG') CALL RESET_EXSEG(YLUOUT(1)) !