- Timestamp:
- 2020-06-03T12:48:36+02:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2020/dev_12905_xios_ancil/src/OCE/DIA/diahsb.F90
r12489 r13016 258 258 IF( TRIM(cdrw) == 'READ' ) THEN ! Read/initialise 259 259 IF( ln_rstart ) THEN !* Read the restart file 260 IF(lrxios) CALL iom_swap( TRIM(crxios_context) ) 260 261 ! 261 262 IF(lwp) WRITE(numout,*) … … 279 280 CALL iom_get( numror, jpdom_autoglo, 'ssh_sc_loc_ini', ssh_sc_loc_ini, ldxios = lrxios ) 280 281 ENDIF 282 IF(lrxios) CALL iom_swap( TRIM(cxios_context) ) 281 283 ELSE 282 284 IF(lwp) WRITE(numout,*)
Note: See TracChangeset
for help on using the changeset viewer.