Changeset 389 for trunk/NEMO/OPA_SRC/OBC/obcdta.F90
- Timestamp:
- 2006-03-09T18:22:04+01:00 (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/OPA_SRC/OBC/obcdta.F90
r367 r389 1273 1273 WRITE(*,*) 'obc_dta: You should not have seen this print! error?', kt 1274 1274 END SUBROUTINE obc_dta 1275 SUBROUTINE obc_dta_bt( kt, jn) ! Dummy routine 1276 INTEGER, INTENT (in) :: kt, jn 1277 WRITE(*,*) 'obc_dta_bt: You should not have seen this print! error?', kt 1278 END SUBROUTINE obc_dta_bt 1275 1279 #endif 1276 1280
Note: See TracChangeset
for help on using the changeset viewer.