Changeset 537 for XIOS/trunk/src/test/test_cs.f90
- Timestamp:
- 12/11/14 14:32:37 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
XIOS/trunk/src/test/test_cs.f90
r501 r537 30 30 INTEGER :: size 31 31 INTEGER :: comm 32 TYPE(xios_ time):: dtime32 TYPE(xios_duration) :: dtime 33 33 TYPE(xios_context) :: ctx_hdl 34 34 INTEGER,PARAMETER :: ni_glo=100 … … 126 126 127 127 dtime%second=3600 128 CALL xios_set_ timestep(dtime)128 CALL xios_set_context_attr("test", timestep=dtime) 129 129 130 130 ! ni=0 ; lonvalue(:)=0
Note: See TracChangeset
for help on using the changeset viewer.