Ignore:
Timestamp:
Dec 15, 2021, 11:18:49 PM (2 years ago)
Author:
dcugnet
Message:

First commit for new tracers.

  • parser routines readTracFiles, strings_mod and tracer_types added in misc using revision 4 of https://svn.lmd.jussieu.fr/tracers-parser
  • tested in sequential and parallel mode using ioipsl.
  • for now, only two fields of "tracers(:)" derived type vector are used: "name" and "longName".
File:
1 edited

Legend:

Unmodified
Added
Removed
  • LMDZ6/trunk/libf/phylmd/iophy.F90

    r3488 r4046  
    811811    IMPLICIT NONE
    812812
    813     CHARACTER(LEN=20)                :: nam_var
    814     INTEGER, DIMENSION(nfiles)      :: flag_var
     813    CHARACTER(LEN=*), INTENT(INOUT) :: nam_var
     814    INTEGER,          INTENT(INOUT) :: flag_var(nfiles)
    815815
    816816    IF(prt_level>10) WRITE(lunout,*)'Avant getin: nam_var flag_var ',nam_var,flag_var(:)
Note: See TracChangeset for help on using the changeset viewer.