Changeset 5201 for LMDZ6/trunk/libf


Ignore:
Timestamp:
Sep 19, 2024, 4:39:19 PM (2 months ago)
Author:
dcugnet
Message:

Fix for last commit

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/dyn3d/check_isotopes.F90

    r5200 r5201  
    33   USE infotrac,    ONLY: nqtot, niso, nphas, isotope, isoCheck, iqIsoPha, isoSelect, &
    44                          ntiso, iH2O, nzone, tracers, isoName,  itZonIso, getKey
     5#ifdef CPP_IOIPSL
     6   USE ioipsl,          ONLY: getin
     7#else
     8   USE ioipsl_getincom, ONLY: getin
     9#endif
    510   IMPLICIT NONE
    611   include "dimensions.h"
Note: See TracChangeset for help on using the changeset viewer.