Changeset 8458 for branches/UKMO/dev_r5518_GO6_package_r8356_plus_form_drag/NEMOGCM/NEMO/OPA_SRC/SBC/cpl_oasis3.F90
- Timestamp:
- 2017-08-23T17:07:41+02:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/dev_r5518_GO6_package_r8356_plus_form_drag/NEMOGCM/NEMO/OPA_SRC/SBC/cpl_oasis3.F90
r8280 r8458 216 216 ! 217 217 DO ji = 1, ksnd 218 WRITE(numout,*) '==========================================================' 219 WRITE(numout,*) 'In cpl_define' 220 WRITE(numout,*) 'ji: ', ji 221 WRITE(numout,*) 'ssnd(ji)%laction: ', ssnd(ji)%laction 222 WRITE(numout,*) 'ssnd(ji)%nct: ', ssnd(ji)%nct 223 WRITE(numout,*) 'ssnd(ji)%clname: ', ssnd(ji)%clname 224 WRITE(numout,*) '==========================================================' 218 225 IF ( ssnd(ji)%laction ) THEN 219 226
Note: See TracChangeset
for help on using the changeset viewer.