Changeset 4071 for LMDZ6/trunk/libf/phylmd/phyetat0.F90
- Timestamp:
- Jan 31, 2022, 9:20:17 PM (2 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/trunk/libf/phylmd/phyetat0.F90
r4059 r4071 452 452 it = 0 453 453 DO iq = 1, nqtot 454 IF(.NOT. tracers(iq)%isAdvected .OR. tracers(iq)%isH2Ofamily) CYCLE454 IF(.NOT.(tracers(iq)%isAdvected .AND. tracers(iq)%isInPhysics)) CYCLE 455 455 it = it+1 456 456 found=phyetat0_get(1,trs(:,it),"trs_"//TRIM(tracers(iq)%name), &
Note: See TracChangeset
for help on using the changeset viewer.