Changeset 3893 for trunk/LMDZ.GENERIC/libf/phystd/thermcell_dq.F90

Timestamp:

Aug 13, 2025, 7:53:49 PM (7 days ago)

Author:

gmilcareck

Message:

Remove all "call abort" and "stop" statement in LMDZ.GENERIC and replacing them by call abort_physic().

File:

• trunk/LMDZ.GENERIC/libf/phystd/thermcell_dq.F90 (modified) (1 diff)

trunk/LMDZ.GENERIC/libf/phystd/thermcell_dq.F90

@@ -96 +96 @@
                print *, 'fm ', fm(ig,1)
                print *, '-------------------------------'
-               CALL abort
+               CALL abort_physic("thermcell_dq","Entrainment is greater than the layer mass",1)
             ENDIF
          ENDDO