Ignore:
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:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.GENERIC/libf/phystd/mass_redistribution_mod.F90

    r2428 r3893  
    175175         PRINT*,'Ps = ',pplev(ig,1)
    176176         PRINT*,'d Ps = ',pdpsrfmr(ig)*ptimestep
    177          STOP
     177         call abort_physic("mass_redistribution", "Condensing more than total mass", 1)
    178178        ENDIF
    179179      enddo ! of DO ig=1,ngrid
    … …  
    375375                print*,q
    376376                print*,qm
    377                stop
     377                call abort_physic("mass_redistribution", "Top layer is disappearing", 1)
    378378             end if
    379379          else      ! if(w(l+1).lt.0)
Note: See TracChangeset for help on using the changeset viewer.