Changeset 5182 for LMDZ6/branches/Amaury_dev/libf/dyn3dmem/qminimum_loc.f90

Timestamp:

Sep 10, 2024, 4:25:29 PM (2 months ago)

Author:

abarral

Message:

(WIP) Replace REPROBUS CPP KEY by logical
properly name modules

File:

• LMDZ6/branches/Amaury_dev/libf/dyn3dmem/qminimum_loc.f90 (modified) (1 diff)

LMDZ6/branches/Amaury_dev/libf/dyn3dmem/qminimum_loc.f90

@@ -3 +3 @@
 SUBROUTINE qminimum_loc(q, nqtot, deltap)
   USE parallel_lmdz
-  USE infotrac, ONLY: niso, ntiso, iqIsoPha, tracers, &
+  USE lmdz_infotrac, ONLY: niso, ntiso, iqIsoPha, tracers, &
           isoCheck, min_qParent
   USE lmdz_strings, ONLY: strIdx