Changeset 768 for branches/dev_001_GM/NEMO/TOP_SRC/trcdit.F90
- Timestamp:
- 2007-12-16T15:46:18+01:00 (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/dev_001_GM/NEMO/TOP_SRC/trcdit.F90
r763 r768 701 701 END SUBROUTINE trcdib_wr 702 702 703 # endif 704 703 705 #else 704 706 !!---------------------------------------------------------------------- 705 707 !! Dummy module : No passive tracer 706 708 !!---------------------------------------------------------------------- 709 CONTAINS 707 710 SUBROUTINE trcdit_wr( kt, kindic ) ! Dummy routine 708 711 INTEGER, INTENT ( in ) :: kt, kindic
Note: See TracChangeset
for help on using the changeset viewer.