source: XIOS/dev/XIOS_DEV_CMIP6/src/interface/fortran_attr/ifilegroup_attr.F90 @ 2338

Last change on this file since 2338 was 1492, checked in by oabramkina, 6 years ago

Updating fortran interface for attributes that have been recently introduced and the following filters:

duplicate_scalar_to_axis
reduce_axis_to_axis
reduce_scalar_to_scalar
reorder_domain
temporal_splitting.

  • Property copyright set to
    Software name : XIOS (Xml I/O Server)
    http://forge.ipsl.jussieu.fr/ioserver
    Creation date : January 2009
    Licence : CeCCIL version2
    see license file in root directory : Licence_CeCILL_V2-en.txt
    or http://www.cecill.info/licences/Licence_CeCILL_V2-en.html
    Holder : CEA/LSCE (Laboratoire des Sciences du CLimat et de l'Environnement)
    CNRS/IPSL (Institut Pierre Simon Laplace)
    Project Manager : Yann Meurdesoif
    yann.meurdesoif@cea.fr
File size: 51.1 KB
RevLine 
[326]1! * ************************************************************************** *
2! *               Interface auto generated - do not modify                     *
3! * ************************************************************************** *
4#include "xios_fortran_prefix.hpp"
5
6MODULE ifilegroup_attr
7  USE, INTRINSIC :: ISO_C_BINDING
8  USE ifile
9  USE filegroup_interface_attr
[581]10
[326]11CONTAINS
[581]12
[326]13  SUBROUTINE xios(set_filegroup_attr)  &
[1492]14    ( filegroup_id, append, comment, compression_level, convention, convention_str, cyclic, description  &
15    , enabled, format, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level  &
16    , par_access, read_metadata_par, record_offset, split_end_offset, split_freq, split_freq_format  &
17    , split_last_date, split_start_offset, sync_freq, time_counter, time_counter_name, time_stamp_format  &
[1158]18    , time_stamp_name, time_units, timeseries, ts_prefix, type, uuid_format, uuid_name )
[581]19
[326]20    IMPLICIT NONE
21      TYPE(txios(filegroup))  :: filegroup_hdl
22      CHARACTER(LEN=*), INTENT(IN) ::filegroup_id
[528]23      LOGICAL  , OPTIONAL, INTENT(IN) :: append
24      LOGICAL (KIND=C_BOOL) :: append_tmp
[1492]25      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: comment
[608]26      INTEGER  , OPTIONAL, INTENT(IN) :: compression_level
[932]27      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: convention
[1201]28      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: convention_str
[891]29      LOGICAL  , OPTIONAL, INTENT(IN) :: cyclic
30      LOGICAL (KIND=C_BOOL) :: cyclic_tmp
[326]31      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: description
32      LOGICAL  , OPTIONAL, INTENT(IN) :: enabled
33      LOGICAL (KIND=C_BOOL) :: enabled_tmp
[517]34      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: format
[326]35      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: group_ref
[415]36      INTEGER  , OPTIONAL, INTENT(IN) :: min_digits
[598]37      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: mode
[326]38      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name
39      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name_suffix
[538]40      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: output_freq
[326]41      INTEGER  , OPTIONAL, INTENT(IN) :: output_level
[369]42      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: par_access
[1492]43      LOGICAL  , OPTIONAL, INTENT(IN) :: read_metadata_par
44      LOGICAL (KIND=C_BOOL) :: read_metadata_par_tmp
[779]45      INTEGER  , OPTIONAL, INTENT(IN) :: record_offset
[1492]46      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: split_end_offset
[538]47      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: split_freq
[432]48      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: split_freq_format
[1492]49      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: split_last_date
50      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: split_start_offset
[538]51      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: sync_freq
[699]52      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_counter
[802]53      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_counter_name
[1158]54      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_stamp_format
55      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_stamp_name
56      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_units
[711]57      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: timeseries
58      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: ts_prefix
[326]59      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: type
[1158]60      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: uuid_format
61      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: uuid_name
[581]62
[966]63      CALL xios(get_filegroup_handle) &
64      (filegroup_id,filegroup_hdl)
[326]65      CALL xios(set_filegroup_attr_hdl_)   &
[1492]66      ( filegroup_hdl, append, comment, compression_level, convention, convention_str, cyclic, description  &
[1201]67      , enabled, format, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level  &
[1492]68      , par_access, read_metadata_par, record_offset, split_end_offset, split_freq, split_freq_format  &
69      , split_last_date, split_start_offset, sync_freq, time_counter, time_counter_name, time_stamp_format  &
70      , time_stamp_name, time_units, timeseries, ts_prefix, type, uuid_format, uuid_name )
[581]71
[326]72  END SUBROUTINE xios(set_filegroup_attr)
[581]73
[326]74  SUBROUTINE xios(set_filegroup_attr_hdl)  &
[1492]75    ( filegroup_hdl, append, comment, compression_level, convention, convention_str, cyclic, description  &
[1201]76    , enabled, format, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level  &
[1492]77    , par_access, read_metadata_par, record_offset, split_end_offset, split_freq, split_freq_format  &
78    , split_last_date, split_start_offset, sync_freq, time_counter, time_counter_name, time_stamp_format  &
79    , time_stamp_name, time_units, timeseries, ts_prefix, type, uuid_format, uuid_name )
[581]80
[326]81    IMPLICIT NONE
82      TYPE(txios(filegroup)) , INTENT(IN) :: filegroup_hdl
[528]83      LOGICAL  , OPTIONAL, INTENT(IN) :: append
84      LOGICAL (KIND=C_BOOL) :: append_tmp
[1492]85      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: comment
[608]86      INTEGER  , OPTIONAL, INTENT(IN) :: compression_level
[932]87      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: convention
[1201]88      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: convention_str
[891]89      LOGICAL  , OPTIONAL, INTENT(IN) :: cyclic
90      LOGICAL (KIND=C_BOOL) :: cyclic_tmp
[326]91      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: description
92      LOGICAL  , OPTIONAL, INTENT(IN) :: enabled
93      LOGICAL (KIND=C_BOOL) :: enabled_tmp
[517]94      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: format
[326]95      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: group_ref
[415]96      INTEGER  , OPTIONAL, INTENT(IN) :: min_digits
[598]97      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: mode
[326]98      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name
99      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name_suffix
[538]100      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: output_freq
[326]101      INTEGER  , OPTIONAL, INTENT(IN) :: output_level
[369]102      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: par_access
[1492]103      LOGICAL  , OPTIONAL, INTENT(IN) :: read_metadata_par
104      LOGICAL (KIND=C_BOOL) :: read_metadata_par_tmp
[779]105      INTEGER  , OPTIONAL, INTENT(IN) :: record_offset
[1492]106      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: split_end_offset
[538]107      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: split_freq
[432]108      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: split_freq_format
[1492]109      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: split_last_date
110      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: split_start_offset
[538]111      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: sync_freq
[699]112      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_counter
[802]113      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_counter_name
[1158]114      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_stamp_format
115      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_stamp_name
116      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_units
[711]117      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: timeseries
118      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: ts_prefix
[326]119      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: type
[1158]120      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: uuid_format
121      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: uuid_name
[581]122
[326]123      CALL xios(set_filegroup_attr_hdl_)  &
[1492]124      ( filegroup_hdl, append, comment, compression_level, convention, convention_str, cyclic, description  &
[1201]125      , enabled, format, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level  &
[1492]126      , par_access, read_metadata_par, record_offset, split_end_offset, split_freq, split_freq_format  &
127      , split_last_date, split_start_offset, sync_freq, time_counter, time_counter_name, time_stamp_format  &
128      , time_stamp_name, time_units, timeseries, ts_prefix, type, uuid_format, uuid_name )
[581]129
[326]130  END SUBROUTINE xios(set_filegroup_attr_hdl)
[581]131
[326]132  SUBROUTINE xios(set_filegroup_attr_hdl_)   &
[1492]133    ( filegroup_hdl, append_, comment_, compression_level_, convention_, convention_str_, cyclic_  &
134    , description_, enabled_, format_, group_ref_, min_digits_, mode_, name_, name_suffix_, output_freq_  &
135    , output_level_, par_access_, read_metadata_par_, record_offset_, split_end_offset_, split_freq_  &
136    , split_freq_format_, split_last_date_, split_start_offset_, sync_freq_, time_counter_, time_counter_name_  &
[1158]137    , time_stamp_format_, time_stamp_name_, time_units_, timeseries_, ts_prefix_, type_, uuid_format_  &
138    , uuid_name_ )
[581]139
[326]140    IMPLICIT NONE
141      TYPE(txios(filegroup)) , INTENT(IN) :: filegroup_hdl
[528]142      LOGICAL  , OPTIONAL, INTENT(IN) :: append_
143      LOGICAL (KIND=C_BOOL) :: append__tmp
[1492]144      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: comment_
[608]145      INTEGER  , OPTIONAL, INTENT(IN) :: compression_level_
[932]146      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: convention_
[1201]147      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: convention_str_
[891]148      LOGICAL  , OPTIONAL, INTENT(IN) :: cyclic_
149      LOGICAL (KIND=C_BOOL) :: cyclic__tmp
[326]150      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: description_
151      LOGICAL  , OPTIONAL, INTENT(IN) :: enabled_
152      LOGICAL (KIND=C_BOOL) :: enabled__tmp
[517]153      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: format_
[326]154      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: group_ref_
[415]155      INTEGER  , OPTIONAL, INTENT(IN) :: min_digits_
[598]156      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: mode_
[326]157      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name_
158      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name_suffix_
[538]159      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: output_freq_
[326]160      INTEGER  , OPTIONAL, INTENT(IN) :: output_level_
[369]161      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: par_access_
[1492]162      LOGICAL  , OPTIONAL, INTENT(IN) :: read_metadata_par_
163      LOGICAL (KIND=C_BOOL) :: read_metadata_par__tmp
[779]164      INTEGER  , OPTIONAL, INTENT(IN) :: record_offset_
[1492]165      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: split_end_offset_
[538]166      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: split_freq_
[432]167      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: split_freq_format_
[1492]168      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: split_last_date_
169      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: split_start_offset_
[538]170      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: sync_freq_
[699]171      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_counter_
[802]172      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_counter_name_
[1158]173      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_stamp_format_
174      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_stamp_name_
175      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_units_
[711]176      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: timeseries_
177      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: ts_prefix_
[326]178      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: type_
[1158]179      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: uuid_format_
180      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: uuid_name_
[581]181
[528]182      IF (PRESENT(append_)) THEN
[581]183        append__tmp = append_
[966]184        CALL cxios_set_filegroup_append &
185      (filegroup_hdl%daddr, append__tmp)
[528]186      ENDIF
[581]187
[1492]188      IF (PRESENT(comment_)) THEN
189        CALL cxios_set_filegroup_comment &
190      (filegroup_hdl%daddr, comment_, len(comment_))
191      ENDIF
192
[608]193      IF (PRESENT(compression_level_)) THEN
[966]194        CALL cxios_set_filegroup_compression_level &
195      (filegroup_hdl%daddr, compression_level_)
[608]196      ENDIF
197
[932]198      IF (PRESENT(convention_)) THEN
[966]199        CALL cxios_set_filegroup_convention &
200      (filegroup_hdl%daddr, convention_, len(convention_))
[932]201      ENDIF
202
[1201]203      IF (PRESENT(convention_str_)) THEN
204        CALL cxios_set_filegroup_convention_str &
205      (filegroup_hdl%daddr, convention_str_, len(convention_str_))
206      ENDIF
207
[891]208      IF (PRESENT(cyclic_)) THEN
209        cyclic__tmp = cyclic_
[966]210        CALL cxios_set_filegroup_cyclic &
211      (filegroup_hdl%daddr, cyclic__tmp)
[891]212      ENDIF
213
[326]214      IF (PRESENT(description_)) THEN
[966]215        CALL cxios_set_filegroup_description &
216      (filegroup_hdl%daddr, description_, len(description_))
[326]217      ENDIF
[581]218
[326]219      IF (PRESENT(enabled_)) THEN
[581]220        enabled__tmp = enabled_
[966]221        CALL cxios_set_filegroup_enabled &
222      (filegroup_hdl%daddr, enabled__tmp)
[326]223      ENDIF
[581]224
[517]225      IF (PRESENT(format_)) THEN
[966]226        CALL cxios_set_filegroup_format &
227      (filegroup_hdl%daddr, format_, len(format_))
[517]228      ENDIF
[581]229
[326]230      IF (PRESENT(group_ref_)) THEN
[966]231        CALL cxios_set_filegroup_group_ref &
232      (filegroup_hdl%daddr, group_ref_, len(group_ref_))
[326]233      ENDIF
[581]234
[415]235      IF (PRESENT(min_digits_)) THEN
[966]236        CALL cxios_set_filegroup_min_digits &
237      (filegroup_hdl%daddr, min_digits_)
[415]238      ENDIF
[581]239
[598]240      IF (PRESENT(mode_)) THEN
[966]241        CALL cxios_set_filegroup_mode &
242      (filegroup_hdl%daddr, mode_, len(mode_))
[598]243      ENDIF
244
[326]245      IF (PRESENT(name_)) THEN
[966]246        CALL cxios_set_filegroup_name &
247      (filegroup_hdl%daddr, name_, len(name_))
[326]248      ENDIF
[581]249
[326]250      IF (PRESENT(name_suffix_)) THEN
[966]251        CALL cxios_set_filegroup_name_suffix &
252      (filegroup_hdl%daddr, name_suffix_, len(name_suffix_))
[326]253      ENDIF
[581]254
[326]255      IF (PRESENT(output_freq_)) THEN
[966]256        CALL cxios_set_filegroup_output_freq &
257      (filegroup_hdl%daddr, output_freq_)
[326]258      ENDIF
[581]259
[326]260      IF (PRESENT(output_level_)) THEN
[966]261        CALL cxios_set_filegroup_output_level &
262      (filegroup_hdl%daddr, output_level_)
[326]263      ENDIF
[581]264
[369]265      IF (PRESENT(par_access_)) THEN
[966]266        CALL cxios_set_filegroup_par_access &
267      (filegroup_hdl%daddr, par_access_, len(par_access_))
[369]268      ENDIF
[581]269
[1492]270      IF (PRESENT(read_metadata_par_)) THEN
271        read_metadata_par__tmp = read_metadata_par_
272        CALL cxios_set_filegroup_read_metadata_par &
273      (filegroup_hdl%daddr, read_metadata_par__tmp)
274      ENDIF
275
[779]276      IF (PRESENT(record_offset_)) THEN
[966]277        CALL cxios_set_filegroup_record_offset &
278      (filegroup_hdl%daddr, record_offset_)
[779]279      ENDIF
280
[1492]281      IF (PRESENT(split_end_offset_)) THEN
282        CALL cxios_set_filegroup_split_end_offset &
283      (filegroup_hdl%daddr, split_end_offset_)
284      ENDIF
285
[326]286      IF (PRESENT(split_freq_)) THEN
[966]287        CALL cxios_set_filegroup_split_freq &
288      (filegroup_hdl%daddr, split_freq_)
[326]289      ENDIF
[581]290
[432]291      IF (PRESENT(split_freq_format_)) THEN
[966]292        CALL cxios_set_filegroup_split_freq_format &
293      (filegroup_hdl%daddr, split_freq_format_, len(split_freq_format_))
[432]294      ENDIF
[581]295
[1492]296      IF (PRESENT(split_last_date_)) THEN
297        CALL cxios_set_filegroup_split_last_date &
298      (filegroup_hdl%daddr, split_last_date_, len(split_last_date_))
299      ENDIF
300
301      IF (PRESENT(split_start_offset_)) THEN
302        CALL cxios_set_filegroup_split_start_offset &
303      (filegroup_hdl%daddr, split_start_offset_)
304      ENDIF
305
[326]306      IF (PRESENT(sync_freq_)) THEN
[966]307        CALL cxios_set_filegroup_sync_freq &
308      (filegroup_hdl%daddr, sync_freq_)
[326]309      ENDIF
[581]310
[699]311      IF (PRESENT(time_counter_)) THEN
[966]312        CALL cxios_set_filegroup_time_counter &
313      (filegroup_hdl%daddr, time_counter_, len(time_counter_))
[699]314      ENDIF
315
[802]316      IF (PRESENT(time_counter_name_)) THEN
[966]317        CALL cxios_set_filegroup_time_counter_name &
318      (filegroup_hdl%daddr, time_counter_name_, len(time_counter_name_))
[802]319      ENDIF
320
[1158]321      IF (PRESENT(time_stamp_format_)) THEN
322        CALL cxios_set_filegroup_time_stamp_format &
323      (filegroup_hdl%daddr, time_stamp_format_, len(time_stamp_format_))
324      ENDIF
325
326      IF (PRESENT(time_stamp_name_)) THEN
327        CALL cxios_set_filegroup_time_stamp_name &
328      (filegroup_hdl%daddr, time_stamp_name_, len(time_stamp_name_))
329      ENDIF
330
331      IF (PRESENT(time_units_)) THEN
332        CALL cxios_set_filegroup_time_units &
333      (filegroup_hdl%daddr, time_units_, len(time_units_))
334      ENDIF
335
[711]336      IF (PRESENT(timeseries_)) THEN
[966]337        CALL cxios_set_filegroup_timeseries &
338      (filegroup_hdl%daddr, timeseries_, len(timeseries_))
[711]339      ENDIF
340
341      IF (PRESENT(ts_prefix_)) THEN
[966]342        CALL cxios_set_filegroup_ts_prefix &
343      (filegroup_hdl%daddr, ts_prefix_, len(ts_prefix_))
[711]344      ENDIF
345
[326]346      IF (PRESENT(type_)) THEN
[966]347        CALL cxios_set_filegroup_type &
348      (filegroup_hdl%daddr, type_, len(type_))
[326]349      ENDIF
[581]350
[1158]351      IF (PRESENT(uuid_format_)) THEN
352        CALL cxios_set_filegroup_uuid_format &
353      (filegroup_hdl%daddr, uuid_format_, len(uuid_format_))
354      ENDIF
355
356      IF (PRESENT(uuid_name_)) THEN
357        CALL cxios_set_filegroup_uuid_name &
358      (filegroup_hdl%daddr, uuid_name_, len(uuid_name_))
359      ENDIF
360
[326]361  END SUBROUTINE xios(set_filegroup_attr_hdl_)
[581]362
[326]363  SUBROUTINE xios(get_filegroup_attr)  &
[1492]364    ( filegroup_id, append, comment, compression_level, convention, convention_str, cyclic, description  &
365    , enabled, format, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level  &
366    , par_access, read_metadata_par, record_offset, split_end_offset, split_freq, split_freq_format  &
367    , split_last_date, split_start_offset, sync_freq, time_counter, time_counter_name, time_stamp_format  &
[1158]368    , time_stamp_name, time_units, timeseries, ts_prefix, type, uuid_format, uuid_name )
[581]369
[326]370    IMPLICIT NONE
371      TYPE(txios(filegroup))  :: filegroup_hdl
372      CHARACTER(LEN=*), INTENT(IN) ::filegroup_id
[528]373      LOGICAL  , OPTIONAL, INTENT(OUT) :: append
374      LOGICAL (KIND=C_BOOL) :: append_tmp
[1492]375      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: comment
[608]376      INTEGER  , OPTIONAL, INTENT(OUT) :: compression_level
[932]377      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: convention
[1201]378      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: convention_str
[891]379      LOGICAL  , OPTIONAL, INTENT(OUT) :: cyclic
380      LOGICAL (KIND=C_BOOL) :: cyclic_tmp
[326]381      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: description
382      LOGICAL  , OPTIONAL, INTENT(OUT) :: enabled
383      LOGICAL (KIND=C_BOOL) :: enabled_tmp
[517]384      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: format
[326]385      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: group_ref
[415]386      INTEGER  , OPTIONAL, INTENT(OUT) :: min_digits
[598]387      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: mode
[326]388      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name
389      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name_suffix
[538]390      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: output_freq
[326]391      INTEGER  , OPTIONAL, INTENT(OUT) :: output_level
[369]392      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: par_access
[1492]393      LOGICAL  , OPTIONAL, INTENT(OUT) :: read_metadata_par
394      LOGICAL (KIND=C_BOOL) :: read_metadata_par_tmp
[779]395      INTEGER  , OPTIONAL, INTENT(OUT) :: record_offset
[1492]396      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: split_end_offset
[538]397      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: split_freq
[432]398      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: split_freq_format
[1492]399      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: split_last_date
400      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: split_start_offset
[538]401      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: sync_freq
[699]402      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_counter
[802]403      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_counter_name
[1158]404      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_stamp_format
405      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_stamp_name
406      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_units
[711]407      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: timeseries
408      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: ts_prefix
[326]409      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: type
[1158]410      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: uuid_format
411      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: uuid_name
[581]412
[966]413      CALL xios(get_filegroup_handle) &
414      (filegroup_id,filegroup_hdl)
[326]415      CALL xios(get_filegroup_attr_hdl_)   &
[1492]416      ( filegroup_hdl, append, comment, compression_level, convention, convention_str, cyclic, description  &
[1201]417      , enabled, format, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level  &
[1492]418      , par_access, read_metadata_par, record_offset, split_end_offset, split_freq, split_freq_format  &
419      , split_last_date, split_start_offset, sync_freq, time_counter, time_counter_name, time_stamp_format  &
420      , time_stamp_name, time_units, timeseries, ts_prefix, type, uuid_format, uuid_name )
[581]421
[326]422  END SUBROUTINE xios(get_filegroup_attr)
[581]423
[326]424  SUBROUTINE xios(get_filegroup_attr_hdl)  &
[1492]425    ( filegroup_hdl, append, comment, compression_level, convention, convention_str, cyclic, description  &
[1201]426    , enabled, format, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level  &
[1492]427    , par_access, read_metadata_par, record_offset, split_end_offset, split_freq, split_freq_format  &
428    , split_last_date, split_start_offset, sync_freq, time_counter, time_counter_name, time_stamp_format  &
429    , time_stamp_name, time_units, timeseries, ts_prefix, type, uuid_format, uuid_name )
[581]430
[326]431    IMPLICIT NONE
432      TYPE(txios(filegroup)) , INTENT(IN) :: filegroup_hdl
[528]433      LOGICAL  , OPTIONAL, INTENT(OUT) :: append
434      LOGICAL (KIND=C_BOOL) :: append_tmp
[1492]435      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: comment
[608]436      INTEGER  , OPTIONAL, INTENT(OUT) :: compression_level
[932]437      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: convention
[1201]438      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: convention_str
[891]439      LOGICAL  , OPTIONAL, INTENT(OUT) :: cyclic
440      LOGICAL (KIND=C_BOOL) :: cyclic_tmp
[326]441      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: description
442      LOGICAL  , OPTIONAL, INTENT(OUT) :: enabled
443      LOGICAL (KIND=C_BOOL) :: enabled_tmp
[517]444      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: format
[326]445      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: group_ref
[415]446      INTEGER  , OPTIONAL, INTENT(OUT) :: min_digits
[598]447      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: mode
[326]448      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name
449      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name_suffix
[538]450      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: output_freq
[326]451      INTEGER  , OPTIONAL, INTENT(OUT) :: output_level
[369]452      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: par_access
[1492]453      LOGICAL  , OPTIONAL, INTENT(OUT) :: read_metadata_par
454      LOGICAL (KIND=C_BOOL) :: read_metadata_par_tmp
[779]455      INTEGER  , OPTIONAL, INTENT(OUT) :: record_offset
[1492]456      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: split_end_offset
[538]457      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: split_freq
[432]458      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: split_freq_format
[1492]459      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: split_last_date
460      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: split_start_offset
[538]461      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: sync_freq
[699]462      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_counter
[802]463      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_counter_name
[1158]464      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_stamp_format
465      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_stamp_name
466      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_units
[711]467      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: timeseries
468      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: ts_prefix
[326]469      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: type
[1158]470      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: uuid_format
471      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: uuid_name
[581]472
[326]473      CALL xios(get_filegroup_attr_hdl_)  &
[1492]474      ( filegroup_hdl, append, comment, compression_level, convention, convention_str, cyclic, description  &
[1201]475      , enabled, format, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level  &
[1492]476      , par_access, read_metadata_par, record_offset, split_end_offset, split_freq, split_freq_format  &
477      , split_last_date, split_start_offset, sync_freq, time_counter, time_counter_name, time_stamp_format  &
478      , time_stamp_name, time_units, timeseries, ts_prefix, type, uuid_format, uuid_name )
[581]479
[326]480  END SUBROUTINE xios(get_filegroup_attr_hdl)
[581]481
[326]482  SUBROUTINE xios(get_filegroup_attr_hdl_)   &
[1492]483    ( filegroup_hdl, append_, comment_, compression_level_, convention_, convention_str_, cyclic_  &
484    , description_, enabled_, format_, group_ref_, min_digits_, mode_, name_, name_suffix_, output_freq_  &
485    , output_level_, par_access_, read_metadata_par_, record_offset_, split_end_offset_, split_freq_  &
486    , split_freq_format_, split_last_date_, split_start_offset_, sync_freq_, time_counter_, time_counter_name_  &
[1158]487    , time_stamp_format_, time_stamp_name_, time_units_, timeseries_, ts_prefix_, type_, uuid_format_  &
488    , uuid_name_ )
[581]489
[326]490    IMPLICIT NONE
491      TYPE(txios(filegroup)) , INTENT(IN) :: filegroup_hdl
[528]492      LOGICAL  , OPTIONAL, INTENT(OUT) :: append_
493      LOGICAL (KIND=C_BOOL) :: append__tmp
[1492]494      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: comment_
[608]495      INTEGER  , OPTIONAL, INTENT(OUT) :: compression_level_
[932]496      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: convention_
[1201]497      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: convention_str_
[891]498      LOGICAL  , OPTIONAL, INTENT(OUT) :: cyclic_
499      LOGICAL (KIND=C_BOOL) :: cyclic__tmp
[326]500      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: description_
501      LOGICAL  , OPTIONAL, INTENT(OUT) :: enabled_
502      LOGICAL (KIND=C_BOOL) :: enabled__tmp
[517]503      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: format_
[326]504      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: group_ref_
[415]505      INTEGER  , OPTIONAL, INTENT(OUT) :: min_digits_
[598]506      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: mode_
[326]507      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name_
508      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name_suffix_
[538]509      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: output_freq_
[326]510      INTEGER  , OPTIONAL, INTENT(OUT) :: output_level_
[369]511      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: par_access_
[1492]512      LOGICAL  , OPTIONAL, INTENT(OUT) :: read_metadata_par_
513      LOGICAL (KIND=C_BOOL) :: read_metadata_par__tmp
[779]514      INTEGER  , OPTIONAL, INTENT(OUT) :: record_offset_
[1492]515      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: split_end_offset_
[538]516      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: split_freq_
[432]517      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: split_freq_format_
[1492]518      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: split_last_date_
519      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: split_start_offset_
[538]520      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: sync_freq_
[699]521      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_counter_
[802]522      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_counter_name_
[1158]523      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_stamp_format_
524      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_stamp_name_
525      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_units_
[711]526      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: timeseries_
527      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: ts_prefix_
[326]528      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: type_
[1158]529      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: uuid_format_
530      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: uuid_name_
[581]531
[528]532      IF (PRESENT(append_)) THEN
[966]533        CALL cxios_get_filegroup_append &
534      (filegroup_hdl%daddr, append__tmp)
[581]535        append_ = append__tmp
[528]536      ENDIF
[581]537
[1492]538      IF (PRESENT(comment_)) THEN
539        CALL cxios_get_filegroup_comment &
540      (filegroup_hdl%daddr, comment_, len(comment_))
541      ENDIF
542
[608]543      IF (PRESENT(compression_level_)) THEN
[966]544        CALL cxios_get_filegroup_compression_level &
545      (filegroup_hdl%daddr, compression_level_)
[608]546      ENDIF
547
[932]548      IF (PRESENT(convention_)) THEN
[966]549        CALL cxios_get_filegroup_convention &
550      (filegroup_hdl%daddr, convention_, len(convention_))
[932]551      ENDIF
552
[1201]553      IF (PRESENT(convention_str_)) THEN
554        CALL cxios_get_filegroup_convention_str &
555      (filegroup_hdl%daddr, convention_str_, len(convention_str_))
556      ENDIF
557
[891]558      IF (PRESENT(cyclic_)) THEN
[966]559        CALL cxios_get_filegroup_cyclic &
560      (filegroup_hdl%daddr, cyclic__tmp)
[891]561        cyclic_ = cyclic__tmp
562      ENDIF
563
[326]564      IF (PRESENT(description_)) THEN
[966]565        CALL cxios_get_filegroup_description &
566      (filegroup_hdl%daddr, description_, len(description_))
[326]567      ENDIF
[581]568
[326]569      IF (PRESENT(enabled_)) THEN
[966]570        CALL cxios_get_filegroup_enabled &
571      (filegroup_hdl%daddr, enabled__tmp)
[581]572        enabled_ = enabled__tmp
[326]573      ENDIF
[581]574
[517]575      IF (PRESENT(format_)) THEN
[966]576        CALL cxios_get_filegroup_format &
577      (filegroup_hdl%daddr, format_, len(format_))
[517]578      ENDIF
[581]579
[326]580      IF (PRESENT(group_ref_)) THEN
[966]581        CALL cxios_get_filegroup_group_ref &
582      (filegroup_hdl%daddr, group_ref_, len(group_ref_))
[326]583      ENDIF
[581]584
[415]585      IF (PRESENT(min_digits_)) THEN
[966]586        CALL cxios_get_filegroup_min_digits &
587      (filegroup_hdl%daddr, min_digits_)
[415]588      ENDIF
[581]589
[598]590      IF (PRESENT(mode_)) THEN
[966]591        CALL cxios_get_filegroup_mode &
592      (filegroup_hdl%daddr, mode_, len(mode_))
[598]593      ENDIF
594
[326]595      IF (PRESENT(name_)) THEN
[966]596        CALL cxios_get_filegroup_name &
597      (filegroup_hdl%daddr, name_, len(name_))
[326]598      ENDIF
[581]599
[326]600      IF (PRESENT(name_suffix_)) THEN
[966]601        CALL cxios_get_filegroup_name_suffix &
602      (filegroup_hdl%daddr, name_suffix_, len(name_suffix_))
[326]603      ENDIF
[581]604
[326]605      IF (PRESENT(output_freq_)) THEN
[966]606        CALL cxios_get_filegroup_output_freq &
607      (filegroup_hdl%daddr, output_freq_)
[326]608      ENDIF
[581]609
[326]610      IF (PRESENT(output_level_)) THEN
[966]611        CALL cxios_get_filegroup_output_level &
612      (filegroup_hdl%daddr, output_level_)
[326]613      ENDIF
[581]614
[369]615      IF (PRESENT(par_access_)) THEN
[966]616        CALL cxios_get_filegroup_par_access &
617      (filegroup_hdl%daddr, par_access_, len(par_access_))
[369]618      ENDIF
[581]619
[1492]620      IF (PRESENT(read_metadata_par_)) THEN
621        CALL cxios_get_filegroup_read_metadata_par &
622      (filegroup_hdl%daddr, read_metadata_par__tmp)
623        read_metadata_par_ = read_metadata_par__tmp
624      ENDIF
625
[779]626      IF (PRESENT(record_offset_)) THEN
[966]627        CALL cxios_get_filegroup_record_offset &
628      (filegroup_hdl%daddr, record_offset_)
[779]629      ENDIF
630
[1492]631      IF (PRESENT(split_end_offset_)) THEN
632        CALL cxios_get_filegroup_split_end_offset &
633      (filegroup_hdl%daddr, split_end_offset_)
634      ENDIF
635
[326]636      IF (PRESENT(split_freq_)) THEN
[966]637        CALL cxios_get_filegroup_split_freq &
638      (filegroup_hdl%daddr, split_freq_)
[326]639      ENDIF
[581]640
[432]641      IF (PRESENT(split_freq_format_)) THEN
[966]642        CALL cxios_get_filegroup_split_freq_format &
643      (filegroup_hdl%daddr, split_freq_format_, len(split_freq_format_))
[432]644      ENDIF
[581]645
[1492]646      IF (PRESENT(split_last_date_)) THEN
647        CALL cxios_get_filegroup_split_last_date &
648      (filegroup_hdl%daddr, split_last_date_, len(split_last_date_))
649      ENDIF
650
651      IF (PRESENT(split_start_offset_)) THEN
652        CALL cxios_get_filegroup_split_start_offset &
653      (filegroup_hdl%daddr, split_start_offset_)
654      ENDIF
655
[326]656      IF (PRESENT(sync_freq_)) THEN
[966]657        CALL cxios_get_filegroup_sync_freq &
658      (filegroup_hdl%daddr, sync_freq_)
[326]659      ENDIF
[581]660
[699]661      IF (PRESENT(time_counter_)) THEN
[966]662        CALL cxios_get_filegroup_time_counter &
663      (filegroup_hdl%daddr, time_counter_, len(time_counter_))
[699]664      ENDIF
665
[802]666      IF (PRESENT(time_counter_name_)) THEN
[966]667        CALL cxios_get_filegroup_time_counter_name &
668      (filegroup_hdl%daddr, time_counter_name_, len(time_counter_name_))
[802]669      ENDIF
670
[1158]671      IF (PRESENT(time_stamp_format_)) THEN
672        CALL cxios_get_filegroup_time_stamp_format &
673      (filegroup_hdl%daddr, time_stamp_format_, len(time_stamp_format_))
674      ENDIF
675
676      IF (PRESENT(time_stamp_name_)) THEN
677        CALL cxios_get_filegroup_time_stamp_name &
678      (filegroup_hdl%daddr, time_stamp_name_, len(time_stamp_name_))
679      ENDIF
680
681      IF (PRESENT(time_units_)) THEN
682        CALL cxios_get_filegroup_time_units &
683      (filegroup_hdl%daddr, time_units_, len(time_units_))
684      ENDIF
685
[711]686      IF (PRESENT(timeseries_)) THEN
[966]687        CALL cxios_get_filegroup_timeseries &
688      (filegroup_hdl%daddr, timeseries_, len(timeseries_))
[711]689      ENDIF
690
691      IF (PRESENT(ts_prefix_)) THEN
[966]692        CALL cxios_get_filegroup_ts_prefix &
693      (filegroup_hdl%daddr, ts_prefix_, len(ts_prefix_))
[711]694      ENDIF
695
[326]696      IF (PRESENT(type_)) THEN
[966]697        CALL cxios_get_filegroup_type &
698      (filegroup_hdl%daddr, type_, len(type_))
[326]699      ENDIF
[581]700
[1158]701      IF (PRESENT(uuid_format_)) THEN
702        CALL cxios_get_filegroup_uuid_format &
703      (filegroup_hdl%daddr, uuid_format_, len(uuid_format_))
704      ENDIF
705
706      IF (PRESENT(uuid_name_)) THEN
707        CALL cxios_get_filegroup_uuid_name &
708      (filegroup_hdl%daddr, uuid_name_, len(uuid_name_))
709      ENDIF
710
[326]711  END SUBROUTINE xios(get_filegroup_attr_hdl_)
[581]712
[432]713  SUBROUTINE xios(is_defined_filegroup_attr)  &
[1492]714    ( filegroup_id, append, comment, compression_level, convention, convention_str, cyclic, description  &
715    , enabled, format, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level  &
716    , par_access, read_metadata_par, record_offset, split_end_offset, split_freq, split_freq_format  &
717    , split_last_date, split_start_offset, sync_freq, time_counter, time_counter_name, time_stamp_format  &
[1158]718    , time_stamp_name, time_units, timeseries, ts_prefix, type, uuid_format, uuid_name )
[581]719
[432]720    IMPLICIT NONE
721      TYPE(txios(filegroup))  :: filegroup_hdl
722      CHARACTER(LEN=*), INTENT(IN) ::filegroup_id
[528]723      LOGICAL, OPTIONAL, INTENT(OUT) :: append
724      LOGICAL(KIND=C_BOOL) :: append_tmp
[1492]725      LOGICAL, OPTIONAL, INTENT(OUT) :: comment
726      LOGICAL(KIND=C_BOOL) :: comment_tmp
[608]727      LOGICAL, OPTIONAL, INTENT(OUT) :: compression_level
728      LOGICAL(KIND=C_BOOL) :: compression_level_tmp
[932]729      LOGICAL, OPTIONAL, INTENT(OUT) :: convention
730      LOGICAL(KIND=C_BOOL) :: convention_tmp
[1201]731      LOGICAL, OPTIONAL, INTENT(OUT) :: convention_str
732      LOGICAL(KIND=C_BOOL) :: convention_str_tmp
[891]733      LOGICAL, OPTIONAL, INTENT(OUT) :: cyclic
734      LOGICAL(KIND=C_BOOL) :: cyclic_tmp
[432]735      LOGICAL, OPTIONAL, INTENT(OUT) :: description
736      LOGICAL(KIND=C_BOOL) :: description_tmp
737      LOGICAL, OPTIONAL, INTENT(OUT) :: enabled
738      LOGICAL(KIND=C_BOOL) :: enabled_tmp
[517]739      LOGICAL, OPTIONAL, INTENT(OUT) :: format
740      LOGICAL(KIND=C_BOOL) :: format_tmp
[432]741      LOGICAL, OPTIONAL, INTENT(OUT) :: group_ref
742      LOGICAL(KIND=C_BOOL) :: group_ref_tmp
743      LOGICAL, OPTIONAL, INTENT(OUT) :: min_digits
744      LOGICAL(KIND=C_BOOL) :: min_digits_tmp
[598]745      LOGICAL, OPTIONAL, INTENT(OUT) :: mode
746      LOGICAL(KIND=C_BOOL) :: mode_tmp
[432]747      LOGICAL, OPTIONAL, INTENT(OUT) :: name
748      LOGICAL(KIND=C_BOOL) :: name_tmp
749      LOGICAL, OPTIONAL, INTENT(OUT) :: name_suffix
750      LOGICAL(KIND=C_BOOL) :: name_suffix_tmp
751      LOGICAL, OPTIONAL, INTENT(OUT) :: output_freq
752      LOGICAL(KIND=C_BOOL) :: output_freq_tmp
753      LOGICAL, OPTIONAL, INTENT(OUT) :: output_level
754      LOGICAL(KIND=C_BOOL) :: output_level_tmp
755      LOGICAL, OPTIONAL, INTENT(OUT) :: par_access
756      LOGICAL(KIND=C_BOOL) :: par_access_tmp
[1492]757      LOGICAL, OPTIONAL, INTENT(OUT) :: read_metadata_par
758      LOGICAL(KIND=C_BOOL) :: read_metadata_par_tmp
[779]759      LOGICAL, OPTIONAL, INTENT(OUT) :: record_offset
760      LOGICAL(KIND=C_BOOL) :: record_offset_tmp
[1492]761      LOGICAL, OPTIONAL, INTENT(OUT) :: split_end_offset
762      LOGICAL(KIND=C_BOOL) :: split_end_offset_tmp
[432]763      LOGICAL, OPTIONAL, INTENT(OUT) :: split_freq
764      LOGICAL(KIND=C_BOOL) :: split_freq_tmp
765      LOGICAL, OPTIONAL, INTENT(OUT) :: split_freq_format
766      LOGICAL(KIND=C_BOOL) :: split_freq_format_tmp
[1492]767      LOGICAL, OPTIONAL, INTENT(OUT) :: split_last_date
768      LOGICAL(KIND=C_BOOL) :: split_last_date_tmp
769      LOGICAL, OPTIONAL, INTENT(OUT) :: split_start_offset
770      LOGICAL(KIND=C_BOOL) :: split_start_offset_tmp
[432]771      LOGICAL, OPTIONAL, INTENT(OUT) :: sync_freq
772      LOGICAL(KIND=C_BOOL) :: sync_freq_tmp
[699]773      LOGICAL, OPTIONAL, INTENT(OUT) :: time_counter
774      LOGICAL(KIND=C_BOOL) :: time_counter_tmp
[802]775      LOGICAL, OPTIONAL, INTENT(OUT) :: time_counter_name
776      LOGICAL(KIND=C_BOOL) :: time_counter_name_tmp
[1158]777      LOGICAL, OPTIONAL, INTENT(OUT) :: time_stamp_format
778      LOGICAL(KIND=C_BOOL) :: time_stamp_format_tmp
779      LOGICAL, OPTIONAL, INTENT(OUT) :: time_stamp_name
780      LOGICAL(KIND=C_BOOL) :: time_stamp_name_tmp
781      LOGICAL, OPTIONAL, INTENT(OUT) :: time_units
782      LOGICAL(KIND=C_BOOL) :: time_units_tmp
[711]783      LOGICAL, OPTIONAL, INTENT(OUT) :: timeseries
784      LOGICAL(KIND=C_BOOL) :: timeseries_tmp
785      LOGICAL, OPTIONAL, INTENT(OUT) :: ts_prefix
786      LOGICAL(KIND=C_BOOL) :: ts_prefix_tmp
[432]787      LOGICAL, OPTIONAL, INTENT(OUT) :: type
788      LOGICAL(KIND=C_BOOL) :: type_tmp
[1158]789      LOGICAL, OPTIONAL, INTENT(OUT) :: uuid_format
790      LOGICAL(KIND=C_BOOL) :: uuid_format_tmp
791      LOGICAL, OPTIONAL, INTENT(OUT) :: uuid_name
792      LOGICAL(KIND=C_BOOL) :: uuid_name_tmp
[581]793
[966]794      CALL xios(get_filegroup_handle) &
795      (filegroup_id,filegroup_hdl)
[432]796      CALL xios(is_defined_filegroup_attr_hdl_)   &
[1492]797      ( filegroup_hdl, append, comment, compression_level, convention, convention_str, cyclic, description  &
[1201]798      , enabled, format, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level  &
[1492]799      , par_access, read_metadata_par, record_offset, split_end_offset, split_freq, split_freq_format  &
800      , split_last_date, split_start_offset, sync_freq, time_counter, time_counter_name, time_stamp_format  &
801      , time_stamp_name, time_units, timeseries, ts_prefix, type, uuid_format, uuid_name )
[581]802
[432]803  END SUBROUTINE xios(is_defined_filegroup_attr)
[581]804
[432]805  SUBROUTINE xios(is_defined_filegroup_attr_hdl)  &
[1492]806    ( filegroup_hdl, append, comment, compression_level, convention, convention_str, cyclic, description  &
[1201]807    , enabled, format, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level  &
[1492]808    , par_access, read_metadata_par, record_offset, split_end_offset, split_freq, split_freq_format  &
809    , split_last_date, split_start_offset, sync_freq, time_counter, time_counter_name, time_stamp_format  &
810    , time_stamp_name, time_units, timeseries, ts_prefix, type, uuid_format, uuid_name )
[581]811
[432]812    IMPLICIT NONE
813      TYPE(txios(filegroup)) , INTENT(IN) :: filegroup_hdl
[528]814      LOGICAL, OPTIONAL, INTENT(OUT) :: append
815      LOGICAL(KIND=C_BOOL) :: append_tmp
[1492]816      LOGICAL, OPTIONAL, INTENT(OUT) :: comment
817      LOGICAL(KIND=C_BOOL) :: comment_tmp
[608]818      LOGICAL, OPTIONAL, INTENT(OUT) :: compression_level
819      LOGICAL(KIND=C_BOOL) :: compression_level_tmp
[932]820      LOGICAL, OPTIONAL, INTENT(OUT) :: convention
821      LOGICAL(KIND=C_BOOL) :: convention_tmp
[1201]822      LOGICAL, OPTIONAL, INTENT(OUT) :: convention_str
823      LOGICAL(KIND=C_BOOL) :: convention_str_tmp
[891]824      LOGICAL, OPTIONAL, INTENT(OUT) :: cyclic
825      LOGICAL(KIND=C_BOOL) :: cyclic_tmp
[432]826      LOGICAL, OPTIONAL, INTENT(OUT) :: description
827      LOGICAL(KIND=C_BOOL) :: description_tmp
828      LOGICAL, OPTIONAL, INTENT(OUT) :: enabled
829      LOGICAL(KIND=C_BOOL) :: enabled_tmp
[517]830      LOGICAL, OPTIONAL, INTENT(OUT) :: format
831      LOGICAL(KIND=C_BOOL) :: format_tmp
[432]832      LOGICAL, OPTIONAL, INTENT(OUT) :: group_ref
833      LOGICAL(KIND=C_BOOL) :: group_ref_tmp
834      LOGICAL, OPTIONAL, INTENT(OUT) :: min_digits
835      LOGICAL(KIND=C_BOOL) :: min_digits_tmp
[598]836      LOGICAL, OPTIONAL, INTENT(OUT) :: mode
837      LOGICAL(KIND=C_BOOL) :: mode_tmp
[432]838      LOGICAL, OPTIONAL, INTENT(OUT) :: name
839      LOGICAL(KIND=C_BOOL) :: name_tmp
840      LOGICAL, OPTIONAL, INTENT(OUT) :: name_suffix
841      LOGICAL(KIND=C_BOOL) :: name_suffix_tmp
842      LOGICAL, OPTIONAL, INTENT(OUT) :: output_freq
843      LOGICAL(KIND=C_BOOL) :: output_freq_tmp
844      LOGICAL, OPTIONAL, INTENT(OUT) :: output_level
845      LOGICAL(KIND=C_BOOL) :: output_level_tmp
846      LOGICAL, OPTIONAL, INTENT(OUT) :: par_access
847      LOGICAL(KIND=C_BOOL) :: par_access_tmp
[1492]848      LOGICAL, OPTIONAL, INTENT(OUT) :: read_metadata_par
849      LOGICAL(KIND=C_BOOL) :: read_metadata_par_tmp
[779]850      LOGICAL, OPTIONAL, INTENT(OUT) :: record_offset
851      LOGICAL(KIND=C_BOOL) :: record_offset_tmp
[1492]852      LOGICAL, OPTIONAL, INTENT(OUT) :: split_end_offset
853      LOGICAL(KIND=C_BOOL) :: split_end_offset_tmp
[432]854      LOGICAL, OPTIONAL, INTENT(OUT) :: split_freq
855      LOGICAL(KIND=C_BOOL) :: split_freq_tmp
856      LOGICAL, OPTIONAL, INTENT(OUT) :: split_freq_format
857      LOGICAL(KIND=C_BOOL) :: split_freq_format_tmp
[1492]858      LOGICAL, OPTIONAL, INTENT(OUT) :: split_last_date
859      LOGICAL(KIND=C_BOOL) :: split_last_date_tmp
860      LOGICAL, OPTIONAL, INTENT(OUT) :: split_start_offset
861      LOGICAL(KIND=C_BOOL) :: split_start_offset_tmp
[432]862      LOGICAL, OPTIONAL, INTENT(OUT) :: sync_freq
863      LOGICAL(KIND=C_BOOL) :: sync_freq_tmp
[699]864      LOGICAL, OPTIONAL, INTENT(OUT) :: time_counter
865      LOGICAL(KIND=C_BOOL) :: time_counter_tmp
[802]866      LOGICAL, OPTIONAL, INTENT(OUT) :: time_counter_name
867      LOGICAL(KIND=C_BOOL) :: time_counter_name_tmp
[1158]868      LOGICAL, OPTIONAL, INTENT(OUT) :: time_stamp_format
869      LOGICAL(KIND=C_BOOL) :: time_stamp_format_tmp
870      LOGICAL, OPTIONAL, INTENT(OUT) :: time_stamp_name
871      LOGICAL(KIND=C_BOOL) :: time_stamp_name_tmp
872      LOGICAL, OPTIONAL, INTENT(OUT) :: time_units
873      LOGICAL(KIND=C_BOOL) :: time_units_tmp
[711]874      LOGICAL, OPTIONAL, INTENT(OUT) :: timeseries
875      LOGICAL(KIND=C_BOOL) :: timeseries_tmp
876      LOGICAL, OPTIONAL, INTENT(OUT) :: ts_prefix
877      LOGICAL(KIND=C_BOOL) :: ts_prefix_tmp
[432]878      LOGICAL, OPTIONAL, INTENT(OUT) :: type
879      LOGICAL(KIND=C_BOOL) :: type_tmp
[1158]880      LOGICAL, OPTIONAL, INTENT(OUT) :: uuid_format
881      LOGICAL(KIND=C_BOOL) :: uuid_format_tmp
882      LOGICAL, OPTIONAL, INTENT(OUT) :: uuid_name
883      LOGICAL(KIND=C_BOOL) :: uuid_name_tmp
[581]884
[432]885      CALL xios(is_defined_filegroup_attr_hdl_)  &
[1492]886      ( filegroup_hdl, append, comment, compression_level, convention, convention_str, cyclic, description  &
[1201]887      , enabled, format, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level  &
[1492]888      , par_access, read_metadata_par, record_offset, split_end_offset, split_freq, split_freq_format  &
889      , split_last_date, split_start_offset, sync_freq, time_counter, time_counter_name, time_stamp_format  &
890      , time_stamp_name, time_units, timeseries, ts_prefix, type, uuid_format, uuid_name )
[581]891
[432]892  END SUBROUTINE xios(is_defined_filegroup_attr_hdl)
[581]893
[432]894  SUBROUTINE xios(is_defined_filegroup_attr_hdl_)   &
[1492]895    ( filegroup_hdl, append_, comment_, compression_level_, convention_, convention_str_, cyclic_  &
896    , description_, enabled_, format_, group_ref_, min_digits_, mode_, name_, name_suffix_, output_freq_  &
897    , output_level_, par_access_, read_metadata_par_, record_offset_, split_end_offset_, split_freq_  &
898    , split_freq_format_, split_last_date_, split_start_offset_, sync_freq_, time_counter_, time_counter_name_  &
[1158]899    , time_stamp_format_, time_stamp_name_, time_units_, timeseries_, ts_prefix_, type_, uuid_format_  &
900    , uuid_name_ )
[581]901
[432]902    IMPLICIT NONE
903      TYPE(txios(filegroup)) , INTENT(IN) :: filegroup_hdl
[528]904      LOGICAL, OPTIONAL, INTENT(OUT) :: append_
905      LOGICAL(KIND=C_BOOL) :: append__tmp
[1492]906      LOGICAL, OPTIONAL, INTENT(OUT) :: comment_
907      LOGICAL(KIND=C_BOOL) :: comment__tmp
[608]908      LOGICAL, OPTIONAL, INTENT(OUT) :: compression_level_
909      LOGICAL(KIND=C_BOOL) :: compression_level__tmp
[932]910      LOGICAL, OPTIONAL, INTENT(OUT) :: convention_
911      LOGICAL(KIND=C_BOOL) :: convention__tmp
[1201]912      LOGICAL, OPTIONAL, INTENT(OUT) :: convention_str_
913      LOGICAL(KIND=C_BOOL) :: convention_str__tmp
[891]914      LOGICAL, OPTIONAL, INTENT(OUT) :: cyclic_
915      LOGICAL(KIND=C_BOOL) :: cyclic__tmp
[432]916      LOGICAL, OPTIONAL, INTENT(OUT) :: description_
917      LOGICAL(KIND=C_BOOL) :: description__tmp
918      LOGICAL, OPTIONAL, INTENT(OUT) :: enabled_
919      LOGICAL(KIND=C_BOOL) :: enabled__tmp
[517]920      LOGICAL, OPTIONAL, INTENT(OUT) :: format_
921      LOGICAL(KIND=C_BOOL) :: format__tmp
[432]922      LOGICAL, OPTIONAL, INTENT(OUT) :: group_ref_
923      LOGICAL(KIND=C_BOOL) :: group_ref__tmp
924      LOGICAL, OPTIONAL, INTENT(OUT) :: min_digits_
925      LOGICAL(KIND=C_BOOL) :: min_digits__tmp
[598]926      LOGICAL, OPTIONAL, INTENT(OUT) :: mode_
927      LOGICAL(KIND=C_BOOL) :: mode__tmp
[432]928      LOGICAL, OPTIONAL, INTENT(OUT) :: name_
929      LOGICAL(KIND=C_BOOL) :: name__tmp
930      LOGICAL, OPTIONAL, INTENT(OUT) :: name_suffix_
931      LOGICAL(KIND=C_BOOL) :: name_suffix__tmp
932      LOGICAL, OPTIONAL, INTENT(OUT) :: output_freq_
933      LOGICAL(KIND=C_BOOL) :: output_freq__tmp
934      LOGICAL, OPTIONAL, INTENT(OUT) :: output_level_
935      LOGICAL(KIND=C_BOOL) :: output_level__tmp
936      LOGICAL, OPTIONAL, INTENT(OUT) :: par_access_
937      LOGICAL(KIND=C_BOOL) :: par_access__tmp
[1492]938      LOGICAL, OPTIONAL, INTENT(OUT) :: read_metadata_par_
939      LOGICAL(KIND=C_BOOL) :: read_metadata_par__tmp
[779]940      LOGICAL, OPTIONAL, INTENT(OUT) :: record_offset_
941      LOGICAL(KIND=C_BOOL) :: record_offset__tmp
[1492]942      LOGICAL, OPTIONAL, INTENT(OUT) :: split_end_offset_
943      LOGICAL(KIND=C_BOOL) :: split_end_offset__tmp
[432]944      LOGICAL, OPTIONAL, INTENT(OUT) :: split_freq_
945      LOGICAL(KIND=C_BOOL) :: split_freq__tmp
946      LOGICAL, OPTIONAL, INTENT(OUT) :: split_freq_format_
947      LOGICAL(KIND=C_BOOL) :: split_freq_format__tmp
[1492]948      LOGICAL, OPTIONAL, INTENT(OUT) :: split_last_date_
949      LOGICAL(KIND=C_BOOL) :: split_last_date__tmp
950      LOGICAL, OPTIONAL, INTENT(OUT) :: split_start_offset_
951      LOGICAL(KIND=C_BOOL) :: split_start_offset__tmp
[432]952      LOGICAL, OPTIONAL, INTENT(OUT) :: sync_freq_
953      LOGICAL(KIND=C_BOOL) :: sync_freq__tmp
[699]954      LOGICAL, OPTIONAL, INTENT(OUT) :: time_counter_
955      LOGICAL(KIND=C_BOOL) :: time_counter__tmp
[802]956      LOGICAL, OPTIONAL, INTENT(OUT) :: time_counter_name_
957      LOGICAL(KIND=C_BOOL) :: time_counter_name__tmp
[1158]958      LOGICAL, OPTIONAL, INTENT(OUT) :: time_stamp_format_
959      LOGICAL(KIND=C_BOOL) :: time_stamp_format__tmp
960      LOGICAL, OPTIONAL, INTENT(OUT) :: time_stamp_name_
961      LOGICAL(KIND=C_BOOL) :: time_stamp_name__tmp
962      LOGICAL, OPTIONAL, INTENT(OUT) :: time_units_
963      LOGICAL(KIND=C_BOOL) :: time_units__tmp
[711]964      LOGICAL, OPTIONAL, INTENT(OUT) :: timeseries_
965      LOGICAL(KIND=C_BOOL) :: timeseries__tmp
966      LOGICAL, OPTIONAL, INTENT(OUT) :: ts_prefix_
967      LOGICAL(KIND=C_BOOL) :: ts_prefix__tmp
[432]968      LOGICAL, OPTIONAL, INTENT(OUT) :: type_
969      LOGICAL(KIND=C_BOOL) :: type__tmp
[1158]970      LOGICAL, OPTIONAL, INTENT(OUT) :: uuid_format_
971      LOGICAL(KIND=C_BOOL) :: uuid_format__tmp
972      LOGICAL, OPTIONAL, INTENT(OUT) :: uuid_name_
973      LOGICAL(KIND=C_BOOL) :: uuid_name__tmp
[581]974
[528]975      IF (PRESENT(append_)) THEN
[966]976        append__tmp = cxios_is_defined_filegroup_append &
977      (filegroup_hdl%daddr)
[581]978        append_ = append__tmp
[528]979      ENDIF
[581]980
[1492]981      IF (PRESENT(comment_)) THEN
982        comment__tmp = cxios_is_defined_filegroup_comment &
983      (filegroup_hdl%daddr)
984        comment_ = comment__tmp
985      ENDIF
986
[608]987      IF (PRESENT(compression_level_)) THEN
[966]988        compression_level__tmp = cxios_is_defined_filegroup_compression_level &
989      (filegroup_hdl%daddr)
[608]990        compression_level_ = compression_level__tmp
991      ENDIF
992
[932]993      IF (PRESENT(convention_)) THEN
[966]994        convention__tmp = cxios_is_defined_filegroup_convention &
995      (filegroup_hdl%daddr)
[932]996        convention_ = convention__tmp
997      ENDIF
998
[1201]999      IF (PRESENT(convention_str_)) THEN
1000        convention_str__tmp = cxios_is_defined_filegroup_convention_str &
1001      (filegroup_hdl%daddr)
1002        convention_str_ = convention_str__tmp
1003      ENDIF
1004
[891]1005      IF (PRESENT(cyclic_)) THEN
[966]1006        cyclic__tmp = cxios_is_defined_filegroup_cyclic &
1007      (filegroup_hdl%daddr)
[891]1008        cyclic_ = cyclic__tmp
1009      ENDIF
1010
[432]1011      IF (PRESENT(description_)) THEN
[966]1012        description__tmp = cxios_is_defined_filegroup_description &
1013      (filegroup_hdl%daddr)
[581]1014        description_ = description__tmp
[432]1015      ENDIF
[581]1016
[432]1017      IF (PRESENT(enabled_)) THEN
[966]1018        enabled__tmp = cxios_is_defined_filegroup_enabled &
1019      (filegroup_hdl%daddr)
[581]1020        enabled_ = enabled__tmp
[432]1021      ENDIF
[581]1022
[517]1023      IF (PRESENT(format_)) THEN
[966]1024        format__tmp = cxios_is_defined_filegroup_format &
1025      (filegroup_hdl%daddr)
[581]1026        format_ = format__tmp
[517]1027      ENDIF
[581]1028
[432]1029      IF (PRESENT(group_ref_)) THEN
[966]1030        group_ref__tmp = cxios_is_defined_filegroup_group_ref &
1031      (filegroup_hdl%daddr)
[581]1032        group_ref_ = group_ref__tmp
[432]1033      ENDIF
[581]1034
[432]1035      IF (PRESENT(min_digits_)) THEN
[966]1036        min_digits__tmp = cxios_is_defined_filegroup_min_digits &
1037      (filegroup_hdl%daddr)
[581]1038        min_digits_ = min_digits__tmp
[432]1039      ENDIF
[581]1040
[598]1041      IF (PRESENT(mode_)) THEN
[966]1042        mode__tmp = cxios_is_defined_filegroup_mode &
1043      (filegroup_hdl%daddr)
[598]1044        mode_ = mode__tmp
1045      ENDIF
1046
[432]1047      IF (PRESENT(name_)) THEN
[966]1048        name__tmp = cxios_is_defined_filegroup_name &
1049      (filegroup_hdl%daddr)
[581]1050        name_ = name__tmp
[432]1051      ENDIF
[581]1052
[432]1053      IF (PRESENT(name_suffix_)) THEN
[966]1054        name_suffix__tmp = cxios_is_defined_filegroup_name_suffix &
1055      (filegroup_hdl%daddr)
[581]1056        name_suffix_ = name_suffix__tmp
[432]1057      ENDIF
[581]1058
[432]1059      IF (PRESENT(output_freq_)) THEN
[966]1060        output_freq__tmp = cxios_is_defined_filegroup_output_freq &
1061      (filegroup_hdl%daddr)
[581]1062        output_freq_ = output_freq__tmp
[432]1063      ENDIF
[581]1064
[432]1065      IF (PRESENT(output_level_)) THEN
[966]1066        output_level__tmp = cxios_is_defined_filegroup_output_level &
1067      (filegroup_hdl%daddr)
[581]1068        output_level_ = output_level__tmp
[432]1069      ENDIF
[581]1070
[432]1071      IF (PRESENT(par_access_)) THEN
[966]1072        par_access__tmp = cxios_is_defined_filegroup_par_access &
1073      (filegroup_hdl%daddr)
[581]1074        par_access_ = par_access__tmp
[432]1075      ENDIF
[581]1076
[1492]1077      IF (PRESENT(read_metadata_par_)) THEN
1078        read_metadata_par__tmp = cxios_is_defined_filegroup_read_metadata_par &
1079      (filegroup_hdl%daddr)
1080        read_metadata_par_ = read_metadata_par__tmp
1081      ENDIF
1082
[779]1083      IF (PRESENT(record_offset_)) THEN
[966]1084        record_offset__tmp = cxios_is_defined_filegroup_record_offset &
1085      (filegroup_hdl%daddr)
[779]1086        record_offset_ = record_offset__tmp
1087      ENDIF
1088
[1492]1089      IF (PRESENT(split_end_offset_)) THEN
1090        split_end_offset__tmp = cxios_is_defined_filegroup_split_end_offset &
1091      (filegroup_hdl%daddr)
1092        split_end_offset_ = split_end_offset__tmp
1093      ENDIF
1094
[432]1095      IF (PRESENT(split_freq_)) THEN
[966]1096        split_freq__tmp = cxios_is_defined_filegroup_split_freq &
1097      (filegroup_hdl%daddr)
[581]1098        split_freq_ = split_freq__tmp
[432]1099      ENDIF
[581]1100
[432]1101      IF (PRESENT(split_freq_format_)) THEN
[966]1102        split_freq_format__tmp = cxios_is_defined_filegroup_split_freq_format &
1103      (filegroup_hdl%daddr)
[581]1104        split_freq_format_ = split_freq_format__tmp
[432]1105      ENDIF
[581]1106
[1492]1107      IF (PRESENT(split_last_date_)) THEN
1108        split_last_date__tmp = cxios_is_defined_filegroup_split_last_date &
1109      (filegroup_hdl%daddr)
1110        split_last_date_ = split_last_date__tmp
1111      ENDIF
1112
1113      IF (PRESENT(split_start_offset_)) THEN
1114        split_start_offset__tmp = cxios_is_defined_filegroup_split_start_offset &
1115      (filegroup_hdl%daddr)
1116        split_start_offset_ = split_start_offset__tmp
1117      ENDIF
1118
[432]1119      IF (PRESENT(sync_freq_)) THEN
[966]1120        sync_freq__tmp = cxios_is_defined_filegroup_sync_freq &
1121      (filegroup_hdl%daddr)
[581]1122        sync_freq_ = sync_freq__tmp
[432]1123      ENDIF
[581]1124
[699]1125      IF (PRESENT(time_counter_)) THEN
[966]1126        time_counter__tmp = cxios_is_defined_filegroup_time_counter &
1127      (filegroup_hdl%daddr)
[699]1128        time_counter_ = time_counter__tmp
1129      ENDIF
1130
[802]1131      IF (PRESENT(time_counter_name_)) THEN
[966]1132        time_counter_name__tmp = cxios_is_defined_filegroup_time_counter_name &
1133      (filegroup_hdl%daddr)
[802]1134        time_counter_name_ = time_counter_name__tmp
1135      ENDIF
1136
[1158]1137      IF (PRESENT(time_stamp_format_)) THEN
1138        time_stamp_format__tmp = cxios_is_defined_filegroup_time_stamp_format &
1139      (filegroup_hdl%daddr)
1140        time_stamp_format_ = time_stamp_format__tmp
1141      ENDIF
1142
1143      IF (PRESENT(time_stamp_name_)) THEN
1144        time_stamp_name__tmp = cxios_is_defined_filegroup_time_stamp_name &
1145      (filegroup_hdl%daddr)
1146        time_stamp_name_ = time_stamp_name__tmp
1147      ENDIF
1148
1149      IF (PRESENT(time_units_)) THEN
1150        time_units__tmp = cxios_is_defined_filegroup_time_units &
1151      (filegroup_hdl%daddr)
1152        time_units_ = time_units__tmp
1153      ENDIF
1154
[711]1155      IF (PRESENT(timeseries_)) THEN
[966]1156        timeseries__tmp = cxios_is_defined_filegroup_timeseries &
1157      (filegroup_hdl%daddr)
[711]1158        timeseries_ = timeseries__tmp
1159      ENDIF
1160
1161      IF (PRESENT(ts_prefix_)) THEN
[966]1162        ts_prefix__tmp = cxios_is_defined_filegroup_ts_prefix &
1163      (filegroup_hdl%daddr)
[711]1164        ts_prefix_ = ts_prefix__tmp
1165      ENDIF
1166
[432]1167      IF (PRESENT(type_)) THEN
[966]1168        type__tmp = cxios_is_defined_filegroup_type &
1169      (filegroup_hdl%daddr)
[581]1170        type_ = type__tmp
[432]1171      ENDIF
[581]1172
[1158]1173      IF (PRESENT(uuid_format_)) THEN
1174        uuid_format__tmp = cxios_is_defined_filegroup_uuid_format &
1175      (filegroup_hdl%daddr)
1176        uuid_format_ = uuid_format__tmp
1177      ENDIF
1178
1179      IF (PRESENT(uuid_name_)) THEN
1180        uuid_name__tmp = cxios_is_defined_filegroup_uuid_name &
1181      (filegroup_hdl%daddr)
1182        uuid_name_ = uuid_name__tmp
1183      ENDIF
1184
[432]1185  END SUBROUTINE xios(is_defined_filegroup_attr_hdl_)
[581]1186
[326]1187END MODULE ifilegroup_attr
Note: See TracBrowser for help on using the repository browser.