Changeset 2440 for trunk/LMDZ.MARS/util/localtime.F90

Timestamp:

Jan 12, 2021, 5:40:13 PM (4 years ago)

Author:

abierjon

Message:

Mars GCM:
Harmonization of the utility programs lslin, concatnc and localtime when dealing
with Solar longitude as the Time variable (for localtime, the check on long_name
attribute is still compliant with files from previous versions)

AB

File:

• trunk/LMDZ.MARS/util/localtime.F90 (modified) (1 diff)

trunk/LMDZ.MARS/util/localtime.F90

@@ -404 +404 @@
      ierr=nf_get_att_text(nid,timevar,"title",long_name)
    endif
-   if ((ierr.EQ.NF_NOERR).and.(long_name.eq."Solar longitude")) then
+   if ((ierr.EQ.NF_NOERR).and.(index(long_name,"Solar").ne.0)) then
+     ! if long_name contains "Solar"
      write(*,*) "ERROR: Time axis in input file is in Solar Longitude!"
      write(*,*) "       localtime requires sols as time axis!"