Changeset 4400


Ignore:
Timestamp:
Jan 27, 2023, 1:32:00 AM (22 months ago)
Author:
dcugnet
Message:

Fix for newH2OIso

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/misc/readTracFiles_mod.f90

    r4399 r4400  
    125125
    126126  !--- CORRESPONDANCE BETWEEN OLD AND NEW WATER NAMES
    127   CHARACTER(LEN=maxlen), SAVE :: oldH2OIso(5) = ['eau',   'HDO',    'O18',   'O17',   'HTO'   ]
    128   CHARACTER(LEN=maxlen), SAVE :: newH2OIso(5) = ['H216O', 'HDO   ', 'H218O', 'H217O', 'HTO   ']
     127  CHARACTER(LEN=maxlen), SAVE :: oldH2OIso(5) = ['eau',   'HDO',   'O18',   'O17',   'HTO'  ]
     128  CHARACTER(LEN=maxlen), SAVE :: newH2OIso(5) = ['H216O', 'HDO  ', 'H218O', 'H217O', 'HTO  ']
    129129
    130130  !--- CORRESPONDANCE BETWEEN OLD AND NEW HNO3 RELATED SPECIES NAMES
Note: See TracChangeset for help on using the changeset viewer.