Changeset 4470 for LMDZ6/trunk/libf/dyn3d/bilan_dyn.F

Timestamp:

Mar 10, 2023, 5:55:53 PM (16 months ago)

Author:

Laurent Fairhead

Message:

Replaced STOP instructions by calls to abort_gcm for a cleaner exit

File:

• LMDZ6/trunk/libf/dyn3d/bilan_dyn.F (modified) (1 diff)

LMDZ6/trunk/libf/dyn3d/bilan_dyn.F

@@ -185 +185 @@
            WRITE(lunout,*)'dt_app=',dt_app
            WRITE(lunout,*)'dt_cum=',dt_cum
-           stop
+           call abort_gcm('bilan_dyn','stopped',1)
         endif