Changeset 537 for XIOS/trunk/src/interface/fortran/ixios.F90

Timestamp:

12/11/14 14:32:37 (10 years ago)

Author:

rlacroix

Message:

Add a new attribute type for durations and use it for the context's timestep.

Note that the "xios_time" type and the "xios_set_timestep" procedure have been removed from the Fortran interface. Instead, the "xios_duration" type and the "xios_get_context_attr"/"xios_set_context_attr" procedures should now be used to get/set the timestep.

File:

• XIOS/trunk/src/interface/fortran/ixios.F90 (modified) (3 diffs)

XIOS/trunk/src/interface/fortran/ixios.F90

@@ -19 +19 @@
                   xios(setVar_logic), xios(setVar_char)
 
-USE idate, ONLY : txios(date),txios(time), xios(set_timestep),xios(update_calendar)
+USE idate, ONLY : txios(date), txios(duration), xios(update_calendar)
 
 USE idomain, ONLY : txios(domain), txios(domaingroup), xios(get_domain_handle),  &
@@ -158 +158 @@
  PUBLIC :: txios(domain), txios(domaingroup),txios(field), txios(fieldgroup),txios(file), txios(filegroup), &
           txios(grid), txios(gridgroup), txios(axis), txios(axisgroup),txios(context), txios(date),         &
-          txios(time), txios(variable)
+          txios(duration), txios(variable)
 
  PUBLIC :: xios(set_attr), xios(set_domain_attr), xios(set_domaingroup_attr), xios(set_fieldgroup_attr), &
@@ -184 +184 @@
 
  PUBLIC :: xios(set_current_context)
- PUBLIC :: xios(set_timestep),xios(update_calendar)
+ PUBLIC :: xios(update_calendar)
  PUBLIC :: xios(initialize), xios(init_server), xios(finalize), xios(context_initialize),xios(context_is_initialized), &
            xios(solve_inheritance), xios(close_context_definition), xios(context_finalize), xios(send_field),          &