Changeset 2617


Ignore:
Timestamp:
03/19/24 15:21:33 (8 weeks ago)
Author:
jderouillat
Message:

Fix the field's attribute name conversion_by_NetCDF removing upper-case letters

Location:
XIOS3/trunk/src
Files:
8 edited

Legend:

Unmodified
Added
Removed
  • XIOS3/trunk/src/config/field_attribute.conf

    r2600 r2617  
    1313DECLARE_ATTRIBUTE(int,       level) 
    1414DECLARE_ATTRIBUTE(int,       prec) 
    15 DECLARE_ATTRIBUTE(bool,      conversion_by_NetCDF) 
     15DECLARE_ATTRIBUTE(bool,      conversion_by_netcdf) 
    1616DECLARE_ATTRIBUTE(StdString, expr, false) 
    1717 
  • XIOS3/trunk/src/interface/c_attr/icfield_attr.cpp

    r2616 r2617  
    287287 
    288288 
    289   void cxios_set_field_conversion_by_NetCDF(field_Ptr field_hdl, bool conversion_by_NetCDF) 
    290   { 
    291     CTimer::get("XIOS").resume(); 
    292     field_hdl->conversion_by_NetCDF.setValue(conversion_by_NetCDF); 
    293     CTimer::get("XIOS").suspend(); 
    294   } 
    295  
    296   void cxios_get_field_conversion_by_NetCDF(field_Ptr field_hdl, bool* conversion_by_NetCDF) 
    297   { 
    298     CTimer::get("XIOS").resume(); 
    299     *conversion_by_NetCDF = field_hdl->conversion_by_NetCDF.getInheritedValue(); 
    300     CTimer::get("XIOS").suspend(); 
    301   } 
    302  
    303   bool cxios_is_defined_field_conversion_by_NetCDF(field_Ptr field_hdl) 
    304   { 
    305      CTimer::get("XIOS").resume(); 
    306      bool isDefined = field_hdl->conversion_by_NetCDF.hasInheritedValue(); 
     289  void cxios_set_field_conversion_by_netcdf(field_Ptr field_hdl, bool conversion_by_netcdf) 
     290  { 
     291    CTimer::get("XIOS").resume(); 
     292    field_hdl->conversion_by_netcdf.setValue(conversion_by_netcdf); 
     293    CTimer::get("XIOS").suspend(); 
     294  } 
     295 
     296  void cxios_get_field_conversion_by_netcdf(field_Ptr field_hdl, bool* conversion_by_netcdf) 
     297  { 
     298    CTimer::get("XIOS").resume(); 
     299    *conversion_by_netcdf = field_hdl->conversion_by_netcdf.getInheritedValue(); 
     300    CTimer::get("XIOS").suspend(); 
     301  } 
     302 
     303  bool cxios_is_defined_field_conversion_by_netcdf(field_Ptr field_hdl) 
     304  { 
     305     CTimer::get("XIOS").resume(); 
     306     bool isDefined = field_hdl->conversion_by_netcdf.hasInheritedValue(); 
    307307     CTimer::get("XIOS").suspend(); 
    308308     return isDefined; 
  • XIOS3/trunk/src/interface/c_attr/icfieldgroup_attr.cpp

    r2616 r2617  
    287287 
    288288 
    289   void cxios_set_fieldgroup_conversion_by_NetCDF(fieldgroup_Ptr fieldgroup_hdl, bool conversion_by_NetCDF) 
    290   { 
    291     CTimer::get("XIOS").resume(); 
    292     fieldgroup_hdl->conversion_by_NetCDF.setValue(conversion_by_NetCDF); 
    293     CTimer::get("XIOS").suspend(); 
    294   } 
    295  
    296   void cxios_get_fieldgroup_conversion_by_NetCDF(fieldgroup_Ptr fieldgroup_hdl, bool* conversion_by_NetCDF) 
    297   { 
    298     CTimer::get("XIOS").resume(); 
    299     *conversion_by_NetCDF = fieldgroup_hdl->conversion_by_NetCDF.getInheritedValue(); 
    300     CTimer::get("XIOS").suspend(); 
    301   } 
    302  
    303   bool cxios_is_defined_fieldgroup_conversion_by_NetCDF(fieldgroup_Ptr fieldgroup_hdl) 
    304   { 
    305      CTimer::get("XIOS").resume(); 
    306      bool isDefined = fieldgroup_hdl->conversion_by_NetCDF.hasInheritedValue(); 
     289  void cxios_set_fieldgroup_conversion_by_netcdf(fieldgroup_Ptr fieldgroup_hdl, bool conversion_by_netcdf) 
     290  { 
     291    CTimer::get("XIOS").resume(); 
     292    fieldgroup_hdl->conversion_by_netcdf.setValue(conversion_by_netcdf); 
     293    CTimer::get("XIOS").suspend(); 
     294  } 
     295 
     296  void cxios_get_fieldgroup_conversion_by_netcdf(fieldgroup_Ptr fieldgroup_hdl, bool* conversion_by_netcdf) 
     297  { 
     298    CTimer::get("XIOS").resume(); 
     299    *conversion_by_netcdf = fieldgroup_hdl->conversion_by_netcdf.getInheritedValue(); 
     300    CTimer::get("XIOS").suspend(); 
     301  } 
     302 
     303  bool cxios_is_defined_fieldgroup_conversion_by_netcdf(fieldgroup_Ptr fieldgroup_hdl) 
     304  { 
     305     CTimer::get("XIOS").resume(); 
     306     bool isDefined = fieldgroup_hdl->conversion_by_netcdf.hasInheritedValue(); 
    307307     CTimer::get("XIOS").suspend(); 
    308308     return isDefined; 
  • XIOS3/trunk/src/interface/fortran_attr/field_interface_attr.F90

    r2616 r2617  
    231231 
    232232 
    233     SUBROUTINE cxios_set_field_conversion_by_NetCDF(field_hdl, conversion_by_NetCDF) BIND(C) 
    234       USE ISO_C_BINDING 
    235       INTEGER (kind = C_INTPTR_T), VALUE :: field_hdl 
    236       LOGICAL (KIND=C_BOOL)      , VALUE :: conversion_by_NetCDF 
    237     END SUBROUTINE cxios_set_field_conversion_by_NetCDF 
    238  
    239     SUBROUTINE cxios_get_field_conversion_by_NetCDF(field_hdl, conversion_by_NetCDF) BIND(C) 
    240       USE ISO_C_BINDING 
    241       INTEGER (kind = C_INTPTR_T), VALUE :: field_hdl 
    242       LOGICAL (KIND=C_BOOL)             :: conversion_by_NetCDF 
    243     END SUBROUTINE cxios_get_field_conversion_by_NetCDF 
    244  
    245     FUNCTION cxios_is_defined_field_conversion_by_NetCDF(field_hdl) BIND(C) 
    246       USE ISO_C_BINDING 
    247       LOGICAL(kind=C_BOOL) :: cxios_is_defined_field_conversion_by_NetCDF 
    248       INTEGER (kind = C_INTPTR_T), VALUE :: field_hdl 
    249     END FUNCTION cxios_is_defined_field_conversion_by_NetCDF 
     233    SUBROUTINE cxios_set_field_conversion_by_netcdf(field_hdl, conversion_by_netcdf) BIND(C) 
     234      USE ISO_C_BINDING 
     235      INTEGER (kind = C_INTPTR_T), VALUE :: field_hdl 
     236      LOGICAL (KIND=C_BOOL)      , VALUE :: conversion_by_netcdf 
     237    END SUBROUTINE cxios_set_field_conversion_by_netcdf 
     238 
     239    SUBROUTINE cxios_get_field_conversion_by_netcdf(field_hdl, conversion_by_netcdf) BIND(C) 
     240      USE ISO_C_BINDING 
     241      INTEGER (kind = C_INTPTR_T), VALUE :: field_hdl 
     242      LOGICAL (KIND=C_BOOL)             :: conversion_by_netcdf 
     243    END SUBROUTINE cxios_get_field_conversion_by_netcdf 
     244 
     245    FUNCTION cxios_is_defined_field_conversion_by_netcdf(field_hdl) BIND(C) 
     246      USE ISO_C_BINDING 
     247      LOGICAL(kind=C_BOOL) :: cxios_is_defined_field_conversion_by_netcdf 
     248      INTEGER (kind = C_INTPTR_T), VALUE :: field_hdl 
     249    END FUNCTION cxios_is_defined_field_conversion_by_netcdf 
    250250 
    251251 
  • XIOS3/trunk/src/interface/fortran_attr/fieldgroup_interface_attr.F90

    r2616 r2617  
    231231 
    232232 
    233     SUBROUTINE cxios_set_fieldgroup_conversion_by_NetCDF(fieldgroup_hdl, conversion_by_NetCDF) BIND(C) 
    234       USE ISO_C_BINDING 
    235       INTEGER (kind = C_INTPTR_T), VALUE :: fieldgroup_hdl 
    236       LOGICAL (KIND=C_BOOL)      , VALUE :: conversion_by_NetCDF 
    237     END SUBROUTINE cxios_set_fieldgroup_conversion_by_NetCDF 
    238  
    239     SUBROUTINE cxios_get_fieldgroup_conversion_by_NetCDF(fieldgroup_hdl, conversion_by_NetCDF) BIND(C) 
    240       USE ISO_C_BINDING 
    241       INTEGER (kind = C_INTPTR_T), VALUE :: fieldgroup_hdl 
    242       LOGICAL (KIND=C_BOOL)             :: conversion_by_NetCDF 
    243     END SUBROUTINE cxios_get_fieldgroup_conversion_by_NetCDF 
    244  
    245     FUNCTION cxios_is_defined_fieldgroup_conversion_by_NetCDF(fieldgroup_hdl) BIND(C) 
    246       USE ISO_C_BINDING 
    247       LOGICAL(kind=C_BOOL) :: cxios_is_defined_fieldgroup_conversion_by_NetCDF 
    248       INTEGER (kind = C_INTPTR_T), VALUE :: fieldgroup_hdl 
    249     END FUNCTION cxios_is_defined_fieldgroup_conversion_by_NetCDF 
     233    SUBROUTINE cxios_set_fieldgroup_conversion_by_netcdf(fieldgroup_hdl, conversion_by_netcdf) BIND(C) 
     234      USE ISO_C_BINDING 
     235      INTEGER (kind = C_INTPTR_T), VALUE :: fieldgroup_hdl 
     236      LOGICAL (KIND=C_BOOL)      , VALUE :: conversion_by_netcdf 
     237    END SUBROUTINE cxios_set_fieldgroup_conversion_by_netcdf 
     238 
     239    SUBROUTINE cxios_get_fieldgroup_conversion_by_netcdf(fieldgroup_hdl, conversion_by_netcdf) BIND(C) 
     240      USE ISO_C_BINDING 
     241      INTEGER (kind = C_INTPTR_T), VALUE :: fieldgroup_hdl 
     242      LOGICAL (KIND=C_BOOL)             :: conversion_by_netcdf 
     243    END SUBROUTINE cxios_get_fieldgroup_conversion_by_netcdf 
     244 
     245    FUNCTION cxios_is_defined_fieldgroup_conversion_by_netcdf(fieldgroup_hdl) BIND(C) 
     246      USE ISO_C_BINDING 
     247      LOGICAL(kind=C_BOOL) :: cxios_is_defined_fieldgroup_conversion_by_netcdf 
     248      INTEGER (kind = C_INTPTR_T), VALUE :: fieldgroup_hdl 
     249    END FUNCTION cxios_is_defined_fieldgroup_conversion_by_netcdf 
    250250 
    251251 
  • XIOS3/trunk/src/interface/fortran_attr/ifield_attr.F90

    r2616 r2617  
    1414    ( field_id, add_offset, axis_ref, build_workflow_graph, cell_methods, cell_methods_mode, check_if_active  & 
    1515    , chunking_blocksize_target, comment, compression_level, compression_params, compression_type  & 
    16     , conversion_by_NetCDF, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref  & 
     16    , conversion_by_netcdf, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref  & 
    1717    , freq_offset, freq_op, grid_path, grid_ref, indexed_output, level, long_name, name, operation  & 
    1818    , prec, read_access, scalar_ref, scale_factor, standard_name, ts_enabled, ts_split_freq, unit  & 
     
    3535      REAL (KIND=8) , OPTIONAL, INTENT(IN) :: compression_params(:) 
    3636      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: compression_type 
    37       LOGICAL  , OPTIONAL, INTENT(IN) :: conversion_by_NetCDF 
    38       LOGICAL (KIND=C_BOOL) :: conversion_by_NetCDF_tmp 
     37      LOGICAL  , OPTIONAL, INTENT(IN) :: conversion_by_netcdf 
     38      LOGICAL (KIND=C_BOOL) :: conversion_by_netcdf_tmp 
    3939      REAL (KIND=8) , OPTIONAL, INTENT(IN) :: default_value 
    4040      LOGICAL  , OPTIONAL, INTENT(IN) :: detect_missing_value 
     
    7373      ( field_hdl, add_offset, axis_ref, build_workflow_graph, cell_methods, cell_methods_mode, check_if_active  & 
    7474      , chunking_blocksize_target, comment, compression_level, compression_params, compression_type  & 
    75       , conversion_by_NetCDF, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref  & 
     75      , conversion_by_netcdf, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref  & 
    7676      , freq_offset, freq_op, grid_path, grid_ref, indexed_output, level, long_name, name, operation  & 
    7777      , prec, read_access, scalar_ref, scale_factor, standard_name, ts_enabled, ts_split_freq, unit  & 
     
    8383    ( field_hdl, add_offset, axis_ref, build_workflow_graph, cell_methods, cell_methods_mode, check_if_active  & 
    8484    , chunking_blocksize_target, comment, compression_level, compression_params, compression_type  & 
    85     , conversion_by_NetCDF, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref  & 
     85    , conversion_by_netcdf, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref  & 
    8686    , freq_offset, freq_op, grid_path, grid_ref, indexed_output, level, long_name, name, operation  & 
    8787    , prec, read_access, scalar_ref, scale_factor, standard_name, ts_enabled, ts_split_freq, unit  & 
     
    103103      REAL (KIND=8) , OPTIONAL, INTENT(IN) :: compression_params(:) 
    104104      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: compression_type 
    105       LOGICAL  , OPTIONAL, INTENT(IN) :: conversion_by_NetCDF 
    106       LOGICAL (KIND=C_BOOL) :: conversion_by_NetCDF_tmp 
     105      LOGICAL  , OPTIONAL, INTENT(IN) :: conversion_by_netcdf 
     106      LOGICAL (KIND=C_BOOL) :: conversion_by_netcdf_tmp 
    107107      REAL (KIND=8) , OPTIONAL, INTENT(IN) :: default_value 
    108108      LOGICAL  , OPTIONAL, INTENT(IN) :: detect_missing_value 
     
    139139      ( field_hdl, add_offset, axis_ref, build_workflow_graph, cell_methods, cell_methods_mode, check_if_active  & 
    140140      , chunking_blocksize_target, comment, compression_level, compression_params, compression_type  & 
    141       , conversion_by_NetCDF, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref  & 
     141      , conversion_by_netcdf, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref  & 
    142142      , freq_offset, freq_op, grid_path, grid_ref, indexed_output, level, long_name, name, operation  & 
    143143      , prec, read_access, scalar_ref, scale_factor, standard_name, ts_enabled, ts_split_freq, unit  & 
     
    149149    ( field_hdl, add_offset_, axis_ref_, build_workflow_graph_, cell_methods_, cell_methods_mode_  & 
    150150    , check_if_active_, chunking_blocksize_target_, comment_, compression_level_, compression_params_  & 
    151     , compression_type_, conversion_by_NetCDF_, default_value_, detect_missing_value_, domain_ref_  & 
     151    , compression_type_, conversion_by_netcdf_, default_value_, detect_missing_value_, domain_ref_  & 
    152152    , enabled_, expr_, field_ref_, freq_offset_, freq_op_, grid_path_, grid_ref_, indexed_output_  & 
    153153    , level_, long_name_, name_, operation_, prec_, read_access_, scalar_ref_, scale_factor_, standard_name_  & 
     
    169169      REAL (KIND=8) , OPTIONAL, INTENT(IN) :: compression_params_(:) 
    170170      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: compression_type_ 
    171       LOGICAL  , OPTIONAL, INTENT(IN) :: conversion_by_NetCDF_ 
    172       LOGICAL (KIND=C_BOOL) :: conversion_by_NetCDF__tmp 
     171      LOGICAL  , OPTIONAL, INTENT(IN) :: conversion_by_netcdf_ 
     172      LOGICAL (KIND=C_BOOL) :: conversion_by_netcdf__tmp 
    173173      REAL (KIND=8) , OPTIONAL, INTENT(IN) :: default_value_ 
    174174      LOGICAL  , OPTIONAL, INTENT(IN) :: detect_missing_value_ 
     
    259259      ENDIF 
    260260 
    261       IF (PRESENT(conversion_by_NetCDF_)) THEN 
    262         conversion_by_NetCDF__tmp = conversion_by_NetCDF_ 
    263         CALL cxios_set_field_conversion_by_NetCDF & 
    264       (field_hdl%daddr, conversion_by_NetCDF__tmp) 
     261      IF (PRESENT(conversion_by_netcdf_)) THEN 
     262        conversion_by_netcdf__tmp = conversion_by_netcdf_ 
     263        CALL cxios_set_field_conversion_by_netcdf & 
     264      (field_hdl%daddr, conversion_by_netcdf__tmp) 
    265265      ENDIF 
    266266 
     
    400400    ( field_id, add_offset, axis_ref, build_workflow_graph, cell_methods, cell_methods_mode, check_if_active  & 
    401401    , chunking_blocksize_target, comment, compression_level, compression_params, compression_type  & 
    402     , conversion_by_NetCDF, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref  & 
     402    , conversion_by_netcdf, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref  & 
    403403    , freq_offset, freq_op, grid_path, grid_ref, indexed_output, level, long_name, name, operation  & 
    404404    , prec, read_access, scalar_ref, scale_factor, standard_name, ts_enabled, ts_split_freq, unit  & 
     
    421421      REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: compression_params(:) 
    422422      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: compression_type 
    423       LOGICAL  , OPTIONAL, INTENT(OUT) :: conversion_by_NetCDF 
    424       LOGICAL (KIND=C_BOOL) :: conversion_by_NetCDF_tmp 
     423      LOGICAL  , OPTIONAL, INTENT(OUT) :: conversion_by_netcdf 
     424      LOGICAL (KIND=C_BOOL) :: conversion_by_netcdf_tmp 
    425425      REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: default_value 
    426426      LOGICAL  , OPTIONAL, INTENT(OUT) :: detect_missing_value 
     
    459459      ( field_hdl, add_offset, axis_ref, build_workflow_graph, cell_methods, cell_methods_mode, check_if_active  & 
    460460      , chunking_blocksize_target, comment, compression_level, compression_params, compression_type  & 
    461       , conversion_by_NetCDF, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref  & 
     461      , conversion_by_netcdf, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref  & 
    462462      , freq_offset, freq_op, grid_path, grid_ref, indexed_output, level, long_name, name, operation  & 
    463463      , prec, read_access, scalar_ref, scale_factor, standard_name, ts_enabled, ts_split_freq, unit  & 
     
    469469    ( field_hdl, add_offset, axis_ref, build_workflow_graph, cell_methods, cell_methods_mode, check_if_active  & 
    470470    , chunking_blocksize_target, comment, compression_level, compression_params, compression_type  & 
    471     , conversion_by_NetCDF, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref  & 
     471    , conversion_by_netcdf, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref  & 
    472472    , freq_offset, freq_op, grid_path, grid_ref, indexed_output, level, long_name, name, operation  & 
    473473    , prec, read_access, scalar_ref, scale_factor, standard_name, ts_enabled, ts_split_freq, unit  & 
     
    489489      REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: compression_params(:) 
    490490      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: compression_type 
    491       LOGICAL  , OPTIONAL, INTENT(OUT) :: conversion_by_NetCDF 
    492       LOGICAL (KIND=C_BOOL) :: conversion_by_NetCDF_tmp 
     491      LOGICAL  , OPTIONAL, INTENT(OUT) :: conversion_by_netcdf 
     492      LOGICAL (KIND=C_BOOL) :: conversion_by_netcdf_tmp 
    493493      REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: default_value 
    494494      LOGICAL  , OPTIONAL, INTENT(OUT) :: detect_missing_value 
     
    525525      ( field_hdl, add_offset, axis_ref, build_workflow_graph, cell_methods, cell_methods_mode, check_if_active  & 
    526526      , chunking_blocksize_target, comment, compression_level, compression_params, compression_type  & 
    527       , conversion_by_NetCDF, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref  & 
     527      , conversion_by_netcdf, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref  & 
    528528      , freq_offset, freq_op, grid_path, grid_ref, indexed_output, level, long_name, name, operation  & 
    529529      , prec, read_access, scalar_ref, scale_factor, standard_name, ts_enabled, ts_split_freq, unit  & 
     
    535535    ( field_hdl, add_offset_, axis_ref_, build_workflow_graph_, cell_methods_, cell_methods_mode_  & 
    536536    , check_if_active_, chunking_blocksize_target_, comment_, compression_level_, compression_params_  & 
    537     , compression_type_, conversion_by_NetCDF_, default_value_, detect_missing_value_, domain_ref_  & 
     537    , compression_type_, conversion_by_netcdf_, default_value_, detect_missing_value_, domain_ref_  & 
    538538    , enabled_, expr_, field_ref_, freq_offset_, freq_op_, grid_path_, grid_ref_, indexed_output_  & 
    539539    , level_, long_name_, name_, operation_, prec_, read_access_, scalar_ref_, scale_factor_, standard_name_  & 
     
    555555      REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: compression_params_(:) 
    556556      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: compression_type_ 
    557       LOGICAL  , OPTIONAL, INTENT(OUT) :: conversion_by_NetCDF_ 
    558       LOGICAL (KIND=C_BOOL) :: conversion_by_NetCDF__tmp 
     557      LOGICAL  , OPTIONAL, INTENT(OUT) :: conversion_by_netcdf_ 
     558      LOGICAL (KIND=C_BOOL) :: conversion_by_netcdf__tmp 
    559559      REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: default_value_ 
    560560      LOGICAL  , OPTIONAL, INTENT(OUT) :: detect_missing_value_ 
     
    645645      ENDIF 
    646646 
    647       IF (PRESENT(conversion_by_NetCDF_)) THEN 
    648         CALL cxios_get_field_conversion_by_NetCDF & 
    649       (field_hdl%daddr, conversion_by_NetCDF__tmp) 
    650         conversion_by_NetCDF_ = conversion_by_NetCDF__tmp 
     647      IF (PRESENT(conversion_by_netcdf_)) THEN 
     648        CALL cxios_get_field_conversion_by_netcdf & 
     649      (field_hdl%daddr, conversion_by_netcdf__tmp) 
     650        conversion_by_netcdf_ = conversion_by_netcdf__tmp 
    651651      ENDIF 
    652652 
     
    786786    ( field_id, add_offset, axis_ref, build_workflow_graph, cell_methods, cell_methods_mode, check_if_active  & 
    787787    , chunking_blocksize_target, comment, compression_level, compression_params, compression_type  & 
    788     , conversion_by_NetCDF, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref  & 
     788    , conversion_by_netcdf, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref  & 
    789789    , freq_offset, freq_op, grid_path, grid_ref, indexed_output, level, long_name, name, operation  & 
    790790    , prec, read_access, scalar_ref, scale_factor, standard_name, ts_enabled, ts_split_freq, unit  & 
     
    816816      LOGICAL, OPTIONAL, INTENT(OUT) :: compression_type 
    817817      LOGICAL(KIND=C_BOOL) :: compression_type_tmp 
    818       LOGICAL, OPTIONAL, INTENT(OUT) :: conversion_by_NetCDF 
    819       LOGICAL(KIND=C_BOOL) :: conversion_by_NetCDF_tmp 
     818      LOGICAL, OPTIONAL, INTENT(OUT) :: conversion_by_netcdf 
     819      LOGICAL(KIND=C_BOOL) :: conversion_by_netcdf_tmp 
    820820      LOGICAL, OPTIONAL, INTENT(OUT) :: default_value 
    821821      LOGICAL(KIND=C_BOOL) :: default_value_tmp 
     
    874874      ( field_hdl, add_offset, axis_ref, build_workflow_graph, cell_methods, cell_methods_mode, check_if_active  & 
    875875      , chunking_blocksize_target, comment, compression_level, compression_params, compression_type  & 
    876       , conversion_by_NetCDF, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref  & 
     876      , conversion_by_netcdf, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref  & 
    877877      , freq_offset, freq_op, grid_path, grid_ref, indexed_output, level, long_name, name, operation  & 
    878878      , prec, read_access, scalar_ref, scale_factor, standard_name, ts_enabled, ts_split_freq, unit  & 
     
    884884    ( field_hdl, add_offset, axis_ref, build_workflow_graph, cell_methods, cell_methods_mode, check_if_active  & 
    885885    , chunking_blocksize_target, comment, compression_level, compression_params, compression_type  & 
    886     , conversion_by_NetCDF, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref  & 
     886    , conversion_by_netcdf, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref  & 
    887887    , freq_offset, freq_op, grid_path, grid_ref, indexed_output, level, long_name, name, operation  & 
    888888    , prec, read_access, scalar_ref, scale_factor, standard_name, ts_enabled, ts_split_freq, unit  & 
     
    913913      LOGICAL, OPTIONAL, INTENT(OUT) :: compression_type 
    914914      LOGICAL(KIND=C_BOOL) :: compression_type_tmp 
    915       LOGICAL, OPTIONAL, INTENT(OUT) :: conversion_by_NetCDF 
    916       LOGICAL(KIND=C_BOOL) :: conversion_by_NetCDF_tmp 
     915      LOGICAL, OPTIONAL, INTENT(OUT) :: conversion_by_netcdf 
     916      LOGICAL(KIND=C_BOOL) :: conversion_by_netcdf_tmp 
    917917      LOGICAL, OPTIONAL, INTENT(OUT) :: default_value 
    918918      LOGICAL(KIND=C_BOOL) :: default_value_tmp 
     
    969969      ( field_hdl, add_offset, axis_ref, build_workflow_graph, cell_methods, cell_methods_mode, check_if_active  & 
    970970      , chunking_blocksize_target, comment, compression_level, compression_params, compression_type  & 
    971       , conversion_by_NetCDF, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref  & 
     971      , conversion_by_netcdf, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref  & 
    972972      , freq_offset, freq_op, grid_path, grid_ref, indexed_output, level, long_name, name, operation  & 
    973973      , prec, read_access, scalar_ref, scale_factor, standard_name, ts_enabled, ts_split_freq, unit  & 
     
    979979    ( field_hdl, add_offset_, axis_ref_, build_workflow_graph_, cell_methods_, cell_methods_mode_  & 
    980980    , check_if_active_, chunking_blocksize_target_, comment_, compression_level_, compression_params_  & 
    981     , compression_type_, conversion_by_NetCDF_, default_value_, detect_missing_value_, domain_ref_  & 
     981    , compression_type_, conversion_by_netcdf_, default_value_, detect_missing_value_, domain_ref_  & 
    982982    , enabled_, expr_, field_ref_, freq_offset_, freq_op_, grid_path_, grid_ref_, indexed_output_  & 
    983983    , level_, long_name_, name_, operation_, prec_, read_access_, scalar_ref_, scale_factor_, standard_name_  & 
     
    10081008      LOGICAL, OPTIONAL, INTENT(OUT) :: compression_type_ 
    10091009      LOGICAL(KIND=C_BOOL) :: compression_type__tmp 
    1010       LOGICAL, OPTIONAL, INTENT(OUT) :: conversion_by_NetCDF_ 
    1011       LOGICAL(KIND=C_BOOL) :: conversion_by_NetCDF__tmp 
     1010      LOGICAL, OPTIONAL, INTENT(OUT) :: conversion_by_netcdf_ 
     1011      LOGICAL(KIND=C_BOOL) :: conversion_by_netcdf__tmp 
    10121012      LOGICAL, OPTIONAL, INTENT(OUT) :: default_value_ 
    10131013      LOGICAL(KIND=C_BOOL) :: default_value__tmp 
     
    11271127      ENDIF 
    11281128 
    1129       IF (PRESENT(conversion_by_NetCDF_)) THEN 
    1130         conversion_by_NetCDF__tmp = cxios_is_defined_field_conversion_by_NetCDF & 
    1131       (field_hdl%daddr) 
    1132         conversion_by_NetCDF_ = conversion_by_NetCDF__tmp 
     1129      IF (PRESENT(conversion_by_netcdf_)) THEN 
     1130        conversion_by_netcdf__tmp = cxios_is_defined_field_conversion_by_netcdf & 
     1131      (field_hdl%daddr) 
     1132        conversion_by_netcdf_ = conversion_by_netcdf__tmp 
    11331133      ENDIF 
    11341134 
  • XIOS3/trunk/src/interface/fortran_attr/ifieldgroup_attr.F90

    r2616 r2617  
    1414    ( fieldgroup_id, add_offset, axis_ref, build_workflow_graph, cell_methods, cell_methods_mode  & 
    1515    , check_if_active, chunking_blocksize_target, comment, compression_level, compression_params  & 
    16     , compression_type, conversion_by_NetCDF, default_value, detect_missing_value, domain_ref, enabled  & 
     16    , compression_type, conversion_by_netcdf, default_value, detect_missing_value, domain_ref, enabled  & 
    1717    , expr, field_ref, freq_offset, freq_op, grid_path, grid_ref, group_ref, indexed_output, level  & 
    1818    , long_name, name, operation, prec, read_access, scalar_ref, scale_factor, standard_name, ts_enabled  & 
     
    3535      REAL (KIND=8) , OPTIONAL, INTENT(IN) :: compression_params(:) 
    3636      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: compression_type 
    37       LOGICAL  , OPTIONAL, INTENT(IN) :: conversion_by_NetCDF 
    38       LOGICAL (KIND=C_BOOL) :: conversion_by_NetCDF_tmp 
     37      LOGICAL  , OPTIONAL, INTENT(IN) :: conversion_by_netcdf 
     38      LOGICAL (KIND=C_BOOL) :: conversion_by_netcdf_tmp 
    3939      REAL (KIND=8) , OPTIONAL, INTENT(IN) :: default_value 
    4040      LOGICAL  , OPTIONAL, INTENT(IN) :: detect_missing_value 
     
    7474      ( fieldgroup_hdl, add_offset, axis_ref, build_workflow_graph, cell_methods, cell_methods_mode  & 
    7575      , check_if_active, chunking_blocksize_target, comment, compression_level, compression_params  & 
    76       , compression_type, conversion_by_NetCDF, default_value, detect_missing_value, domain_ref, enabled  & 
     76      , compression_type, conversion_by_netcdf, default_value, detect_missing_value, domain_ref, enabled  & 
    7777      , expr, field_ref, freq_offset, freq_op, grid_path, grid_ref, group_ref, indexed_output, level  & 
    7878      , long_name, name, operation, prec, read_access, scalar_ref, scale_factor, standard_name, ts_enabled  & 
     
    8484    ( fieldgroup_hdl, add_offset, axis_ref, build_workflow_graph, cell_methods, cell_methods_mode  & 
    8585    , check_if_active, chunking_blocksize_target, comment, compression_level, compression_params  & 
    86     , compression_type, conversion_by_NetCDF, default_value, detect_missing_value, domain_ref, enabled  & 
     86    , compression_type, conversion_by_netcdf, default_value, detect_missing_value, domain_ref, enabled  & 
    8787    , expr, field_ref, freq_offset, freq_op, grid_path, grid_ref, group_ref, indexed_output, level  & 
    8888    , long_name, name, operation, prec, read_access, scalar_ref, scale_factor, standard_name, ts_enabled  & 
     
    104104      REAL (KIND=8) , OPTIONAL, INTENT(IN) :: compression_params(:) 
    105105      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: compression_type 
    106       LOGICAL  , OPTIONAL, INTENT(IN) :: conversion_by_NetCDF 
    107       LOGICAL (KIND=C_BOOL) :: conversion_by_NetCDF_tmp 
     106      LOGICAL  , OPTIONAL, INTENT(IN) :: conversion_by_netcdf 
     107      LOGICAL (KIND=C_BOOL) :: conversion_by_netcdf_tmp 
    108108      REAL (KIND=8) , OPTIONAL, INTENT(IN) :: default_value 
    109109      LOGICAL  , OPTIONAL, INTENT(IN) :: detect_missing_value 
     
    141141      ( fieldgroup_hdl, add_offset, axis_ref, build_workflow_graph, cell_methods, cell_methods_mode  & 
    142142      , check_if_active, chunking_blocksize_target, comment, compression_level, compression_params  & 
    143       , compression_type, conversion_by_NetCDF, default_value, detect_missing_value, domain_ref, enabled  & 
     143      , compression_type, conversion_by_netcdf, default_value, detect_missing_value, domain_ref, enabled  & 
    144144      , expr, field_ref, freq_offset, freq_op, grid_path, grid_ref, group_ref, indexed_output, level  & 
    145145      , long_name, name, operation, prec, read_access, scalar_ref, scale_factor, standard_name, ts_enabled  & 
     
    151151    ( fieldgroup_hdl, add_offset_, axis_ref_, build_workflow_graph_, cell_methods_, cell_methods_mode_  & 
    152152    , check_if_active_, chunking_blocksize_target_, comment_, compression_level_, compression_params_  & 
    153     , compression_type_, conversion_by_NetCDF_, default_value_, detect_missing_value_, domain_ref_  & 
     153    , compression_type_, conversion_by_netcdf_, default_value_, detect_missing_value_, domain_ref_  & 
    154154    , enabled_, expr_, field_ref_, freq_offset_, freq_op_, grid_path_, grid_ref_, group_ref_, indexed_output_  & 
    155155    , level_, long_name_, name_, operation_, prec_, read_access_, scalar_ref_, scale_factor_, standard_name_  & 
     
    171171      REAL (KIND=8) , OPTIONAL, INTENT(IN) :: compression_params_(:) 
    172172      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: compression_type_ 
    173       LOGICAL  , OPTIONAL, INTENT(IN) :: conversion_by_NetCDF_ 
    174       LOGICAL (KIND=C_BOOL) :: conversion_by_NetCDF__tmp 
     173      LOGICAL  , OPTIONAL, INTENT(IN) :: conversion_by_netcdf_ 
     174      LOGICAL (KIND=C_BOOL) :: conversion_by_netcdf__tmp 
    175175      REAL (KIND=8) , OPTIONAL, INTENT(IN) :: default_value_ 
    176176      LOGICAL  , OPTIONAL, INTENT(IN) :: detect_missing_value_ 
     
    262262      ENDIF 
    263263 
    264       IF (PRESENT(conversion_by_NetCDF_)) THEN 
    265         conversion_by_NetCDF__tmp = conversion_by_NetCDF_ 
    266         CALL cxios_set_fieldgroup_conversion_by_NetCDF & 
    267       (fieldgroup_hdl%daddr, conversion_by_NetCDF__tmp) 
     264      IF (PRESENT(conversion_by_netcdf_)) THEN 
     265        conversion_by_netcdf__tmp = conversion_by_netcdf_ 
     266        CALL cxios_set_fieldgroup_conversion_by_netcdf & 
     267      (fieldgroup_hdl%daddr, conversion_by_netcdf__tmp) 
    268268      ENDIF 
    269269 
     
    408408    ( fieldgroup_id, add_offset, axis_ref, build_workflow_graph, cell_methods, cell_methods_mode  & 
    409409    , check_if_active, chunking_blocksize_target, comment, compression_level, compression_params  & 
    410     , compression_type, conversion_by_NetCDF, default_value, detect_missing_value, domain_ref, enabled  & 
     410    , compression_type, conversion_by_netcdf, default_value, detect_missing_value, domain_ref, enabled  & 
    411411    , expr, field_ref, freq_offset, freq_op, grid_path, grid_ref, group_ref, indexed_output, level  & 
    412412    , long_name, name, operation, prec, read_access, scalar_ref, scale_factor, standard_name, ts_enabled  & 
     
    429429      REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: compression_params(:) 
    430430      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: compression_type 
    431       LOGICAL  , OPTIONAL, INTENT(OUT) :: conversion_by_NetCDF 
    432       LOGICAL (KIND=C_BOOL) :: conversion_by_NetCDF_tmp 
     431      LOGICAL  , OPTIONAL, INTENT(OUT) :: conversion_by_netcdf 
     432      LOGICAL (KIND=C_BOOL) :: conversion_by_netcdf_tmp 
    433433      REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: default_value 
    434434      LOGICAL  , OPTIONAL, INTENT(OUT) :: detect_missing_value 
     
    468468      ( fieldgroup_hdl, add_offset, axis_ref, build_workflow_graph, cell_methods, cell_methods_mode  & 
    469469      , check_if_active, chunking_blocksize_target, comment, compression_level, compression_params  & 
    470       , compression_type, conversion_by_NetCDF, default_value, detect_missing_value, domain_ref, enabled  & 
     470      , compression_type, conversion_by_netcdf, default_value, detect_missing_value, domain_ref, enabled  & 
    471471      , expr, field_ref, freq_offset, freq_op, grid_path, grid_ref, group_ref, indexed_output, level  & 
    472472      , long_name, name, operation, prec, read_access, scalar_ref, scale_factor, standard_name, ts_enabled  & 
     
    478478    ( fieldgroup_hdl, add_offset, axis_ref, build_workflow_graph, cell_methods, cell_methods_mode  & 
    479479    , check_if_active, chunking_blocksize_target, comment, compression_level, compression_params  & 
    480     , compression_type, conversion_by_NetCDF, default_value, detect_missing_value, domain_ref, enabled  & 
     480    , compression_type, conversion_by_netcdf, default_value, detect_missing_value, domain_ref, enabled  & 
    481481    , expr, field_ref, freq_offset, freq_op, grid_path, grid_ref, group_ref, indexed_output, level  & 
    482482    , long_name, name, operation, prec, read_access, scalar_ref, scale_factor, standard_name, ts_enabled  & 
     
    498498      REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: compression_params(:) 
    499499      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: compression_type 
    500       LOGICAL  , OPTIONAL, INTENT(OUT) :: conversion_by_NetCDF 
    501       LOGICAL (KIND=C_BOOL) :: conversion_by_NetCDF_tmp 
     500      LOGICAL  , OPTIONAL, INTENT(OUT) :: conversion_by_netcdf 
     501      LOGICAL (KIND=C_BOOL) :: conversion_by_netcdf_tmp 
    502502      REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: default_value 
    503503      LOGICAL  , OPTIONAL, INTENT(OUT) :: detect_missing_value 
     
    535535      ( fieldgroup_hdl, add_offset, axis_ref, build_workflow_graph, cell_methods, cell_methods_mode  & 
    536536      , check_if_active, chunking_blocksize_target, comment, compression_level, compression_params  & 
    537       , compression_type, conversion_by_NetCDF, default_value, detect_missing_value, domain_ref, enabled  & 
     537      , compression_type, conversion_by_netcdf, default_value, detect_missing_value, domain_ref, enabled  & 
    538538      , expr, field_ref, freq_offset, freq_op, grid_path, grid_ref, group_ref, indexed_output, level  & 
    539539      , long_name, name, operation, prec, read_access, scalar_ref, scale_factor, standard_name, ts_enabled  & 
     
    545545    ( fieldgroup_hdl, add_offset_, axis_ref_, build_workflow_graph_, cell_methods_, cell_methods_mode_  & 
    546546    , check_if_active_, chunking_blocksize_target_, comment_, compression_level_, compression_params_  & 
    547     , compression_type_, conversion_by_NetCDF_, default_value_, detect_missing_value_, domain_ref_  & 
     547    , compression_type_, conversion_by_netcdf_, default_value_, detect_missing_value_, domain_ref_  & 
    548548    , enabled_, expr_, field_ref_, freq_offset_, freq_op_, grid_path_, grid_ref_, group_ref_, indexed_output_  & 
    549549    , level_, long_name_, name_, operation_, prec_, read_access_, scalar_ref_, scale_factor_, standard_name_  & 
     
    565565      REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: compression_params_(:) 
    566566      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: compression_type_ 
    567       LOGICAL  , OPTIONAL, INTENT(OUT) :: conversion_by_NetCDF_ 
    568       LOGICAL (KIND=C_BOOL) :: conversion_by_NetCDF__tmp 
     567      LOGICAL  , OPTIONAL, INTENT(OUT) :: conversion_by_netcdf_ 
     568      LOGICAL (KIND=C_BOOL) :: conversion_by_netcdf__tmp 
    569569      REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: default_value_ 
    570570      LOGICAL  , OPTIONAL, INTENT(OUT) :: detect_missing_value_ 
     
    656656      ENDIF 
    657657 
    658       IF (PRESENT(conversion_by_NetCDF_)) THEN 
    659         CALL cxios_get_fieldgroup_conversion_by_NetCDF & 
    660       (fieldgroup_hdl%daddr, conversion_by_NetCDF__tmp) 
    661         conversion_by_NetCDF_ = conversion_by_NetCDF__tmp 
     658      IF (PRESENT(conversion_by_netcdf_)) THEN 
     659        CALL cxios_get_fieldgroup_conversion_by_netcdf & 
     660      (fieldgroup_hdl%daddr, conversion_by_netcdf__tmp) 
     661        conversion_by_netcdf_ = conversion_by_netcdf__tmp 
    662662      ENDIF 
    663663 
     
    802802    ( fieldgroup_id, add_offset, axis_ref, build_workflow_graph, cell_methods, cell_methods_mode  & 
    803803    , check_if_active, chunking_blocksize_target, comment, compression_level, compression_params  & 
    804     , compression_type, conversion_by_NetCDF, default_value, detect_missing_value, domain_ref, enabled  & 
     804    , compression_type, conversion_by_netcdf, default_value, detect_missing_value, domain_ref, enabled  & 
    805805    , expr, field_ref, freq_offset, freq_op, grid_path, grid_ref, group_ref, indexed_output, level  & 
    806806    , long_name, name, operation, prec, read_access, scalar_ref, scale_factor, standard_name, ts_enabled  & 
     
    832832      LOGICAL, OPTIONAL, INTENT(OUT) :: compression_type 
    833833      LOGICAL(KIND=C_BOOL) :: compression_type_tmp 
    834       LOGICAL, OPTIONAL, INTENT(OUT) :: conversion_by_NetCDF 
    835       LOGICAL(KIND=C_BOOL) :: conversion_by_NetCDF_tmp 
     834      LOGICAL, OPTIONAL, INTENT(OUT) :: conversion_by_netcdf 
     835      LOGICAL(KIND=C_BOOL) :: conversion_by_netcdf_tmp 
    836836      LOGICAL, OPTIONAL, INTENT(OUT) :: default_value 
    837837      LOGICAL(KIND=C_BOOL) :: default_value_tmp 
     
    892892      ( fieldgroup_hdl, add_offset, axis_ref, build_workflow_graph, cell_methods, cell_methods_mode  & 
    893893      , check_if_active, chunking_blocksize_target, comment, compression_level, compression_params  & 
    894       , compression_type, conversion_by_NetCDF, default_value, detect_missing_value, domain_ref, enabled  & 
     894      , compression_type, conversion_by_netcdf, default_value, detect_missing_value, domain_ref, enabled  & 
    895895      , expr, field_ref, freq_offset, freq_op, grid_path, grid_ref, group_ref, indexed_output, level  & 
    896896      , long_name, name, operation, prec, read_access, scalar_ref, scale_factor, standard_name, ts_enabled  & 
     
    902902    ( fieldgroup_hdl, add_offset, axis_ref, build_workflow_graph, cell_methods, cell_methods_mode  & 
    903903    , check_if_active, chunking_blocksize_target, comment, compression_level, compression_params  & 
    904     , compression_type, conversion_by_NetCDF, default_value, detect_missing_value, domain_ref, enabled  & 
     904    , compression_type, conversion_by_netcdf, default_value, detect_missing_value, domain_ref, enabled  & 
    905905    , expr, field_ref, freq_offset, freq_op, grid_path, grid_ref, group_ref, indexed_output, level  & 
    906906    , long_name, name, operation, prec, read_access, scalar_ref, scale_factor, standard_name, ts_enabled  & 
     
    931931      LOGICAL, OPTIONAL, INTENT(OUT) :: compression_type 
    932932      LOGICAL(KIND=C_BOOL) :: compression_type_tmp 
    933       LOGICAL, OPTIONAL, INTENT(OUT) :: conversion_by_NetCDF 
    934       LOGICAL(KIND=C_BOOL) :: conversion_by_NetCDF_tmp 
     933      LOGICAL, OPTIONAL, INTENT(OUT) :: conversion_by_netcdf 
     934      LOGICAL(KIND=C_BOOL) :: conversion_by_netcdf_tmp 
    935935      LOGICAL, OPTIONAL, INTENT(OUT) :: default_value 
    936936      LOGICAL(KIND=C_BOOL) :: default_value_tmp 
     
    989989      ( fieldgroup_hdl, add_offset, axis_ref, build_workflow_graph, cell_methods, cell_methods_mode  & 
    990990      , check_if_active, chunking_blocksize_target, comment, compression_level, compression_params  & 
    991       , compression_type, conversion_by_NetCDF, default_value, detect_missing_value, domain_ref, enabled  & 
     991      , compression_type, conversion_by_netcdf, default_value, detect_missing_value, domain_ref, enabled  & 
    992992      , expr, field_ref, freq_offset, freq_op, grid_path, grid_ref, group_ref, indexed_output, level  & 
    993993      , long_name, name, operation, prec, read_access, scalar_ref, scale_factor, standard_name, ts_enabled  & 
     
    999999    ( fieldgroup_hdl, add_offset_, axis_ref_, build_workflow_graph_, cell_methods_, cell_methods_mode_  & 
    10001000    , check_if_active_, chunking_blocksize_target_, comment_, compression_level_, compression_params_  & 
    1001     , compression_type_, conversion_by_NetCDF_, default_value_, detect_missing_value_, domain_ref_  & 
     1001    , compression_type_, conversion_by_netcdf_, default_value_, detect_missing_value_, domain_ref_  & 
    10021002    , enabled_, expr_, field_ref_, freq_offset_, freq_op_, grid_path_, grid_ref_, group_ref_, indexed_output_  & 
    10031003    , level_, long_name_, name_, operation_, prec_, read_access_, scalar_ref_, scale_factor_, standard_name_  & 
     
    10281028      LOGICAL, OPTIONAL, INTENT(OUT) :: compression_type_ 
    10291029      LOGICAL(KIND=C_BOOL) :: compression_type__tmp 
    1030       LOGICAL, OPTIONAL, INTENT(OUT) :: conversion_by_NetCDF_ 
    1031       LOGICAL(KIND=C_BOOL) :: conversion_by_NetCDF__tmp 
     1030      LOGICAL, OPTIONAL, INTENT(OUT) :: conversion_by_netcdf_ 
     1031      LOGICAL(KIND=C_BOOL) :: conversion_by_netcdf__tmp 
    10321032      LOGICAL, OPTIONAL, INTENT(OUT) :: default_value_ 
    10331033      LOGICAL(KIND=C_BOOL) :: default_value__tmp 
     
    11491149      ENDIF 
    11501150 
    1151       IF (PRESENT(conversion_by_NetCDF_)) THEN 
    1152         conversion_by_NetCDF__tmp = cxios_is_defined_fieldgroup_conversion_by_NetCDF & 
    1153       (fieldgroup_hdl%daddr) 
    1154         conversion_by_NetCDF_ = conversion_by_NetCDF__tmp 
     1151      IF (PRESENT(conversion_by_netcdf_)) THEN 
     1152        conversion_by_netcdf__tmp = cxios_is_defined_fieldgroup_conversion_by_netcdf & 
     1153      (fieldgroup_hdl%daddr) 
     1154        conversion_by_netcdf_ = conversion_by_netcdf__tmp 
    11551155      ENDIF 
    11561156 
  • XIOS3/trunk/src/io/nc4_data_output.cpp

    r2613 r2617  
    24912491 
    24922492        bool conversionByNetCDF = true; // default : conversion operated by NetCDF for now (legacy behaviour) 
    2493         if (!field->conversion_by_NetCDF.isEmpty()) 
    2494         { 
    2495           // use conversion_by_NetCDF = ".false." to  bypass NetCDF conversion 
     2493        if (!field->conversion_by_netcdf.isEmpty()) 
     2494        { 
     2495          // use conversion_by_netcdf = ".false." to  bypass NetCDF conversion 
    24962496          //   poor performances from NC_DOUBLE to NC_FLOAT with isgreater/isless in recent NetCDF available at TGCC 
    2497           conversionByNetCDF = field->conversion_by_NetCDF; 
     2497          conversionByNetCDF = field->conversion_by_netcdf; 
    24982498        } 
    24992499        if ( ( type == NC_DOUBLE ) || ( conversionByNetCDF ) ) 
Note: See TracChangeset for help on using the changeset viewer.