Changeset 5498 for ICOSA_LMDZ/src
- Timestamp:
- Jan 21, 2025, 10:49:03 AM (25 hours ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
ICOSA_LMDZ/src/phylmd/interface_icosa_lmdz.F90
r5317 r5498 419 419 ENDIF 420 420 421 if (tracers_ico2lmdz(iq)%iadv .ne. 0 ) tracers_ico2lmdz(iq)%isAdvected=.true.422 423 421 tracers_ico2lmdz(iq)%longName = tracers_ico2lmdz(iq)%name 424 422 IF(tracers_ico2lmdz(iq)%iadv > 0) tracers_ico2lmdz(iq)%longName=TRIM(tracers_ico2lmdz(iq)%name)//descrq(tracers_ico2lmdz(iq)%iadv) 425 423 426 tracers_ico2lmdz(iq)%isInPhysics= delPhase(tracers_ico2lmdz(iq)%gen0Name) /= 'H2O' .OR. tracers_ico2lmdz(iq)%component /= 'lmdz'427 424 tracers_ico2lmdz(iq)%iGeneration = 0 428 425
Note: See TracChangeset
for help on using the changeset viewer.