Changeset 10817 for NEMO/trunk/src/OCE/IOM/iom.F90
- Timestamp:
- 2019-03-29T18:23:45+01:00 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk/src/OCE/IOM/iom.F90
r10523 r10817 222 222 # endif 223 223 #if defined key_top 224 CALL iom_set_axis_attr( "profsed", paxis = profsed )224 IF( ALLOCATED(profsed) ) CALL iom_set_axis_attr( "profsed", paxis = profsed ) 225 225 #endif 226 226 CALL iom_set_axis_attr( "icbcla", class_num ) 227 CALL iom_set_axis_attr( "iax_20C", (/ REAL(20,wp) /) ) 228 CALL iom_set_axis_attr( "iax_28C", (/ REAL(28,wp) /) ) 227 CALL iom_set_axis_attr( "iax_20C", (/ REAL(20,wp) /) ) ! strange syntaxe and idea... 228 CALL iom_set_axis_attr( "iax_28C", (/ REAL(28,wp) /) ) ! strange syntaxe and idea... 229 229 ENDIF 230 230 !
Note: See TracChangeset
for help on using the changeset viewer.