Changeset 3864


Ignore:
Timestamp:
Jul 23, 2025, 11:47:46 AM (11 days ago)
Author:
gmilcareck
Message:

Fix forgotten argument on some call abort_physic

Location:
trunk/LMDZ.GENERIC
Files:
3 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.GENERIC/changelog.txt

    r3863 r3864  
    20862086== 23/07/2025 == GM
    20872087Fix major bug in rayleigh scattering. A scalep is added to make it consistent with the pressure unit (hPa instead of Pa).
     2088
     2089== 23/07/2025 == GM
     2090Fix forgotten argument on some call abort_physic

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

    r3724 r3864  
    506506        write(*,*) 'You have more Radiative Generic Condensable Species than Generic Condensable Species'
    507507        write(*,*)'This is not possible: check your Modern traceur.def'
    508         call abort_physic("initracer, issue with # of RGCS and GCS")
     508        call abort_physic("initracer, issue with # of RGCS and GCS",1)
    509509      endif
    510510

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

    r3816 r3864  
    558558             write(*,*) 'Data file ',trim(varspec_data),' not found.'
    559559             write(*,*) 'Check that the data is in your run repository.'
    560              call abort_physic !a verifier
     560             call abort !a verifier
    561561           else
    562562             do k=1,nvarlayer
Note: See TracChangeset for help on using the changeset viewer.