Changeset 4461


Ignore:
Timestamp:
Mar 9, 2023, 5:19:00 PM (16 months ago)
Author:
lguez
Message:

Bug fix: call abort_physic with code 1

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/cv30_routines.F90

    r3577 r4461  
    33493349           write(*,*) 'clw(i,k)=',clw(i,k)
    33503350           write(*,*) 'cpd,cpv=',cpd,cpv
    3351            CALL abort_physic(modname,abort_message,0)
     3351           CALL abort_physic(modname,abort_message,1)
    33523352        endif
    33533353       enddo !do k=1,nl
Note: See TracChangeset for help on using the changeset viewer.