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

Timestamp:

Aug 13, 2025, 7:53:49 PM (6 months 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/rain_generic.F90 (modified) (1 diff)

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

@@ -426 +426 @@
          do i = 1, ngrid
             if(precip_rate(i).lt.0.0)then
-               print*,'Droplets of negative rain are falling...'
-               call abort
+               call abort_physic("rain_generic", "Droplets of negative rain are falling",1)
             endif
             ! lines below should be uncommented and customized if you want to make a difference between rain and snow