Context Navigation

ifilegroup_attr.F90 @ 966

Last change on this file since 966 was 966, checked in by mhnguyen, 8 years ago

Reducing length of line of auto-generate Fortran interface

+) Break line into smaller ones to make sure each line is not longer than 132 character

Test
+) Local with gcc4.8
+) Compilation passed

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: 34.8 KB

Rev	Line
[326]	1	! * ************************************************************************** *
	2	! * Interface auto generated - do not modify *
	3	! * ************************************************************************** *
	4	#include "xios_fortran_prefix.hpp"
	5
	6	MODULE ifilegroup_attr
	7	USE, INTRINSIC :: ISO_C_BINDING
	8	USE ifile
	9	USE filegroup_interface_attr
[581]	10
[326]	11	CONTAINS
[581]	12
[326]	13	SUBROUTINE xios(set_filegroup_attr) &
[932]	14	( filegroup_id, append, compression_level, convention, cyclic, description, enabled, format &
	15	, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level, par_access, record_offset &
	16	, split_freq, split_freq_format, sync_freq, time_counter, time_counter_name, timeseries, ts_prefix &
	17	, type )
[581]	18
[326]	19	IMPLICIT NONE
	20	TYPE(txios(filegroup)) :: filegroup_hdl
	21	CHARACTER(LEN=*), INTENT(IN) ::filegroup_id
[528]	22	LOGICAL , OPTIONAL, INTENT(IN) :: append
	23	LOGICAL (KIND=C_BOOL) :: append_tmp
[608]	24	INTEGER , OPTIONAL, INTENT(IN) :: compression_level
[932]	25	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: convention
[891]	26	LOGICAL , OPTIONAL, INTENT(IN) :: cyclic
	27	LOGICAL (KIND=C_BOOL) :: cyclic_tmp
[326]	28	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: description
	29	LOGICAL , OPTIONAL, INTENT(IN) :: enabled
	30	LOGICAL (KIND=C_BOOL) :: enabled_tmp
[517]	31	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: format
[326]	32	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: group_ref
[415]	33	INTEGER , OPTIONAL, INTENT(IN) :: min_digits
[598]	34	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: mode
[326]	35	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name
	36	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name_suffix
[538]	37	TYPE(txios(duration)) , OPTIONAL, INTENT(IN) :: output_freq
[326]	38	INTEGER , OPTIONAL, INTENT(IN) :: output_level
[369]	39	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: par_access
[779]	40	INTEGER , OPTIONAL, INTENT(IN) :: record_offset
[538]	41	TYPE(txios(duration)) , OPTIONAL, INTENT(IN) :: split_freq
[432]	42	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: split_freq_format
[538]	43	TYPE(txios(duration)) , OPTIONAL, INTENT(IN) :: sync_freq
[699]	44	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_counter
[802]	45	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_counter_name
[711]	46	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: timeseries
	47	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: ts_prefix
[326]	48	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: type
[581]	49
[966]	50	CALL xios(get_filegroup_handle) &
	51	(filegroup_id,filegroup_hdl)
[326]	52	CALL xios(set_filegroup_attr_hdl_) &
[932]	53	( filegroup_hdl, append, compression_level, convention, cyclic, description, enabled, format &
	54	, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level, par_access, record_offset &
[891]	55	, split_freq, split_freq_format, sync_freq, time_counter, time_counter_name, timeseries, ts_prefix &
	56	, type )
[581]	57
[326]	58	END SUBROUTINE xios(set_filegroup_attr)
[581]	59
[326]	60	SUBROUTINE xios(set_filegroup_attr_hdl) &
[932]	61	( filegroup_hdl, append, compression_level, convention, cyclic, description, enabled, format &
	62	, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level, par_access, record_offset &
[891]	63	, split_freq, split_freq_format, sync_freq, time_counter, time_counter_name, timeseries, ts_prefix &
	64	, type )
[581]	65
[326]	66	IMPLICIT NONE
	67	TYPE(txios(filegroup)) , INTENT(IN) :: filegroup_hdl
[528]	68	LOGICAL , OPTIONAL, INTENT(IN) :: append
	69	LOGICAL (KIND=C_BOOL) :: append_tmp
[608]	70	INTEGER , OPTIONAL, INTENT(IN) :: compression_level
[932]	71	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: convention
[891]	72	LOGICAL , OPTIONAL, INTENT(IN) :: cyclic
	73	LOGICAL (KIND=C_BOOL) :: cyclic_tmp
[326]	74	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: description
	75	LOGICAL , OPTIONAL, INTENT(IN) :: enabled
	76	LOGICAL (KIND=C_BOOL) :: enabled_tmp
[517]	77	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: format
[326]	78	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: group_ref
[415]	79	INTEGER , OPTIONAL, INTENT(IN) :: min_digits
[598]	80	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: mode
[326]	81	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name
	82	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name_suffix
[538]	83	TYPE(txios(duration)) , OPTIONAL, INTENT(IN) :: output_freq
[326]	84	INTEGER , OPTIONAL, INTENT(IN) :: output_level
[369]	85	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: par_access
[779]	86	INTEGER , OPTIONAL, INTENT(IN) :: record_offset
[538]	87	TYPE(txios(duration)) , OPTIONAL, INTENT(IN) :: split_freq
[432]	88	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: split_freq_format
[538]	89	TYPE(txios(duration)) , OPTIONAL, INTENT(IN) :: sync_freq
[699]	90	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_counter
[802]	91	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_counter_name
[711]	92	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: timeseries
	93	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: ts_prefix
[326]	94	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: type
[581]	95
[326]	96	CALL xios(set_filegroup_attr_hdl_) &
[932]	97	( filegroup_hdl, append, compression_level, convention, cyclic, description, enabled, format &
	98	, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level, par_access, record_offset &
[891]	99	, split_freq, split_freq_format, sync_freq, time_counter, time_counter_name, timeseries, ts_prefix &
	100	, type )
[581]	101
[326]	102	END SUBROUTINE xios(set_filegroup_attr_hdl)
[581]	103
[326]	104	SUBROUTINE xios(set_filegroup_attr_hdl_) &
[932]	105	( filegroup_hdl, append_, compression_level_, convention_, cyclic_, description_, enabled_, format_ &
	106	, group_ref_, min_digits_, mode_, name_, name_suffix_, output_freq_, output_level_, par_access_ &
	107	, record_offset_, split_freq_, split_freq_format_, sync_freq_, time_counter_, time_counter_name_ &
	108	, timeseries_, ts_prefix_, type_ )
[581]	109
[326]	110	IMPLICIT NONE
	111	TYPE(txios(filegroup)) , INTENT(IN) :: filegroup_hdl
[528]	112	LOGICAL , OPTIONAL, INTENT(IN) :: append_
	113	LOGICAL (KIND=C_BOOL) :: append__tmp
[608]	114	INTEGER , OPTIONAL, INTENT(IN) :: compression_level_
[932]	115	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: convention_
[891]	116	LOGICAL , OPTIONAL, INTENT(IN) :: cyclic_
	117	LOGICAL (KIND=C_BOOL) :: cyclic__tmp
[326]	118	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: description_
	119	LOGICAL , OPTIONAL, INTENT(IN) :: enabled_
	120	LOGICAL (KIND=C_BOOL) :: enabled__tmp
[517]	121	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: format_
[326]	122	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: group_ref_
[415]	123	INTEGER , OPTIONAL, INTENT(IN) :: min_digits_
[598]	124	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: mode_
[326]	125	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name_
	126	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name_suffix_
[538]	127	TYPE(txios(duration)) , OPTIONAL, INTENT(IN) :: output_freq_
[326]	128	INTEGER , OPTIONAL, INTENT(IN) :: output_level_
[369]	129	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: par_access_
[779]	130	INTEGER , OPTIONAL, INTENT(IN) :: record_offset_
[538]	131	TYPE(txios(duration)) , OPTIONAL, INTENT(IN) :: split_freq_
[432]	132	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: split_freq_format_
[538]	133	TYPE(txios(duration)) , OPTIONAL, INTENT(IN) :: sync_freq_
[699]	134	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_counter_
[802]	135	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: time_counter_name_
[711]	136	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: timeseries_
	137	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: ts_prefix_
[326]	138	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: type_
[581]	139
[528]	140	IF (PRESENT(append_)) THEN
[581]	141	append__tmp = append_
[966]	142	CALL cxios_set_filegroup_append &
	143	(filegroup_hdl%daddr, append__tmp)
[528]	144	ENDIF
[581]	145
[608]	146	IF (PRESENT(compression_level_)) THEN
[966]	147	CALL cxios_set_filegroup_compression_level &
	148	(filegroup_hdl%daddr, compression_level_)
[608]	149	ENDIF
	150
[932]	151	IF (PRESENT(convention_)) THEN
[966]	152	CALL cxios_set_filegroup_convention &
	153	(filegroup_hdl%daddr, convention_, len(convention_))
[932]	154	ENDIF
	155
[891]	156	IF (PRESENT(cyclic_)) THEN
	157	cyclic__tmp = cyclic_
[966]	158	CALL cxios_set_filegroup_cyclic &
	159	(filegroup_hdl%daddr, cyclic__tmp)
[891]	160	ENDIF
	161
[326]	162	IF (PRESENT(description_)) THEN
[966]	163	CALL cxios_set_filegroup_description &
	164	(filegroup_hdl%daddr, description_, len(description_))
[326]	165	ENDIF
[581]	166
[326]	167	IF (PRESENT(enabled_)) THEN
[581]	168	enabled__tmp = enabled_
[966]	169	CALL cxios_set_filegroup_enabled &
	170	(filegroup_hdl%daddr, enabled__tmp)
[326]	171	ENDIF
[581]	172
[517]	173	IF (PRESENT(format_)) THEN
[966]	174	CALL cxios_set_filegroup_format &
	175	(filegroup_hdl%daddr, format_, len(format_))
[517]	176	ENDIF
[581]	177
[326]	178	IF (PRESENT(group_ref_)) THEN
[966]	179	CALL cxios_set_filegroup_group_ref &
	180	(filegroup_hdl%daddr, group_ref_, len(group_ref_))
[326]	181	ENDIF
[581]	182
[415]	183	IF (PRESENT(min_digits_)) THEN
[966]	184	CALL cxios_set_filegroup_min_digits &
	185	(filegroup_hdl%daddr, min_digits_)
[415]	186	ENDIF
[581]	187
[598]	188	IF (PRESENT(mode_)) THEN
[966]	189	CALL cxios_set_filegroup_mode &
	190	(filegroup_hdl%daddr, mode_, len(mode_))
[598]	191	ENDIF
	192
[326]	193	IF (PRESENT(name_)) THEN
[966]	194	CALL cxios_set_filegroup_name &
	195	(filegroup_hdl%daddr, name_, len(name_))
[326]	196	ENDIF
[581]	197
[326]	198	IF (PRESENT(name_suffix_)) THEN
[966]	199	CALL cxios_set_filegroup_name_suffix &
	200	(filegroup_hdl%daddr, name_suffix_, len(name_suffix_))
[326]	201	ENDIF
[581]	202
[326]	203	IF (PRESENT(output_freq_)) THEN
[966]	204	CALL cxios_set_filegroup_output_freq &
	205	(filegroup_hdl%daddr, output_freq_)
[326]	206	ENDIF
[581]	207
[326]	208	IF (PRESENT(output_level_)) THEN
[966]	209	CALL cxios_set_filegroup_output_level &
	210	(filegroup_hdl%daddr, output_level_)
[326]	211	ENDIF
[581]	212
[369]	213	IF (PRESENT(par_access_)) THEN
[966]	214	CALL cxios_set_filegroup_par_access &
	215	(filegroup_hdl%daddr, par_access_, len(par_access_))
[369]	216	ENDIF
[581]	217
[779]	218	IF (PRESENT(record_offset_)) THEN
[966]	219	CALL cxios_set_filegroup_record_offset &
	220	(filegroup_hdl%daddr, record_offset_)
[779]	221	ENDIF
	222
[326]	223	IF (PRESENT(split_freq_)) THEN
[966]	224	CALL cxios_set_filegroup_split_freq &
	225	(filegroup_hdl%daddr, split_freq_)
[326]	226	ENDIF
[581]	227
[432]	228	IF (PRESENT(split_freq_format_)) THEN
[966]	229	CALL cxios_set_filegroup_split_freq_format &
	230	(filegroup_hdl%daddr, split_freq_format_, len(split_freq_format_))
[432]	231	ENDIF
[581]	232
[326]	233	IF (PRESENT(sync_freq_)) THEN
[966]	234	CALL cxios_set_filegroup_sync_freq &
	235	(filegroup_hdl%daddr, sync_freq_)
[326]	236	ENDIF
[581]	237
[699]	238	IF (PRESENT(time_counter_)) THEN
[966]	239	CALL cxios_set_filegroup_time_counter &
	240	(filegroup_hdl%daddr, time_counter_, len(time_counter_))
[699]	241	ENDIF
	242
[802]	243	IF (PRESENT(time_counter_name_)) THEN
[966]	244	CALL cxios_set_filegroup_time_counter_name &
	245	(filegroup_hdl%daddr, time_counter_name_, len(time_counter_name_))
[802]	246	ENDIF
	247
[711]	248	IF (PRESENT(timeseries_)) THEN
[966]	249	CALL cxios_set_filegroup_timeseries &
	250	(filegroup_hdl%daddr, timeseries_, len(timeseries_))
[711]	251	ENDIF
	252
	253	IF (PRESENT(ts_prefix_)) THEN
[966]	254	CALL cxios_set_filegroup_ts_prefix &
	255	(filegroup_hdl%daddr, ts_prefix_, len(ts_prefix_))
[711]	256	ENDIF
	257
[326]	258	IF (PRESENT(type_)) THEN
[966]	259	CALL cxios_set_filegroup_type &
	260	(filegroup_hdl%daddr, type_, len(type_))
[326]	261	ENDIF
[581]	262
[326]	263	END SUBROUTINE xios(set_filegroup_attr_hdl_)
[581]	264
[326]	265	SUBROUTINE xios(get_filegroup_attr) &
[932]	266	( filegroup_id, append, compression_level, convention, cyclic, description, enabled, format &
	267	, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level, par_access, record_offset &
	268	, split_freq, split_freq_format, sync_freq, time_counter, time_counter_name, timeseries, ts_prefix &
	269	, type )
[581]	270
[326]	271	IMPLICIT NONE
	272	TYPE(txios(filegroup)) :: filegroup_hdl
	273	CHARACTER(LEN=*), INTENT(IN) ::filegroup_id
[528]	274	LOGICAL , OPTIONAL, INTENT(OUT) :: append
	275	LOGICAL (KIND=C_BOOL) :: append_tmp
[608]	276	INTEGER , OPTIONAL, INTENT(OUT) :: compression_level
[932]	277	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: convention
[891]	278	LOGICAL , OPTIONAL, INTENT(OUT) :: cyclic
	279	LOGICAL (KIND=C_BOOL) :: cyclic_tmp
[326]	280	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: description
	281	LOGICAL , OPTIONAL, INTENT(OUT) :: enabled
	282	LOGICAL (KIND=C_BOOL) :: enabled_tmp
[517]	283	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: format
[326]	284	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: group_ref
[415]	285	INTEGER , OPTIONAL, INTENT(OUT) :: min_digits
[598]	286	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: mode
[326]	287	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name
	288	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name_suffix
[538]	289	TYPE(txios(duration)) , OPTIONAL, INTENT(OUT) :: output_freq
[326]	290	INTEGER , OPTIONAL, INTENT(OUT) :: output_level
[369]	291	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: par_access
[779]	292	INTEGER , OPTIONAL, INTENT(OUT) :: record_offset
[538]	293	TYPE(txios(duration)) , OPTIONAL, INTENT(OUT) :: split_freq
[432]	294	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: split_freq_format
[538]	295	TYPE(txios(duration)) , OPTIONAL, INTENT(OUT) :: sync_freq
[699]	296	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_counter
[802]	297	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_counter_name
[711]	298	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: timeseries
	299	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: ts_prefix
[326]	300	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: type
[581]	301
[966]	302	CALL xios(get_filegroup_handle) &
	303	(filegroup_id,filegroup_hdl)
[326]	304	CALL xios(get_filegroup_attr_hdl_) &
[932]	305	( filegroup_hdl, append, compression_level, convention, cyclic, description, enabled, format &
	306	, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level, par_access, record_offset &
[891]	307	, split_freq, split_freq_format, sync_freq, time_counter, time_counter_name, timeseries, ts_prefix &
	308	, type )
[581]	309
[326]	310	END SUBROUTINE xios(get_filegroup_attr)
[581]	311
[326]	312	SUBROUTINE xios(get_filegroup_attr_hdl) &
[932]	313	( filegroup_hdl, append, compression_level, convention, cyclic, description, enabled, format &
	314	, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level, par_access, record_offset &
[891]	315	, split_freq, split_freq_format, sync_freq, time_counter, time_counter_name, timeseries, ts_prefix &
	316	, type )
[581]	317
[326]	318	IMPLICIT NONE
	319	TYPE(txios(filegroup)) , INTENT(IN) :: filegroup_hdl
[528]	320	LOGICAL , OPTIONAL, INTENT(OUT) :: append
	321	LOGICAL (KIND=C_BOOL) :: append_tmp
[608]	322	INTEGER , OPTIONAL, INTENT(OUT) :: compression_level
[932]	323	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: convention
[891]	324	LOGICAL , OPTIONAL, INTENT(OUT) :: cyclic
	325	LOGICAL (KIND=C_BOOL) :: cyclic_tmp
[326]	326	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: description
	327	LOGICAL , OPTIONAL, INTENT(OUT) :: enabled
	328	LOGICAL (KIND=C_BOOL) :: enabled_tmp
[517]	329	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: format
[326]	330	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: group_ref
[415]	331	INTEGER , OPTIONAL, INTENT(OUT) :: min_digits
[598]	332	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: mode
[326]	333	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name
	334	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name_suffix
[538]	335	TYPE(txios(duration)) , OPTIONAL, INTENT(OUT) :: output_freq
[326]	336	INTEGER , OPTIONAL, INTENT(OUT) :: output_level
[369]	337	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: par_access
[779]	338	INTEGER , OPTIONAL, INTENT(OUT) :: record_offset
[538]	339	TYPE(txios(duration)) , OPTIONAL, INTENT(OUT) :: split_freq
[432]	340	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: split_freq_format
[538]	341	TYPE(txios(duration)) , OPTIONAL, INTENT(OUT) :: sync_freq
[699]	342	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_counter
[802]	343	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_counter_name
[711]	344	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: timeseries
	345	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: ts_prefix
[326]	346	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: type
[581]	347
[326]	348	CALL xios(get_filegroup_attr_hdl_) &
[932]	349	( filegroup_hdl, append, compression_level, convention, cyclic, description, enabled, format &
	350	, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level, par_access, record_offset &
[891]	351	, split_freq, split_freq_format, sync_freq, time_counter, time_counter_name, timeseries, ts_prefix &
	352	, type )
[581]	353
[326]	354	END SUBROUTINE xios(get_filegroup_attr_hdl)
[581]	355
[326]	356	SUBROUTINE xios(get_filegroup_attr_hdl_) &
[932]	357	( filegroup_hdl, append_, compression_level_, convention_, cyclic_, description_, enabled_, format_ &
	358	, group_ref_, min_digits_, mode_, name_, name_suffix_, output_freq_, output_level_, par_access_ &
	359	, record_offset_, split_freq_, split_freq_format_, sync_freq_, time_counter_, time_counter_name_ &
	360	, timeseries_, ts_prefix_, type_ )
[581]	361
[326]	362	IMPLICIT NONE
	363	TYPE(txios(filegroup)) , INTENT(IN) :: filegroup_hdl
[528]	364	LOGICAL , OPTIONAL, INTENT(OUT) :: append_
	365	LOGICAL (KIND=C_BOOL) :: append__tmp
[608]	366	INTEGER , OPTIONAL, INTENT(OUT) :: compression_level_
[932]	367	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: convention_
[891]	368	LOGICAL , OPTIONAL, INTENT(OUT) :: cyclic_
	369	LOGICAL (KIND=C_BOOL) :: cyclic__tmp
[326]	370	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: description_
	371	LOGICAL , OPTIONAL, INTENT(OUT) :: enabled_
	372	LOGICAL (KIND=C_BOOL) :: enabled__tmp
[517]	373	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: format_
[326]	374	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: group_ref_
[415]	375	INTEGER , OPTIONAL, INTENT(OUT) :: min_digits_
[598]	376	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: mode_
[326]	377	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name_
	378	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name_suffix_
[538]	379	TYPE(txios(duration)) , OPTIONAL, INTENT(OUT) :: output_freq_
[326]	380	INTEGER , OPTIONAL, INTENT(OUT) :: output_level_
[369]	381	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: par_access_
[779]	382	INTEGER , OPTIONAL, INTENT(OUT) :: record_offset_
[538]	383	TYPE(txios(duration)) , OPTIONAL, INTENT(OUT) :: split_freq_
[432]	384	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: split_freq_format_
[538]	385	TYPE(txios(duration)) , OPTIONAL, INTENT(OUT) :: sync_freq_
[699]	386	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_counter_
[802]	387	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: time_counter_name_
[711]	388	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: timeseries_
	389	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: ts_prefix_
[326]	390	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: type_
[581]	391
[528]	392	IF (PRESENT(append_)) THEN
[966]	393	CALL cxios_get_filegroup_append &
	394	(filegroup_hdl%daddr, append__tmp)
[581]	395	append_ = append__tmp
[528]	396	ENDIF
[581]	397
[608]	398	IF (PRESENT(compression_level_)) THEN
[966]	399	CALL cxios_get_filegroup_compression_level &
	400	(filegroup_hdl%daddr, compression_level_)
[608]	401	ENDIF
	402
[932]	403	IF (PRESENT(convention_)) THEN
[966]	404	CALL cxios_get_filegroup_convention &
	405	(filegroup_hdl%daddr, convention_, len(convention_))
[932]	406	ENDIF
	407
[891]	408	IF (PRESENT(cyclic_)) THEN
[966]	409	CALL cxios_get_filegroup_cyclic &
	410	(filegroup_hdl%daddr, cyclic__tmp)
[891]	411	cyclic_ = cyclic__tmp
	412	ENDIF
	413
[326]	414	IF (PRESENT(description_)) THEN
[966]	415	CALL cxios_get_filegroup_description &
	416	(filegroup_hdl%daddr, description_, len(description_))
[326]	417	ENDIF
[581]	418
[326]	419	IF (PRESENT(enabled_)) THEN
[966]	420	CALL cxios_get_filegroup_enabled &
	421	(filegroup_hdl%daddr, enabled__tmp)
[581]	422	enabled_ = enabled__tmp
[326]	423	ENDIF
[581]	424
[517]	425	IF (PRESENT(format_)) THEN
[966]	426	CALL cxios_get_filegroup_format &
	427	(filegroup_hdl%daddr, format_, len(format_))
[517]	428	ENDIF
[581]	429
[326]	430	IF (PRESENT(group_ref_)) THEN
[966]	431	CALL cxios_get_filegroup_group_ref &
	432	(filegroup_hdl%daddr, group_ref_, len(group_ref_))
[326]	433	ENDIF
[581]	434
[415]	435	IF (PRESENT(min_digits_)) THEN
[966]	436	CALL cxios_get_filegroup_min_digits &
	437	(filegroup_hdl%daddr, min_digits_)
[415]	438	ENDIF
[581]	439
[598]	440	IF (PRESENT(mode_)) THEN
[966]	441	CALL cxios_get_filegroup_mode &
	442	(filegroup_hdl%daddr, mode_, len(mode_))
[598]	443	ENDIF
	444
[326]	445	IF (PRESENT(name_)) THEN
[966]	446	CALL cxios_get_filegroup_name &
	447	(filegroup_hdl%daddr, name_, len(name_))
[326]	448	ENDIF
[581]	449
[326]	450	IF (PRESENT(name_suffix_)) THEN
[966]	451	CALL cxios_get_filegroup_name_suffix &
	452	(filegroup_hdl%daddr, name_suffix_, len(name_suffix_))
[326]	453	ENDIF
[581]	454
[326]	455	IF (PRESENT(output_freq_)) THEN
[966]	456	CALL cxios_get_filegroup_output_freq &
	457	(filegroup_hdl%daddr, output_freq_)
[326]	458	ENDIF
[581]	459
[326]	460	IF (PRESENT(output_level_)) THEN
[966]	461	CALL cxios_get_filegroup_output_level &
	462	(filegroup_hdl%daddr, output_level_)
[326]	463	ENDIF
[581]	464
[369]	465	IF (PRESENT(par_access_)) THEN
[966]	466	CALL cxios_get_filegroup_par_access &
	467	(filegroup_hdl%daddr, par_access_, len(par_access_))
[369]	468	ENDIF
[581]	469
[779]	470	IF (PRESENT(record_offset_)) THEN
[966]	471	CALL cxios_get_filegroup_record_offset &
	472	(filegroup_hdl%daddr, record_offset_)
[779]	473	ENDIF
	474
[326]	475	IF (PRESENT(split_freq_)) THEN
[966]	476	CALL cxios_get_filegroup_split_freq &
	477	(filegroup_hdl%daddr, split_freq_)
[326]	478	ENDIF
[581]	479
[432]	480	IF (PRESENT(split_freq_format_)) THEN
[966]	481	CALL cxios_get_filegroup_split_freq_format &
	482	(filegroup_hdl%daddr, split_freq_format_, len(split_freq_format_))
[432]	483	ENDIF
[581]	484
[326]	485	IF (PRESENT(sync_freq_)) THEN
[966]	486	CALL cxios_get_filegroup_sync_freq &
	487	(filegroup_hdl%daddr, sync_freq_)
[326]	488	ENDIF
[581]	489
[699]	490	IF (PRESENT(time_counter_)) THEN
[966]	491	CALL cxios_get_filegroup_time_counter &
	492	(filegroup_hdl%daddr, time_counter_, len(time_counter_))
[699]	493	ENDIF
	494
[802]	495	IF (PRESENT(time_counter_name_)) THEN
[966]	496	CALL cxios_get_filegroup_time_counter_name &
	497	(filegroup_hdl%daddr, time_counter_name_, len(time_counter_name_))
[802]	498	ENDIF
	499
[711]	500	IF (PRESENT(timeseries_)) THEN
[966]	501	CALL cxios_get_filegroup_timeseries &
	502	(filegroup_hdl%daddr, timeseries_, len(timeseries_))
[711]	503	ENDIF
	504
	505	IF (PRESENT(ts_prefix_)) THEN
[966]	506	CALL cxios_get_filegroup_ts_prefix &
	507	(filegroup_hdl%daddr, ts_prefix_, len(ts_prefix_))
[711]	508	ENDIF
	509
[326]	510	IF (PRESENT(type_)) THEN
[966]	511	CALL cxios_get_filegroup_type &
	512	(filegroup_hdl%daddr, type_, len(type_))
[326]	513	ENDIF
[581]	514
[326]	515	END SUBROUTINE xios(get_filegroup_attr_hdl_)
[581]	516
[432]	517	SUBROUTINE xios(is_defined_filegroup_attr) &
[932]	518	( filegroup_id, append, compression_level, convention, cyclic, description, enabled, format &
	519	, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level, par_access, record_offset &
	520	, split_freq, split_freq_format, sync_freq, time_counter, time_counter_name, timeseries, ts_prefix &
	521	, type )
[581]	522
[432]	523	IMPLICIT NONE
	524	TYPE(txios(filegroup)) :: filegroup_hdl
	525	CHARACTER(LEN=*), INTENT(IN) ::filegroup_id
[528]	526	LOGICAL, OPTIONAL, INTENT(OUT) :: append
	527	LOGICAL(KIND=C_BOOL) :: append_tmp
[608]	528	LOGICAL, OPTIONAL, INTENT(OUT) :: compression_level
	529	LOGICAL(KIND=C_BOOL) :: compression_level_tmp
[932]	530	LOGICAL, OPTIONAL, INTENT(OUT) :: convention
	531	LOGICAL(KIND=C_BOOL) :: convention_tmp
[891]	532	LOGICAL, OPTIONAL, INTENT(OUT) :: cyclic
	533	LOGICAL(KIND=C_BOOL) :: cyclic_tmp
[432]	534	LOGICAL, OPTIONAL, INTENT(OUT) :: description
	535	LOGICAL(KIND=C_BOOL) :: description_tmp
	536	LOGICAL, OPTIONAL, INTENT(OUT) :: enabled
	537	LOGICAL(KIND=C_BOOL) :: enabled_tmp
[517]	538	LOGICAL, OPTIONAL, INTENT(OUT) :: format
	539	LOGICAL(KIND=C_BOOL) :: format_tmp
[432]	540	LOGICAL, OPTIONAL, INTENT(OUT) :: group_ref
	541	LOGICAL(KIND=C_BOOL) :: group_ref_tmp
	542	LOGICAL, OPTIONAL, INTENT(OUT) :: min_digits
	543	LOGICAL(KIND=C_BOOL) :: min_digits_tmp
[598]	544	LOGICAL, OPTIONAL, INTENT(OUT) :: mode
	545	LOGICAL(KIND=C_BOOL) :: mode_tmp
[432]	546	LOGICAL, OPTIONAL, INTENT(OUT) :: name
	547	LOGICAL(KIND=C_BOOL) :: name_tmp
	548	LOGICAL, OPTIONAL, INTENT(OUT) :: name_suffix
	549	LOGICAL(KIND=C_BOOL) :: name_suffix_tmp
	550	LOGICAL, OPTIONAL, INTENT(OUT) :: output_freq
	551	LOGICAL(KIND=C_BOOL) :: output_freq_tmp
	552	LOGICAL, OPTIONAL, INTENT(OUT) :: output_level
	553	LOGICAL(KIND=C_BOOL) :: output_level_tmp
	554	LOGICAL, OPTIONAL, INTENT(OUT) :: par_access
	555	LOGICAL(KIND=C_BOOL) :: par_access_tmp
[779]	556	LOGICAL, OPTIONAL, INTENT(OUT) :: record_offset
	557	LOGICAL(KIND=C_BOOL) :: record_offset_tmp
[432]	558	LOGICAL, OPTIONAL, INTENT(OUT) :: split_freq
	559	LOGICAL(KIND=C_BOOL) :: split_freq_tmp
	560	LOGICAL, OPTIONAL, INTENT(OUT) :: split_freq_format
	561	LOGICAL(KIND=C_BOOL) :: split_freq_format_tmp
	562	LOGICAL, OPTIONAL, INTENT(OUT) :: sync_freq
	563	LOGICAL(KIND=C_BOOL) :: sync_freq_tmp
[699]	564	LOGICAL, OPTIONAL, INTENT(OUT) :: time_counter
	565	LOGICAL(KIND=C_BOOL) :: time_counter_tmp
[802]	566	LOGICAL, OPTIONAL, INTENT(OUT) :: time_counter_name
	567	LOGICAL(KIND=C_BOOL) :: time_counter_name_tmp
[711]	568	LOGICAL, OPTIONAL, INTENT(OUT) :: timeseries
	569	LOGICAL(KIND=C_BOOL) :: timeseries_tmp
	570	LOGICAL, OPTIONAL, INTENT(OUT) :: ts_prefix
	571	LOGICAL(KIND=C_BOOL) :: ts_prefix_tmp
[432]	572	LOGICAL, OPTIONAL, INTENT(OUT) :: type
	573	LOGICAL(KIND=C_BOOL) :: type_tmp
[581]	574
[966]	575	CALL xios(get_filegroup_handle) &
	576	(filegroup_id,filegroup_hdl)
[432]	577	CALL xios(is_defined_filegroup_attr_hdl_) &
[932]	578	( filegroup_hdl, append, compression_level, convention, cyclic, description, enabled, format &
	579	, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level, par_access, record_offset &
[891]	580	, split_freq, split_freq_format, sync_freq, time_counter, time_counter_name, timeseries, ts_prefix &
	581	, type )
[581]	582
[432]	583	END SUBROUTINE xios(is_defined_filegroup_attr)
[581]	584
[432]	585	SUBROUTINE xios(is_defined_filegroup_attr_hdl) &
[932]	586	( filegroup_hdl, append, compression_level, convention, cyclic, description, enabled, format &
	587	, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level, par_access, record_offset &
[891]	588	, split_freq, split_freq_format, sync_freq, time_counter, time_counter_name, timeseries, ts_prefix &
	589	, type )
[581]	590
[432]	591	IMPLICIT NONE
	592	TYPE(txios(filegroup)) , INTENT(IN) :: filegroup_hdl
[528]	593	LOGICAL, OPTIONAL, INTENT(OUT) :: append
	594	LOGICAL(KIND=C_BOOL) :: append_tmp
[608]	595	LOGICAL, OPTIONAL, INTENT(OUT) :: compression_level
	596	LOGICAL(KIND=C_BOOL) :: compression_level_tmp
[932]	597	LOGICAL, OPTIONAL, INTENT(OUT) :: convention
	598	LOGICAL(KIND=C_BOOL) :: convention_tmp
[891]	599	LOGICAL, OPTIONAL, INTENT(OUT) :: cyclic
	600	LOGICAL(KIND=C_BOOL) :: cyclic_tmp
[432]	601	LOGICAL, OPTIONAL, INTENT(OUT) :: description
	602	LOGICAL(KIND=C_BOOL) :: description_tmp
	603	LOGICAL, OPTIONAL, INTENT(OUT) :: enabled
	604	LOGICAL(KIND=C_BOOL) :: enabled_tmp
[517]	605	LOGICAL, OPTIONAL, INTENT(OUT) :: format
	606	LOGICAL(KIND=C_BOOL) :: format_tmp
[432]	607	LOGICAL, OPTIONAL, INTENT(OUT) :: group_ref
	608	LOGICAL(KIND=C_BOOL) :: group_ref_tmp
	609	LOGICAL, OPTIONAL, INTENT(OUT) :: min_digits
	610	LOGICAL(KIND=C_BOOL) :: min_digits_tmp
[598]	611	LOGICAL, OPTIONAL, INTENT(OUT) :: mode
	612	LOGICAL(KIND=C_BOOL) :: mode_tmp
[432]	613	LOGICAL, OPTIONAL, INTENT(OUT) :: name
	614	LOGICAL(KIND=C_BOOL) :: name_tmp
	615	LOGICAL, OPTIONAL, INTENT(OUT) :: name_suffix
	616	LOGICAL(KIND=C_BOOL) :: name_suffix_tmp
	617	LOGICAL, OPTIONAL, INTENT(OUT) :: output_freq
	618	LOGICAL(KIND=C_BOOL) :: output_freq_tmp
	619	LOGICAL, OPTIONAL, INTENT(OUT) :: output_level
	620	LOGICAL(KIND=C_BOOL) :: output_level_tmp
	621	LOGICAL, OPTIONAL, INTENT(OUT) :: par_access
	622	LOGICAL(KIND=C_BOOL) :: par_access_tmp
[779]	623	LOGICAL, OPTIONAL, INTENT(OUT) :: record_offset
	624	LOGICAL(KIND=C_BOOL) :: record_offset_tmp
[432]	625	LOGICAL, OPTIONAL, INTENT(OUT) :: split_freq
	626	LOGICAL(KIND=C_BOOL) :: split_freq_tmp
	627	LOGICAL, OPTIONAL, INTENT(OUT) :: split_freq_format
	628	LOGICAL(KIND=C_BOOL) :: split_freq_format_tmp
	629	LOGICAL, OPTIONAL, INTENT(OUT) :: sync_freq
	630	LOGICAL(KIND=C_BOOL) :: sync_freq_tmp
[699]	631	LOGICAL, OPTIONAL, INTENT(OUT) :: time_counter
	632	LOGICAL(KIND=C_BOOL) :: time_counter_tmp
[802]	633	LOGICAL, OPTIONAL, INTENT(OUT) :: time_counter_name
	634	LOGICAL(KIND=C_BOOL) :: time_counter_name_tmp
[711]	635	LOGICAL, OPTIONAL, INTENT(OUT) :: timeseries
	636	LOGICAL(KIND=C_BOOL) :: timeseries_tmp
	637	LOGICAL, OPTIONAL, INTENT(OUT) :: ts_prefix
	638	LOGICAL(KIND=C_BOOL) :: ts_prefix_tmp
[432]	639	LOGICAL, OPTIONAL, INTENT(OUT) :: type
	640	LOGICAL(KIND=C_BOOL) :: type_tmp
[581]	641
[432]	642	CALL xios(is_defined_filegroup_attr_hdl_) &
[932]	643	( filegroup_hdl, append, compression_level, convention, cyclic, description, enabled, format &
	644	, group_ref, min_digits, mode, name, name_suffix, output_freq, output_level, par_access, record_offset &
[891]	645	, split_freq, split_freq_format, sync_freq, time_counter, time_counter_name, timeseries, ts_prefix &
	646	, type )
[581]	647
[432]	648	END SUBROUTINE xios(is_defined_filegroup_attr_hdl)
[581]	649
[432]	650	SUBROUTINE xios(is_defined_filegroup_attr_hdl_) &
[932]	651	( filegroup_hdl, append_, compression_level_, convention_, cyclic_, description_, enabled_, format_ &
	652	, group_ref_, min_digits_, mode_, name_, name_suffix_, output_freq_, output_level_, par_access_ &
	653	, record_offset_, split_freq_, split_freq_format_, sync_freq_, time_counter_, time_counter_name_ &
	654	, timeseries_, ts_prefix_, type_ )
[581]	655
[432]	656	IMPLICIT NONE
	657	TYPE(txios(filegroup)) , INTENT(IN) :: filegroup_hdl
[528]	658	LOGICAL, OPTIONAL, INTENT(OUT) :: append_
	659	LOGICAL(KIND=C_BOOL) :: append__tmp
[608]	660	LOGICAL, OPTIONAL, INTENT(OUT) :: compression_level_
	661	LOGICAL(KIND=C_BOOL) :: compression_level__tmp
[932]	662	LOGICAL, OPTIONAL, INTENT(OUT) :: convention_
	663	LOGICAL(KIND=C_BOOL) :: convention__tmp
[891]	664	LOGICAL, OPTIONAL, INTENT(OUT) :: cyclic_
	665	LOGICAL(KIND=C_BOOL) :: cyclic__tmp
[432]	666	LOGICAL, OPTIONAL, INTENT(OUT) :: description_
	667	LOGICAL(KIND=C_BOOL) :: description__tmp
	668	LOGICAL, OPTIONAL, INTENT(OUT) :: enabled_
	669	LOGICAL(KIND=C_BOOL) :: enabled__tmp
[517]	670	LOGICAL, OPTIONAL, INTENT(OUT) :: format_
	671	LOGICAL(KIND=C_BOOL) :: format__tmp
[432]	672	LOGICAL, OPTIONAL, INTENT(OUT) :: group_ref_
	673	LOGICAL(KIND=C_BOOL) :: group_ref__tmp
	674	LOGICAL, OPTIONAL, INTENT(OUT) :: min_digits_
	675	LOGICAL(KIND=C_BOOL) :: min_digits__tmp
[598]	676	LOGICAL, OPTIONAL, INTENT(OUT) :: mode_
	677	LOGICAL(KIND=C_BOOL) :: mode__tmp
[432]	678	LOGICAL, OPTIONAL, INTENT(OUT) :: name_
	679	LOGICAL(KIND=C_BOOL) :: name__tmp
	680	LOGICAL, OPTIONAL, INTENT(OUT) :: name_suffix_
	681	LOGICAL(KIND=C_BOOL) :: name_suffix__tmp
	682	LOGICAL, OPTIONAL, INTENT(OUT) :: output_freq_
	683	LOGICAL(KIND=C_BOOL) :: output_freq__tmp
	684	LOGICAL, OPTIONAL, INTENT(OUT) :: output_level_
	685	LOGICAL(KIND=C_BOOL) :: output_level__tmp
	686	LOGICAL, OPTIONAL, INTENT(OUT) :: par_access_
	687	LOGICAL(KIND=C_BOOL) :: par_access__tmp
[779]	688	LOGICAL, OPTIONAL, INTENT(OUT) :: record_offset_
	689	LOGICAL(KIND=C_BOOL) :: record_offset__tmp
[432]	690	LOGICAL, OPTIONAL, INTENT(OUT) :: split_freq_
	691	LOGICAL(KIND=C_BOOL) :: split_freq__tmp
	692	LOGICAL, OPTIONAL, INTENT(OUT) :: split_freq_format_
	693	LOGICAL(KIND=C_BOOL) :: split_freq_format__tmp
	694	LOGICAL, OPTIONAL, INTENT(OUT) :: sync_freq_
	695	LOGICAL(KIND=C_BOOL) :: sync_freq__tmp
[699]	696	LOGICAL, OPTIONAL, INTENT(OUT) :: time_counter_
	697	LOGICAL(KIND=C_BOOL) :: time_counter__tmp
[802]	698	LOGICAL, OPTIONAL, INTENT(OUT) :: time_counter_name_
	699	LOGICAL(KIND=C_BOOL) :: time_counter_name__tmp
[711]	700	LOGICAL, OPTIONAL, INTENT(OUT) :: timeseries_
	701	LOGICAL(KIND=C_BOOL) :: timeseries__tmp
	702	LOGICAL, OPTIONAL, INTENT(OUT) :: ts_prefix_
	703	LOGICAL(KIND=C_BOOL) :: ts_prefix__tmp
[432]	704	LOGICAL, OPTIONAL, INTENT(OUT) :: type_
	705	LOGICAL(KIND=C_BOOL) :: type__tmp
[581]	706
[528]	707	IF (PRESENT(append_)) THEN
[966]	708	append__tmp = cxios_is_defined_filegroup_append &
	709	(filegroup_hdl%daddr)
[581]	710	append_ = append__tmp
[528]	711	ENDIF
[581]	712
[608]	713	IF (PRESENT(compression_level_)) THEN
[966]	714	compression_level__tmp = cxios_is_defined_filegroup_compression_level &
	715	(filegroup_hdl%daddr)
[608]	716	compression_level_ = compression_level__tmp
	717	ENDIF
	718
[932]	719	IF (PRESENT(convention_)) THEN
[966]	720	convention__tmp = cxios_is_defined_filegroup_convention &
	721	(filegroup_hdl%daddr)
[932]	722	convention_ = convention__tmp
	723	ENDIF
	724
[891]	725	IF (PRESENT(cyclic_)) THEN
[966]	726	cyclic__tmp = cxios_is_defined_filegroup_cyclic &
	727	(filegroup_hdl%daddr)
[891]	728	cyclic_ = cyclic__tmp
	729	ENDIF
	730
[432]	731	IF (PRESENT(description_)) THEN
[966]	732	description__tmp = cxios_is_defined_filegroup_description &
	733	(filegroup_hdl%daddr)
[581]	734	description_ = description__tmp
[432]	735	ENDIF
[581]	736
[432]	737	IF (PRESENT(enabled_)) THEN
[966]	738	enabled__tmp = cxios_is_defined_filegroup_enabled &
	739	(filegroup_hdl%daddr)
[581]	740	enabled_ = enabled__tmp
[432]	741	ENDIF
[581]	742
[517]	743	IF (PRESENT(format_)) THEN
[966]	744	format__tmp = cxios_is_defined_filegroup_format &
	745	(filegroup_hdl%daddr)
[581]	746	format_ = format__tmp
[517]	747	ENDIF
[581]	748
[432]	749	IF (PRESENT(group_ref_)) THEN
[966]	750	group_ref__tmp = cxios_is_defined_filegroup_group_ref &
	751	(filegroup_hdl%daddr)
[581]	752	group_ref_ = group_ref__tmp
[432]	753	ENDIF
[581]	754
[432]	755	IF (PRESENT(min_digits_)) THEN
[966]	756	min_digits__tmp = cxios_is_defined_filegroup_min_digits &
	757	(filegroup_hdl%daddr)
[581]	758	min_digits_ = min_digits__tmp
[432]	759	ENDIF
[581]	760
[598]	761	IF (PRESENT(mode_)) THEN
[966]	762	mode__tmp = cxios_is_defined_filegroup_mode &
	763	(filegroup_hdl%daddr)
[598]	764	mode_ = mode__tmp
	765	ENDIF
	766
[432]	767	IF (PRESENT(name_)) THEN
[966]	768	name__tmp = cxios_is_defined_filegroup_name &
	769	(filegroup_hdl%daddr)
[581]	770	name_ = name__tmp
[432]	771	ENDIF
[581]	772
[432]	773	IF (PRESENT(name_suffix_)) THEN
[966]	774	name_suffix__tmp = cxios_is_defined_filegroup_name_suffix &
	775	(filegroup_hdl%daddr)
[581]	776	name_suffix_ = name_suffix__tmp
[432]	777	ENDIF
[581]	778
[432]	779	IF (PRESENT(output_freq_)) THEN
[966]	780	output_freq__tmp = cxios_is_defined_filegroup_output_freq &
	781	(filegroup_hdl%daddr)
[581]	782	output_freq_ = output_freq__tmp
[432]	783	ENDIF
[581]	784
[432]	785	IF (PRESENT(output_level_)) THEN
[966]	786	output_level__tmp = cxios_is_defined_filegroup_output_level &
	787	(filegroup_hdl%daddr)
[581]	788	output_level_ = output_level__tmp
[432]	789	ENDIF
[581]	790
[432]	791	IF (PRESENT(par_access_)) THEN
[966]	792	par_access__tmp = cxios_is_defined_filegroup_par_access &
	793	(filegroup_hdl%daddr)
[581]	794	par_access_ = par_access__tmp
[432]	795	ENDIF
[581]	796
[779]	797	IF (PRESENT(record_offset_)) THEN
[966]	798	record_offset__tmp = cxios_is_defined_filegroup_record_offset &
	799	(filegroup_hdl%daddr)
[779]	800	record_offset_ = record_offset__tmp
	801	ENDIF
	802
[432]	803	IF (PRESENT(split_freq_)) THEN
[966]	804	split_freq__tmp = cxios_is_defined_filegroup_split_freq &
	805	(filegroup_hdl%daddr)
[581]	806	split_freq_ = split_freq__tmp
[432]	807	ENDIF
[581]	808
[432]	809	IF (PRESENT(split_freq_format_)) THEN
[966]	810	split_freq_format__tmp = cxios_is_defined_filegroup_split_freq_format &
	811	(filegroup_hdl%daddr)
[581]	812	split_freq_format_ = split_freq_format__tmp
[432]	813	ENDIF
[581]	814
[432]	815	IF (PRESENT(sync_freq_)) THEN
[966]	816	sync_freq__tmp = cxios_is_defined_filegroup_sync_freq &
	817	(filegroup_hdl%daddr)
[581]	818	sync_freq_ = sync_freq__tmp
[432]	819	ENDIF
[581]	820
[699]	821	IF (PRESENT(time_counter_)) THEN
[966]	822	time_counter__tmp = cxios_is_defined_filegroup_time_counter &
	823	(filegroup_hdl%daddr)
[699]	824	time_counter_ = time_counter__tmp
	825	ENDIF
	826
[802]	827	IF (PRESENT(time_counter_name_)) THEN
[966]	828	time_counter_name__tmp = cxios_is_defined_filegroup_time_counter_name &
	829	(filegroup_hdl%daddr)
[802]	830	time_counter_name_ = time_counter_name__tmp
	831	ENDIF
	832
[711]	833	IF (PRESENT(timeseries_)) THEN
[966]	834	timeseries__tmp = cxios_is_defined_filegroup_timeseries &
	835	(filegroup_hdl%daddr)
[711]	836	timeseries_ = timeseries__tmp
	837	ENDIF
	838
	839	IF (PRESENT(ts_prefix_)) THEN
[966]	840	ts_prefix__tmp = cxios_is_defined_filegroup_ts_prefix &
	841	(filegroup_hdl%daddr)
[711]	842	ts_prefix_ = ts_prefix__tmp
	843	ENDIF
	844
[432]	845	IF (PRESENT(type_)) THEN
[966]	846	type__tmp = cxios_is_defined_filegroup_type &
	847	(filegroup_hdl%daddr)
[581]	848	type_ = type__tmp
[432]	849	ENDIF
[581]	850
[432]	851	END SUBROUTINE xios(is_defined_filegroup_attr_hdl_)
[581]	852
[326]	853	END MODULE ifilegroup_attr

Note: See TracBrowser for help on using the repository browser.

Context Navigation

source: XIOS/trunk/src/interface/fortran_attr/ifilegroup_attr.F90 @ 966

Download in other formats: