New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 3432 for branches/2011/DEV_r2739_STFC_dCSE/NEMOGCM/NEMO/OPA_SRC/OBC/obcdta.F90 – NEMO

Ignore:
Timestamp:
2012-07-11T13:22:58+02:00 (12 years ago)
Author:
trackstand2
Message:

Merge branch 'ksection_partition'

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2011/DEV_r2739_STFC_dCSE/NEMOGCM/NEMO/OPA_SRC/OBC/obcdta.F90

    r3211 r3432  
    12511251         WRITE(*,*) 'obc_dta: You should not have seen this print! error?', kt 
    12521252      END SUBROUTINE obc_dta 
     1253 
     1254 
     1255      SUBROUTINE obc_dta_bt( kt, kbt )         ! Dummy routine 
     1256        INTEGER, INTENT( in ) ::   kt          ! ocean time-step index 
     1257        INTEGER, INTENT( in ) ::   kbt         ! barotropic ocean time-step index 
     1258         WRITE(*,*) 'obc_dta_bt: You should not have seen this print! error?', kt, kbt 
     1259      END SUBROUTINE obc_dta_bt 
    12531260#endif 
    12541261   !!============================================================================== 
Note: See TracChangeset for help on using the changeset viewer.