Ignore:
Timestamp:
Jun 17, 2022, 6:49:40 PM (2 years ago)
Author:
lguez
Message:

Sync latest trunk changes to branch LMDZ-ECRAD.

Location:
LMDZ6/branches/LMDZ-ECRAD
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/branches/LMDZ-ECRAD

  • LMDZ6/branches/LMDZ-ECRAD/libf/dyn3d_common/infotrac.F90

    r4171 r4173  
    288288      nbtr   = nqtrue-COUNT(delPhase(tracers(:)%gen0Name) == 'H2O' &
    289289                               .AND. tracers(:)%component == 'lmdz') !--- Number of tracers passed to phytrac
     290#ifdef INCA
     291      nqINCA = COUNT(tracers(:)%component == 'inca')
     292#endif
    290293      lerr = getKey('hadv', hadv, ky=tracers(:)%keys)
    291294      lerr = getKey('vadv', vadv, ky=tracers(:)%keys)
Note: See TracChangeset for help on using the changeset viewer.