Index: LMDZ6/trunk/libf/phylmd/lmdz_gwd_ini.f90
===================================================================
--- LMDZ6/trunk/libf/phylmd/lmdz_gwd_ini.f90	(revision 6060)
+++ LMDZ6/trunk/libf/phylmd/lmdz_gwd_ini.f90	(revision 6061)
@@ -123,5 +123,5 @@
    ! Others
 
-   LOGICAL, SAVE :: firstcall = .TRUE.
+   LOGICAL, SAVE :: firstcall = .true.
    !$OMP THREADPRIVATE(firstcall)
 
@@ -222,6 +222,7 @@
 
       IF (klon == 1 .AND. ok_gwd_rando) THEN
-         abort_message = 'stochastic non-orographic gravity wave drag param does not work in 1D'
-         CALL abort_physic('gwd_ini', abort_message, 1)
+         print*, 'stochastic non-orographic gravity wave drag param does not work in 1D'
+         print*, 'I set ok_gwd_rando to false'
+         ok_gwd_rando=.false.
       END IF