Ignore:
Timestamp:
Apr 2, 2026, 6:19:13 PM (39 hours ago)
Author:
jmauxion
Message:

Mars PCM:

  • Switching output variable name from "phisfi" to "phisinit" in physiq_mod to ensure compatibility with utils.
  • Updating xml files accordingly.
  • Switching localtime and zrecast back to previous version (undoing changes in r4161).

JM

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.MARS/util/localtime.F90

    r4161 r4169  
    10461046ierr=NF_INQ_VARID(infid,"phisinit",tmpvarid)
    10471047if (ierr.ne.NF_NOERR) then
    1048   write(*,*) "Failed to get phisinit ID..."
    1049   write(*,*) "Try name phisfi (xios name)..."
    1050   ierr=NF_INQ_VARID(infid,"phisfi",tmpvarid)
    1051   if (ierr.ne.NF_NOERR) then
    1052     write(*,*) "Failed again. Ok, I skip phisinit."
    1053     phisinit = 0.
    1054     phis = .false.
    1055   else
    1056     ierr=NF_GET_VAR_REAL(infid,tmpvarid,phisinit)
    1057     if (ierr.ne.NF_NOERR) then
    1058       write(*,*) "init2 ERRO: Failed reading phisinit"
    1059       stop
    1060     endif
    1061     phis = .true.
    1062   endif
     1048  write(*,*) "Failed to get phisinit ID. OK"
     1049  phisinit = 0.
     1050  phis = .false.
    10631051else
    10641052  ierr=NF_GET_VAR_REAL(infid,tmpvarid,phisinit)
Note: See TracChangeset for help on using the changeset viewer.