Changeset 2881 for trunk/LMDZ.MARS/libf


Ignore:
Timestamp:
Jan 26, 2023, 10:58:28 AM (22 months ago)
Author:
abierjon
Message:

Mars GCM:
Fix a small error on co2ice in dynphy_lonlat/phymars/lect_start_archive.F (used by newstart)

SF+AB

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/LMDZ.MARS/libf/dynphy_lonlat/phymars/lect_start_archive.F

    r2832 r2881  
    715715      ELSE
    716716        ! no 'co2ice', look for co2_surf instead
    717         ierr = NF_INQ_VARID (nid, "co2ice", nvarid)
     717        ierr = NF_INQ_VARID (nid, "co2_surf", nvarid)
    718718        IF (ierr .NE. NF_NOERR) THEN
    719719          PRINT*, "lect_start_archive: <co2_surf> is missing"
Note: See TracChangeset for help on using the changeset viewer.