source: XIOS3/trunk/src/interface/fortran_attr/ifilegroup_attr.F90 @ 2616

Last change on this file since 2616 was 2616, checked in by jderouillat, 4 months ago

Add XIOS3 fortran interfaces (resources management, chunking, compression)

  • 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: 60.6 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  &
[2616]15    , enabled, format, gatherer, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level  &
16    , par_access, pool_gatherer, pool_reader, pool_writer, read_metadata_par, reader, record_offset  &
17    , split_end_offset, split_freq, split_freq_format, split_last_date, split_start_offset, sync_freq  &
18    , time_counter, time_counter_name, time_stamp_format, time_stamp_name, time_units, timeseries  &
19    , ts_prefix, type, using_server2, uuid_format, uuid_name, writer )
[581]20
[326]21    IMPLICIT NONE
22      TYPE(txios(filegroup))  :: filegroup_hdl
23      CHARACTER(LEN=*), INTENT(IN) ::filegroup_id
[528]24      LOGICAL  , OPTIONAL, INTENT(IN) :: append
25      LOGICAL (KIND=C_BOOL) :: append_tmp
[1492]26      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: comment
[608]27      INTEGER  , OPTIONAL, INTENT(IN) :: compression_level
[932]28      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: convention
[1201]29      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: convention_str
[891]30      LOGICAL  , OPTIONAL, INTENT(IN) :: cyclic
31      LOGICAL (KIND=C_BOOL) :: cyclic_tmp
[326]32      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: description
33      LOGICAL  , OPTIONAL, INTENT(IN) :: enabled
34      LOGICAL (KIND=C_BOOL) :: enabled_tmp
[517]35      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: format
[2616]36      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: gatherer
[326]37      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: group_ref
[415]38      INTEGER  , OPTIONAL, INTENT(IN) :: min_digits
[598]39      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: mode
[326]40      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name
41      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name_suffix
[538]42      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: output_freq
[326]43      INTEGER  , OPTIONAL, INTENT(IN) :: output_level
[369]44      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: par_access
[2616]45      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: pool_gatherer
46      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: pool_reader
47      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: pool_writer
[1492]48      LOGICAL  , OPTIONAL, INTENT(IN) :: read_metadata_par
49      LOGICAL (KIND=C_BOOL) :: read_metadata_par_tmp
[2616]50      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: reader
[779]51      INTEGER  , OPTIONAL, INTENT(IN) :: record_offset
[1492]52      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: split_end_offset
[538]53      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: split_freq
[432]54      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: split_freq_format
[1492]55      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: split_last_date
56      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: split_start_offset
[538]57      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: sync_freq
[699]58      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_counter
[802]59      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_counter_name
[1158]60      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_stamp_format
61      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_stamp_name
62      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_units
[711]63      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: timeseries
64      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: ts_prefix
[326]65      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: type
[2616]66      LOGICAL  , OPTIONAL, INTENT(IN) :: using_server2
67      LOGICAL (KIND=C_BOOL) :: using_server2_tmp
[1158]68      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: uuid_format
69      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: uuid_name
[2616]70      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: writer
[581]71
[966]72      CALL xios(get_filegroup_handle) &
73      (filegroup_id,filegroup_hdl)
[326]74      CALL xios(set_filegroup_attr_hdl_)   &
[1492]75      ( filegroup_hdl, append, comment, compression_level, convention, convention_str, cyclic, description  &
[2616]76      , enabled, format, gatherer, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level  &
77      , par_access, pool_gatherer, pool_reader, pool_writer, read_metadata_par, reader, record_offset  &
78      , split_end_offset, split_freq, split_freq_format, split_last_date, split_start_offset, sync_freq  &
79      , time_counter, time_counter_name, time_stamp_format, time_stamp_name, time_units, timeseries  &
80      , ts_prefix, type, using_server2, uuid_format, uuid_name, writer )
[581]81
[326]82  END SUBROUTINE xios(set_filegroup_attr)
[581]83
[326]84  SUBROUTINE xios(set_filegroup_attr_hdl)  &
[1492]85    ( filegroup_hdl, append, comment, compression_level, convention, convention_str, cyclic, description  &
[2616]86    , enabled, format, gatherer, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level  &
87    , par_access, pool_gatherer, pool_reader, pool_writer, read_metadata_par, reader, record_offset  &
88    , split_end_offset, split_freq, split_freq_format, split_last_date, split_start_offset, sync_freq  &
89    , time_counter, time_counter_name, time_stamp_format, time_stamp_name, time_units, timeseries  &
90    , ts_prefix, type, using_server2, uuid_format, uuid_name, writer )
[581]91
[326]92    IMPLICIT NONE
93      TYPE(txios(filegroup)) , INTENT(IN) :: filegroup_hdl
[528]94      LOGICAL  , OPTIONAL, INTENT(IN) :: append
95      LOGICAL (KIND=C_BOOL) :: append_tmp
[1492]96      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: comment
[608]97      INTEGER  , OPTIONAL, INTENT(IN) :: compression_level
[932]98      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: convention
[1201]99      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: convention_str
[891]100      LOGICAL  , OPTIONAL, INTENT(IN) :: cyclic
101      LOGICAL (KIND=C_BOOL) :: cyclic_tmp
[326]102      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: description
103      LOGICAL  , OPTIONAL, INTENT(IN) :: enabled
104      LOGICAL (KIND=C_BOOL) :: enabled_tmp
[517]105      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: format
[2616]106      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: gatherer
[326]107      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: group_ref
[415]108      INTEGER  , OPTIONAL, INTENT(IN) :: min_digits
[598]109      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: mode
[326]110      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name
111      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name_suffix
[538]112      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: output_freq
[326]113      INTEGER  , OPTIONAL, INTENT(IN) :: output_level
[369]114      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: par_access
[2616]115      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: pool_gatherer
116      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: pool_reader
117      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: pool_writer
[1492]118      LOGICAL  , OPTIONAL, INTENT(IN) :: read_metadata_par
119      LOGICAL (KIND=C_BOOL) :: read_metadata_par_tmp
[2616]120      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: reader
[779]121      INTEGER  , OPTIONAL, INTENT(IN) :: record_offset
[1492]122      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: split_end_offset
[538]123      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: split_freq
[432]124      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: split_freq_format
[1492]125      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: split_last_date
126      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: split_start_offset
[538]127      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: sync_freq
[699]128      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_counter
[802]129      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_counter_name
[1158]130      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_stamp_format
131      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_stamp_name
132      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_units
[711]133      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: timeseries
134      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: ts_prefix
[326]135      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: type
[2616]136      LOGICAL  , OPTIONAL, INTENT(IN) :: using_server2
137      LOGICAL (KIND=C_BOOL) :: using_server2_tmp
[1158]138      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: uuid_format
139      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: uuid_name
[2616]140      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: writer
[581]141
[326]142      CALL xios(set_filegroup_attr_hdl_)  &
[1492]143      ( filegroup_hdl, append, comment, compression_level, convention, convention_str, cyclic, description  &
[2616]144      , enabled, format, gatherer, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level  &
145      , par_access, pool_gatherer, pool_reader, pool_writer, read_metadata_par, reader, record_offset  &
146      , split_end_offset, split_freq, split_freq_format, split_last_date, split_start_offset, sync_freq  &
147      , time_counter, time_counter_name, time_stamp_format, time_stamp_name, time_units, timeseries  &
148      , ts_prefix, type, using_server2, uuid_format, uuid_name, writer )
[581]149
[326]150  END SUBROUTINE xios(set_filegroup_attr_hdl)
[581]151
[326]152  SUBROUTINE xios(set_filegroup_attr_hdl_)   &
[1492]153    ( filegroup_hdl, append_, comment_, compression_level_, convention_, convention_str_, cyclic_  &
[2616]154    , description_, enabled_, format_, gatherer_, group_ref_, min_digits_, mode_, name_, name_suffix_  &
155    , output_freq_, output_level_, par_access_, pool_gatherer_, pool_reader_, pool_writer_, read_metadata_par_  &
156    , reader_, record_offset_, split_end_offset_, split_freq_, split_freq_format_, split_last_date_  &
157    , split_start_offset_, sync_freq_, time_counter_, time_counter_name_, time_stamp_format_, time_stamp_name_  &
158    , time_units_, timeseries_, ts_prefix_, type_, using_server2_, uuid_format_, uuid_name_, writer_  &
159     )
[581]160
[326]161    IMPLICIT NONE
162      TYPE(txios(filegroup)) , INTENT(IN) :: filegroup_hdl
[528]163      LOGICAL  , OPTIONAL, INTENT(IN) :: append_
164      LOGICAL (KIND=C_BOOL) :: append__tmp
[1492]165      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: comment_
[608]166      INTEGER  , OPTIONAL, INTENT(IN) :: compression_level_
[932]167      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: convention_
[1201]168      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: convention_str_
[891]169      LOGICAL  , OPTIONAL, INTENT(IN) :: cyclic_
170      LOGICAL (KIND=C_BOOL) :: cyclic__tmp
[326]171      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: description_
172      LOGICAL  , OPTIONAL, INTENT(IN) :: enabled_
173      LOGICAL (KIND=C_BOOL) :: enabled__tmp
[517]174      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: format_
[2616]175      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: gatherer_
[326]176      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: group_ref_
[415]177      INTEGER  , OPTIONAL, INTENT(IN) :: min_digits_
[598]178      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: mode_
[326]179      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name_
180      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name_suffix_
[538]181      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: output_freq_
[326]182      INTEGER  , OPTIONAL, INTENT(IN) :: output_level_
[369]183      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: par_access_
[2616]184      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: pool_gatherer_
185      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: pool_reader_
186      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: pool_writer_
[1492]187      LOGICAL  , OPTIONAL, INTENT(IN) :: read_metadata_par_
188      LOGICAL (KIND=C_BOOL) :: read_metadata_par__tmp
[2616]189      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: reader_
[779]190      INTEGER  , OPTIONAL, INTENT(IN) :: record_offset_
[1492]191      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: split_end_offset_
[538]192      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: split_freq_
[432]193      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: split_freq_format_
[1492]194      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: split_last_date_
195      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: split_start_offset_
[538]196      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: sync_freq_
[699]197      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_counter_
[802]198      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_counter_name_
[1158]199      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_stamp_format_
200      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_stamp_name_
201      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_units_
[711]202      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: timeseries_
203      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: ts_prefix_
[326]204      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: type_
[2616]205      LOGICAL  , OPTIONAL, INTENT(IN) :: using_server2_
206      LOGICAL (KIND=C_BOOL) :: using_server2__tmp
[1158]207      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: uuid_format_
208      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: uuid_name_
[2616]209      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: writer_
[581]210
[528]211      IF (PRESENT(append_)) THEN
[581]212        append__tmp = append_
[966]213        CALL cxios_set_filegroup_append &
214      (filegroup_hdl%daddr, append__tmp)
[528]215      ENDIF
[581]216
[1492]217      IF (PRESENT(comment_)) THEN
218        CALL cxios_set_filegroup_comment &
219      (filegroup_hdl%daddr, comment_, len(comment_))
220      ENDIF
221
[608]222      IF (PRESENT(compression_level_)) THEN
[966]223        CALL cxios_set_filegroup_compression_level &
224      (filegroup_hdl%daddr, compression_level_)
[608]225      ENDIF
226
[932]227      IF (PRESENT(convention_)) THEN
[966]228        CALL cxios_set_filegroup_convention &
229      (filegroup_hdl%daddr, convention_, len(convention_))
[932]230      ENDIF
231
[1201]232      IF (PRESENT(convention_str_)) THEN
233        CALL cxios_set_filegroup_convention_str &
234      (filegroup_hdl%daddr, convention_str_, len(convention_str_))
235      ENDIF
236
[891]237      IF (PRESENT(cyclic_)) THEN
238        cyclic__tmp = cyclic_
[966]239        CALL cxios_set_filegroup_cyclic &
240      (filegroup_hdl%daddr, cyclic__tmp)
[891]241      ENDIF
242
[326]243      IF (PRESENT(description_)) THEN
[966]244        CALL cxios_set_filegroup_description &
245      (filegroup_hdl%daddr, description_, len(description_))
[326]246      ENDIF
[581]247
[326]248      IF (PRESENT(enabled_)) THEN
[581]249        enabled__tmp = enabled_
[966]250        CALL cxios_set_filegroup_enabled &
251      (filegroup_hdl%daddr, enabled__tmp)
[326]252      ENDIF
[581]253
[517]254      IF (PRESENT(format_)) THEN
[966]255        CALL cxios_set_filegroup_format &
256      (filegroup_hdl%daddr, format_, len(format_))
[517]257      ENDIF
[581]258
[2616]259      IF (PRESENT(gatherer_)) THEN
260        CALL cxios_set_filegroup_gatherer &
261      (filegroup_hdl%daddr, gatherer_, len(gatherer_))
262      ENDIF
263
[326]264      IF (PRESENT(group_ref_)) THEN
[966]265        CALL cxios_set_filegroup_group_ref &
266      (filegroup_hdl%daddr, group_ref_, len(group_ref_))
[326]267      ENDIF
[581]268
[415]269      IF (PRESENT(min_digits_)) THEN
[966]270        CALL cxios_set_filegroup_min_digits &
271      (filegroup_hdl%daddr, min_digits_)
[415]272      ENDIF
[581]273
[598]274      IF (PRESENT(mode_)) THEN
[966]275        CALL cxios_set_filegroup_mode &
276      (filegroup_hdl%daddr, mode_, len(mode_))
[598]277      ENDIF
278
[326]279      IF (PRESENT(name_)) THEN
[966]280        CALL cxios_set_filegroup_name &
281      (filegroup_hdl%daddr, name_, len(name_))
[326]282      ENDIF
[581]283
[326]284      IF (PRESENT(name_suffix_)) THEN
[966]285        CALL cxios_set_filegroup_name_suffix &
286      (filegroup_hdl%daddr, name_suffix_, len(name_suffix_))
[326]287      ENDIF
[581]288
[326]289      IF (PRESENT(output_freq_)) THEN
[966]290        CALL cxios_set_filegroup_output_freq &
291      (filegroup_hdl%daddr, output_freq_)
[326]292      ENDIF
[581]293
[326]294      IF (PRESENT(output_level_)) THEN
[966]295        CALL cxios_set_filegroup_output_level &
296      (filegroup_hdl%daddr, output_level_)
[326]297      ENDIF
[581]298
[369]299      IF (PRESENT(par_access_)) THEN
[966]300        CALL cxios_set_filegroup_par_access &
301      (filegroup_hdl%daddr, par_access_, len(par_access_))
[369]302      ENDIF
[581]303
[2616]304      IF (PRESENT(pool_gatherer_)) THEN
305        CALL cxios_set_filegroup_pool_gatherer &
306      (filegroup_hdl%daddr, pool_gatherer_, len(pool_gatherer_))
307      ENDIF
308
309      IF (PRESENT(pool_reader_)) THEN
310        CALL cxios_set_filegroup_pool_reader &
311      (filegroup_hdl%daddr, pool_reader_, len(pool_reader_))
312      ENDIF
313
314      IF (PRESENT(pool_writer_)) THEN
315        CALL cxios_set_filegroup_pool_writer &
316      (filegroup_hdl%daddr, pool_writer_, len(pool_writer_))
317      ENDIF
318
[1492]319      IF (PRESENT(read_metadata_par_)) THEN
320        read_metadata_par__tmp = read_metadata_par_
321        CALL cxios_set_filegroup_read_metadata_par &
322      (filegroup_hdl%daddr, read_metadata_par__tmp)
323      ENDIF
324
[2616]325      IF (PRESENT(reader_)) THEN
326        CALL cxios_set_filegroup_reader &
327      (filegroup_hdl%daddr, reader_, len(reader_))
328      ENDIF
329
[779]330      IF (PRESENT(record_offset_)) THEN
[966]331        CALL cxios_set_filegroup_record_offset &
332      (filegroup_hdl%daddr, record_offset_)
[779]333      ENDIF
334
[1492]335      IF (PRESENT(split_end_offset_)) THEN
336        CALL cxios_set_filegroup_split_end_offset &
337      (filegroup_hdl%daddr, split_end_offset_)
338      ENDIF
339
[326]340      IF (PRESENT(split_freq_)) THEN
[966]341        CALL cxios_set_filegroup_split_freq &
342      (filegroup_hdl%daddr, split_freq_)
[326]343      ENDIF
[581]344
[432]345      IF (PRESENT(split_freq_format_)) THEN
[966]346        CALL cxios_set_filegroup_split_freq_format &
347      (filegroup_hdl%daddr, split_freq_format_, len(split_freq_format_))
[432]348      ENDIF
[581]349
[1492]350      IF (PRESENT(split_last_date_)) THEN
351        CALL cxios_set_filegroup_split_last_date &
352      (filegroup_hdl%daddr, split_last_date_, len(split_last_date_))
353      ENDIF
354
355      IF (PRESENT(split_start_offset_)) THEN
356        CALL cxios_set_filegroup_split_start_offset &
357      (filegroup_hdl%daddr, split_start_offset_)
358      ENDIF
359
[326]360      IF (PRESENT(sync_freq_)) THEN
[966]361        CALL cxios_set_filegroup_sync_freq &
362      (filegroup_hdl%daddr, sync_freq_)
[326]363      ENDIF
[581]364
[699]365      IF (PRESENT(time_counter_)) THEN
[966]366        CALL cxios_set_filegroup_time_counter &
367      (filegroup_hdl%daddr, time_counter_, len(time_counter_))
[699]368      ENDIF
369
[802]370      IF (PRESENT(time_counter_name_)) THEN
[966]371        CALL cxios_set_filegroup_time_counter_name &
372      (filegroup_hdl%daddr, time_counter_name_, len(time_counter_name_))
[802]373      ENDIF
374
[1158]375      IF (PRESENT(time_stamp_format_)) THEN
376        CALL cxios_set_filegroup_time_stamp_format &
377      (filegroup_hdl%daddr, time_stamp_format_, len(time_stamp_format_))
378      ENDIF
379
380      IF (PRESENT(time_stamp_name_)) THEN
381        CALL cxios_set_filegroup_time_stamp_name &
382      (filegroup_hdl%daddr, time_stamp_name_, len(time_stamp_name_))
383      ENDIF
384
385      IF (PRESENT(time_units_)) THEN
386        CALL cxios_set_filegroup_time_units &
387      (filegroup_hdl%daddr, time_units_, len(time_units_))
388      ENDIF
389
[711]390      IF (PRESENT(timeseries_)) THEN
[966]391        CALL cxios_set_filegroup_timeseries &
392      (filegroup_hdl%daddr, timeseries_, len(timeseries_))
[711]393      ENDIF
394
395      IF (PRESENT(ts_prefix_)) THEN
[966]396        CALL cxios_set_filegroup_ts_prefix &
397      (filegroup_hdl%daddr, ts_prefix_, len(ts_prefix_))
[711]398      ENDIF
399
[326]400      IF (PRESENT(type_)) THEN
[966]401        CALL cxios_set_filegroup_type &
402      (filegroup_hdl%daddr, type_, len(type_))
[326]403      ENDIF
[581]404
[2616]405      IF (PRESENT(using_server2_)) THEN
406        using_server2__tmp = using_server2_
407        CALL cxios_set_filegroup_using_server2 &
408      (filegroup_hdl%daddr, using_server2__tmp)
409      ENDIF
410
[1158]411      IF (PRESENT(uuid_format_)) THEN
412        CALL cxios_set_filegroup_uuid_format &
413      (filegroup_hdl%daddr, uuid_format_, len(uuid_format_))
414      ENDIF
415
416      IF (PRESENT(uuid_name_)) THEN
417        CALL cxios_set_filegroup_uuid_name &
418      (filegroup_hdl%daddr, uuid_name_, len(uuid_name_))
419      ENDIF
420
[2616]421      IF (PRESENT(writer_)) THEN
422        CALL cxios_set_filegroup_writer &
423      (filegroup_hdl%daddr, writer_, len(writer_))
424      ENDIF
425
[326]426  END SUBROUTINE xios(set_filegroup_attr_hdl_)
[581]427
[326]428  SUBROUTINE xios(get_filegroup_attr)  &
[1492]429    ( filegroup_id, append, comment, compression_level, convention, convention_str, cyclic, description  &
[2616]430    , enabled, format, gatherer, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level  &
431    , par_access, pool_gatherer, pool_reader, pool_writer, read_metadata_par, reader, record_offset  &
432    , split_end_offset, split_freq, split_freq_format, split_last_date, split_start_offset, sync_freq  &
433    , time_counter, time_counter_name, time_stamp_format, time_stamp_name, time_units, timeseries  &
434    , ts_prefix, type, using_server2, uuid_format, uuid_name, writer )
[581]435
[326]436    IMPLICIT NONE
437      TYPE(txios(filegroup))  :: filegroup_hdl
438      CHARACTER(LEN=*), INTENT(IN) ::filegroup_id
[528]439      LOGICAL  , OPTIONAL, INTENT(OUT) :: append
440      LOGICAL (KIND=C_BOOL) :: append_tmp
[1492]441      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: comment
[608]442      INTEGER  , OPTIONAL, INTENT(OUT) :: compression_level
[932]443      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: convention
[1201]444      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: convention_str
[891]445      LOGICAL  , OPTIONAL, INTENT(OUT) :: cyclic
446      LOGICAL (KIND=C_BOOL) :: cyclic_tmp
[326]447      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: description
448      LOGICAL  , OPTIONAL, INTENT(OUT) :: enabled
449      LOGICAL (KIND=C_BOOL) :: enabled_tmp
[517]450      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: format
[2616]451      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: gatherer
[326]452      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: group_ref
[415]453      INTEGER  , OPTIONAL, INTENT(OUT) :: min_digits
[598]454      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: mode
[326]455      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name
456      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name_suffix
[538]457      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: output_freq
[326]458      INTEGER  , OPTIONAL, INTENT(OUT) :: output_level
[369]459      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: par_access
[2616]460      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: pool_gatherer
461      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: pool_reader
462      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: pool_writer
[1492]463      LOGICAL  , OPTIONAL, INTENT(OUT) :: read_metadata_par
464      LOGICAL (KIND=C_BOOL) :: read_metadata_par_tmp
[2616]465      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: reader
[779]466      INTEGER  , OPTIONAL, INTENT(OUT) :: record_offset
[1492]467      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: split_end_offset
[538]468      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: split_freq
[432]469      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: split_freq_format
[1492]470      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: split_last_date
471      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: split_start_offset
[538]472      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: sync_freq
[699]473      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_counter
[802]474      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_counter_name
[1158]475      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_stamp_format
476      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_stamp_name
477      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_units
[711]478      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: timeseries
479      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: ts_prefix
[326]480      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: type
[2616]481      LOGICAL  , OPTIONAL, INTENT(OUT) :: using_server2
482      LOGICAL (KIND=C_BOOL) :: using_server2_tmp
[1158]483      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: uuid_format
484      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: uuid_name
[2616]485      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: writer
[581]486
[966]487      CALL xios(get_filegroup_handle) &
488      (filegroup_id,filegroup_hdl)
[326]489      CALL xios(get_filegroup_attr_hdl_)   &
[1492]490      ( filegroup_hdl, append, comment, compression_level, convention, convention_str, cyclic, description  &
[2616]491      , enabled, format, gatherer, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level  &
492      , par_access, pool_gatherer, pool_reader, pool_writer, read_metadata_par, reader, record_offset  &
493      , split_end_offset, split_freq, split_freq_format, split_last_date, split_start_offset, sync_freq  &
494      , time_counter, time_counter_name, time_stamp_format, time_stamp_name, time_units, timeseries  &
495      , ts_prefix, type, using_server2, uuid_format, uuid_name, writer )
[581]496
[326]497  END SUBROUTINE xios(get_filegroup_attr)
[581]498
[326]499  SUBROUTINE xios(get_filegroup_attr_hdl)  &
[1492]500    ( filegroup_hdl, append, comment, compression_level, convention, convention_str, cyclic, description  &
[2616]501    , enabled, format, gatherer, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level  &
502    , par_access, pool_gatherer, pool_reader, pool_writer, read_metadata_par, reader, record_offset  &
503    , split_end_offset, split_freq, split_freq_format, split_last_date, split_start_offset, sync_freq  &
504    , time_counter, time_counter_name, time_stamp_format, time_stamp_name, time_units, timeseries  &
505    , ts_prefix, type, using_server2, uuid_format, uuid_name, writer )
[581]506
[326]507    IMPLICIT NONE
508      TYPE(txios(filegroup)) , INTENT(IN) :: filegroup_hdl
[528]509      LOGICAL  , OPTIONAL, INTENT(OUT) :: append
510      LOGICAL (KIND=C_BOOL) :: append_tmp
[1492]511      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: comment
[608]512      INTEGER  , OPTIONAL, INTENT(OUT) :: compression_level
[932]513      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: convention
[1201]514      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: convention_str
[891]515      LOGICAL  , OPTIONAL, INTENT(OUT) :: cyclic
516      LOGICAL (KIND=C_BOOL) :: cyclic_tmp
[326]517      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: description
518      LOGICAL  , OPTIONAL, INTENT(OUT) :: enabled
519      LOGICAL (KIND=C_BOOL) :: enabled_tmp
[517]520      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: format
[2616]521      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: gatherer
[326]522      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: group_ref
[415]523      INTEGER  , OPTIONAL, INTENT(OUT) :: min_digits
[598]524      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: mode
[326]525      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name
526      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name_suffix
[538]527      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: output_freq
[326]528      INTEGER  , OPTIONAL, INTENT(OUT) :: output_level
[369]529      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: par_access
[2616]530      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: pool_gatherer
531      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: pool_reader
532      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: pool_writer
[1492]533      LOGICAL  , OPTIONAL, INTENT(OUT) :: read_metadata_par
534      LOGICAL (KIND=C_BOOL) :: read_metadata_par_tmp
[2616]535      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: reader
[779]536      INTEGER  , OPTIONAL, INTENT(OUT) :: record_offset
[1492]537      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: split_end_offset
[538]538      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: split_freq
[432]539      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: split_freq_format
[1492]540      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: split_last_date
541      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: split_start_offset
[538]542      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: sync_freq
[699]543      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_counter
[802]544      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_counter_name
[1158]545      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_stamp_format
546      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_stamp_name
547      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_units
[711]548      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: timeseries
549      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: ts_prefix
[326]550      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: type
[2616]551      LOGICAL  , OPTIONAL, INTENT(OUT) :: using_server2
552      LOGICAL (KIND=C_BOOL) :: using_server2_tmp
[1158]553      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: uuid_format
554      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: uuid_name
[2616]555      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: writer
[581]556
[326]557      CALL xios(get_filegroup_attr_hdl_)  &
[1492]558      ( filegroup_hdl, append, comment, compression_level, convention, convention_str, cyclic, description  &
[2616]559      , enabled, format, gatherer, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level  &
560      , par_access, pool_gatherer, pool_reader, pool_writer, read_metadata_par, reader, record_offset  &
561      , split_end_offset, split_freq, split_freq_format, split_last_date, split_start_offset, sync_freq  &
562      , time_counter, time_counter_name, time_stamp_format, time_stamp_name, time_units, timeseries  &
563      , ts_prefix, type, using_server2, uuid_format, uuid_name, writer )
[581]564
[326]565  END SUBROUTINE xios(get_filegroup_attr_hdl)
[581]566
[326]567  SUBROUTINE xios(get_filegroup_attr_hdl_)   &
[1492]568    ( filegroup_hdl, append_, comment_, compression_level_, convention_, convention_str_, cyclic_  &
[2616]569    , description_, enabled_, format_, gatherer_, group_ref_, min_digits_, mode_, name_, name_suffix_  &
570    , output_freq_, output_level_, par_access_, pool_gatherer_, pool_reader_, pool_writer_, read_metadata_par_  &
571    , reader_, record_offset_, split_end_offset_, split_freq_, split_freq_format_, split_last_date_  &
572    , split_start_offset_, sync_freq_, time_counter_, time_counter_name_, time_stamp_format_, time_stamp_name_  &
573    , time_units_, timeseries_, ts_prefix_, type_, using_server2_, uuid_format_, uuid_name_, writer_  &
574     )
[581]575
[326]576    IMPLICIT NONE
577      TYPE(txios(filegroup)) , INTENT(IN) :: filegroup_hdl
[528]578      LOGICAL  , OPTIONAL, INTENT(OUT) :: append_
579      LOGICAL (KIND=C_BOOL) :: append__tmp
[1492]580      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: comment_
[608]581      INTEGER  , OPTIONAL, INTENT(OUT) :: compression_level_
[932]582      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: convention_
[1201]583      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: convention_str_
[891]584      LOGICAL  , OPTIONAL, INTENT(OUT) :: cyclic_
585      LOGICAL (KIND=C_BOOL) :: cyclic__tmp
[326]586      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: description_
587      LOGICAL  , OPTIONAL, INTENT(OUT) :: enabled_
588      LOGICAL (KIND=C_BOOL) :: enabled__tmp
[517]589      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: format_
[2616]590      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: gatherer_
[326]591      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: group_ref_
[415]592      INTEGER  , OPTIONAL, INTENT(OUT) :: min_digits_
[598]593      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: mode_
[326]594      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name_
595      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name_suffix_
[538]596      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: output_freq_
[326]597      INTEGER  , OPTIONAL, INTENT(OUT) :: output_level_
[369]598      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: par_access_
[2616]599      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: pool_gatherer_
600      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: pool_reader_
601      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: pool_writer_
[1492]602      LOGICAL  , OPTIONAL, INTENT(OUT) :: read_metadata_par_
603      LOGICAL (KIND=C_BOOL) :: read_metadata_par__tmp
[2616]604      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: reader_
[779]605      INTEGER  , OPTIONAL, INTENT(OUT) :: record_offset_
[1492]606      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: split_end_offset_
[538]607      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: split_freq_
[432]608      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: split_freq_format_
[1492]609      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: split_last_date_
610      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: split_start_offset_
[538]611      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: sync_freq_
[699]612      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_counter_
[802]613      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_counter_name_
[1158]614      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_stamp_format_
615      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_stamp_name_
616      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_units_
[711]617      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: timeseries_
618      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: ts_prefix_
[326]619      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: type_
[2616]620      LOGICAL  , OPTIONAL, INTENT(OUT) :: using_server2_
621      LOGICAL (KIND=C_BOOL) :: using_server2__tmp
[1158]622      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: uuid_format_
623      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: uuid_name_
[2616]624      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: writer_
[581]625
[528]626      IF (PRESENT(append_)) THEN
[966]627        CALL cxios_get_filegroup_append &
628      (filegroup_hdl%daddr, append__tmp)
[581]629        append_ = append__tmp
[528]630      ENDIF
[581]631
[1492]632      IF (PRESENT(comment_)) THEN
633        CALL cxios_get_filegroup_comment &
634      (filegroup_hdl%daddr, comment_, len(comment_))
635      ENDIF
636
[608]637      IF (PRESENT(compression_level_)) THEN
[966]638        CALL cxios_get_filegroup_compression_level &
639      (filegroup_hdl%daddr, compression_level_)
[608]640      ENDIF
641
[932]642      IF (PRESENT(convention_)) THEN
[966]643        CALL cxios_get_filegroup_convention &
644      (filegroup_hdl%daddr, convention_, len(convention_))
[932]645      ENDIF
646
[1201]647      IF (PRESENT(convention_str_)) THEN
648        CALL cxios_get_filegroup_convention_str &
649      (filegroup_hdl%daddr, convention_str_, len(convention_str_))
650      ENDIF
651
[891]652      IF (PRESENT(cyclic_)) THEN
[966]653        CALL cxios_get_filegroup_cyclic &
654      (filegroup_hdl%daddr, cyclic__tmp)
[891]655        cyclic_ = cyclic__tmp
656      ENDIF
657
[326]658      IF (PRESENT(description_)) THEN
[966]659        CALL cxios_get_filegroup_description &
660      (filegroup_hdl%daddr, description_, len(description_))
[326]661      ENDIF
[581]662
[326]663      IF (PRESENT(enabled_)) THEN
[966]664        CALL cxios_get_filegroup_enabled &
665      (filegroup_hdl%daddr, enabled__tmp)
[581]666        enabled_ = enabled__tmp
[326]667      ENDIF
[581]668
[517]669      IF (PRESENT(format_)) THEN
[966]670        CALL cxios_get_filegroup_format &
671      (filegroup_hdl%daddr, format_, len(format_))
[517]672      ENDIF
[581]673
[2616]674      IF (PRESENT(gatherer_)) THEN
675        CALL cxios_get_filegroup_gatherer &
676      (filegroup_hdl%daddr, gatherer_, len(gatherer_))
677      ENDIF
678
[326]679      IF (PRESENT(group_ref_)) THEN
[966]680        CALL cxios_get_filegroup_group_ref &
681      (filegroup_hdl%daddr, group_ref_, len(group_ref_))
[326]682      ENDIF
[581]683
[415]684      IF (PRESENT(min_digits_)) THEN
[966]685        CALL cxios_get_filegroup_min_digits &
686      (filegroup_hdl%daddr, min_digits_)
[415]687      ENDIF
[581]688
[598]689      IF (PRESENT(mode_)) THEN
[966]690        CALL cxios_get_filegroup_mode &
691      (filegroup_hdl%daddr, mode_, len(mode_))
[598]692      ENDIF
693
[326]694      IF (PRESENT(name_)) THEN
[966]695        CALL cxios_get_filegroup_name &
696      (filegroup_hdl%daddr, name_, len(name_))
[326]697      ENDIF
[581]698
[326]699      IF (PRESENT(name_suffix_)) THEN
[966]700        CALL cxios_get_filegroup_name_suffix &
701      (filegroup_hdl%daddr, name_suffix_, len(name_suffix_))
[326]702      ENDIF
[581]703
[326]704      IF (PRESENT(output_freq_)) THEN
[966]705        CALL cxios_get_filegroup_output_freq &
706      (filegroup_hdl%daddr, output_freq_)
[326]707      ENDIF
[581]708
[326]709      IF (PRESENT(output_level_)) THEN
[966]710        CALL cxios_get_filegroup_output_level &
711      (filegroup_hdl%daddr, output_level_)
[326]712      ENDIF
[581]713
[369]714      IF (PRESENT(par_access_)) THEN
[966]715        CALL cxios_get_filegroup_par_access &
716      (filegroup_hdl%daddr, par_access_, len(par_access_))
[369]717      ENDIF
[581]718
[2616]719      IF (PRESENT(pool_gatherer_)) THEN
720        CALL cxios_get_filegroup_pool_gatherer &
721      (filegroup_hdl%daddr, pool_gatherer_, len(pool_gatherer_))
722      ENDIF
723
724      IF (PRESENT(pool_reader_)) THEN
725        CALL cxios_get_filegroup_pool_reader &
726      (filegroup_hdl%daddr, pool_reader_, len(pool_reader_))
727      ENDIF
728
729      IF (PRESENT(pool_writer_)) THEN
730        CALL cxios_get_filegroup_pool_writer &
731      (filegroup_hdl%daddr, pool_writer_, len(pool_writer_))
732      ENDIF
733
[1492]734      IF (PRESENT(read_metadata_par_)) THEN
735        CALL cxios_get_filegroup_read_metadata_par &
736      (filegroup_hdl%daddr, read_metadata_par__tmp)
737        read_metadata_par_ = read_metadata_par__tmp
738      ENDIF
739
[2616]740      IF (PRESENT(reader_)) THEN
741        CALL cxios_get_filegroup_reader &
742      (filegroup_hdl%daddr, reader_, len(reader_))
743      ENDIF
744
[779]745      IF (PRESENT(record_offset_)) THEN
[966]746        CALL cxios_get_filegroup_record_offset &
747      (filegroup_hdl%daddr, record_offset_)
[779]748      ENDIF
749
[1492]750      IF (PRESENT(split_end_offset_)) THEN
751        CALL cxios_get_filegroup_split_end_offset &
752      (filegroup_hdl%daddr, split_end_offset_)
753      ENDIF
754
[326]755      IF (PRESENT(split_freq_)) THEN
[966]756        CALL cxios_get_filegroup_split_freq &
757      (filegroup_hdl%daddr, split_freq_)
[326]758      ENDIF
[581]759
[432]760      IF (PRESENT(split_freq_format_)) THEN
[966]761        CALL cxios_get_filegroup_split_freq_format &
762      (filegroup_hdl%daddr, split_freq_format_, len(split_freq_format_))
[432]763      ENDIF
[581]764
[1492]765      IF (PRESENT(split_last_date_)) THEN
766        CALL cxios_get_filegroup_split_last_date &
767      (filegroup_hdl%daddr, split_last_date_, len(split_last_date_))
768      ENDIF
769
770      IF (PRESENT(split_start_offset_)) THEN
771        CALL cxios_get_filegroup_split_start_offset &
772      (filegroup_hdl%daddr, split_start_offset_)
773      ENDIF
774
[326]775      IF (PRESENT(sync_freq_)) THEN
[966]776        CALL cxios_get_filegroup_sync_freq &
777      (filegroup_hdl%daddr, sync_freq_)
[326]778      ENDIF
[581]779
[699]780      IF (PRESENT(time_counter_)) THEN
[966]781        CALL cxios_get_filegroup_time_counter &
782      (filegroup_hdl%daddr, time_counter_, len(time_counter_))
[699]783      ENDIF
784
[802]785      IF (PRESENT(time_counter_name_)) THEN
[966]786        CALL cxios_get_filegroup_time_counter_name &
787      (filegroup_hdl%daddr, time_counter_name_, len(time_counter_name_))
[802]788      ENDIF
789
[1158]790      IF (PRESENT(time_stamp_format_)) THEN
791        CALL cxios_get_filegroup_time_stamp_format &
792      (filegroup_hdl%daddr, time_stamp_format_, len(time_stamp_format_))
793      ENDIF
794
795      IF (PRESENT(time_stamp_name_)) THEN
796        CALL cxios_get_filegroup_time_stamp_name &
797      (filegroup_hdl%daddr, time_stamp_name_, len(time_stamp_name_))
798      ENDIF
799
800      IF (PRESENT(time_units_)) THEN
801        CALL cxios_get_filegroup_time_units &
802      (filegroup_hdl%daddr, time_units_, len(time_units_))
803      ENDIF
804
[711]805      IF (PRESENT(timeseries_)) THEN
[966]806        CALL cxios_get_filegroup_timeseries &
807      (filegroup_hdl%daddr, timeseries_, len(timeseries_))
[711]808      ENDIF
809
810      IF (PRESENT(ts_prefix_)) THEN
[966]811        CALL cxios_get_filegroup_ts_prefix &
812      (filegroup_hdl%daddr, ts_prefix_, len(ts_prefix_))
[711]813      ENDIF
814
[326]815      IF (PRESENT(type_)) THEN
[966]816        CALL cxios_get_filegroup_type &
817      (filegroup_hdl%daddr, type_, len(type_))
[326]818      ENDIF
[581]819
[2616]820      IF (PRESENT(using_server2_)) THEN
821        CALL cxios_get_filegroup_using_server2 &
822      (filegroup_hdl%daddr, using_server2__tmp)
823        using_server2_ = using_server2__tmp
824      ENDIF
825
[1158]826      IF (PRESENT(uuid_format_)) THEN
827        CALL cxios_get_filegroup_uuid_format &
828      (filegroup_hdl%daddr, uuid_format_, len(uuid_format_))
829      ENDIF
830
831      IF (PRESENT(uuid_name_)) THEN
832        CALL cxios_get_filegroup_uuid_name &
833      (filegroup_hdl%daddr, uuid_name_, len(uuid_name_))
834      ENDIF
835
[2616]836      IF (PRESENT(writer_)) THEN
837        CALL cxios_get_filegroup_writer &
838      (filegroup_hdl%daddr, writer_, len(writer_))
839      ENDIF
840
[326]841  END SUBROUTINE xios(get_filegroup_attr_hdl_)
[581]842
[432]843  SUBROUTINE xios(is_defined_filegroup_attr)  &
[1492]844    ( filegroup_id, append, comment, compression_level, convention, convention_str, cyclic, description  &
[2616]845    , enabled, format, gatherer, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level  &
846    , par_access, pool_gatherer, pool_reader, pool_writer, read_metadata_par, reader, record_offset  &
847    , split_end_offset, split_freq, split_freq_format, split_last_date, split_start_offset, sync_freq  &
848    , time_counter, time_counter_name, time_stamp_format, time_stamp_name, time_units, timeseries  &
849    , ts_prefix, type, using_server2, uuid_format, uuid_name, writer )
[581]850
[432]851    IMPLICIT NONE
852      TYPE(txios(filegroup))  :: filegroup_hdl
853      CHARACTER(LEN=*), INTENT(IN) ::filegroup_id
[528]854      LOGICAL, OPTIONAL, INTENT(OUT) :: append
855      LOGICAL(KIND=C_BOOL) :: append_tmp
[1492]856      LOGICAL, OPTIONAL, INTENT(OUT) :: comment
857      LOGICAL(KIND=C_BOOL) :: comment_tmp
[608]858      LOGICAL, OPTIONAL, INTENT(OUT) :: compression_level
859      LOGICAL(KIND=C_BOOL) :: compression_level_tmp
[932]860      LOGICAL, OPTIONAL, INTENT(OUT) :: convention
861      LOGICAL(KIND=C_BOOL) :: convention_tmp
[1201]862      LOGICAL, OPTIONAL, INTENT(OUT) :: convention_str
863      LOGICAL(KIND=C_BOOL) :: convention_str_tmp
[891]864      LOGICAL, OPTIONAL, INTENT(OUT) :: cyclic
865      LOGICAL(KIND=C_BOOL) :: cyclic_tmp
[432]866      LOGICAL, OPTIONAL, INTENT(OUT) :: description
867      LOGICAL(KIND=C_BOOL) :: description_tmp
868      LOGICAL, OPTIONAL, INTENT(OUT) :: enabled
869      LOGICAL(KIND=C_BOOL) :: enabled_tmp
[517]870      LOGICAL, OPTIONAL, INTENT(OUT) :: format
871      LOGICAL(KIND=C_BOOL) :: format_tmp
[2616]872      LOGICAL, OPTIONAL, INTENT(OUT) :: gatherer
873      LOGICAL(KIND=C_BOOL) :: gatherer_tmp
[432]874      LOGICAL, OPTIONAL, INTENT(OUT) :: group_ref
875      LOGICAL(KIND=C_BOOL) :: group_ref_tmp
876      LOGICAL, OPTIONAL, INTENT(OUT) :: min_digits
877      LOGICAL(KIND=C_BOOL) :: min_digits_tmp
[598]878      LOGICAL, OPTIONAL, INTENT(OUT) :: mode
879      LOGICAL(KIND=C_BOOL) :: mode_tmp
[432]880      LOGICAL, OPTIONAL, INTENT(OUT) :: name
881      LOGICAL(KIND=C_BOOL) :: name_tmp
882      LOGICAL, OPTIONAL, INTENT(OUT) :: name_suffix
883      LOGICAL(KIND=C_BOOL) :: name_suffix_tmp
884      LOGICAL, OPTIONAL, INTENT(OUT) :: output_freq
885      LOGICAL(KIND=C_BOOL) :: output_freq_tmp
886      LOGICAL, OPTIONAL, INTENT(OUT) :: output_level
887      LOGICAL(KIND=C_BOOL) :: output_level_tmp
888      LOGICAL, OPTIONAL, INTENT(OUT) :: par_access
889      LOGICAL(KIND=C_BOOL) :: par_access_tmp
[2616]890      LOGICAL, OPTIONAL, INTENT(OUT) :: pool_gatherer
891      LOGICAL(KIND=C_BOOL) :: pool_gatherer_tmp
892      LOGICAL, OPTIONAL, INTENT(OUT) :: pool_reader
893      LOGICAL(KIND=C_BOOL) :: pool_reader_tmp
894      LOGICAL, OPTIONAL, INTENT(OUT) :: pool_writer
895      LOGICAL(KIND=C_BOOL) :: pool_writer_tmp
[1492]896      LOGICAL, OPTIONAL, INTENT(OUT) :: read_metadata_par
897      LOGICAL(KIND=C_BOOL) :: read_metadata_par_tmp
[2616]898      LOGICAL, OPTIONAL, INTENT(OUT) :: reader
899      LOGICAL(KIND=C_BOOL) :: reader_tmp
[779]900      LOGICAL, OPTIONAL, INTENT(OUT) :: record_offset
901      LOGICAL(KIND=C_BOOL) :: record_offset_tmp
[1492]902      LOGICAL, OPTIONAL, INTENT(OUT) :: split_end_offset
903      LOGICAL(KIND=C_BOOL) :: split_end_offset_tmp
[432]904      LOGICAL, OPTIONAL, INTENT(OUT) :: split_freq
905      LOGICAL(KIND=C_BOOL) :: split_freq_tmp
906      LOGICAL, OPTIONAL, INTENT(OUT) :: split_freq_format
907      LOGICAL(KIND=C_BOOL) :: split_freq_format_tmp
[1492]908      LOGICAL, OPTIONAL, INTENT(OUT) :: split_last_date
909      LOGICAL(KIND=C_BOOL) :: split_last_date_tmp
910      LOGICAL, OPTIONAL, INTENT(OUT) :: split_start_offset
911      LOGICAL(KIND=C_BOOL) :: split_start_offset_tmp
[432]912      LOGICAL, OPTIONAL, INTENT(OUT) :: sync_freq
913      LOGICAL(KIND=C_BOOL) :: sync_freq_tmp
[699]914      LOGICAL, OPTIONAL, INTENT(OUT) :: time_counter
915      LOGICAL(KIND=C_BOOL) :: time_counter_tmp
[802]916      LOGICAL, OPTIONAL, INTENT(OUT) :: time_counter_name
917      LOGICAL(KIND=C_BOOL) :: time_counter_name_tmp
[1158]918      LOGICAL, OPTIONAL, INTENT(OUT) :: time_stamp_format
919      LOGICAL(KIND=C_BOOL) :: time_stamp_format_tmp
920      LOGICAL, OPTIONAL, INTENT(OUT) :: time_stamp_name
921      LOGICAL(KIND=C_BOOL) :: time_stamp_name_tmp
922      LOGICAL, OPTIONAL, INTENT(OUT) :: time_units
923      LOGICAL(KIND=C_BOOL) :: time_units_tmp
[711]924      LOGICAL, OPTIONAL, INTENT(OUT) :: timeseries
925      LOGICAL(KIND=C_BOOL) :: timeseries_tmp
926      LOGICAL, OPTIONAL, INTENT(OUT) :: ts_prefix
927      LOGICAL(KIND=C_BOOL) :: ts_prefix_tmp
[432]928      LOGICAL, OPTIONAL, INTENT(OUT) :: type
929      LOGICAL(KIND=C_BOOL) :: type_tmp
[2616]930      LOGICAL, OPTIONAL, INTENT(OUT) :: using_server2
931      LOGICAL(KIND=C_BOOL) :: using_server2_tmp
[1158]932      LOGICAL, OPTIONAL, INTENT(OUT) :: uuid_format
933      LOGICAL(KIND=C_BOOL) :: uuid_format_tmp
934      LOGICAL, OPTIONAL, INTENT(OUT) :: uuid_name
935      LOGICAL(KIND=C_BOOL) :: uuid_name_tmp
[2616]936      LOGICAL, OPTIONAL, INTENT(OUT) :: writer
937      LOGICAL(KIND=C_BOOL) :: writer_tmp
[581]938
[966]939      CALL xios(get_filegroup_handle) &
940      (filegroup_id,filegroup_hdl)
[432]941      CALL xios(is_defined_filegroup_attr_hdl_)   &
[1492]942      ( filegroup_hdl, append, comment, compression_level, convention, convention_str, cyclic, description  &
[2616]943      , enabled, format, gatherer, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level  &
944      , par_access, pool_gatherer, pool_reader, pool_writer, read_metadata_par, reader, record_offset  &
945      , split_end_offset, split_freq, split_freq_format, split_last_date, split_start_offset, sync_freq  &
946      , time_counter, time_counter_name, time_stamp_format, time_stamp_name, time_units, timeseries  &
947      , ts_prefix, type, using_server2, uuid_format, uuid_name, writer )
[581]948
[432]949  END SUBROUTINE xios(is_defined_filegroup_attr)
[581]950
[432]951  SUBROUTINE xios(is_defined_filegroup_attr_hdl)  &
[1492]952    ( filegroup_hdl, append, comment, compression_level, convention, convention_str, cyclic, description  &
[2616]953    , enabled, format, gatherer, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level  &
954    , par_access, pool_gatherer, pool_reader, pool_writer, read_metadata_par, reader, record_offset  &
955    , split_end_offset, split_freq, split_freq_format, split_last_date, split_start_offset, sync_freq  &
956    , time_counter, time_counter_name, time_stamp_format, time_stamp_name, time_units, timeseries  &
957    , ts_prefix, type, using_server2, uuid_format, uuid_name, writer )
[581]958
[432]959    IMPLICIT NONE
960      TYPE(txios(filegroup)) , INTENT(IN) :: filegroup_hdl
[528]961      LOGICAL, OPTIONAL, INTENT(OUT) :: append
962      LOGICAL(KIND=C_BOOL) :: append_tmp
[1492]963      LOGICAL, OPTIONAL, INTENT(OUT) :: comment
964      LOGICAL(KIND=C_BOOL) :: comment_tmp
[608]965      LOGICAL, OPTIONAL, INTENT(OUT) :: compression_level
966      LOGICAL(KIND=C_BOOL) :: compression_level_tmp
[932]967      LOGICAL, OPTIONAL, INTENT(OUT) :: convention
968      LOGICAL(KIND=C_BOOL) :: convention_tmp
[1201]969      LOGICAL, OPTIONAL, INTENT(OUT) :: convention_str
970      LOGICAL(KIND=C_BOOL) :: convention_str_tmp
[891]971      LOGICAL, OPTIONAL, INTENT(OUT) :: cyclic
972      LOGICAL(KIND=C_BOOL) :: cyclic_tmp
[432]973      LOGICAL, OPTIONAL, INTENT(OUT) :: description
974      LOGICAL(KIND=C_BOOL) :: description_tmp
975      LOGICAL, OPTIONAL, INTENT(OUT) :: enabled
976      LOGICAL(KIND=C_BOOL) :: enabled_tmp
[517]977      LOGICAL, OPTIONAL, INTENT(OUT) :: format
978      LOGICAL(KIND=C_BOOL) :: format_tmp
[2616]979      LOGICAL, OPTIONAL, INTENT(OUT) :: gatherer
980      LOGICAL(KIND=C_BOOL) :: gatherer_tmp
[432]981      LOGICAL, OPTIONAL, INTENT(OUT) :: group_ref
982      LOGICAL(KIND=C_BOOL) :: group_ref_tmp
983      LOGICAL, OPTIONAL, INTENT(OUT) :: min_digits
984      LOGICAL(KIND=C_BOOL) :: min_digits_tmp
[598]985      LOGICAL, OPTIONAL, INTENT(OUT) :: mode
986      LOGICAL(KIND=C_BOOL) :: mode_tmp
[432]987      LOGICAL, OPTIONAL, INTENT(OUT) :: name
988      LOGICAL(KIND=C_BOOL) :: name_tmp
989      LOGICAL, OPTIONAL, INTENT(OUT) :: name_suffix
990      LOGICAL(KIND=C_BOOL) :: name_suffix_tmp
991      LOGICAL, OPTIONAL, INTENT(OUT) :: output_freq
992      LOGICAL(KIND=C_BOOL) :: output_freq_tmp
993      LOGICAL, OPTIONAL, INTENT(OUT) :: output_level
994      LOGICAL(KIND=C_BOOL) :: output_level_tmp
995      LOGICAL, OPTIONAL, INTENT(OUT) :: par_access
996      LOGICAL(KIND=C_BOOL) :: par_access_tmp
[2616]997      LOGICAL, OPTIONAL, INTENT(OUT) :: pool_gatherer
998      LOGICAL(KIND=C_BOOL) :: pool_gatherer_tmp
999      LOGICAL, OPTIONAL, INTENT(OUT) :: pool_reader
1000      LOGICAL(KIND=C_BOOL) :: pool_reader_tmp
1001      LOGICAL, OPTIONAL, INTENT(OUT) :: pool_writer
1002      LOGICAL(KIND=C_BOOL) :: pool_writer_tmp
[1492]1003      LOGICAL, OPTIONAL, INTENT(OUT) :: read_metadata_par
1004      LOGICAL(KIND=C_BOOL) :: read_metadata_par_tmp
[2616]1005      LOGICAL, OPTIONAL, INTENT(OUT) :: reader
1006      LOGICAL(KIND=C_BOOL) :: reader_tmp
[779]1007      LOGICAL, OPTIONAL, INTENT(OUT) :: record_offset
1008      LOGICAL(KIND=C_BOOL) :: record_offset_tmp
[1492]1009      LOGICAL, OPTIONAL, INTENT(OUT) :: split_end_offset
1010      LOGICAL(KIND=C_BOOL) :: split_end_offset_tmp
[432]1011      LOGICAL, OPTIONAL, INTENT(OUT) :: split_freq
1012      LOGICAL(KIND=C_BOOL) :: split_freq_tmp
1013      LOGICAL, OPTIONAL, INTENT(OUT) :: split_freq_format
1014      LOGICAL(KIND=C_BOOL) :: split_freq_format_tmp
[1492]1015      LOGICAL, OPTIONAL, INTENT(OUT) :: split_last_date
1016      LOGICAL(KIND=C_BOOL) :: split_last_date_tmp
1017      LOGICAL, OPTIONAL, INTENT(OUT) :: split_start_offset
1018      LOGICAL(KIND=C_BOOL) :: split_start_offset_tmp
[432]1019      LOGICAL, OPTIONAL, INTENT(OUT) :: sync_freq
1020      LOGICAL(KIND=C_BOOL) :: sync_freq_tmp
[699]1021      LOGICAL, OPTIONAL, INTENT(OUT) :: time_counter
1022      LOGICAL(KIND=C_BOOL) :: time_counter_tmp
[802]1023      LOGICAL, OPTIONAL, INTENT(OUT) :: time_counter_name
1024      LOGICAL(KIND=C_BOOL) :: time_counter_name_tmp
[1158]1025      LOGICAL, OPTIONAL, INTENT(OUT) :: time_stamp_format
1026      LOGICAL(KIND=C_BOOL) :: time_stamp_format_tmp
1027      LOGICAL, OPTIONAL, INTENT(OUT) :: time_stamp_name
1028      LOGICAL(KIND=C_BOOL) :: time_stamp_name_tmp
1029      LOGICAL, OPTIONAL, INTENT(OUT) :: time_units
1030      LOGICAL(KIND=C_BOOL) :: time_units_tmp
[711]1031      LOGICAL, OPTIONAL, INTENT(OUT) :: timeseries
1032      LOGICAL(KIND=C_BOOL) :: timeseries_tmp
1033      LOGICAL, OPTIONAL, INTENT(OUT) :: ts_prefix
1034      LOGICAL(KIND=C_BOOL) :: ts_prefix_tmp
[432]1035      LOGICAL, OPTIONAL, INTENT(OUT) :: type
1036      LOGICAL(KIND=C_BOOL) :: type_tmp
[2616]1037      LOGICAL, OPTIONAL, INTENT(OUT) :: using_server2
1038      LOGICAL(KIND=C_BOOL) :: using_server2_tmp
[1158]1039      LOGICAL, OPTIONAL, INTENT(OUT) :: uuid_format
1040      LOGICAL(KIND=C_BOOL) :: uuid_format_tmp
1041      LOGICAL, OPTIONAL, INTENT(OUT) :: uuid_name
1042      LOGICAL(KIND=C_BOOL) :: uuid_name_tmp
[2616]1043      LOGICAL, OPTIONAL, INTENT(OUT) :: writer
1044      LOGICAL(KIND=C_BOOL) :: writer_tmp
[581]1045
[432]1046      CALL xios(is_defined_filegroup_attr_hdl_)  &
[1492]1047      ( filegroup_hdl, append, comment, compression_level, convention, convention_str, cyclic, description  &
[2616]1048      , enabled, format, gatherer, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level  &
1049      , par_access, pool_gatherer, pool_reader, pool_writer, read_metadata_par, reader, record_offset  &
1050      , split_end_offset, split_freq, split_freq_format, split_last_date, split_start_offset, sync_freq  &
1051      , time_counter, time_counter_name, time_stamp_format, time_stamp_name, time_units, timeseries  &
1052      , ts_prefix, type, using_server2, uuid_format, uuid_name, writer )
[581]1053
[432]1054  END SUBROUTINE xios(is_defined_filegroup_attr_hdl)
[581]1055
[432]1056  SUBROUTINE xios(is_defined_filegroup_attr_hdl_)   &
[1492]1057    ( filegroup_hdl, append_, comment_, compression_level_, convention_, convention_str_, cyclic_  &
[2616]1058    , description_, enabled_, format_, gatherer_, group_ref_, min_digits_, mode_, name_, name_suffix_  &
1059    , output_freq_, output_level_, par_access_, pool_gatherer_, pool_reader_, pool_writer_, read_metadata_par_  &
1060    , reader_, record_offset_, split_end_offset_, split_freq_, split_freq_format_, split_last_date_  &
1061    , split_start_offset_, sync_freq_, time_counter_, time_counter_name_, time_stamp_format_, time_stamp_name_  &
1062    , time_units_, timeseries_, ts_prefix_, type_, using_server2_, uuid_format_, uuid_name_, writer_  &
1063     )
[581]1064
[432]1065    IMPLICIT NONE
1066      TYPE(txios(filegroup)) , INTENT(IN) :: filegroup_hdl
[528]1067      LOGICAL, OPTIONAL, INTENT(OUT) :: append_
1068      LOGICAL(KIND=C_BOOL) :: append__tmp
[1492]1069      LOGICAL, OPTIONAL, INTENT(OUT) :: comment_
1070      LOGICAL(KIND=C_BOOL) :: comment__tmp
[608]1071      LOGICAL, OPTIONAL, INTENT(OUT) :: compression_level_
1072      LOGICAL(KIND=C_BOOL) :: compression_level__tmp
[932]1073      LOGICAL, OPTIONAL, INTENT(OUT) :: convention_
1074      LOGICAL(KIND=C_BOOL) :: convention__tmp
[1201]1075      LOGICAL, OPTIONAL, INTENT(OUT) :: convention_str_
1076      LOGICAL(KIND=C_BOOL) :: convention_str__tmp
[891]1077      LOGICAL, OPTIONAL, INTENT(OUT) :: cyclic_
1078      LOGICAL(KIND=C_BOOL) :: cyclic__tmp
[432]1079      LOGICAL, OPTIONAL, INTENT(OUT) :: description_
1080      LOGICAL(KIND=C_BOOL) :: description__tmp
1081      LOGICAL, OPTIONAL, INTENT(OUT) :: enabled_
1082      LOGICAL(KIND=C_BOOL) :: enabled__tmp
[517]1083      LOGICAL, OPTIONAL, INTENT(OUT) :: format_
1084      LOGICAL(KIND=C_BOOL) :: format__tmp
[2616]1085      LOGICAL, OPTIONAL, INTENT(OUT) :: gatherer_
1086      LOGICAL(KIND=C_BOOL) :: gatherer__tmp
[432]1087      LOGICAL, OPTIONAL, INTENT(OUT) :: group_ref_
1088      LOGICAL(KIND=C_BOOL) :: group_ref__tmp
1089      LOGICAL, OPTIONAL, INTENT(OUT) :: min_digits_
1090      LOGICAL(KIND=C_BOOL) :: min_digits__tmp
[598]1091      LOGICAL, OPTIONAL, INTENT(OUT) :: mode_
1092      LOGICAL(KIND=C_BOOL) :: mode__tmp
[432]1093      LOGICAL, OPTIONAL, INTENT(OUT) :: name_
1094      LOGICAL(KIND=C_BOOL) :: name__tmp
1095      LOGICAL, OPTIONAL, INTENT(OUT) :: name_suffix_
1096      LOGICAL(KIND=C_BOOL) :: name_suffix__tmp
1097      LOGICAL, OPTIONAL, INTENT(OUT) :: output_freq_
1098      LOGICAL(KIND=C_BOOL) :: output_freq__tmp
1099      LOGICAL, OPTIONAL, INTENT(OUT) :: output_level_
1100      LOGICAL(KIND=C_BOOL) :: output_level__tmp
1101      LOGICAL, OPTIONAL, INTENT(OUT) :: par_access_
1102      LOGICAL(KIND=C_BOOL) :: par_access__tmp
[2616]1103      LOGICAL, OPTIONAL, INTENT(OUT) :: pool_gatherer_
1104      LOGICAL(KIND=C_BOOL) :: pool_gatherer__tmp
1105      LOGICAL, OPTIONAL, INTENT(OUT) :: pool_reader_
1106      LOGICAL(KIND=C_BOOL) :: pool_reader__tmp
1107      LOGICAL, OPTIONAL, INTENT(OUT) :: pool_writer_
1108      LOGICAL(KIND=C_BOOL) :: pool_writer__tmp
[1492]1109      LOGICAL, OPTIONAL, INTENT(OUT) :: read_metadata_par_
1110      LOGICAL(KIND=C_BOOL) :: read_metadata_par__tmp
[2616]1111      LOGICAL, OPTIONAL, INTENT(OUT) :: reader_
1112      LOGICAL(KIND=C_BOOL) :: reader__tmp
[779]1113      LOGICAL, OPTIONAL, INTENT(OUT) :: record_offset_
1114      LOGICAL(KIND=C_BOOL) :: record_offset__tmp
[1492]1115      LOGICAL, OPTIONAL, INTENT(OUT) :: split_end_offset_
1116      LOGICAL(KIND=C_BOOL) :: split_end_offset__tmp
[432]1117      LOGICAL, OPTIONAL, INTENT(OUT) :: split_freq_
1118      LOGICAL(KIND=C_BOOL) :: split_freq__tmp
1119      LOGICAL, OPTIONAL, INTENT(OUT) :: split_freq_format_
1120      LOGICAL(KIND=C_BOOL) :: split_freq_format__tmp
[1492]1121      LOGICAL, OPTIONAL, INTENT(OUT) :: split_last_date_
1122      LOGICAL(KIND=C_BOOL) :: split_last_date__tmp
1123      LOGICAL, OPTIONAL, INTENT(OUT) :: split_start_offset_
1124      LOGICAL(KIND=C_BOOL) :: split_start_offset__tmp
[432]1125      LOGICAL, OPTIONAL, INTENT(OUT) :: sync_freq_
1126      LOGICAL(KIND=C_BOOL) :: sync_freq__tmp
[699]1127      LOGICAL, OPTIONAL, INTENT(OUT) :: time_counter_
1128      LOGICAL(KIND=C_BOOL) :: time_counter__tmp
[802]1129      LOGICAL, OPTIONAL, INTENT(OUT) :: time_counter_name_
1130      LOGICAL(KIND=C_BOOL) :: time_counter_name__tmp
[1158]1131      LOGICAL, OPTIONAL, INTENT(OUT) :: time_stamp_format_
1132      LOGICAL(KIND=C_BOOL) :: time_stamp_format__tmp
1133      LOGICAL, OPTIONAL, INTENT(OUT) :: time_stamp_name_
1134      LOGICAL(KIND=C_BOOL) :: time_stamp_name__tmp
1135      LOGICAL, OPTIONAL, INTENT(OUT) :: time_units_
1136      LOGICAL(KIND=C_BOOL) :: time_units__tmp
[711]1137      LOGICAL, OPTIONAL, INTENT(OUT) :: timeseries_
1138      LOGICAL(KIND=C_BOOL) :: timeseries__tmp
1139      LOGICAL, OPTIONAL, INTENT(OUT) :: ts_prefix_
1140      LOGICAL(KIND=C_BOOL) :: ts_prefix__tmp
[432]1141      LOGICAL, OPTIONAL, INTENT(OUT) :: type_
1142      LOGICAL(KIND=C_BOOL) :: type__tmp
[2616]1143      LOGICAL, OPTIONAL, INTENT(OUT) :: using_server2_
1144      LOGICAL(KIND=C_BOOL) :: using_server2__tmp
[1158]1145      LOGICAL, OPTIONAL, INTENT(OUT) :: uuid_format_
1146      LOGICAL(KIND=C_BOOL) :: uuid_format__tmp
1147      LOGICAL, OPTIONAL, INTENT(OUT) :: uuid_name_
1148      LOGICAL(KIND=C_BOOL) :: uuid_name__tmp
[2616]1149      LOGICAL, OPTIONAL, INTENT(OUT) :: writer_
1150      LOGICAL(KIND=C_BOOL) :: writer__tmp
[581]1151
[528]1152      IF (PRESENT(append_)) THEN
[966]1153        append__tmp = cxios_is_defined_filegroup_append &
1154      (filegroup_hdl%daddr)
[581]1155        append_ = append__tmp
[528]1156      ENDIF
[581]1157
[1492]1158      IF (PRESENT(comment_)) THEN
1159        comment__tmp = cxios_is_defined_filegroup_comment &
1160      (filegroup_hdl%daddr)
1161        comment_ = comment__tmp
1162      ENDIF
1163
[608]1164      IF (PRESENT(compression_level_)) THEN
[966]1165        compression_level__tmp = cxios_is_defined_filegroup_compression_level &
1166      (filegroup_hdl%daddr)
[608]1167        compression_level_ = compression_level__tmp
1168      ENDIF
1169
[932]1170      IF (PRESENT(convention_)) THEN
[966]1171        convention__tmp = cxios_is_defined_filegroup_convention &
1172      (filegroup_hdl%daddr)
[932]1173        convention_ = convention__tmp
1174      ENDIF
1175
[1201]1176      IF (PRESENT(convention_str_)) THEN
1177        convention_str__tmp = cxios_is_defined_filegroup_convention_str &
1178      (filegroup_hdl%daddr)
1179        convention_str_ = convention_str__tmp
1180      ENDIF
1181
[891]1182      IF (PRESENT(cyclic_)) THEN
[966]1183        cyclic__tmp = cxios_is_defined_filegroup_cyclic &
1184      (filegroup_hdl%daddr)
[891]1185        cyclic_ = cyclic__tmp
1186      ENDIF
1187
[432]1188      IF (PRESENT(description_)) THEN
[966]1189        description__tmp = cxios_is_defined_filegroup_description &
1190      (filegroup_hdl%daddr)
[581]1191        description_ = description__tmp
[432]1192      ENDIF
[581]1193
[432]1194      IF (PRESENT(enabled_)) THEN
[966]1195        enabled__tmp = cxios_is_defined_filegroup_enabled &
1196      (filegroup_hdl%daddr)
[581]1197        enabled_ = enabled__tmp
[432]1198      ENDIF
[581]1199
[517]1200      IF (PRESENT(format_)) THEN
[966]1201        format__tmp = cxios_is_defined_filegroup_format &
1202      (filegroup_hdl%daddr)
[581]1203        format_ = format__tmp
[517]1204      ENDIF
[581]1205
[2616]1206      IF (PRESENT(gatherer_)) THEN
1207        gatherer__tmp = cxios_is_defined_filegroup_gatherer &
1208      (filegroup_hdl%daddr)
1209        gatherer_ = gatherer__tmp
1210      ENDIF
1211
[432]1212      IF (PRESENT(group_ref_)) THEN
[966]1213        group_ref__tmp = cxios_is_defined_filegroup_group_ref &
1214      (filegroup_hdl%daddr)
[581]1215        group_ref_ = group_ref__tmp
[432]1216      ENDIF
[581]1217
[432]1218      IF (PRESENT(min_digits_)) THEN
[966]1219        min_digits__tmp = cxios_is_defined_filegroup_min_digits &
1220      (filegroup_hdl%daddr)
[581]1221        min_digits_ = min_digits__tmp
[432]1222      ENDIF
[581]1223
[598]1224      IF (PRESENT(mode_)) THEN
[966]1225        mode__tmp = cxios_is_defined_filegroup_mode &
1226      (filegroup_hdl%daddr)
[598]1227        mode_ = mode__tmp
1228      ENDIF
1229
[432]1230      IF (PRESENT(name_)) THEN
[966]1231        name__tmp = cxios_is_defined_filegroup_name &
1232      (filegroup_hdl%daddr)
[581]1233        name_ = name__tmp
[432]1234      ENDIF
[581]1235
[432]1236      IF (PRESENT(name_suffix_)) THEN
[966]1237        name_suffix__tmp = cxios_is_defined_filegroup_name_suffix &
1238      (filegroup_hdl%daddr)
[581]1239        name_suffix_ = name_suffix__tmp
[432]1240      ENDIF
[581]1241
[432]1242      IF (PRESENT(output_freq_)) THEN
[966]1243        output_freq__tmp = cxios_is_defined_filegroup_output_freq &
1244      (filegroup_hdl%daddr)
[581]1245        output_freq_ = output_freq__tmp
[432]1246      ENDIF
[581]1247
[432]1248      IF (PRESENT(output_level_)) THEN
[966]1249        output_level__tmp = cxios_is_defined_filegroup_output_level &
1250      (filegroup_hdl%daddr)
[581]1251        output_level_ = output_level__tmp
[432]1252      ENDIF
[581]1253
[432]1254      IF (PRESENT(par_access_)) THEN
[966]1255        par_access__tmp = cxios_is_defined_filegroup_par_access &
1256      (filegroup_hdl%daddr)
[581]1257        par_access_ = par_access__tmp
[432]1258      ENDIF
[581]1259
[2616]1260      IF (PRESENT(pool_gatherer_)) THEN
1261        pool_gatherer__tmp = cxios_is_defined_filegroup_pool_gatherer &
1262      (filegroup_hdl%daddr)
1263        pool_gatherer_ = pool_gatherer__tmp
1264      ENDIF
1265
1266      IF (PRESENT(pool_reader_)) THEN
1267        pool_reader__tmp = cxios_is_defined_filegroup_pool_reader &
1268      (filegroup_hdl%daddr)
1269        pool_reader_ = pool_reader__tmp
1270      ENDIF
1271
1272      IF (PRESENT(pool_writer_)) THEN
1273        pool_writer__tmp = cxios_is_defined_filegroup_pool_writer &
1274      (filegroup_hdl%daddr)
1275        pool_writer_ = pool_writer__tmp
1276      ENDIF
1277
[1492]1278      IF (PRESENT(read_metadata_par_)) THEN
1279        read_metadata_par__tmp = cxios_is_defined_filegroup_read_metadata_par &
1280      (filegroup_hdl%daddr)
1281        read_metadata_par_ = read_metadata_par__tmp
1282      ENDIF
1283
[2616]1284      IF (PRESENT(reader_)) THEN
1285        reader__tmp = cxios_is_defined_filegroup_reader &
1286      (filegroup_hdl%daddr)
1287        reader_ = reader__tmp
1288      ENDIF
1289
[779]1290      IF (PRESENT(record_offset_)) THEN
[966]1291        record_offset__tmp = cxios_is_defined_filegroup_record_offset &
1292      (filegroup_hdl%daddr)
[779]1293        record_offset_ = record_offset__tmp
1294      ENDIF
1295
[1492]1296      IF (PRESENT(split_end_offset_)) THEN
1297        split_end_offset__tmp = cxios_is_defined_filegroup_split_end_offset &
1298      (filegroup_hdl%daddr)
1299        split_end_offset_ = split_end_offset__tmp
1300      ENDIF
1301
[432]1302      IF (PRESENT(split_freq_)) THEN
[966]1303        split_freq__tmp = cxios_is_defined_filegroup_split_freq &
1304      (filegroup_hdl%daddr)
[581]1305        split_freq_ = split_freq__tmp
[432]1306      ENDIF
[581]1307
[432]1308      IF (PRESENT(split_freq_format_)) THEN
[966]1309        split_freq_format__tmp = cxios_is_defined_filegroup_split_freq_format &
1310      (filegroup_hdl%daddr)
[581]1311        split_freq_format_ = split_freq_format__tmp
[432]1312      ENDIF
[581]1313
[1492]1314      IF (PRESENT(split_last_date_)) THEN
1315        split_last_date__tmp = cxios_is_defined_filegroup_split_last_date &
1316      (filegroup_hdl%daddr)
1317        split_last_date_ = split_last_date__tmp
1318      ENDIF
1319
1320      IF (PRESENT(split_start_offset_)) THEN
1321        split_start_offset__tmp = cxios_is_defined_filegroup_split_start_offset &
1322      (filegroup_hdl%daddr)
1323        split_start_offset_ = split_start_offset__tmp
1324      ENDIF
1325
[432]1326      IF (PRESENT(sync_freq_)) THEN
[966]1327        sync_freq__tmp = cxios_is_defined_filegroup_sync_freq &
1328      (filegroup_hdl%daddr)
[581]1329        sync_freq_ = sync_freq__tmp
[432]1330      ENDIF
[581]1331
[699]1332      IF (PRESENT(time_counter_)) THEN
[966]1333        time_counter__tmp = cxios_is_defined_filegroup_time_counter &
1334      (filegroup_hdl%daddr)
[699]1335        time_counter_ = time_counter__tmp
1336      ENDIF
1337
[802]1338      IF (PRESENT(time_counter_name_)) THEN
[966]1339        time_counter_name__tmp = cxios_is_defined_filegroup_time_counter_name &
1340      (filegroup_hdl%daddr)
[802]1341        time_counter_name_ = time_counter_name__tmp
1342      ENDIF
1343
[1158]1344      IF (PRESENT(time_stamp_format_)) THEN
1345        time_stamp_format__tmp = cxios_is_defined_filegroup_time_stamp_format &
1346      (filegroup_hdl%daddr)
1347        time_stamp_format_ = time_stamp_format__tmp
1348      ENDIF
1349
1350      IF (PRESENT(time_stamp_name_)) THEN
1351        time_stamp_name__tmp = cxios_is_defined_filegroup_time_stamp_name &
1352      (filegroup_hdl%daddr)
1353        time_stamp_name_ = time_stamp_name__tmp
1354      ENDIF
1355
1356      IF (PRESENT(time_units_)) THEN
1357        time_units__tmp = cxios_is_defined_filegroup_time_units &
1358      (filegroup_hdl%daddr)
1359        time_units_ = time_units__tmp
1360      ENDIF
1361
[711]1362      IF (PRESENT(timeseries_)) THEN
[966]1363        timeseries__tmp = cxios_is_defined_filegroup_timeseries &
1364      (filegroup_hdl%daddr)
[711]1365        timeseries_ = timeseries__tmp
1366      ENDIF
1367
1368      IF (PRESENT(ts_prefix_)) THEN
[966]1369        ts_prefix__tmp = cxios_is_defined_filegroup_ts_prefix &
1370      (filegroup_hdl%daddr)
[711]1371        ts_prefix_ = ts_prefix__tmp
1372      ENDIF
1373
[432]1374      IF (PRESENT(type_)) THEN
[966]1375        type__tmp = cxios_is_defined_filegroup_type &
1376      (filegroup_hdl%daddr)
[581]1377        type_ = type__tmp
[432]1378      ENDIF
[581]1379
[2616]1380      IF (PRESENT(using_server2_)) THEN
1381        using_server2__tmp = cxios_is_defined_filegroup_using_server2 &
1382      (filegroup_hdl%daddr)
1383        using_server2_ = using_server2__tmp
1384      ENDIF
1385
[1158]1386      IF (PRESENT(uuid_format_)) THEN
1387        uuid_format__tmp = cxios_is_defined_filegroup_uuid_format &
1388      (filegroup_hdl%daddr)
1389        uuid_format_ = uuid_format__tmp
1390      ENDIF
1391
1392      IF (PRESENT(uuid_name_)) THEN
1393        uuid_name__tmp = cxios_is_defined_filegroup_uuid_name &
1394      (filegroup_hdl%daddr)
1395        uuid_name_ = uuid_name__tmp
1396      ENDIF
1397
[2616]1398      IF (PRESENT(writer_)) THEN
1399        writer__tmp = cxios_is_defined_filegroup_writer &
1400      (filegroup_hdl%daddr)
1401        writer_ = writer__tmp
1402      ENDIF
1403
[432]1404  END SUBROUTINE xios(is_defined_filegroup_attr_hdl_)
[581]1405
[326]1406END MODULE ifilegroup_attr
Note: See TracBrowser for help on using the repository browser.