Changeset 3865 for LMDZ6/trunk/libf/dyn3dmem/leapfrog_loc.F
- Timestamp:
- Mar 23, 2021, 4:14:07 PM (3 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/trunk/libf/dyn3dmem/leapfrog_loc.F
r3666 r3865 1539 1539 1540 1540 #ifdef INCA 1541 if (type_trac == 'inca' ) then1541 if (type_trac == 'inca' .OR. type_trac == 'inco') then 1542 1542 call finalize_inca 1543 1543 endif … … 1594 1594 1595 1595 #ifdef INCA 1596 if (type_trac == 'inca' ) then1596 if (type_trac == 'inca' .OR. type_trac == 'inco') then 1597 1597 call finalize_inca 1598 1598 endif … … 1750 1750 1751 1751 #ifdef INCA 1752 if (type_trac == 'inca' ) then1752 if (type_trac == 'inca' .OR. type_trac == 'inco') then 1753 1753 call finalize_inca 1754 1754 endif … … 1845 1845 1846 1846 #ifdef INCA 1847 if (type_trac == 'inca' ) then1847 if (type_trac == 'inca' .OR. type_trac == 'inco') then 1848 1848 call finalize_inca 1849 1849 endif
Note: See TracChangeset
for help on using the changeset viewer.