Changeset 2980 for trunk/LMDZ.MARS/libf


Ignore:
Timestamp:
Jun 12, 2023, 4:38:28 PM (18 months ago)
Author:
romain.vande
Message:

Mars PEM :

Adapt PEM to 1d runs.
Cleaning of names and unused variables.
Correct minor errors.
Adapt and correct reshape_xios_output utilitary for 1d diagfi output.

RV

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.MARS/libf/phymars/dyn1d/testphys1d.F

    r2951 r2980  
    122122      REAL pks, ptif, w(nlayer)
    123123      REAL qtotinit,qtot
    124       real,allocatable :: mqtot(:)
    125124      INTEGER ierr, aslun
    126125      REAL tmp1(0:nlayer),tmp2(0:nlayer)
    … …  
    287286        allocate(dq(nlayer,nq))
    288287        allocate(dqdyn(nlayer,nq))
    289         allocate(mqtot(nq))
    290288        allocate(tnom_transp(nq))
    291289       
Note: See TracChangeset for help on using the changeset viewer.