Ignore:
Timestamp:
03/19/24 16:12:21 (4 months ago)
Author:
jderouillat
Message:

Regenerate XIOS2 interfaces, and fix the field' s attribute name conversion_by_NetCDF removing upper-case letters

File:
1 edited

Legend:

Unmodified
Added
Removed

  • XIOS2/trunk/src/interface/fortran_attr/axisgroup_interface_attr.F90

    r1492 r2618  
    134134 
    135135 
     136    SUBROUTINE cxios_set_axisgroup_convert_from_factor(axisgroup_hdl, convert_from_factor) BIND(C) 
     137      USE ISO_C_BINDING 
     138      INTEGER (kind = C_INTPTR_T), VALUE :: axisgroup_hdl 
     139      REAL (KIND=C_DOUBLE)      , VALUE :: convert_from_factor 
     140    END SUBROUTINE cxios_set_axisgroup_convert_from_factor 
     141 
     142    SUBROUTINE cxios_get_axisgroup_convert_from_factor(axisgroup_hdl, convert_from_factor) BIND(C) 
     143      USE ISO_C_BINDING 
     144      INTEGER (kind = C_INTPTR_T), VALUE :: axisgroup_hdl 
     145      REAL (KIND=C_DOUBLE)             :: convert_from_factor 
     146    END SUBROUTINE cxios_get_axisgroup_convert_from_factor 
     147 
     148    FUNCTION cxios_is_defined_axisgroup_convert_from_factor(axisgroup_hdl) BIND(C) 
     149      USE ISO_C_BINDING 
     150      LOGICAL(kind=C_BOOL) :: cxios_is_defined_axisgroup_convert_from_factor 
     151      INTEGER (kind = C_INTPTR_T), VALUE :: axisgroup_hdl 
     152    END FUNCTION cxios_is_defined_axisgroup_convert_from_factor 
     153 
     154 
    136155    SUBROUTINE cxios_set_axisgroup_data_begin(axisgroup_hdl, data_begin) BIND(C) 
    137156      USE ISO_C_BINDING 
Note: See TracChangeset for help on using the changeset viewer.