Changeset 6045


Ignore:
Timestamp:
Jan 22, 2026, 9:46:55 AM (8 hours ago)
Author:
Sebastien Nguyen
Message:

replace abort_gcm by abort_physic in physiq_mod.F90

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/branches/ICOLMDZISO_SN/libf/phylmdiso/physiq_mod.F90

    r6036 r6045  
    67186718    IF (CPPKEY_STRATAER) THEN
    67196719#ifdef ISO
    6720       CALL abort_gcm("physiq_mod", "StratAer isn't ISO-compatible for now, 07/24",1)
     6720      CALL abort_physic("physiq_mod", "StratAer isn't ISO-compatible for now, 07/24",1)
    67216721#endif
    67226722      CALL stratH2O_methox(debut,paprs,d_q_ch4)
    … …  
    67456745IF (CPPKEY_STRATAER) THEN
    67466746#ifdef ISO
    6747   CALL abort_gcm("physiq_mod", "StratAer isn't ISO-compatible for now, 07/24",1)
     6747  CALL abort_physic("physiq_mod", "StratAer isn't ISO-compatible for now, 07/24",1)
    67486748#else
    67496749    IF (ok_qemiss) THEN
Note: See TracChangeset for help on using the changeset viewer.