Changeset 3893 for trunk/LMDZ.GENERIC/libf/phystd/cp_neutral.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/cp_neutral.F90 (modified) (1 diff)

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

@@ -21 +21 @@
      cp_neutral = 14310.0
   else
-     print*,'Gas not recognised in cp_neutral!'
-     call abort
+     call abort_physic("cp_neutral","Gas not recognised in cp_neutral",1)
   endif