- Timestamp:
- 2017-06-08T12:50:22+02:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/dev_r5518_GO6_package_XIOS_read/NEMOGCM/NEMO/OPA_SRC/IOM/iom.F90
r8038 r8153 359 359 SUBROUTINE set_rstr_active() 360 360 !sets enabled = .TRUE. for each field in restart file 361 #if defined key_xios2 361 362 CHARACTER(len=256) :: rst_file 362 363 TYPE(xios_field) :: field_hdl … … 384 385 ENDIF 385 386 END DO 386 387 #endif 387 388 END SUBROUTINE set_rstr_active 388 389
Note: See TracChangeset
for help on using the changeset viewer.