Changeset 9207 for branches/UKMO/dev_r5518_GO6_package/NEMOGCM/NEMO/OPA_SRC
- Timestamp:
- 2018-01-10T16:24:40+01:00 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/dev_r5518_GO6_package/NEMOGCM/NEMO/OPA_SRC/DIA/diaptr.F90
r8638 r9207 497 497 498 498 IF( ln_subbas ) THEN ! load sub-basin mask 499 CALL iom_open( 'subbasins', inum, ldstop = . FALSE. )499 CALL iom_open( 'subbasins', inum, ldstop = .TRUE. ) 500 500 CALL iom_get( inum, jpdom_data, 'atlmsk', btmsk(:,:,2) ) ! Atlantic basin 501 501 CALL iom_get( inum, jpdom_data, 'pacmsk', btmsk(:,:,3) ) ! Pacific basin
Note: See TracChangeset
for help on using the changeset viewer.