Ignore:
Timestamp:
Sep 10, 2024, 4:25:29 PM (16 months ago)
Author:
abarral
Message:

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

Location:
LMDZ6/branches/Amaury_dev/libf/dyn3dmem
Files:
24 edited

Legend:

Unmodified
Added
Removed
  • LMDZ6/branches/Amaury_dev/libf/dyn3dmem/addfi_loc.f90

    r5159 r5182  
    55        pdufi, pdvfi, pdhfi, pdqfi, pdpfi)
    66  USE parallel_lmdz
    7   USE infotrac, ONLY: nqtot
     7  USE lmdz_infotrac, ONLY: nqtot
    88  USE control_mod, ONLY: planet_type
    99  USE lmdz_ssum_scopy, ONLY: ssum
  • LMDZ6/branches/Amaury_dev/libf/dyn3dmem/advtrac_loc.f90

    r5159 r5182  
    77  !            M.A Filiberti (04/2002)
    88
    9   USE infotrac, ONLY: nqtot, tracers
     9  USE lmdz_infotrac, ONLY: nqtot, tracers
    1010  USE control_mod, ONLY: iapp_tracvl, day_step, planet_type
    1111  USE comconst_mod, ONLY: dtvr
  • LMDZ6/branches/Amaury_dev/libf/dyn3dmem/caladvtrac_loc.f90

    r5159 r5182  
    77        flxw, pk, iapptrac)
    88  USE parallel_lmdz
    9   USE infotrac, ONLY: nqtot
     9  USE lmdz_infotrac, ONLY: nqtot
    1010  USE control_mod, ONLY: iapp_tracvl, planet_type
    1111  USE caladvtrac_mod
  • LMDZ6/branches/Amaury_dev/libf/dyn3dmem/caladvtrac_mod.F90

    r5159 r5182  
    3131  USE allocate_field_mod
    3232  USE parallel_lmdz
    33   USE infotrac, ONLY: nqtot
     33  USE lmdz_infotrac, ONLY: nqtot
    3434  USE advtrac_mod, ONLY: advtrac_allocate
    3535  USE groupe_mod
  • LMDZ6/branches/Amaury_dev/libf/dyn3dmem/check_isotopes_loc.F90

    r5159 r5182  
    22   USE parallel_lmdz
    33   USE lmdz_strings, ONLY: maxlen, msg, strIdx, strStack, int2str, real2str
    4    USE infotrac,    ONLY: nqtot, niso, nphas, isotope, isoCheck, iqIsoPha, isoSelect, &
     4   USE lmdz_infotrac,    ONLY: nqtot, niso, nphas, isotope, isoCheck, iqIsoPha, isoSelect, &
    55                          ntiso, iH2O, nzone, tracers, isoName,  itZonIso, getKey
    66
  • LMDZ6/branches/Amaury_dev/libf/dyn3dmem/conf_gcm.F90

    r5159 r5182  
    1010  USE lmdz_filtre_fft_loc, ONLY: use_filtre_fft_loc=>use_filtre_fft
    1111  USE mod_hallo, ONLY: use_mpi_alloc
    12   USE infotrac, ONLY: type_trac
     12  USE lmdz_infotrac, ONLY: type_trac
    1313  USE lmdz_assert, ONLY: assert
    1414  USE comconst_mod, ONLY: dissip_deltaz, dissip_factz, dissip_zref, &
  • LMDZ6/branches/Amaury_dev/libf/dyn3dmem/dynetat0_loc.F90

    r5159 r5182  
    77!-------------------------------------------------------------------------------
    88  USE parallel_lmdz
    9   USE infotrac,    ONLY: nqtot, tracers, niso, iqIsoPha, iH2O, isoName
     9  USE lmdz_infotrac,    ONLY: nqtot, tracers, niso, iqIsoPha, iH2O, isoName
    1010  USE lmdz_strings, ONLY: maxlen, msg, strStack, real2str, int2str, strIdx
    1111  USE netcdf,      ONLY: nf90_open,  nf90_nowrite, nf90_inquire_dimension, nf90_inq_varid, &
  • LMDZ6/branches/Amaury_dev/libf/dyn3dmem/dynredem_loc.F90

    r5159 r5182  
    88  USE mod_hallo
    99  USE lmdz_strings, ONLY: maxlen
    10   USE infotrac, ONLY: nqtot, tracers
     10  USE lmdz_infotrac, ONLY: nqtot, tracers
    1111  USE netcdf, ONLY: nf90_create, nf90_def_dim, nf90_inq_varid, nf90_global, &
    1212          nf90_close, nf90_put_att, nf90_unlimited, nf90_clobber, &
     
    169169  USE mod_hallo
    170170  USE lmdz_strings, ONLY: maxlen
    171   USE infotrac, ONLY: nqtot, tracers, type_trac
     171  USE lmdz_infotrac, ONLY: nqtot, tracers, type_trac
    172172  USE control_mod
    173173  USE netcdf, ONLY: nf90_open, nf90_nowrite, nf90_get_var, nf90_inq_varid, &
  • LMDZ6/branches/Amaury_dev/libf/dyn3dmem/gcm.F90

    r5159 r5182  
    88  USE mod_const_mpi, ONLY: init_const_mpi
    99  USE parallel_lmdz
    10   USE infotrac, ONLY: nqtot, init_infotrac
     10  USE lmdz_infotrac, ONLY: nqtot, init_infotrac
    1111  USE mod_hallo
    1212  USE Bands
  • LMDZ6/branches/Amaury_dev/libf/dyn3dmem/groupe_mod.F90

    r5159 r5182  
    1010  USE allocate_field_mod
    1111  USE parallel_lmdz
    12 !  USE infotrac
     12!  USE lmdz_infotrac
    1313  USE advtrac_mod, ONLY: advtrac_allocate
    1414USE lmdz_dimensions, ONLY: iim, jjm, llm, ndm
  • LMDZ6/branches/Amaury_dev/libf/dyn3dmem/iniacademic_loc.F90

    r5159 r5182  
    44
    55  USE lmdz_filtreg, ONLY: inifilr
    6   USE infotrac, ONLY: nqtot, niso, iqIsoPha, tracers, getKey, isoName
     6  USE lmdz_infotrac, ONLY: nqtot, niso, iqIsoPha, tracers, getKey, isoName
    77  USE control_mod, ONLY: day_step, planet_type
    88  USE exner_hyb_m, ONLY: exner_hyb
  • LMDZ6/branches/Amaury_dev/libf/dyn3dmem/initdynav_loc.f90

    r5159 r5182  
    88  USE lmdz_write_field
    99  USE misc_mod
    10   ! USE infotrac
     10  ! USE lmdz_infotrac
    1111  USE com_io_dyn_mod, ONLY: histaveid, histvaveid, histuaveid, &
    1212          dynhistave_file, dynhistvave_file, dynhistuave_file
  • LMDZ6/branches/Amaury_dev/libf/dyn3dmem/leapfrog_loc.F90

    r5160 r5182  
    1313  USE lmdz_vampir
    1414  USE lmdz_timer_filtre, ONLY: print_filtre_timer
    15   USE infotrac
     15  USE lmdz_infotrac
    1616  USE guide_loc_mod, ONLY: guide_main
    1717  USE getparam
  • LMDZ6/branches/Amaury_dev/libf/dyn3dmem/leapfrog_mod.F90

    r5159 r5182  
    4141  USE lmdz_dimensions
    4242  USE lmdz_paramet
    43   USE infotrac
     43  USE lmdz_infotrac
    4444  USE caldyn_mod,ONLY: caldyn_allocate
    4545  USE integrd_mod,ONLY: integrd_allocate
  • LMDZ6/branches/Amaury_dev/libf/dyn3dmem/lmdz_call_calfis.F90

    r5159 r5182  
    3636    USE lmdz_dimensions
    3737    USE lmdz_paramet
    38     USE infotrac, ONLY: nqtot
     38    USE lmdz_infotrac, ONLY: nqtot
    3939    IMPLICIT NONE
    4040    TYPE(distrib), POINTER :: d
     
    8080    USE Bands
    8181    USE lmdz_vampir
    82     USE infotrac, ONLY: nqtot
     82    USE lmdz_infotrac, ONLY: nqtot
    8383    USE control_mod
    8484    USE write_field_loc
  • LMDZ6/branches/Amaury_dev/libf/dyn3dmem/qminimum_loc.f90

    r5159 r5182  
    33SUBROUTINE qminimum_loc(q, nqtot, deltap)
    44  USE parallel_lmdz
    5   USE infotrac, ONLY: niso, ntiso, iqIsoPha, tracers, &
     5  USE lmdz_infotrac, ONLY: niso, ntiso, iqIsoPha, tracers, &
    66          isoCheck, min_qParent
    77  USE lmdz_strings, ONLY: strIdx
  • LMDZ6/branches/Amaury_dev/libf/dyn3dmem/vlsplt_loc.f90

    r5159 r5182  
    1313  !   --------------------------------------------------------------------
    1414  USE parallel_lmdz
    15   USE infotrac, ONLY: nqtot, tracers, & ! CRisi                 &
     15  USE lmdz_infotrac, ONLY: nqtot, tracers, & ! CRisi                 &
    1616          min_qParent, min_qMass, min_ratio ! MVals et CRisi
    1717  USE lmdz_iniprint, ONLY: lunout, prt_level
     
    381381  !   --------------------------------------------------------------------
    382382  USE parallel_lmdz
    383   USE infotrac, ONLY: nqtot, tracers, & ! CRisi                 &
     383  USE lmdz_infotrac, ONLY: nqtot, tracers, & ! CRisi                 &
    384384          min_qParent, min_qMass, min_ratio ! MVals et CRisi
    385385  USE comconst_mod, ONLY: pi
     
    814814  USE parallel_lmdz
    815815  USE vlz_mod
    816   USE infotrac, ONLY: nqtot, tracers, & ! CRisi                 &
     816  USE lmdz_infotrac, ONLY: nqtot, tracers, & ! CRisi                 &
    817817          min_qParent, min_qMass, min_ratio ! MVals et CRisi
    818818  USE lmdz_iniprint, ONLY: lunout, prt_level
  • LMDZ6/branches/Amaury_dev/libf/dyn3dmem/vlspltgen_loc.F90

    r5160 r5182  
    2727  USE lmdz_vampir
    2828  ! CRisi: on rajoute variables utiles d'infotrac
    29   USE infotrac, ONLY: nqtot, tracers, isoCheck
     29  USE lmdz_infotrac, ONLY: nqtot, tracers, isoCheck
    3030  USE vlspltgen_mod
    3131  USE comconst_mod, ONLY: cpp
  • LMDZ6/branches/Amaury_dev/libf/dyn3dmem/vlspltgen_mod.F90

    r5159 r5182  
    1414  USE allocate_field_mod
    1515  USE parallel_lmdz
    16   USE infotrac
     16  USE lmdz_infotrac
    1717  USE vlz_mod,ONLY: vlz_allocate
    1818USE lmdz_dimensions, ONLY: iim, jjm, llm, ndm
  • LMDZ6/branches/Amaury_dev/libf/dyn3dmem/vlspltqs_loc.f90

    r5159 r5182  
    1111  !   --------------------------------------------------------------------
    1212  USE parallel_lmdz
    13   USE infotrac, ONLY: nqtot, tracers, & ! CRisi                 &
     13  USE lmdz_infotrac, ONLY: nqtot, tracers, & ! CRisi                 &
    1414          min_qParent, min_qMass, min_ratio ! MVals et CRisi7
    1515USE lmdz_dimensions, ONLY: iim, jjm, llm, ndm
     
    388388  !   --------------------------------------------------------------------
    389389  USE parallel_lmdz
    390   USE infotrac, ONLY: nqtot, tracers, & ! CRisi                 &
     390  USE lmdz_infotrac, ONLY: nqtot, tracers, & ! CRisi                 &
    391391          min_qParent, min_qMass, min_ratio ! MVals et CRisi
    392392  USE comconst_mod, ONLY: pi
  • LMDZ6/branches/Amaury_dev/libf/dyn3dmem/vlz_mod.F90

    r5159 r5182  
    1414  USE allocate_field_mod
    1515  USE parallel_lmdz
    16   USE infotrac
     16  USE lmdz_infotrac
    1717  USE lmdz_dimensions
    1818  USE lmdz_paramet
     
    3333  USE bands
    3434  USE parallel_lmdz
    35   USE infotrac
     35  USE lmdz_infotrac
    3636  IMPLICIT NONE
    3737    TYPE(distrib),INTENT(IN) :: dist
  • LMDZ6/branches/Amaury_dev/libf/dyn3dmem/writedyn_xios.F90

    r5159 r5182  
    77  USE parallel_lmdz
    88  USE misc_mod
    9   USE infotrac, ONLY: nqtot
     9  USE lmdz_infotrac, ONLY: nqtot
    1010  USE com_io_dyn_mod, ONLY: histaveid, histvaveid, histuaveid
    1111  USE comconst_mod, ONLY: cpp
  • LMDZ6/branches/Amaury_dev/libf/dyn3dmem/writedynav_loc.f90

    r5159 r5182  
    88  USE parallel_lmdz
    99  USE misc_mod
    10   USE infotrac, ONLY: nqtot
     10  USE lmdz_infotrac, ONLY: nqtot
    1111  USE com_io_dyn_mod, ONLY: histaveid, histvaveid, histuaveid
    1212  USE comconst_mod, ONLY: cpp
  • LMDZ6/branches/Amaury_dev/libf/dyn3dmem/writehist_loc.f90

    r5159 r5182  
    55  USE parallel_lmdz
    66  USE misc_mod
    7   USE infotrac, ONLY: nqtot
     7  USE lmdz_infotrac, ONLY: nqtot
    88  USE com_io_dyn_mod, ONLY: histid, histvid, histuid
    99  USE comconst_mod, ONLY: cpp
Note: See TracChangeset for help on using the changeset viewer.