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

Timestamp:

11/12/15 16:33:14 (8 years ago)

Author:

mhnguyen

Message:

Generating Fortran interface for zoom_axis and zoom_domain

Test
+) On Curie
+) All results are correct

File:

• XIOS/trunk/src/interface/fortran/ixios.F90 (modified) (1 diff)

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

@@ -67 +67 @@
 USE iaxisgroup_attr, ONLY : xios(set_axisgroup_attr), xios(get_axisgroup_attr), xios(is_defined_axisgroup_attr)
 
+USE izoom_axis, ONLY : txios(zoom_axis), xios(is_valid_zoom_axis)
+
+USE izoom_axis_attr, ONLY : xios(set_zoom_axis_attr), xios(get_zoom_axis_attr), xios(is_defined_zoom_axis_attr)
+
+USE izoom_domain, ONLY : txios(zoom_domain), xios(is_valid_zoom_domain)
+
+USE izoom_domain_attr, ONLY : xios(set_zoom_domain_attr), xios(get_zoom_domain_attr), xios(is_defined_zoom_domain_attr)
+
 USE XIOS_INTERFACES, ONLY : xios(set_attr), xios(get_attr), xios(is_defined_attr), xios(get_handle), xios(add_child), &
                             xios(send_field), xios(send_scalar), xios(recv_field), xios(field_is_active), xios(getVar), xios(setVar)