Changeset 7198 for branches/2016/dev_r7012_ROBUST5_CNRS/NEMOGCM/NEMO/TOP_SRC/MY_TRC/trcsms_my_trc.F90
- Timestamp:
- 2016-11-04T18:58:24+01:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2016/dev_r7012_ROBUST5_CNRS/NEMOGCM/NEMO/TOP_SRC/MY_TRC/trcsms_my_trc.F90
r7097 r7198 15 15 USE trd_oce 16 16 USE trdtrc 17 USE trcbc, only : trc_bc _read17 USE trcbc, only : trc_bc 18 18 19 19 IMPLICIT NONE … … 54 54 IF( l_trdtrc ) CALL wrk_alloc( jpi, jpj, jpk, ztrmyt ) 55 55 56 CALL trc_bc _read( kt ) ! tracers: surface and lateral Boundary Conditions56 CALL trc_bc ( kt ) ! tracers: surface and lateral Boundary Conditions 57 57 58 58 ! add here the call to BGC model
Note: See TracChangeset
for help on using the changeset viewer.