Changeset 4143 for LMDZ6/trunk/libf/misc/trac_types_mod.F90
- Timestamp:
- May 9, 2022, 12:35:40 PM (2 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/trunk/libf/misc/trac_types_mod.F90
r4120 r4143 47 47 INTEGER :: ntiso = 0 !--- Number of isotopes, including tagging tracers 48 48 INTEGER :: nphas = 0 !--- Number phases 49 INTEGER, ALLOCATABLE :: iq TraPha(:,:) !--- Idx in "tracers(1:nqtot)" = f(name(1:ntiso)),phas)50 !--- "iq TraPha" former name: "iqiso"49 INTEGER, ALLOCATABLE :: iqIsoPha(:,:) !--- Idx in "tracers(1:nqtot)" = f(name(1:ntiso)),phas) 50 !--- "iqIsoPha" former name: "iqiso" 51 51 INTEGER, ALLOCATABLE :: itZonIso(:,:) !--- Idx in "trac(1:ntiso)" = f(zone, name(1:niso)) 52 52 !--- "itZonIso" former name: "index_trac"
Note: See TracChangeset
for help on using the changeset viewer.