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
Line 
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
10
11CONTAINS
12
13  SUBROUTINE xios(set_filegroup_attr)  &
14    ( filegroup_id, append, comment, compression_level, convention, convention_str, cyclic, description  &
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 )
20
21    IMPLICIT NONE
22      TYPE(txios(filegroup))  :: filegroup_hdl
23      CHARACTER(LEN=*), INTENT(IN) ::filegroup_id
24      LOGICAL  , OPTIONAL, INTENT(IN) :: append
25      LOGICAL (KIND=C_BOOL) :: append_tmp
26      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: comment
27      INTEGER  , OPTIONAL, INTENT(IN) :: compression_level
28      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: convention
29      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: convention_str
30      LOGICAL  , OPTIONAL, INTENT(IN) :: cyclic
31      LOGICAL (KIND=C_BOOL) :: cyclic_tmp
32      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: description
33      LOGICAL  , OPTIONAL, INTENT(IN) :: enabled
34      LOGICAL (KIND=C_BOOL) :: enabled_tmp
35      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: format
36      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: gatherer
37      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: group_ref
38      INTEGER  , OPTIONAL, INTENT(IN) :: min_digits
39      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: mode
40      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name
41      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name_suffix
42      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: output_freq
43      INTEGER  , OPTIONAL, INTENT(IN) :: output_level
44      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: par_access
45      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: pool_gatherer
46      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: pool_reader
47      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: pool_writer
48      LOGICAL  , OPTIONAL, INTENT(IN) :: read_metadata_par
49      LOGICAL (KIND=C_BOOL) :: read_metadata_par_tmp
50      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: reader
51      INTEGER  , OPTIONAL, INTENT(IN) :: record_offset
52      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: split_end_offset
53      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: split_freq
54      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: split_freq_format
55      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: split_last_date
56      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: split_start_offset
57      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: sync_freq
58      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_counter
59      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_counter_name
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
63      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: timeseries
64      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: ts_prefix
65      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: type
66      LOGICAL  , OPTIONAL, INTENT(IN) :: using_server2
67      LOGICAL (KIND=C_BOOL) :: using_server2_tmp
68      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: uuid_format
69      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: uuid_name
70      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: writer
71
72      CALL xios(get_filegroup_handle) &
73      (filegroup_id,filegroup_hdl)
74      CALL xios(set_filegroup_attr_hdl_)   &
75      ( filegroup_hdl, append, comment, compression_level, convention, convention_str, cyclic, description  &
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 )
81
82  END SUBROUTINE xios(set_filegroup_attr)
83
84  SUBROUTINE xios(set_filegroup_attr_hdl)  &
85    ( filegroup_hdl, append, comment, compression_level, convention, convention_str, cyclic, description  &
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 )
91
92    IMPLICIT NONE
93      TYPE(txios(filegroup)) , INTENT(IN) :: filegroup_hdl
94      LOGICAL  , OPTIONAL, INTENT(IN) :: append
95      LOGICAL (KIND=C_BOOL) :: append_tmp
96      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: comment
97      INTEGER  , OPTIONAL, INTENT(IN) :: compression_level
98      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: convention
99      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: convention_str
100      LOGICAL  , OPTIONAL, INTENT(IN) :: cyclic
101      LOGICAL (KIND=C_BOOL) :: cyclic_tmp
102      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: description
103      LOGICAL  , OPTIONAL, INTENT(IN) :: enabled
104      LOGICAL (KIND=C_BOOL) :: enabled_tmp
105      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: format
106      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: gatherer
107      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: group_ref
108      INTEGER  , OPTIONAL, INTENT(IN) :: min_digits
109      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: mode
110      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name
111      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name_suffix
112      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: output_freq
113      INTEGER  , OPTIONAL, INTENT(IN) :: output_level
114      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: par_access
115      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: pool_gatherer
116      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: pool_reader
117      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: pool_writer
118      LOGICAL  , OPTIONAL, INTENT(IN) :: read_metadata_par
119      LOGICAL (KIND=C_BOOL) :: read_metadata_par_tmp
120      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: reader
121      INTEGER  , OPTIONAL, INTENT(IN) :: record_offset
122      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: split_end_offset
123      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: split_freq
124      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: split_freq_format
125      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: split_last_date
126      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: split_start_offset
127      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: sync_freq
128      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_counter
129      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_counter_name
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
133      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: timeseries
134      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: ts_prefix
135      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: type
136      LOGICAL  , OPTIONAL, INTENT(IN) :: using_server2
137      LOGICAL (KIND=C_BOOL) :: using_server2_tmp
138      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: uuid_format
139      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: uuid_name
140      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: writer
141
142      CALL xios(set_filegroup_attr_hdl_)  &
143      ( filegroup_hdl, append, comment, compression_level, convention, convention_str, cyclic, description  &
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 )
149
150  END SUBROUTINE xios(set_filegroup_attr_hdl)
151
152  SUBROUTINE xios(set_filegroup_attr_hdl_)   &
153    ( filegroup_hdl, append_, comment_, compression_level_, convention_, convention_str_, cyclic_  &
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     )
160
161    IMPLICIT NONE
162      TYPE(txios(filegroup)) , INTENT(IN) :: filegroup_hdl
163      LOGICAL  , OPTIONAL, INTENT(IN) :: append_
164      LOGICAL (KIND=C_BOOL) :: append__tmp
165      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: comment_
166      INTEGER  , OPTIONAL, INTENT(IN) :: compression_level_
167      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: convention_
168      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: convention_str_
169      LOGICAL  , OPTIONAL, INTENT(IN) :: cyclic_
170      LOGICAL (KIND=C_BOOL) :: cyclic__tmp
171      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: description_
172      LOGICAL  , OPTIONAL, INTENT(IN) :: enabled_
173      LOGICAL (KIND=C_BOOL) :: enabled__tmp
174      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: format_
175      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: gatherer_
176      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: group_ref_
177      INTEGER  , OPTIONAL, INTENT(IN) :: min_digits_
178      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: mode_
179      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name_
180      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name_suffix_
181      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: output_freq_
182      INTEGER  , OPTIONAL, INTENT(IN) :: output_level_
183      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: par_access_
184      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: pool_gatherer_
185      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: pool_reader_
186      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: pool_writer_
187      LOGICAL  , OPTIONAL, INTENT(IN) :: read_metadata_par_
188      LOGICAL (KIND=C_BOOL) :: read_metadata_par__tmp
189      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: reader_
190      INTEGER  , OPTIONAL, INTENT(IN) :: record_offset_
191      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: split_end_offset_
192      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: split_freq_
193      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: split_freq_format_
194      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: split_last_date_
195      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: split_start_offset_
196      TYPE(txios(duration))  , OPTIONAL, INTENT(IN) :: sync_freq_
197      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_counter_
198      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_counter_name_
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_
202      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: timeseries_
203      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: ts_prefix_
204      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: type_
205      LOGICAL  , OPTIONAL, INTENT(IN) :: using_server2_
206      LOGICAL (KIND=C_BOOL) :: using_server2__tmp
207      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: uuid_format_
208      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: uuid_name_
209      CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: writer_
210
211      IF (PRESENT(append_)) THEN
212        append__tmp = append_
213        CALL cxios_set_filegroup_append &
214      (filegroup_hdl%daddr, append__tmp)
215      ENDIF
216
217      IF (PRESENT(comment_)) THEN
218        CALL cxios_set_filegroup_comment &
219      (filegroup_hdl%daddr, comment_, len(comment_))
220      ENDIF
221
222      IF (PRESENT(compression_level_)) THEN
223        CALL cxios_set_filegroup_compression_level &
224      (filegroup_hdl%daddr, compression_level_)
225      ENDIF
226
227      IF (PRESENT(convention_)) THEN
228        CALL cxios_set_filegroup_convention &
229      (filegroup_hdl%daddr, convention_, len(convention_))
230      ENDIF
231
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
237      IF (PRESENT(cyclic_)) THEN
238        cyclic__tmp = cyclic_
239        CALL cxios_set_filegroup_cyclic &
240      (filegroup_hdl%daddr, cyclic__tmp)
241      ENDIF
242
243      IF (PRESENT(description_)) THEN
244        CALL cxios_set_filegroup_description &
245      (filegroup_hdl%daddr, description_, len(description_))
246      ENDIF
247
248      IF (PRESENT(enabled_)) THEN
249        enabled__tmp = enabled_
250        CALL cxios_set_filegroup_enabled &
251      (filegroup_hdl%daddr, enabled__tmp)
252      ENDIF
253
254      IF (PRESENT(format_)) THEN
255        CALL cxios_set_filegroup_format &
256      (filegroup_hdl%daddr, format_, len(format_))
257      ENDIF
258
259      IF (PRESENT(gatherer_)) THEN
260        CALL cxios_set_filegroup_gatherer &
261      (filegroup_hdl%daddr, gatherer_, len(gatherer_))
262      ENDIF
263
264      IF (PRESENT(group_ref_)) THEN
265        CALL cxios_set_filegroup_group_ref &
266      (filegroup_hdl%daddr, group_ref_, len(group_ref_))
267      ENDIF
268
269      IF (PRESENT(min_digits_)) THEN
270        CALL cxios_set_filegroup_min_digits &
271      (filegroup_hdl%daddr, min_digits_)
272      ENDIF
273
274      IF (PRESENT(mode_)) THEN
275        CALL cxios_set_filegroup_mode &
276      (filegroup_hdl%daddr, mode_, len(mode_))
277      ENDIF
278
279      IF (PRESENT(name_)) THEN
280        CALL cxios_set_filegroup_name &
281      (filegroup_hdl%daddr, name_, len(name_))
282      ENDIF
283
284      IF (PRESENT(name_suffix_)) THEN
285        CALL cxios_set_filegroup_name_suffix &
286      (filegroup_hdl%daddr, name_suffix_, len(name_suffix_))
287      ENDIF
288
289      IF (PRESENT(output_freq_)) THEN
290        CALL cxios_set_filegroup_output_freq &
291      (filegroup_hdl%daddr, output_freq_)
292      ENDIF
293
294      IF (PRESENT(output_level_)) THEN
295        CALL cxios_set_filegroup_output_level &
296      (filegroup_hdl%daddr, output_level_)
297      ENDIF
298
299      IF (PRESENT(par_access_)) THEN
300        CALL cxios_set_filegroup_par_access &
301      (filegroup_hdl%daddr, par_access_, len(par_access_))
302      ENDIF
303
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
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
325      IF (PRESENT(reader_)) THEN
326        CALL cxios_set_filegroup_reader &
327      (filegroup_hdl%daddr, reader_, len(reader_))
328      ENDIF
329
330      IF (PRESENT(record_offset_)) THEN
331        CALL cxios_set_filegroup_record_offset &
332      (filegroup_hdl%daddr, record_offset_)
333      ENDIF
334
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
340      IF (PRESENT(split_freq_)) THEN
341        CALL cxios_set_filegroup_split_freq &
342      (filegroup_hdl%daddr, split_freq_)
343      ENDIF
344
345      IF (PRESENT(split_freq_format_)) THEN
346        CALL cxios_set_filegroup_split_freq_format &
347      (filegroup_hdl%daddr, split_freq_format_, len(split_freq_format_))
348      ENDIF
349
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
360      IF (PRESENT(sync_freq_)) THEN
361        CALL cxios_set_filegroup_sync_freq &
362      (filegroup_hdl%daddr, sync_freq_)
363      ENDIF
364
365      IF (PRESENT(time_counter_)) THEN
366        CALL cxios_set_filegroup_time_counter &
367      (filegroup_hdl%daddr, time_counter_, len(time_counter_))
368      ENDIF
369
370      IF (PRESENT(time_counter_name_)) THEN
371        CALL cxios_set_filegroup_time_counter_name &
372      (filegroup_hdl%daddr, time_counter_name_, len(time_counter_name_))
373      ENDIF
374
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
390      IF (PRESENT(timeseries_)) THEN
391        CALL cxios_set_filegroup_timeseries &
392      (filegroup_hdl%daddr, timeseries_, len(timeseries_))
393      ENDIF
394
395      IF (PRESENT(ts_prefix_)) THEN
396        CALL cxios_set_filegroup_ts_prefix &
397      (filegroup_hdl%daddr, ts_prefix_, len(ts_prefix_))
398      ENDIF
399
400      IF (PRESENT(type_)) THEN
401        CALL cxios_set_filegroup_type &
402      (filegroup_hdl%daddr, type_, len(type_))
403      ENDIF
404
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
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
421      IF (PRESENT(writer_)) THEN
422        CALL cxios_set_filegroup_writer &
423      (filegroup_hdl%daddr, writer_, len(writer_))
424      ENDIF
425
426  END SUBROUTINE xios(set_filegroup_attr_hdl_)
427
428  SUBROUTINE xios(get_filegroup_attr)  &
429    ( filegroup_id, append, comment, compression_level, convention, convention_str, cyclic, description  &
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 )
435
436    IMPLICIT NONE
437      TYPE(txios(filegroup))  :: filegroup_hdl
438      CHARACTER(LEN=*), INTENT(IN) ::filegroup_id
439      LOGICAL  , OPTIONAL, INTENT(OUT) :: append
440      LOGICAL (KIND=C_BOOL) :: append_tmp
441      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: comment
442      INTEGER  , OPTIONAL, INTENT(OUT) :: compression_level
443      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: convention
444      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: convention_str
445      LOGICAL  , OPTIONAL, INTENT(OUT) :: cyclic
446      LOGICAL (KIND=C_BOOL) :: cyclic_tmp
447      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: description
448      LOGICAL  , OPTIONAL, INTENT(OUT) :: enabled
449      LOGICAL (KIND=C_BOOL) :: enabled_tmp
450      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: format
451      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: gatherer
452      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: group_ref
453      INTEGER  , OPTIONAL, INTENT(OUT) :: min_digits
454      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: mode
455      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name
456      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name_suffix
457      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: output_freq
458      INTEGER  , OPTIONAL, INTENT(OUT) :: output_level
459      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: par_access
460      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: pool_gatherer
461      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: pool_reader
462      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: pool_writer
463      LOGICAL  , OPTIONAL, INTENT(OUT) :: read_metadata_par
464      LOGICAL (KIND=C_BOOL) :: read_metadata_par_tmp
465      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: reader
466      INTEGER  , OPTIONAL, INTENT(OUT) :: record_offset
467      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: split_end_offset
468      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: split_freq
469      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: split_freq_format
470      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: split_last_date
471      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: split_start_offset
472      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: sync_freq
473      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_counter
474      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_counter_name
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
478      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: timeseries
479      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: ts_prefix
480      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: type
481      LOGICAL  , OPTIONAL, INTENT(OUT) :: using_server2
482      LOGICAL (KIND=C_BOOL) :: using_server2_tmp
483      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: uuid_format
484      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: uuid_name
485      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: writer
486
487      CALL xios(get_filegroup_handle) &
488      (filegroup_id,filegroup_hdl)
489      CALL xios(get_filegroup_attr_hdl_)   &
490      ( filegroup_hdl, append, comment, compression_level, convention, convention_str, cyclic, description  &
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 )
496
497  END SUBROUTINE xios(get_filegroup_attr)
498
499  SUBROUTINE xios(get_filegroup_attr_hdl)  &
500    ( filegroup_hdl, append, comment, compression_level, convention, convention_str, cyclic, description  &
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 )
506
507    IMPLICIT NONE
508      TYPE(txios(filegroup)) , INTENT(IN) :: filegroup_hdl
509      LOGICAL  , OPTIONAL, INTENT(OUT) :: append
510      LOGICAL (KIND=C_BOOL) :: append_tmp
511      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: comment
512      INTEGER  , OPTIONAL, INTENT(OUT) :: compression_level
513      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: convention
514      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: convention_str
515      LOGICAL  , OPTIONAL, INTENT(OUT) :: cyclic
516      LOGICAL (KIND=C_BOOL) :: cyclic_tmp
517      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: description
518      LOGICAL  , OPTIONAL, INTENT(OUT) :: enabled
519      LOGICAL (KIND=C_BOOL) :: enabled_tmp
520      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: format
521      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: gatherer
522      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: group_ref
523      INTEGER  , OPTIONAL, INTENT(OUT) :: min_digits
524      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: mode
525      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name
526      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name_suffix
527      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: output_freq
528      INTEGER  , OPTIONAL, INTENT(OUT) :: output_level
529      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: par_access
530      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: pool_gatherer
531      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: pool_reader
532      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: pool_writer
533      LOGICAL  , OPTIONAL, INTENT(OUT) :: read_metadata_par
534      LOGICAL (KIND=C_BOOL) :: read_metadata_par_tmp
535      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: reader
536      INTEGER  , OPTIONAL, INTENT(OUT) :: record_offset
537      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: split_end_offset
538      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: split_freq
539      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: split_freq_format
540      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: split_last_date
541      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: split_start_offset
542      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: sync_freq
543      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_counter
544      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_counter_name
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
548      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: timeseries
549      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: ts_prefix
550      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: type
551      LOGICAL  , OPTIONAL, INTENT(OUT) :: using_server2
552      LOGICAL (KIND=C_BOOL) :: using_server2_tmp
553      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: uuid_format
554      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: uuid_name
555      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: writer
556
557      CALL xios(get_filegroup_attr_hdl_)  &
558      ( filegroup_hdl, append, comment, compression_level, convention, convention_str, cyclic, description  &
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 )
564
565  END SUBROUTINE xios(get_filegroup_attr_hdl)
566
567  SUBROUTINE xios(get_filegroup_attr_hdl_)   &
568    ( filegroup_hdl, append_, comment_, compression_level_, convention_, convention_str_, cyclic_  &
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     )
575
576    IMPLICIT NONE
577      TYPE(txios(filegroup)) , INTENT(IN) :: filegroup_hdl
578      LOGICAL  , OPTIONAL, INTENT(OUT) :: append_
579      LOGICAL (KIND=C_BOOL) :: append__tmp
580      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: comment_
581      INTEGER  , OPTIONAL, INTENT(OUT) :: compression_level_
582      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: convention_
583      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: convention_str_
584      LOGICAL  , OPTIONAL, INTENT(OUT) :: cyclic_
585      LOGICAL (KIND=C_BOOL) :: cyclic__tmp
586      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: description_
587      LOGICAL  , OPTIONAL, INTENT(OUT) :: enabled_
588      LOGICAL (KIND=C_BOOL) :: enabled__tmp
589      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: format_
590      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: gatherer_
591      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: group_ref_
592      INTEGER  , OPTIONAL, INTENT(OUT) :: min_digits_
593      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: mode_
594      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name_
595      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name_suffix_
596      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: output_freq_
597      INTEGER  , OPTIONAL, INTENT(OUT) :: output_level_
598      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: par_access_
599      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: pool_gatherer_
600      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: pool_reader_
601      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: pool_writer_
602      LOGICAL  , OPTIONAL, INTENT(OUT) :: read_metadata_par_
603      LOGICAL (KIND=C_BOOL) :: read_metadata_par__tmp
604      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: reader_
605      INTEGER  , OPTIONAL, INTENT(OUT) :: record_offset_
606      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: split_end_offset_
607      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: split_freq_
608      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: split_freq_format_
609      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: split_last_date_
610      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: split_start_offset_
611      TYPE(txios(duration))  , OPTIONAL, INTENT(OUT) :: sync_freq_
612      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_counter_
613      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_counter_name_
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_
617      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: timeseries_
618      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: ts_prefix_
619      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: type_
620      LOGICAL  , OPTIONAL, INTENT(OUT) :: using_server2_
621      LOGICAL (KIND=C_BOOL) :: using_server2__tmp
622      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: uuid_format_
623      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: uuid_name_
624      CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: writer_
625
626      IF (PRESENT(append_)) THEN
627        CALL cxios_get_filegroup_append &
628      (filegroup_hdl%daddr, append__tmp)
629        append_ = append__tmp
630      ENDIF
631
632      IF (PRESENT(comment_)) THEN
633        CALL cxios_get_filegroup_comment &
634      (filegroup_hdl%daddr, comment_, len(comment_))
635      ENDIF
636
637      IF (PRESENT(compression_level_)) THEN
638        CALL cxios_get_filegroup_compression_level &
639      (filegroup_hdl%daddr, compression_level_)
640      ENDIF
641
642      IF (PRESENT(convention_)) THEN
643        CALL cxios_get_filegroup_convention &
644      (filegroup_hdl%daddr, convention_, len(convention_))
645      ENDIF
646
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
652      IF (PRESENT(cyclic_)) THEN
653        CALL cxios_get_filegroup_cyclic &
654      (filegroup_hdl%daddr, cyclic__tmp)
655        cyclic_ = cyclic__tmp
656      ENDIF
657
658      IF (PRESENT(description_)) THEN
659        CALL cxios_get_filegroup_description &
660      (filegroup_hdl%daddr, description_, len(description_))
661      ENDIF
662
663      IF (PRESENT(enabled_)) THEN
664        CALL cxios_get_filegroup_enabled &
665      (filegroup_hdl%daddr, enabled__tmp)
666        enabled_ = enabled__tmp
667      ENDIF
668
669      IF (PRESENT(format_)) THEN
670        CALL cxios_get_filegroup_format &
671      (filegroup_hdl%daddr, format_, len(format_))
672      ENDIF
673
674      IF (PRESENT(gatherer_)) THEN
675        CALL cxios_get_filegroup_gatherer &
676      (filegroup_hdl%daddr, gatherer_, len(gatherer_))
677      ENDIF
678
679      IF (PRESENT(group_ref_)) THEN
680        CALL cxios_get_filegroup_group_ref &
681      (filegroup_hdl%daddr, group_ref_, len(group_ref_))
682      ENDIF
683
684      IF (PRESENT(min_digits_)) THEN
685        CALL cxios_get_filegroup_min_digits &
686      (filegroup_hdl%daddr, min_digits_)
687      ENDIF
688
689      IF (PRESENT(mode_)) THEN
690        CALL cxios_get_filegroup_mode &
691      (filegroup_hdl%daddr, mode_, len(mode_))
692      ENDIF
693
694      IF (PRESENT(name_)) THEN
695        CALL cxios_get_filegroup_name &
696      (filegroup_hdl%daddr, name_, len(name_))
697      ENDIF
698
699      IF (PRESENT(name_suffix_)) THEN
700        CALL cxios_get_filegroup_name_suffix &
701      (filegroup_hdl%daddr, name_suffix_, len(name_suffix_))
702      ENDIF
703
704      IF (PRESENT(output_freq_)) THEN
705        CALL cxios_get_filegroup_output_freq &
706      (filegroup_hdl%daddr, output_freq_)
707      ENDIF
708
709      IF (PRESENT(output_level_)) THEN
710        CALL cxios_get_filegroup_output_level &
711      (filegroup_hdl%daddr, output_level_)
712      ENDIF
713
714      IF (PRESENT(par_access_)) THEN
715        CALL cxios_get_filegroup_par_access &
716      (filegroup_hdl%daddr, par_access_, len(par_access_))
717      ENDIF
718
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
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
740      IF (PRESENT(reader_)) THEN
741        CALL cxios_get_filegroup_reader &
742      (filegroup_hdl%daddr, reader_, len(reader_))
743      ENDIF
744
745      IF (PRESENT(record_offset_)) THEN
746        CALL cxios_get_filegroup_record_offset &
747      (filegroup_hdl%daddr, record_offset_)
748      ENDIF
749
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
755      IF (PRESENT(split_freq_)) THEN
756        CALL cxios_get_filegroup_split_freq &
757      (filegroup_hdl%daddr, split_freq_)
758      ENDIF
759
760      IF (PRESENT(split_freq_format_)) THEN
761        CALL cxios_get_filegroup_split_freq_format &
762      (filegroup_hdl%daddr, split_freq_format_, len(split_freq_format_))
763      ENDIF
764
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
775      IF (PRESENT(sync_freq_)) THEN
776        CALL cxios_get_filegroup_sync_freq &
777      (filegroup_hdl%daddr, sync_freq_)
778      ENDIF
779
780      IF (PRESENT(time_counter_)) THEN
781        CALL cxios_get_filegroup_time_counter &
782      (filegroup_hdl%daddr, time_counter_, len(time_counter_))
783      ENDIF
784
785      IF (PRESENT(time_counter_name_)) THEN
786        CALL cxios_get_filegroup_time_counter_name &
787      (filegroup_hdl%daddr, time_counter_name_, len(time_counter_name_))
788      ENDIF
789
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
805      IF (PRESENT(timeseries_)) THEN
806        CALL cxios_get_filegroup_timeseries &
807      (filegroup_hdl%daddr, timeseries_, len(timeseries_))
808      ENDIF
809
810      IF (PRESENT(ts_prefix_)) THEN
811        CALL cxios_get_filegroup_ts_prefix &
812      (filegroup_hdl%daddr, ts_prefix_, len(ts_prefix_))
813      ENDIF
814
815      IF (PRESENT(type_)) THEN
816        CALL cxios_get_filegroup_type &
817      (filegroup_hdl%daddr, type_, len(type_))
818      ENDIF
819
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
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
836      IF (PRESENT(writer_)) THEN
837        CALL cxios_get_filegroup_writer &
838      (filegroup_hdl%daddr, writer_, len(writer_))
839      ENDIF
840
841  END SUBROUTINE xios(get_filegroup_attr_hdl_)
842
843  SUBROUTINE xios(is_defined_filegroup_attr)  &
844    ( filegroup_id, append, comment, compression_level, convention, convention_str, cyclic, description  &
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 )
850
851    IMPLICIT NONE
852      TYPE(txios(filegroup))  :: filegroup_hdl
853      CHARACTER(LEN=*), INTENT(IN) ::filegroup_id
854      LOGICAL, OPTIONAL, INTENT(OUT) :: append
855      LOGICAL(KIND=C_BOOL) :: append_tmp
856      LOGICAL, OPTIONAL, INTENT(OUT) :: comment
857      LOGICAL(KIND=C_BOOL) :: comment_tmp
858      LOGICAL, OPTIONAL, INTENT(OUT) :: compression_level
859      LOGICAL(KIND=C_BOOL) :: compression_level_tmp
860      LOGICAL, OPTIONAL, INTENT(OUT) :: convention
861      LOGICAL(KIND=C_BOOL) :: convention_tmp
862      LOGICAL, OPTIONAL, INTENT(OUT) :: convention_str
863      LOGICAL(KIND=C_BOOL) :: convention_str_tmp
864      LOGICAL, OPTIONAL, INTENT(OUT) :: cyclic
865      LOGICAL(KIND=C_BOOL) :: cyclic_tmp
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
870      LOGICAL, OPTIONAL, INTENT(OUT) :: format
871      LOGICAL(KIND=C_BOOL) :: format_tmp
872      LOGICAL, OPTIONAL, INTENT(OUT) :: gatherer
873      LOGICAL(KIND=C_BOOL) :: gatherer_tmp
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
878      LOGICAL, OPTIONAL, INTENT(OUT) :: mode
879      LOGICAL(KIND=C_BOOL) :: mode_tmp
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
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
896      LOGICAL, OPTIONAL, INTENT(OUT) :: read_metadata_par
897      LOGICAL(KIND=C_BOOL) :: read_metadata_par_tmp
898      LOGICAL, OPTIONAL, INTENT(OUT) :: reader
899      LOGICAL(KIND=C_BOOL) :: reader_tmp
900      LOGICAL, OPTIONAL, INTENT(OUT) :: record_offset
901      LOGICAL(KIND=C_BOOL) :: record_offset_tmp
902      LOGICAL, OPTIONAL, INTENT(OUT) :: split_end_offset
903      LOGICAL(KIND=C_BOOL) :: split_end_offset_tmp
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
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
912      LOGICAL, OPTIONAL, INTENT(OUT) :: sync_freq
913      LOGICAL(KIND=C_BOOL) :: sync_freq_tmp
914      LOGICAL, OPTIONAL, INTENT(OUT) :: time_counter
915      LOGICAL(KIND=C_BOOL) :: time_counter_tmp
916      LOGICAL, OPTIONAL, INTENT(OUT) :: time_counter_name
917      LOGICAL(KIND=C_BOOL) :: time_counter_name_tmp
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
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
928      LOGICAL, OPTIONAL, INTENT(OUT) :: type
929      LOGICAL(KIND=C_BOOL) :: type_tmp
930      LOGICAL, OPTIONAL, INTENT(OUT) :: using_server2
931      LOGICAL(KIND=C_BOOL) :: using_server2_tmp
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
936      LOGICAL, OPTIONAL, INTENT(OUT) :: writer
937      LOGICAL(KIND=C_BOOL) :: writer_tmp
938
939      CALL xios(get_filegroup_handle) &
940      (filegroup_id,filegroup_hdl)
941      CALL xios(is_defined_filegroup_attr_hdl_)   &
942      ( filegroup_hdl, append, comment, compression_level, convention, convention_str, cyclic, description  &
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 )
948
949  END SUBROUTINE xios(is_defined_filegroup_attr)
950
951  SUBROUTINE xios(is_defined_filegroup_attr_hdl)  &
952    ( filegroup_hdl, append, comment, compression_level, convention, convention_str, cyclic, description  &
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 )
958
959    IMPLICIT NONE
960      TYPE(txios(filegroup)) , INTENT(IN) :: filegroup_hdl
961      LOGICAL, OPTIONAL, INTENT(OUT) :: append
962      LOGICAL(KIND=C_BOOL) :: append_tmp
963      LOGICAL, OPTIONAL, INTENT(OUT) :: comment
964      LOGICAL(KIND=C_BOOL) :: comment_tmp
965      LOGICAL, OPTIONAL, INTENT(OUT) :: compression_level
966      LOGICAL(KIND=C_BOOL) :: compression_level_tmp
967      LOGICAL, OPTIONAL, INTENT(OUT) :: convention
968      LOGICAL(KIND=C_BOOL) :: convention_tmp
969      LOGICAL, OPTIONAL, INTENT(OUT) :: convention_str
970      LOGICAL(KIND=C_BOOL) :: convention_str_tmp
971      LOGICAL, OPTIONAL, INTENT(OUT) :: cyclic
972      LOGICAL(KIND=C_BOOL) :: cyclic_tmp
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
977      LOGICAL, OPTIONAL, INTENT(OUT) :: format
978      LOGICAL(KIND=C_BOOL) :: format_tmp
979      LOGICAL, OPTIONAL, INTENT(OUT) :: gatherer
980      LOGICAL(KIND=C_BOOL) :: gatherer_tmp
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
985      LOGICAL, OPTIONAL, INTENT(OUT) :: mode
986      LOGICAL(KIND=C_BOOL) :: mode_tmp
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
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
1003      LOGICAL, OPTIONAL, INTENT(OUT) :: read_metadata_par
1004      LOGICAL(KIND=C_BOOL) :: read_metadata_par_tmp
1005      LOGICAL, OPTIONAL, INTENT(OUT) :: reader
1006      LOGICAL(KIND=C_BOOL) :: reader_tmp
1007      LOGICAL, OPTIONAL, INTENT(OUT) :: record_offset
1008      LOGICAL(KIND=C_BOOL) :: record_offset_tmp
1009      LOGICAL, OPTIONAL, INTENT(OUT) :: split_end_offset
1010      LOGICAL(KIND=C_BOOL) :: split_end_offset_tmp
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
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
1019      LOGICAL, OPTIONAL, INTENT(OUT) :: sync_freq
1020      LOGICAL(KIND=C_BOOL) :: sync_freq_tmp
1021      LOGICAL, OPTIONAL, INTENT(OUT) :: time_counter
1022      LOGICAL(KIND=C_BOOL) :: time_counter_tmp
1023      LOGICAL, OPTIONAL, INTENT(OUT) :: time_counter_name
1024      LOGICAL(KIND=C_BOOL) :: time_counter_name_tmp
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
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
1035      LOGICAL, OPTIONAL, INTENT(OUT) :: type
1036      LOGICAL(KIND=C_BOOL) :: type_tmp
1037      LOGICAL, OPTIONAL, INTENT(OUT) :: using_server2
1038      LOGICAL(KIND=C_BOOL) :: using_server2_tmp
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
1043      LOGICAL, OPTIONAL, INTENT(OUT) :: writer
1044      LOGICAL(KIND=C_BOOL) :: writer_tmp
1045
1046      CALL xios(is_defined_filegroup_attr_hdl_)  &
1047      ( filegroup_hdl, append, comment, compression_level, convention, convention_str, cyclic, description  &
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 )
1053
1054  END SUBROUTINE xios(is_defined_filegroup_attr_hdl)
1055
1056  SUBROUTINE xios(is_defined_filegroup_attr_hdl_)   &
1057    ( filegroup_hdl, append_, comment_, compression_level_, convention_, convention_str_, cyclic_  &
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     )
1064
1065    IMPLICIT NONE
1066      TYPE(txios(filegroup)) , INTENT(IN) :: filegroup_hdl
1067      LOGICAL, OPTIONAL, INTENT(OUT) :: append_
1068      LOGICAL(KIND=C_BOOL) :: append__tmp
1069      LOGICAL, OPTIONAL, INTENT(OUT) :: comment_
1070      LOGICAL(KIND=C_BOOL) :: comment__tmp
1071      LOGICAL, OPTIONAL, INTENT(OUT) :: compression_level_
1072      LOGICAL(KIND=C_BOOL) :: compression_level__tmp
1073      LOGICAL, OPTIONAL, INTENT(OUT) :: convention_
1074      LOGICAL(KIND=C_BOOL) :: convention__tmp
1075      LOGICAL, OPTIONAL, INTENT(OUT) :: convention_str_
1076      LOGICAL(KIND=C_BOOL) :: convention_str__tmp
1077      LOGICAL, OPTIONAL, INTENT(OUT) :: cyclic_
1078      LOGICAL(KIND=C_BOOL) :: cyclic__tmp
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
1083      LOGICAL, OPTIONAL, INTENT(OUT) :: format_
1084      LOGICAL(KIND=C_BOOL) :: format__tmp
1085      LOGICAL, OPTIONAL, INTENT(OUT) :: gatherer_
1086      LOGICAL(KIND=C_BOOL) :: gatherer__tmp
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
1091      LOGICAL, OPTIONAL, INTENT(OUT) :: mode_
1092      LOGICAL(KIND=C_BOOL) :: mode__tmp
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
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
1109      LOGICAL, OPTIONAL, INTENT(OUT) :: read_metadata_par_
1110      LOGICAL(KIND=C_BOOL) :: read_metadata_par__tmp
1111      LOGICAL, OPTIONAL, INTENT(OUT) :: reader_
1112      LOGICAL(KIND=C_BOOL) :: reader__tmp
1113      LOGICAL, OPTIONAL, INTENT(OUT) :: record_offset_
1114      LOGICAL(KIND=C_BOOL) :: record_offset__tmp
1115      LOGICAL, OPTIONAL, INTENT(OUT) :: split_end_offset_
1116      LOGICAL(KIND=C_BOOL) :: split_end_offset__tmp
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
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
1125      LOGICAL, OPTIONAL, INTENT(OUT) :: sync_freq_
1126      LOGICAL(KIND=C_BOOL) :: sync_freq__tmp
1127      LOGICAL, OPTIONAL, INTENT(OUT) :: time_counter_
1128      LOGICAL(KIND=C_BOOL) :: time_counter__tmp
1129      LOGICAL, OPTIONAL, INTENT(OUT) :: time_counter_name_
1130      LOGICAL(KIND=C_BOOL) :: time_counter_name__tmp
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
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
1141      LOGICAL, OPTIONAL, INTENT(OUT) :: type_
1142      LOGICAL(KIND=C_BOOL) :: type__tmp
1143      LOGICAL, OPTIONAL, INTENT(OUT) :: using_server2_
1144      LOGICAL(KIND=C_BOOL) :: using_server2__tmp
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
1149      LOGICAL, OPTIONAL, INTENT(OUT) :: writer_
1150      LOGICAL(KIND=C_BOOL) :: writer__tmp
1151
1152      IF (PRESENT(append_)) THEN
1153        append__tmp = cxios_is_defined_filegroup_append &
1154      (filegroup_hdl%daddr)
1155        append_ = append__tmp
1156      ENDIF
1157
1158      IF (PRESENT(comment_)) THEN
1159        comment__tmp = cxios_is_defined_filegroup_comment &
1160      (filegroup_hdl%daddr)
1161        comment_ = comment__tmp
1162      ENDIF
1163
1164      IF (PRESENT(compression_level_)) THEN
1165        compression_level__tmp = cxios_is_defined_filegroup_compression_level &
1166      (filegroup_hdl%daddr)
1167        compression_level_ = compression_level__tmp
1168      ENDIF
1169
1170      IF (PRESENT(convention_)) THEN
1171        convention__tmp = cxios_is_defined_filegroup_convention &
1172      (filegroup_hdl%daddr)
1173        convention_ = convention__tmp
1174      ENDIF
1175
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
1182      IF (PRESENT(cyclic_)) THEN
1183        cyclic__tmp = cxios_is_defined_filegroup_cyclic &
1184      (filegroup_hdl%daddr)
1185        cyclic_ = cyclic__tmp
1186      ENDIF
1187
1188      IF (PRESENT(description_)) THEN
1189        description__tmp = cxios_is_defined_filegroup_description &
1190      (filegroup_hdl%daddr)
1191        description_ = description__tmp
1192      ENDIF
1193
1194      IF (PRESENT(enabled_)) THEN
1195        enabled__tmp = cxios_is_defined_filegroup_enabled &
1196      (filegroup_hdl%daddr)
1197        enabled_ = enabled__tmp
1198      ENDIF
1199
1200      IF (PRESENT(format_)) THEN
1201        format__tmp = cxios_is_defined_filegroup_format &
1202      (filegroup_hdl%daddr)
1203        format_ = format__tmp
1204      ENDIF
1205
1206      IF (PRESENT(gatherer_)) THEN
1207        gatherer__tmp = cxios_is_defined_filegroup_gatherer &
1208      (filegroup_hdl%daddr)
1209        gatherer_ = gatherer__tmp
1210      ENDIF
1211
1212      IF (PRESENT(group_ref_)) THEN
1213        group_ref__tmp = cxios_is_defined_filegroup_group_ref &
1214      (filegroup_hdl%daddr)
1215        group_ref_ = group_ref__tmp
1216      ENDIF
1217
1218      IF (PRESENT(min_digits_)) THEN
1219        min_digits__tmp = cxios_is_defined_filegroup_min_digits &
1220      (filegroup_hdl%daddr)
1221        min_digits_ = min_digits__tmp
1222      ENDIF
1223
1224      IF (PRESENT(mode_)) THEN
1225        mode__tmp = cxios_is_defined_filegroup_mode &
1226      (filegroup_hdl%daddr)
1227        mode_ = mode__tmp
1228      ENDIF
1229
1230      IF (PRESENT(name_)) THEN
1231        name__tmp = cxios_is_defined_filegroup_name &
1232      (filegroup_hdl%daddr)
1233        name_ = name__tmp
1234      ENDIF
1235
1236      IF (PRESENT(name_suffix_)) THEN
1237        name_suffix__tmp = cxios_is_defined_filegroup_name_suffix &
1238      (filegroup_hdl%daddr)
1239        name_suffix_ = name_suffix__tmp
1240      ENDIF
1241
1242      IF (PRESENT(output_freq_)) THEN
1243        output_freq__tmp = cxios_is_defined_filegroup_output_freq &
1244      (filegroup_hdl%daddr)
1245        output_freq_ = output_freq__tmp
1246      ENDIF
1247
1248      IF (PRESENT(output_level_)) THEN
1249        output_level__tmp = cxios_is_defined_filegroup_output_level &
1250      (filegroup_hdl%daddr)
1251        output_level_ = output_level__tmp
1252      ENDIF
1253
1254      IF (PRESENT(par_access_)) THEN
1255        par_access__tmp = cxios_is_defined_filegroup_par_access &
1256      (filegroup_hdl%daddr)
1257        par_access_ = par_access__tmp
1258      ENDIF
1259
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
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
1284      IF (PRESENT(reader_)) THEN
1285        reader__tmp = cxios_is_defined_filegroup_reader &
1286      (filegroup_hdl%daddr)
1287        reader_ = reader__tmp
1288      ENDIF
1289
1290      IF (PRESENT(record_offset_)) THEN
1291        record_offset__tmp = cxios_is_defined_filegroup_record_offset &
1292      (filegroup_hdl%daddr)
1293        record_offset_ = record_offset__tmp
1294      ENDIF
1295
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
1302      IF (PRESENT(split_freq_)) THEN
1303        split_freq__tmp = cxios_is_defined_filegroup_split_freq &
1304      (filegroup_hdl%daddr)
1305        split_freq_ = split_freq__tmp
1306      ENDIF
1307
1308      IF (PRESENT(split_freq_format_)) THEN
1309        split_freq_format__tmp = cxios_is_defined_filegroup_split_freq_format &
1310      (filegroup_hdl%daddr)
1311        split_freq_format_ = split_freq_format__tmp
1312      ENDIF
1313
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
1326      IF (PRESENT(sync_freq_)) THEN
1327        sync_freq__tmp = cxios_is_defined_filegroup_sync_freq &
1328      (filegroup_hdl%daddr)
1329        sync_freq_ = sync_freq__tmp
1330      ENDIF
1331
1332      IF (PRESENT(time_counter_)) THEN
1333        time_counter__tmp = cxios_is_defined_filegroup_time_counter &
1334      (filegroup_hdl%daddr)
1335        time_counter_ = time_counter__tmp
1336      ENDIF
1337
1338      IF (PRESENT(time_counter_name_)) THEN
1339        time_counter_name__tmp = cxios_is_defined_filegroup_time_counter_name &
1340      (filegroup_hdl%daddr)
1341        time_counter_name_ = time_counter_name__tmp
1342      ENDIF
1343
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
1362      IF (PRESENT(timeseries_)) THEN
1363        timeseries__tmp = cxios_is_defined_filegroup_timeseries &
1364      (filegroup_hdl%daddr)
1365        timeseries_ = timeseries__tmp
1366      ENDIF
1367
1368      IF (PRESENT(ts_prefix_)) THEN
1369        ts_prefix__tmp = cxios_is_defined_filegroup_ts_prefix &
1370      (filegroup_hdl%daddr)
1371        ts_prefix_ = ts_prefix__tmp
1372      ENDIF
1373
1374      IF (PRESENT(type_)) THEN
1375        type__tmp = cxios_is_defined_filegroup_type &
1376      (filegroup_hdl%daddr)
1377        type_ = type__tmp
1378      ENDIF
1379
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
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
1398      IF (PRESENT(writer_)) THEN
1399        writer__tmp = cxios_is_defined_filegroup_writer &
1400      (filegroup_hdl%daddr)
1401        writer_ = writer__tmp
1402      ENDIF
1403
1404  END SUBROUTINE xios(is_defined_filegroup_attr_hdl_)
1405
1406END MODULE ifilegroup_attr
Note: See TracBrowser for help on using the repository browser.