source: XIOS/dev/XIOS_DEV_CMIP6/src/interface/fortran_attr/filegroup_interface_attr.F90 @ 1542

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

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

duplicate_scalar_to_axis
reduce_axis_to_axis
reduce_scalar_to_scalar
reorder_domain
temporal_splitting.

  • Property copyright set to
    Software name : XIOS (Xml I/O Server)
    http://forge.ipsl.jussieu.fr/ioserver
    Creation date : January 2009
    Licence : CeCCIL version2
    see license file in root directory : Licence_CeCILL_V2-en.txt
    or http://www.cecill.info/licences/Licence_CeCILL_V2-en.html
    Holder : CEA/LSCE (Laboratoire des Sciences du CLimat et de l'Environnement)
    CNRS/IPSL (Institut Pierre Simon Laplace)
    Project Manager : Yann Meurdesoif
    yann.meurdesoif@cea.fr
File size: 33.0 KB
RevLine 
[326]1! * ************************************************************************** *
2! *               Interface auto generated - do not modify                     *
3! * ************************************************************************** *
[532]4#include "../fortran/xios_fortran_prefix.hpp"
[326]5
6MODULE filegroup_interface_attr
7  USE, INTRINSIC :: ISO_C_BINDING
[581]8
9  INTERFACE
10    ! Do not call directly / interface FORTRAN 2003 <-> C99
11
[528]12    SUBROUTINE cxios_set_filegroup_append(filegroup_hdl, append) BIND(C)
13      USE ISO_C_BINDING
14      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
15      LOGICAL (KIND=C_BOOL)      , VALUE :: append
16    END SUBROUTINE cxios_set_filegroup_append
[581]17
[528]18    SUBROUTINE cxios_get_filegroup_append(filegroup_hdl, append) BIND(C)
19      USE ISO_C_BINDING
20      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
21      LOGICAL (KIND=C_BOOL)             :: append
22    END SUBROUTINE cxios_get_filegroup_append
[581]23
24    FUNCTION cxios_is_defined_filegroup_append(filegroup_hdl) BIND(C)
[528]25      USE ISO_C_BINDING
26      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_append
27      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
28    END FUNCTION cxios_is_defined_filegroup_append
[581]29
30
[1492]31    SUBROUTINE cxios_set_filegroup_comment(filegroup_hdl, comment, comment_size) BIND(C)
32      USE ISO_C_BINDING
33      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
34      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: comment
35      INTEGER  (kind = C_INT)     , VALUE        :: comment_size
36    END SUBROUTINE cxios_set_filegroup_comment
37
38    SUBROUTINE cxios_get_filegroup_comment(filegroup_hdl, comment, comment_size) BIND(C)
39      USE ISO_C_BINDING
40      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
41      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: comment
42      INTEGER  (kind = C_INT)     , VALUE        :: comment_size
43    END SUBROUTINE cxios_get_filegroup_comment
44
45    FUNCTION cxios_is_defined_filegroup_comment(filegroup_hdl) BIND(C)
46      USE ISO_C_BINDING
47      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_comment
48      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
49    END FUNCTION cxios_is_defined_filegroup_comment
50
51
[608]52    SUBROUTINE cxios_set_filegroup_compression_level(filegroup_hdl, compression_level) BIND(C)
53      USE ISO_C_BINDING
54      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
55      INTEGER (KIND=C_INT)      , VALUE :: compression_level
56    END SUBROUTINE cxios_set_filegroup_compression_level
57
58    SUBROUTINE cxios_get_filegroup_compression_level(filegroup_hdl, compression_level) BIND(C)
59      USE ISO_C_BINDING
60      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
61      INTEGER (KIND=C_INT)             :: compression_level
62    END SUBROUTINE cxios_get_filegroup_compression_level
63
64    FUNCTION cxios_is_defined_filegroup_compression_level(filegroup_hdl) BIND(C)
65      USE ISO_C_BINDING
66      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_compression_level
67      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
68    END FUNCTION cxios_is_defined_filegroup_compression_level
69
70
[932]71    SUBROUTINE cxios_set_filegroup_convention(filegroup_hdl, convention, convention_size) BIND(C)
72      USE ISO_C_BINDING
73      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
74      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: convention
75      INTEGER  (kind = C_INT)     , VALUE        :: convention_size
76    END SUBROUTINE cxios_set_filegroup_convention
77
78    SUBROUTINE cxios_get_filegroup_convention(filegroup_hdl, convention, convention_size) BIND(C)
79      USE ISO_C_BINDING
80      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
81      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: convention
82      INTEGER  (kind = C_INT)     , VALUE        :: convention_size
83    END SUBROUTINE cxios_get_filegroup_convention
84
85    FUNCTION cxios_is_defined_filegroup_convention(filegroup_hdl) BIND(C)
86      USE ISO_C_BINDING
87      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_convention
88      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
89    END FUNCTION cxios_is_defined_filegroup_convention
90
91
[1201]92    SUBROUTINE cxios_set_filegroup_convention_str(filegroup_hdl, convention_str, convention_str_size) BIND(C)
93      USE ISO_C_BINDING
94      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
95      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: convention_str
96      INTEGER  (kind = C_INT)     , VALUE        :: convention_str_size
97    END SUBROUTINE cxios_set_filegroup_convention_str
98
99    SUBROUTINE cxios_get_filegroup_convention_str(filegroup_hdl, convention_str, convention_str_size) BIND(C)
100      USE ISO_C_BINDING
101      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
102      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: convention_str
103      INTEGER  (kind = C_INT)     , VALUE        :: convention_str_size
104    END SUBROUTINE cxios_get_filegroup_convention_str
105
106    FUNCTION cxios_is_defined_filegroup_convention_str(filegroup_hdl) BIND(C)
107      USE ISO_C_BINDING
108      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_convention_str
109      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
110    END FUNCTION cxios_is_defined_filegroup_convention_str
111
112
[891]113    SUBROUTINE cxios_set_filegroup_cyclic(filegroup_hdl, cyclic) BIND(C)
114      USE ISO_C_BINDING
115      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
116      LOGICAL (KIND=C_BOOL)      , VALUE :: cyclic
117    END SUBROUTINE cxios_set_filegroup_cyclic
118
119    SUBROUTINE cxios_get_filegroup_cyclic(filegroup_hdl, cyclic) BIND(C)
120      USE ISO_C_BINDING
121      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
122      LOGICAL (KIND=C_BOOL)             :: cyclic
123    END SUBROUTINE cxios_get_filegroup_cyclic
124
125    FUNCTION cxios_is_defined_filegroup_cyclic(filegroup_hdl) BIND(C)
126      USE ISO_C_BINDING
127      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_cyclic
128      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
129    END FUNCTION cxios_is_defined_filegroup_cyclic
130
131
[326]132    SUBROUTINE cxios_set_filegroup_description(filegroup_hdl, description, description_size) BIND(C)
133      USE ISO_C_BINDING
134      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
135      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: description
136      INTEGER  (kind = C_INT)     , VALUE        :: description_size
137    END SUBROUTINE cxios_set_filegroup_description
[581]138
[326]139    SUBROUTINE cxios_get_filegroup_description(filegroup_hdl, description, description_size) BIND(C)
140      USE ISO_C_BINDING
141      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
142      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: description
143      INTEGER  (kind = C_INT)     , VALUE        :: description_size
144    END SUBROUTINE cxios_get_filegroup_description
[581]145
146    FUNCTION cxios_is_defined_filegroup_description(filegroup_hdl) BIND(C)
[432]147      USE ISO_C_BINDING
148      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_description
149      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
150    END FUNCTION cxios_is_defined_filegroup_description
[581]151
152
[326]153    SUBROUTINE cxios_set_filegroup_enabled(filegroup_hdl, enabled) BIND(C)
154      USE ISO_C_BINDING
155      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
156      LOGICAL (KIND=C_BOOL)      , VALUE :: enabled
157    END SUBROUTINE cxios_set_filegroup_enabled
[581]158
[326]159    SUBROUTINE cxios_get_filegroup_enabled(filegroup_hdl, enabled) BIND(C)
160      USE ISO_C_BINDING
161      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
162      LOGICAL (KIND=C_BOOL)             :: enabled
163    END SUBROUTINE cxios_get_filegroup_enabled
[581]164
165    FUNCTION cxios_is_defined_filegroup_enabled(filegroup_hdl) BIND(C)
[432]166      USE ISO_C_BINDING
167      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_enabled
168      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
169    END FUNCTION cxios_is_defined_filegroup_enabled
[581]170
171
[517]172    SUBROUTINE cxios_set_filegroup_format(filegroup_hdl, format, format_size) BIND(C)
173      USE ISO_C_BINDING
174      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
175      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: format
176      INTEGER  (kind = C_INT)     , VALUE        :: format_size
177    END SUBROUTINE cxios_set_filegroup_format
[581]178
[517]179    SUBROUTINE cxios_get_filegroup_format(filegroup_hdl, format, format_size) BIND(C)
180      USE ISO_C_BINDING
181      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
182      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: format
183      INTEGER  (kind = C_INT)     , VALUE        :: format_size
184    END SUBROUTINE cxios_get_filegroup_format
[581]185
186    FUNCTION cxios_is_defined_filegroup_format(filegroup_hdl) BIND(C)
[517]187      USE ISO_C_BINDING
188      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_format
189      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
190    END FUNCTION cxios_is_defined_filegroup_format
[581]191
192
[326]193    SUBROUTINE cxios_set_filegroup_group_ref(filegroup_hdl, group_ref, group_ref_size) BIND(C)
194      USE ISO_C_BINDING
195      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
196      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: group_ref
197      INTEGER  (kind = C_INT)     , VALUE        :: group_ref_size
198    END SUBROUTINE cxios_set_filegroup_group_ref
[581]199
[326]200    SUBROUTINE cxios_get_filegroup_group_ref(filegroup_hdl, group_ref, group_ref_size) BIND(C)
201      USE ISO_C_BINDING
202      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
203      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: group_ref
204      INTEGER  (kind = C_INT)     , VALUE        :: group_ref_size
205    END SUBROUTINE cxios_get_filegroup_group_ref
[581]206
207    FUNCTION cxios_is_defined_filegroup_group_ref(filegroup_hdl) BIND(C)
[432]208      USE ISO_C_BINDING
209      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_group_ref
210      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
211    END FUNCTION cxios_is_defined_filegroup_group_ref
[581]212
213
[415]214    SUBROUTINE cxios_set_filegroup_min_digits(filegroup_hdl, min_digits) BIND(C)
215      USE ISO_C_BINDING
216      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
217      INTEGER (KIND=C_INT)      , VALUE :: min_digits
218    END SUBROUTINE cxios_set_filegroup_min_digits
[581]219
[415]220    SUBROUTINE cxios_get_filegroup_min_digits(filegroup_hdl, min_digits) BIND(C)
221      USE ISO_C_BINDING
222      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
223      INTEGER (KIND=C_INT)             :: min_digits
224    END SUBROUTINE cxios_get_filegroup_min_digits
[581]225
226    FUNCTION cxios_is_defined_filegroup_min_digits(filegroup_hdl) BIND(C)
[432]227      USE ISO_C_BINDING
228      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_min_digits
229      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
230    END FUNCTION cxios_is_defined_filegroup_min_digits
[581]231
232
[598]233    SUBROUTINE cxios_set_filegroup_mode(filegroup_hdl, mode, mode_size) BIND(C)
234      USE ISO_C_BINDING
235      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
236      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: mode
237      INTEGER  (kind = C_INT)     , VALUE        :: mode_size
238    END SUBROUTINE cxios_set_filegroup_mode
239
240    SUBROUTINE cxios_get_filegroup_mode(filegroup_hdl, mode, mode_size) BIND(C)
241      USE ISO_C_BINDING
242      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
243      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: mode
244      INTEGER  (kind = C_INT)     , VALUE        :: mode_size
245    END SUBROUTINE cxios_get_filegroup_mode
246
247    FUNCTION cxios_is_defined_filegroup_mode(filegroup_hdl) BIND(C)
248      USE ISO_C_BINDING
249      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_mode
250      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
251    END FUNCTION cxios_is_defined_filegroup_mode
252
253
[326]254    SUBROUTINE cxios_set_filegroup_name(filegroup_hdl, name, name_size) BIND(C)
255      USE ISO_C_BINDING
256      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
257      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: name
258      INTEGER  (kind = C_INT)     , VALUE        :: name_size
259    END SUBROUTINE cxios_set_filegroup_name
[581]260
[326]261    SUBROUTINE cxios_get_filegroup_name(filegroup_hdl, name, name_size) BIND(C)
262      USE ISO_C_BINDING
263      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
264      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: name
265      INTEGER  (kind = C_INT)     , VALUE        :: name_size
266    END SUBROUTINE cxios_get_filegroup_name
[581]267
268    FUNCTION cxios_is_defined_filegroup_name(filegroup_hdl) BIND(C)
[432]269      USE ISO_C_BINDING
270      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_name
271      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
272    END FUNCTION cxios_is_defined_filegroup_name
[581]273
274
[326]275    SUBROUTINE cxios_set_filegroup_name_suffix(filegroup_hdl, name_suffix, name_suffix_size) BIND(C)
276      USE ISO_C_BINDING
277      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
278      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: name_suffix
279      INTEGER  (kind = C_INT)     , VALUE        :: name_suffix_size
280    END SUBROUTINE cxios_set_filegroup_name_suffix
[581]281
[326]282    SUBROUTINE cxios_get_filegroup_name_suffix(filegroup_hdl, name_suffix, name_suffix_size) BIND(C)
283      USE ISO_C_BINDING
284      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
285      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: name_suffix
286      INTEGER  (kind = C_INT)     , VALUE        :: name_suffix_size
287    END SUBROUTINE cxios_get_filegroup_name_suffix
[581]288
289    FUNCTION cxios_is_defined_filegroup_name_suffix(filegroup_hdl) BIND(C)
[432]290      USE ISO_C_BINDING
291      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_name_suffix
292      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
293    END FUNCTION cxios_is_defined_filegroup_name_suffix
[581]294
295
[538]296    SUBROUTINE cxios_set_filegroup_output_freq(filegroup_hdl, output_freq) BIND(C)
[326]297      USE ISO_C_BINDING
[545]298      USE IDURATION
[326]299      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
[538]300      TYPE(txios(duration)), VALUE :: output_freq
[326]301    END SUBROUTINE cxios_set_filegroup_output_freq
[581]302
[538]303    SUBROUTINE cxios_get_filegroup_output_freq(filegroup_hdl, output_freq) BIND(C)
[326]304      USE ISO_C_BINDING
[545]305      USE IDURATION
[326]306      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
[538]307      TYPE(txios(duration)) :: output_freq
[326]308    END SUBROUTINE cxios_get_filegroup_output_freq
[581]309
310    FUNCTION cxios_is_defined_filegroup_output_freq(filegroup_hdl) BIND(C)
[432]311      USE ISO_C_BINDING
312      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_output_freq
313      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
314    END FUNCTION cxios_is_defined_filegroup_output_freq
[581]315
316
[326]317    SUBROUTINE cxios_set_filegroup_output_level(filegroup_hdl, output_level) BIND(C)
318      USE ISO_C_BINDING
319      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
320      INTEGER (KIND=C_INT)      , VALUE :: output_level
321    END SUBROUTINE cxios_set_filegroup_output_level
[581]322
[326]323    SUBROUTINE cxios_get_filegroup_output_level(filegroup_hdl, output_level) BIND(C)
324      USE ISO_C_BINDING
325      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
326      INTEGER (KIND=C_INT)             :: output_level
327    END SUBROUTINE cxios_get_filegroup_output_level
[581]328
329    FUNCTION cxios_is_defined_filegroup_output_level(filegroup_hdl) BIND(C)
[432]330      USE ISO_C_BINDING
331      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_output_level
332      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
333    END FUNCTION cxios_is_defined_filegroup_output_level
[581]334
335
[336]336    SUBROUTINE cxios_set_filegroup_par_access(filegroup_hdl, par_access, par_access_size) BIND(C)
337      USE ISO_C_BINDING
338      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
339      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: par_access
340      INTEGER  (kind = C_INT)     , VALUE        :: par_access_size
341    END SUBROUTINE cxios_set_filegroup_par_access
[581]342
[336]343    SUBROUTINE cxios_get_filegroup_par_access(filegroup_hdl, par_access, par_access_size) BIND(C)
344      USE ISO_C_BINDING
345      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
346      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: par_access
347      INTEGER  (kind = C_INT)     , VALUE        :: par_access_size
348    END SUBROUTINE cxios_get_filegroup_par_access
[581]349
350    FUNCTION cxios_is_defined_filegroup_par_access(filegroup_hdl) BIND(C)
[432]351      USE ISO_C_BINDING
352      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_par_access
353      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
354    END FUNCTION cxios_is_defined_filegroup_par_access
[581]355
356
[1492]357    SUBROUTINE cxios_set_filegroup_read_metadata_par(filegroup_hdl, read_metadata_par) BIND(C)
358      USE ISO_C_BINDING
359      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
360      LOGICAL (KIND=C_BOOL)      , VALUE :: read_metadata_par
361    END SUBROUTINE cxios_set_filegroup_read_metadata_par
362
363    SUBROUTINE cxios_get_filegroup_read_metadata_par(filegroup_hdl, read_metadata_par) BIND(C)
364      USE ISO_C_BINDING
365      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
366      LOGICAL (KIND=C_BOOL)             :: read_metadata_par
367    END SUBROUTINE cxios_get_filegroup_read_metadata_par
368
369    FUNCTION cxios_is_defined_filegroup_read_metadata_par(filegroup_hdl) BIND(C)
370      USE ISO_C_BINDING
371      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_read_metadata_par
372      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
373    END FUNCTION cxios_is_defined_filegroup_read_metadata_par
374
375
[779]376    SUBROUTINE cxios_set_filegroup_record_offset(filegroup_hdl, record_offset) BIND(C)
377      USE ISO_C_BINDING
378      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
379      INTEGER (KIND=C_INT)      , VALUE :: record_offset
380    END SUBROUTINE cxios_set_filegroup_record_offset
381
382    SUBROUTINE cxios_get_filegroup_record_offset(filegroup_hdl, record_offset) BIND(C)
383      USE ISO_C_BINDING
384      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
385      INTEGER (KIND=C_INT)             :: record_offset
386    END SUBROUTINE cxios_get_filegroup_record_offset
387
388    FUNCTION cxios_is_defined_filegroup_record_offset(filegroup_hdl) BIND(C)
389      USE ISO_C_BINDING
390      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_record_offset
391      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
392    END FUNCTION cxios_is_defined_filegroup_record_offset
393
394
[1492]395    SUBROUTINE cxios_set_filegroup_split_end_offset(filegroup_hdl, split_end_offset) BIND(C)
396      USE ISO_C_BINDING
397      USE IDURATION
398      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
399      TYPE(txios(duration)), VALUE :: split_end_offset
400    END SUBROUTINE cxios_set_filegroup_split_end_offset
401
402    SUBROUTINE cxios_get_filegroup_split_end_offset(filegroup_hdl, split_end_offset) BIND(C)
403      USE ISO_C_BINDING
404      USE IDURATION
405      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
406      TYPE(txios(duration)) :: split_end_offset
407    END SUBROUTINE cxios_get_filegroup_split_end_offset
408
409    FUNCTION cxios_is_defined_filegroup_split_end_offset(filegroup_hdl) BIND(C)
410      USE ISO_C_BINDING
411      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_split_end_offset
412      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
413    END FUNCTION cxios_is_defined_filegroup_split_end_offset
414
415
[538]416    SUBROUTINE cxios_set_filegroup_split_freq(filegroup_hdl, split_freq) BIND(C)
[326]417      USE ISO_C_BINDING
[545]418      USE IDURATION
[326]419      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
[538]420      TYPE(txios(duration)), VALUE :: split_freq
[326]421    END SUBROUTINE cxios_set_filegroup_split_freq
[581]422
[538]423    SUBROUTINE cxios_get_filegroup_split_freq(filegroup_hdl, split_freq) BIND(C)
[326]424      USE ISO_C_BINDING
[545]425      USE IDURATION
[326]426      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
[538]427      TYPE(txios(duration)) :: split_freq
[326]428    END SUBROUTINE cxios_get_filegroup_split_freq
[581]429
430    FUNCTION cxios_is_defined_filegroup_split_freq(filegroup_hdl) BIND(C)
[432]431      USE ISO_C_BINDING
432      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_split_freq
433      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
434    END FUNCTION cxios_is_defined_filegroup_split_freq
[581]435
436
[432]437    SUBROUTINE cxios_set_filegroup_split_freq_format(filegroup_hdl, split_freq_format, split_freq_format_size) BIND(C)
438      USE ISO_C_BINDING
439      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
440      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: split_freq_format
441      INTEGER  (kind = C_INT)     , VALUE        :: split_freq_format_size
442    END SUBROUTINE cxios_set_filegroup_split_freq_format
[581]443
[432]444    SUBROUTINE cxios_get_filegroup_split_freq_format(filegroup_hdl, split_freq_format, split_freq_format_size) BIND(C)
445      USE ISO_C_BINDING
446      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
447      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: split_freq_format
448      INTEGER  (kind = C_INT)     , VALUE        :: split_freq_format_size
449    END SUBROUTINE cxios_get_filegroup_split_freq_format
[581]450
451    FUNCTION cxios_is_defined_filegroup_split_freq_format(filegroup_hdl) BIND(C)
[432]452      USE ISO_C_BINDING
453      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_split_freq_format
454      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
455    END FUNCTION cxios_is_defined_filegroup_split_freq_format
[581]456
457
[1492]458    SUBROUTINE cxios_set_filegroup_split_last_date(filegroup_hdl, split_last_date, split_last_date_size) BIND(C)
459      USE ISO_C_BINDING
460      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
461      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: split_last_date
462      INTEGER  (kind = C_INT)     , VALUE        :: split_last_date_size
463    END SUBROUTINE cxios_set_filegroup_split_last_date
464
465    SUBROUTINE cxios_get_filegroup_split_last_date(filegroup_hdl, split_last_date, split_last_date_size) BIND(C)
466      USE ISO_C_BINDING
467      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
468      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: split_last_date
469      INTEGER  (kind = C_INT)     , VALUE        :: split_last_date_size
470    END SUBROUTINE cxios_get_filegroup_split_last_date
471
472    FUNCTION cxios_is_defined_filegroup_split_last_date(filegroup_hdl) BIND(C)
473      USE ISO_C_BINDING
474      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_split_last_date
475      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
476    END FUNCTION cxios_is_defined_filegroup_split_last_date
477
478
479    SUBROUTINE cxios_set_filegroup_split_start_offset(filegroup_hdl, split_start_offset) BIND(C)
480      USE ISO_C_BINDING
481      USE IDURATION
482      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
483      TYPE(txios(duration)), VALUE :: split_start_offset
484    END SUBROUTINE cxios_set_filegroup_split_start_offset
485
486    SUBROUTINE cxios_get_filegroup_split_start_offset(filegroup_hdl, split_start_offset) BIND(C)
487      USE ISO_C_BINDING
488      USE IDURATION
489      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
490      TYPE(txios(duration)) :: split_start_offset
491    END SUBROUTINE cxios_get_filegroup_split_start_offset
492
493    FUNCTION cxios_is_defined_filegroup_split_start_offset(filegroup_hdl) BIND(C)
494      USE ISO_C_BINDING
495      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_split_start_offset
496      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
497    END FUNCTION cxios_is_defined_filegroup_split_start_offset
498
499
[538]500    SUBROUTINE cxios_set_filegroup_sync_freq(filegroup_hdl, sync_freq) BIND(C)
[326]501      USE ISO_C_BINDING
[545]502      USE IDURATION
[326]503      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
[538]504      TYPE(txios(duration)), VALUE :: sync_freq
[326]505    END SUBROUTINE cxios_set_filegroup_sync_freq
[581]506
[538]507    SUBROUTINE cxios_get_filegroup_sync_freq(filegroup_hdl, sync_freq) BIND(C)
[326]508      USE ISO_C_BINDING
[545]509      USE IDURATION
[326]510      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
[538]511      TYPE(txios(duration)) :: sync_freq
[326]512    END SUBROUTINE cxios_get_filegroup_sync_freq
[581]513
514    FUNCTION cxios_is_defined_filegroup_sync_freq(filegroup_hdl) BIND(C)
[432]515      USE ISO_C_BINDING
516      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_sync_freq
517      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
518    END FUNCTION cxios_is_defined_filegroup_sync_freq
[581]519
520
[699]521    SUBROUTINE cxios_set_filegroup_time_counter(filegroup_hdl, time_counter, time_counter_size) BIND(C)
522      USE ISO_C_BINDING
523      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
524      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: time_counter
525      INTEGER  (kind = C_INT)     , VALUE        :: time_counter_size
526    END SUBROUTINE cxios_set_filegroup_time_counter
527
528    SUBROUTINE cxios_get_filegroup_time_counter(filegroup_hdl, time_counter, time_counter_size) BIND(C)
529      USE ISO_C_BINDING
530      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
531      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: time_counter
532      INTEGER  (kind = C_INT)     , VALUE        :: time_counter_size
533    END SUBROUTINE cxios_get_filegroup_time_counter
534
535    FUNCTION cxios_is_defined_filegroup_time_counter(filegroup_hdl) BIND(C)
536      USE ISO_C_BINDING
537      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_time_counter
538      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
539    END FUNCTION cxios_is_defined_filegroup_time_counter
540
541
[802]542    SUBROUTINE cxios_set_filegroup_time_counter_name(filegroup_hdl, time_counter_name, time_counter_name_size) BIND(C)
543      USE ISO_C_BINDING
544      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
545      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: time_counter_name
546      INTEGER  (kind = C_INT)     , VALUE        :: time_counter_name_size
547    END SUBROUTINE cxios_set_filegroup_time_counter_name
548
549    SUBROUTINE cxios_get_filegroup_time_counter_name(filegroup_hdl, time_counter_name, time_counter_name_size) BIND(C)
550      USE ISO_C_BINDING
551      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
552      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: time_counter_name
553      INTEGER  (kind = C_INT)     , VALUE        :: time_counter_name_size
554    END SUBROUTINE cxios_get_filegroup_time_counter_name
555
556    FUNCTION cxios_is_defined_filegroup_time_counter_name(filegroup_hdl) BIND(C)
557      USE ISO_C_BINDING
558      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_time_counter_name
559      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
560    END FUNCTION cxios_is_defined_filegroup_time_counter_name
561
562
[1158]563    SUBROUTINE cxios_set_filegroup_time_stamp_format(filegroup_hdl, time_stamp_format, time_stamp_format_size) BIND(C)
564      USE ISO_C_BINDING
565      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
566      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: time_stamp_format
567      INTEGER  (kind = C_INT)     , VALUE        :: time_stamp_format_size
568    END SUBROUTINE cxios_set_filegroup_time_stamp_format
569
570    SUBROUTINE cxios_get_filegroup_time_stamp_format(filegroup_hdl, time_stamp_format, time_stamp_format_size) BIND(C)
571      USE ISO_C_BINDING
572      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
573      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: time_stamp_format
574      INTEGER  (kind = C_INT)     , VALUE        :: time_stamp_format_size
575    END SUBROUTINE cxios_get_filegroup_time_stamp_format
576
577    FUNCTION cxios_is_defined_filegroup_time_stamp_format(filegroup_hdl) BIND(C)
578      USE ISO_C_BINDING
579      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_time_stamp_format
580      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
581    END FUNCTION cxios_is_defined_filegroup_time_stamp_format
582
583
584    SUBROUTINE cxios_set_filegroup_time_stamp_name(filegroup_hdl, time_stamp_name, time_stamp_name_size) BIND(C)
585      USE ISO_C_BINDING
586      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
587      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: time_stamp_name
588      INTEGER  (kind = C_INT)     , VALUE        :: time_stamp_name_size
589    END SUBROUTINE cxios_set_filegroup_time_stamp_name
590
591    SUBROUTINE cxios_get_filegroup_time_stamp_name(filegroup_hdl, time_stamp_name, time_stamp_name_size) BIND(C)
592      USE ISO_C_BINDING
593      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
594      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: time_stamp_name
595      INTEGER  (kind = C_INT)     , VALUE        :: time_stamp_name_size
596    END SUBROUTINE cxios_get_filegroup_time_stamp_name
597
598    FUNCTION cxios_is_defined_filegroup_time_stamp_name(filegroup_hdl) BIND(C)
599      USE ISO_C_BINDING
600      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_time_stamp_name
601      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
602    END FUNCTION cxios_is_defined_filegroup_time_stamp_name
603
604
605    SUBROUTINE cxios_set_filegroup_time_units(filegroup_hdl, time_units, time_units_size) BIND(C)
606      USE ISO_C_BINDING
607      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
608      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: time_units
609      INTEGER  (kind = C_INT)     , VALUE        :: time_units_size
610    END SUBROUTINE cxios_set_filegroup_time_units
611
612    SUBROUTINE cxios_get_filegroup_time_units(filegroup_hdl, time_units, time_units_size) BIND(C)
613      USE ISO_C_BINDING
614      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
615      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: time_units
616      INTEGER  (kind = C_INT)     , VALUE        :: time_units_size
617    END SUBROUTINE cxios_get_filegroup_time_units
618
619    FUNCTION cxios_is_defined_filegroup_time_units(filegroup_hdl) BIND(C)
620      USE ISO_C_BINDING
621      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_time_units
622      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
623    END FUNCTION cxios_is_defined_filegroup_time_units
624
625
[711]626    SUBROUTINE cxios_set_filegroup_timeseries(filegroup_hdl, timeseries, timeseries_size) BIND(C)
627      USE ISO_C_BINDING
628      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
629      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: timeseries
630      INTEGER  (kind = C_INT)     , VALUE        :: timeseries_size
631    END SUBROUTINE cxios_set_filegroup_timeseries
632
633    SUBROUTINE cxios_get_filegroup_timeseries(filegroup_hdl, timeseries, timeseries_size) BIND(C)
634      USE ISO_C_BINDING
635      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
636      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: timeseries
637      INTEGER  (kind = C_INT)     , VALUE        :: timeseries_size
638    END SUBROUTINE cxios_get_filegroup_timeseries
639
640    FUNCTION cxios_is_defined_filegroup_timeseries(filegroup_hdl) BIND(C)
641      USE ISO_C_BINDING
642      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_timeseries
643      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
644    END FUNCTION cxios_is_defined_filegroup_timeseries
645
646
647    SUBROUTINE cxios_set_filegroup_ts_prefix(filegroup_hdl, ts_prefix, ts_prefix_size) BIND(C)
648      USE ISO_C_BINDING
649      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
650      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: ts_prefix
651      INTEGER  (kind = C_INT)     , VALUE        :: ts_prefix_size
652    END SUBROUTINE cxios_set_filegroup_ts_prefix
653
654    SUBROUTINE cxios_get_filegroup_ts_prefix(filegroup_hdl, ts_prefix, ts_prefix_size) BIND(C)
655      USE ISO_C_BINDING
656      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
657      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: ts_prefix
658      INTEGER  (kind = C_INT)     , VALUE        :: ts_prefix_size
659    END SUBROUTINE cxios_get_filegroup_ts_prefix
660
661    FUNCTION cxios_is_defined_filegroup_ts_prefix(filegroup_hdl) BIND(C)
662      USE ISO_C_BINDING
663      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_ts_prefix
664      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
665    END FUNCTION cxios_is_defined_filegroup_ts_prefix
666
667
[326]668    SUBROUTINE cxios_set_filegroup_type(filegroup_hdl, type, type_size) BIND(C)
669      USE ISO_C_BINDING
670      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
671      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: type
672      INTEGER  (kind = C_INT)     , VALUE        :: type_size
673    END SUBROUTINE cxios_set_filegroup_type
[581]674
[326]675    SUBROUTINE cxios_get_filegroup_type(filegroup_hdl, type, type_size) BIND(C)
676      USE ISO_C_BINDING
677      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
678      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: type
679      INTEGER  (kind = C_INT)     , VALUE        :: type_size
680    END SUBROUTINE cxios_get_filegroup_type
[581]681
682    FUNCTION cxios_is_defined_filegroup_type(filegroup_hdl) BIND(C)
[432]683      USE ISO_C_BINDING
684      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_type
685      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
686    END FUNCTION cxios_is_defined_filegroup_type
[581]687
[1158]688
689    SUBROUTINE cxios_set_filegroup_uuid_format(filegroup_hdl, uuid_format, uuid_format_size) BIND(C)
690      USE ISO_C_BINDING
691      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
692      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: uuid_format
693      INTEGER  (kind = C_INT)     , VALUE        :: uuid_format_size
694    END SUBROUTINE cxios_set_filegroup_uuid_format
695
696    SUBROUTINE cxios_get_filegroup_uuid_format(filegroup_hdl, uuid_format, uuid_format_size) BIND(C)
697      USE ISO_C_BINDING
698      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
699      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: uuid_format
700      INTEGER  (kind = C_INT)     , VALUE        :: uuid_format_size
701    END SUBROUTINE cxios_get_filegroup_uuid_format
702
703    FUNCTION cxios_is_defined_filegroup_uuid_format(filegroup_hdl) BIND(C)
704      USE ISO_C_BINDING
705      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_uuid_format
706      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
707    END FUNCTION cxios_is_defined_filegroup_uuid_format
708
709
710    SUBROUTINE cxios_set_filegroup_uuid_name(filegroup_hdl, uuid_name, uuid_name_size) BIND(C)
711      USE ISO_C_BINDING
712      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
713      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: uuid_name
714      INTEGER  (kind = C_INT)     , VALUE        :: uuid_name_size
715    END SUBROUTINE cxios_set_filegroup_uuid_name
716
717    SUBROUTINE cxios_get_filegroup_uuid_name(filegroup_hdl, uuid_name, uuid_name_size) BIND(C)
718      USE ISO_C_BINDING
719      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
720      CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: uuid_name
721      INTEGER  (kind = C_INT)     , VALUE        :: uuid_name_size
722    END SUBROUTINE cxios_get_filegroup_uuid_name
723
724    FUNCTION cxios_is_defined_filegroup_uuid_name(filegroup_hdl) BIND(C)
725      USE ISO_C_BINDING
726      LOGICAL(kind=C_BOOL) :: cxios_is_defined_filegroup_uuid_name
727      INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
728    END FUNCTION cxios_is_defined_filegroup_uuid_name
729
[581]730  END INTERFACE
731
[326]732END MODULE filegroup_interface_attr
Note: See TracBrowser for help on using the repository browser.