Context Navigation

source: XIOS/dev/branch_yushan_merged/src/interface/fortran_attr/ifieldgroup_attr.F90 @ 1205

Last change on this file since 1205 was 1205, checked in by yushan, 7 years ago
branch merged with trunk @1200
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: 46.7 KB

Rev	Line
[326]	1	! * ************************************************************************** *
	2	! * Interface auto generated - do not modify *
	3	! * ************************************************************************** *
	4	#include "xios_fortran_prefix.hpp"
	5
	6	MODULE ifieldgroup_attr
	7	USE, INTRINSIC :: ISO_C_BINDING
	8	USE ifield
	9	USE fieldgroup_interface_attr
[581]	10
[326]	11	CONTAINS
[581]	12
[326]	13	SUBROUTINE xios(set_fieldgroup_attr) &
[1205]	14	( fieldgroup_id, add_offset, axis_ref, cell_methods, cell_methods_mode, check_if_active, compression_level &
	15	, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref, freq_offset, freq_op &
	16	, grid_path, grid_ref, group_ref, indexed_output, level, long_name, name, operation, prec, read_access &
[1005]	17	, scalar_ref, scale_factor, standard_name, ts_enabled, ts_split_freq, unit, valid_max, valid_min &
	18	)
[581]	19
[326]	20	IMPLICIT NONE
	21	TYPE(txios(fieldgroup)) :: fieldgroup_hdl
	22	CHARACTER(LEN=*), INTENT(IN) ::fieldgroup_id
[464]	23	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: add_offset
[326]	24	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: axis_ref
[991]	25	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: cell_methods
	26	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: cell_methods_mode
[1205]	27	LOGICAL , OPTIONAL, INTENT(IN) :: check_if_active
	28	LOGICAL (KIND=C_BOOL) :: check_if_active_tmp
[608]	29	INTEGER , OPTIONAL, INTENT(IN) :: compression_level
[326]	30	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: default_value
[472]	31	LOGICAL , OPTIONAL, INTENT(IN) :: detect_missing_value
	32	LOGICAL (KIND=C_BOOL) :: detect_missing_value_tmp
[326]	33	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: domain_ref
	34	LOGICAL , OPTIONAL, INTENT(IN) :: enabled
	35	LOGICAL (KIND=C_BOOL) :: enabled_tmp
[1005]	36	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: expr
[326]	37	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: field_ref
[538]	38	TYPE(txios(duration)) , OPTIONAL, INTENT(IN) :: freq_offset
	39	TYPE(txios(duration)) , OPTIONAL, INTENT(IN) :: freq_op
[790]	40	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: grid_path
[326]	41	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: grid_ref
	42	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: group_ref
[676]	43	LOGICAL , OPTIONAL, INTENT(IN) :: indexed_output
	44	LOGICAL (KIND=C_BOOL) :: indexed_output_tmp
[326]	45	INTEGER , OPTIONAL, INTENT(IN) :: level
	46	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: long_name
	47	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name
	48	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: operation
	49	INTEGER , OPTIONAL, INTENT(IN) :: prec
[593]	50	LOGICAL , OPTIONAL, INTENT(IN) :: read_access
	51	LOGICAL (KIND=C_BOOL) :: read_access_tmp
[891]	52	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: scalar_ref
[464]	53	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: scale_factor
[326]	54	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: standard_name
[711]	55	LOGICAL , OPTIONAL, INTENT(IN) :: ts_enabled
	56	LOGICAL (KIND=C_BOOL) :: ts_enabled_tmp
	57	TYPE(txios(duration)) , OPTIONAL, INTENT(IN) :: ts_split_freq
[326]	58	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: unit
[463]	59	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: valid_max
	60	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: valid_min
[581]	61
[966]	62	CALL xios(get_fieldgroup_handle) &
	63	(fieldgroup_id,fieldgroup_hdl)
[326]	64	CALL xios(set_fieldgroup_attr_hdl_) &
[1205]	65	( fieldgroup_hdl, add_offset, axis_ref, cell_methods, cell_methods_mode, check_if_active, compression_level &
	66	, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref, freq_offset, freq_op &
	67	, grid_path, grid_ref, group_ref, indexed_output, level, long_name, name, operation, prec, read_access &
[1005]	68	, scalar_ref, scale_factor, standard_name, ts_enabled, ts_split_freq, unit, valid_max, valid_min &
	69	)
[581]	70
[326]	71	END SUBROUTINE xios(set_fieldgroup_attr)
[581]	72
[326]	73	SUBROUTINE xios(set_fieldgroup_attr_hdl) &
[1205]	74	( fieldgroup_hdl, add_offset, axis_ref, cell_methods, cell_methods_mode, check_if_active, compression_level &
	75	, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref, freq_offset, freq_op &
	76	, grid_path, grid_ref, group_ref, indexed_output, level, long_name, name, operation, prec, read_access &
[1005]	77	, scalar_ref, scale_factor, standard_name, ts_enabled, ts_split_freq, unit, valid_max, valid_min &
	78	)
[581]	79
[326]	80	IMPLICIT NONE
	81	TYPE(txios(fieldgroup)) , INTENT(IN) :: fieldgroup_hdl
[464]	82	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: add_offset
[326]	83	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: axis_ref
[991]	84	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: cell_methods
	85	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: cell_methods_mode
[1205]	86	LOGICAL , OPTIONAL, INTENT(IN) :: check_if_active
	87	LOGICAL (KIND=C_BOOL) :: check_if_active_tmp
[608]	88	INTEGER , OPTIONAL, INTENT(IN) :: compression_level
[326]	89	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: default_value
[472]	90	LOGICAL , OPTIONAL, INTENT(IN) :: detect_missing_value
	91	LOGICAL (KIND=C_BOOL) :: detect_missing_value_tmp
[326]	92	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: domain_ref
	93	LOGICAL , OPTIONAL, INTENT(IN) :: enabled
	94	LOGICAL (KIND=C_BOOL) :: enabled_tmp
[1005]	95	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: expr
[326]	96	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: field_ref
[538]	97	TYPE(txios(duration)) , OPTIONAL, INTENT(IN) :: freq_offset
	98	TYPE(txios(duration)) , OPTIONAL, INTENT(IN) :: freq_op
[790]	99	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: grid_path
[326]	100	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: grid_ref
	101	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: group_ref
[676]	102	LOGICAL , OPTIONAL, INTENT(IN) :: indexed_output
	103	LOGICAL (KIND=C_BOOL) :: indexed_output_tmp
[326]	104	INTEGER , OPTIONAL, INTENT(IN) :: level
	105	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: long_name
	106	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name
	107	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: operation
	108	INTEGER , OPTIONAL, INTENT(IN) :: prec
[593]	109	LOGICAL , OPTIONAL, INTENT(IN) :: read_access
	110	LOGICAL (KIND=C_BOOL) :: read_access_tmp
[891]	111	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: scalar_ref
[464]	112	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: scale_factor
[326]	113	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: standard_name
[711]	114	LOGICAL , OPTIONAL, INTENT(IN) :: ts_enabled
	115	LOGICAL (KIND=C_BOOL) :: ts_enabled_tmp
	116	TYPE(txios(duration)) , OPTIONAL, INTENT(IN) :: ts_split_freq
[326]	117	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: unit
[463]	118	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: valid_max
	119	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: valid_min
[581]	120
[326]	121	CALL xios(set_fieldgroup_attr_hdl_) &
[1205]	122	( fieldgroup_hdl, add_offset, axis_ref, cell_methods, cell_methods_mode, check_if_active, compression_level &
	123	, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref, freq_offset, freq_op &
	124	, grid_path, grid_ref, group_ref, indexed_output, level, long_name, name, operation, prec, read_access &
[1005]	125	, scalar_ref, scale_factor, standard_name, ts_enabled, ts_split_freq, unit, valid_max, valid_min &
	126	)
[581]	127
[326]	128	END SUBROUTINE xios(set_fieldgroup_attr_hdl)
[581]	129
[326]	130	SUBROUTINE xios(set_fieldgroup_attr_hdl_) &
[1205]	131	( fieldgroup_hdl, add_offset_, axis_ref_, cell_methods_, cell_methods_mode_, check_if_active_ &
	132	, compression_level_, default_value_, detect_missing_value_, domain_ref_, enabled_, expr_, field_ref_ &
	133	, freq_offset_, freq_op_, grid_path_, grid_ref_, group_ref_, indexed_output_, level_, long_name_ &
	134	, name_, operation_, prec_, read_access_, scalar_ref_, scale_factor_, standard_name_, ts_enabled_ &
	135	, ts_split_freq_, unit_, valid_max_, valid_min_ )
[581]	136
[326]	137	IMPLICIT NONE
	138	TYPE(txios(fieldgroup)) , INTENT(IN) :: fieldgroup_hdl
[464]	139	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: add_offset_
[326]	140	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: axis_ref_
[991]	141	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: cell_methods_
	142	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: cell_methods_mode_
[1205]	143	LOGICAL , OPTIONAL, INTENT(IN) :: check_if_active_
	144	LOGICAL (KIND=C_BOOL) :: check_if_active__tmp
[608]	145	INTEGER , OPTIONAL, INTENT(IN) :: compression_level_
[326]	146	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: default_value_
[472]	147	LOGICAL , OPTIONAL, INTENT(IN) :: detect_missing_value_
	148	LOGICAL (KIND=C_BOOL) :: detect_missing_value__tmp
[326]	149	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: domain_ref_
	150	LOGICAL , OPTIONAL, INTENT(IN) :: enabled_
	151	LOGICAL (KIND=C_BOOL) :: enabled__tmp
[1005]	152	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: expr_
[326]	153	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: field_ref_
[538]	154	TYPE(txios(duration)) , OPTIONAL, INTENT(IN) :: freq_offset_
	155	TYPE(txios(duration)) , OPTIONAL, INTENT(IN) :: freq_op_
[790]	156	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: grid_path_
[326]	157	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: grid_ref_
	158	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: group_ref_
[676]	159	LOGICAL , OPTIONAL, INTENT(IN) :: indexed_output_
	160	LOGICAL (KIND=C_BOOL) :: indexed_output__tmp
[326]	161	INTEGER , OPTIONAL, INTENT(IN) :: level_
	162	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: long_name_
	163	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name_
	164	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: operation_
	165	INTEGER , OPTIONAL, INTENT(IN) :: prec_
[593]	166	LOGICAL , OPTIONAL, INTENT(IN) :: read_access_
	167	LOGICAL (KIND=C_BOOL) :: read_access__tmp
[891]	168	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: scalar_ref_
[464]	169	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: scale_factor_
[326]	170	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: standard_name_
[711]	171	LOGICAL , OPTIONAL, INTENT(IN) :: ts_enabled_
	172	LOGICAL (KIND=C_BOOL) :: ts_enabled__tmp
	173	TYPE(txios(duration)) , OPTIONAL, INTENT(IN) :: ts_split_freq_
[326]	174	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: unit_
[463]	175	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: valid_max_
	176	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: valid_min_
[581]	177
[464]	178	IF (PRESENT(add_offset_)) THEN
[966]	179	CALL cxios_set_fieldgroup_add_offset &
	180	(fieldgroup_hdl%daddr, add_offset_)
[464]	181	ENDIF
[581]	182
[326]	183	IF (PRESENT(axis_ref_)) THEN
[966]	184	CALL cxios_set_fieldgroup_axis_ref &
	185	(fieldgroup_hdl%daddr, axis_ref_, len(axis_ref_))
[326]	186	ENDIF
[581]	187
[991]	188	IF (PRESENT(cell_methods_)) THEN
	189	CALL cxios_set_fieldgroup_cell_methods &
	190	(fieldgroup_hdl%daddr, cell_methods_, len(cell_methods_))
	191	ENDIF
	192
	193	IF (PRESENT(cell_methods_mode_)) THEN
	194	CALL cxios_set_fieldgroup_cell_methods_mode &
	195	(fieldgroup_hdl%daddr, cell_methods_mode_, len(cell_methods_mode_))
	196	ENDIF
	197
[1205]	198	IF (PRESENT(check_if_active_)) THEN
	199	check_if_active__tmp = check_if_active_
	200	CALL cxios_set_fieldgroup_check_if_active &
	201	(fieldgroup_hdl%daddr, check_if_active__tmp)
	202	ENDIF
	203
[608]	204	IF (PRESENT(compression_level_)) THEN
[966]	205	CALL cxios_set_fieldgroup_compression_level &
	206	(fieldgroup_hdl%daddr, compression_level_)
[608]	207	ENDIF
	208
[326]	209	IF (PRESENT(default_value_)) THEN
[966]	210	CALL cxios_set_fieldgroup_default_value &
	211	(fieldgroup_hdl%daddr, default_value_)
[326]	212	ENDIF
[581]	213
[472]	214	IF (PRESENT(detect_missing_value_)) THEN
[581]	215	detect_missing_value__tmp = detect_missing_value_
[966]	216	CALL cxios_set_fieldgroup_detect_missing_value &
	217	(fieldgroup_hdl%daddr, detect_missing_value__tmp)
[472]	218	ENDIF
[581]	219
[326]	220	IF (PRESENT(domain_ref_)) THEN
[966]	221	CALL cxios_set_fieldgroup_domain_ref &
	222	(fieldgroup_hdl%daddr, domain_ref_, len(domain_ref_))
[326]	223	ENDIF
[581]	224
[326]	225	IF (PRESENT(enabled_)) THEN
[581]	226	enabled__tmp = enabled_
[966]	227	CALL cxios_set_fieldgroup_enabled &
	228	(fieldgroup_hdl%daddr, enabled__tmp)
[326]	229	ENDIF
[581]	230
[1005]	231	IF (PRESENT(expr_)) THEN
	232	CALL cxios_set_fieldgroup_expr &
	233	(fieldgroup_hdl%daddr, expr_, len(expr_))
	234	ENDIF
	235
[326]	236	IF (PRESENT(field_ref_)) THEN
[966]	237	CALL cxios_set_fieldgroup_field_ref &
	238	(fieldgroup_hdl%daddr, field_ref_, len(field_ref_))
[326]	239	ENDIF
[581]	240
[326]	241	IF (PRESENT(freq_offset_)) THEN
[966]	242	CALL cxios_set_fieldgroup_freq_offset &
	243	(fieldgroup_hdl%daddr, freq_offset_)
[326]	244	ENDIF
[581]	245
[326]	246	IF (PRESENT(freq_op_)) THEN
[966]	247	CALL cxios_set_fieldgroup_freq_op &
	248	(fieldgroup_hdl%daddr, freq_op_)
[326]	249	ENDIF
[581]	250
[790]	251	IF (PRESENT(grid_path_)) THEN
[966]	252	CALL cxios_set_fieldgroup_grid_path &
	253	(fieldgroup_hdl%daddr, grid_path_, len(grid_path_))
[790]	254	ENDIF
	255
[326]	256	IF (PRESENT(grid_ref_)) THEN
[966]	257	CALL cxios_set_fieldgroup_grid_ref &
	258	(fieldgroup_hdl%daddr, grid_ref_, len(grid_ref_))
[326]	259	ENDIF
[581]	260
[326]	261	IF (PRESENT(group_ref_)) THEN
[966]	262	CALL cxios_set_fieldgroup_group_ref &
	263	(fieldgroup_hdl%daddr, group_ref_, len(group_ref_))
[326]	264	ENDIF
[581]	265
[676]	266	IF (PRESENT(indexed_output_)) THEN
	267	indexed_output__tmp = indexed_output_
[966]	268	CALL cxios_set_fieldgroup_indexed_output &
	269	(fieldgroup_hdl%daddr, indexed_output__tmp)
[676]	270	ENDIF
	271
[326]	272	IF (PRESENT(level_)) THEN
[966]	273	CALL cxios_set_fieldgroup_level &
	274	(fieldgroup_hdl%daddr, level_)
[326]	275	ENDIF
[581]	276
[326]	277	IF (PRESENT(long_name_)) THEN
[966]	278	CALL cxios_set_fieldgroup_long_name &
	279	(fieldgroup_hdl%daddr, long_name_, len(long_name_))
[326]	280	ENDIF
[581]	281
[326]	282	IF (PRESENT(name_)) THEN
[966]	283	CALL cxios_set_fieldgroup_name &
	284	(fieldgroup_hdl%daddr, name_, len(name_))
[326]	285	ENDIF
[581]	286
[326]	287	IF (PRESENT(operation_)) THEN
[966]	288	CALL cxios_set_fieldgroup_operation &
	289	(fieldgroup_hdl%daddr, operation_, len(operation_))
[326]	290	ENDIF
[581]	291
[326]	292	IF (PRESENT(prec_)) THEN
[966]	293	CALL cxios_set_fieldgroup_prec &
	294	(fieldgroup_hdl%daddr, prec_)
[326]	295	ENDIF
[581]	296
[593]	297	IF (PRESENT(read_access_)) THEN
	298	read_access__tmp = read_access_
[966]	299	CALL cxios_set_fieldgroup_read_access &
	300	(fieldgroup_hdl%daddr, read_access__tmp)
[593]	301	ENDIF
	302
[891]	303	IF (PRESENT(scalar_ref_)) THEN
[966]	304	CALL cxios_set_fieldgroup_scalar_ref &
	305	(fieldgroup_hdl%daddr, scalar_ref_, len(scalar_ref_))
[891]	306	ENDIF
	307
[464]	308	IF (PRESENT(scale_factor_)) THEN
[966]	309	CALL cxios_set_fieldgroup_scale_factor &
	310	(fieldgroup_hdl%daddr, scale_factor_)
[464]	311	ENDIF
[581]	312
[326]	313	IF (PRESENT(standard_name_)) THEN
[966]	314	CALL cxios_set_fieldgroup_standard_name &
	315	(fieldgroup_hdl%daddr, standard_name_, len(standard_name_))
[326]	316	ENDIF
[581]	317
[711]	318	IF (PRESENT(ts_enabled_)) THEN
	319	ts_enabled__tmp = ts_enabled_
[966]	320	CALL cxios_set_fieldgroup_ts_enabled &
	321	(fieldgroup_hdl%daddr, ts_enabled__tmp)
[711]	322	ENDIF
	323
	324	IF (PRESENT(ts_split_freq_)) THEN
[966]	325	CALL cxios_set_fieldgroup_ts_split_freq &
	326	(fieldgroup_hdl%daddr, ts_split_freq_)
[711]	327	ENDIF
	328
[326]	329	IF (PRESENT(unit_)) THEN
[966]	330	CALL cxios_set_fieldgroup_unit &
	331	(fieldgroup_hdl%daddr, unit_, len(unit_))
[326]	332	ENDIF
[581]	333
[463]	334	IF (PRESENT(valid_max_)) THEN
[966]	335	CALL cxios_set_fieldgroup_valid_max &
	336	(fieldgroup_hdl%daddr, valid_max_)
[463]	337	ENDIF
[581]	338
[463]	339	IF (PRESENT(valid_min_)) THEN
[966]	340	CALL cxios_set_fieldgroup_valid_min &
	341	(fieldgroup_hdl%daddr, valid_min_)
[463]	342	ENDIF
[581]	343
[326]	344	END SUBROUTINE xios(set_fieldgroup_attr_hdl_)
[581]	345
[326]	346	SUBROUTINE xios(get_fieldgroup_attr) &
[1205]	347	( fieldgroup_id, add_offset, axis_ref, cell_methods, cell_methods_mode, check_if_active, compression_level &
	348	, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref, freq_offset, freq_op &
	349	, grid_path, grid_ref, group_ref, indexed_output, level, long_name, name, operation, prec, read_access &
[1005]	350	, scalar_ref, scale_factor, standard_name, ts_enabled, ts_split_freq, unit, valid_max, valid_min &
	351	)
[581]	352
[326]	353	IMPLICIT NONE
	354	TYPE(txios(fieldgroup)) :: fieldgroup_hdl
	355	CHARACTER(LEN=*), INTENT(IN) ::fieldgroup_id
[464]	356	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: add_offset
[326]	357	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: axis_ref
[991]	358	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: cell_methods
	359	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: cell_methods_mode
[1205]	360	LOGICAL , OPTIONAL, INTENT(OUT) :: check_if_active
	361	LOGICAL (KIND=C_BOOL) :: check_if_active_tmp
[608]	362	INTEGER , OPTIONAL, INTENT(OUT) :: compression_level
[326]	363	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: default_value
[472]	364	LOGICAL , OPTIONAL, INTENT(OUT) :: detect_missing_value
	365	LOGICAL (KIND=C_BOOL) :: detect_missing_value_tmp
[326]	366	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: domain_ref
	367	LOGICAL , OPTIONAL, INTENT(OUT) :: enabled
	368	LOGICAL (KIND=C_BOOL) :: enabled_tmp
[1005]	369	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: expr
[326]	370	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: field_ref
[538]	371	TYPE(txios(duration)) , OPTIONAL, INTENT(OUT) :: freq_offset
	372	TYPE(txios(duration)) , OPTIONAL, INTENT(OUT) :: freq_op
[790]	373	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: grid_path
[326]	374	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: grid_ref
	375	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: group_ref
[676]	376	LOGICAL , OPTIONAL, INTENT(OUT) :: indexed_output
	377	LOGICAL (KIND=C_BOOL) :: indexed_output_tmp
[326]	378	INTEGER , OPTIONAL, INTENT(OUT) :: level
	379	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: long_name
	380	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name
	381	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: operation
	382	INTEGER , OPTIONAL, INTENT(OUT) :: prec
[593]	383	LOGICAL , OPTIONAL, INTENT(OUT) :: read_access
	384	LOGICAL (KIND=C_BOOL) :: read_access_tmp
[891]	385	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: scalar_ref
[464]	386	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: scale_factor
[326]	387	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: standard_name
[711]	388	LOGICAL , OPTIONAL, INTENT(OUT) :: ts_enabled
	389	LOGICAL (KIND=C_BOOL) :: ts_enabled_tmp
	390	TYPE(txios(duration)) , OPTIONAL, INTENT(OUT) :: ts_split_freq
[326]	391	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: unit
[463]	392	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: valid_max
	393	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: valid_min
[581]	394
[966]	395	CALL xios(get_fieldgroup_handle) &
	396	(fieldgroup_id,fieldgroup_hdl)
[326]	397	CALL xios(get_fieldgroup_attr_hdl_) &
[1205]	398	( fieldgroup_hdl, add_offset, axis_ref, cell_methods, cell_methods_mode, check_if_active, compression_level &
	399	, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref, freq_offset, freq_op &
	400	, grid_path, grid_ref, group_ref, indexed_output, level, long_name, name, operation, prec, read_access &
[1005]	401	, scalar_ref, scale_factor, standard_name, ts_enabled, ts_split_freq, unit, valid_max, valid_min &
	402	)
[581]	403
[326]	404	END SUBROUTINE xios(get_fieldgroup_attr)
[581]	405
[326]	406	SUBROUTINE xios(get_fieldgroup_attr_hdl) &
[1205]	407	( fieldgroup_hdl, add_offset, axis_ref, cell_methods, cell_methods_mode, check_if_active, compression_level &
	408	, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref, freq_offset, freq_op &
	409	, grid_path, grid_ref, group_ref, indexed_output, level, long_name, name, operation, prec, read_access &
[1005]	410	, scalar_ref, scale_factor, standard_name, ts_enabled, ts_split_freq, unit, valid_max, valid_min &
	411	)
[581]	412
[326]	413	IMPLICIT NONE
	414	TYPE(txios(fieldgroup)) , INTENT(IN) :: fieldgroup_hdl
[464]	415	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: add_offset
[326]	416	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: axis_ref
[991]	417	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: cell_methods
	418	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: cell_methods_mode
[1205]	419	LOGICAL , OPTIONAL, INTENT(OUT) :: check_if_active
	420	LOGICAL (KIND=C_BOOL) :: check_if_active_tmp
[608]	421	INTEGER , OPTIONAL, INTENT(OUT) :: compression_level
[326]	422	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: default_value
[472]	423	LOGICAL , OPTIONAL, INTENT(OUT) :: detect_missing_value
	424	LOGICAL (KIND=C_BOOL) :: detect_missing_value_tmp
[326]	425	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: domain_ref
	426	LOGICAL , OPTIONAL, INTENT(OUT) :: enabled
	427	LOGICAL (KIND=C_BOOL) :: enabled_tmp
[1005]	428	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: expr
[326]	429	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: field_ref
[538]	430	TYPE(txios(duration)) , OPTIONAL, INTENT(OUT) :: freq_offset
	431	TYPE(txios(duration)) , OPTIONAL, INTENT(OUT) :: freq_op
[790]	432	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: grid_path
[326]	433	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: grid_ref
	434	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: group_ref
[676]	435	LOGICAL , OPTIONAL, INTENT(OUT) :: indexed_output
	436	LOGICAL (KIND=C_BOOL) :: indexed_output_tmp
[326]	437	INTEGER , OPTIONAL, INTENT(OUT) :: level
	438	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: long_name
	439	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name
	440	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: operation
	441	INTEGER , OPTIONAL, INTENT(OUT) :: prec
[593]	442	LOGICAL , OPTIONAL, INTENT(OUT) :: read_access
	443	LOGICAL (KIND=C_BOOL) :: read_access_tmp
[891]	444	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: scalar_ref
[464]	445	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: scale_factor
[326]	446	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: standard_name
[711]	447	LOGICAL , OPTIONAL, INTENT(OUT) :: ts_enabled
	448	LOGICAL (KIND=C_BOOL) :: ts_enabled_tmp
	449	TYPE(txios(duration)) , OPTIONAL, INTENT(OUT) :: ts_split_freq
[326]	450	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: unit
[463]	451	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: valid_max
	452	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: valid_min
[581]	453
[326]	454	CALL xios(get_fieldgroup_attr_hdl_) &
[1205]	455	( fieldgroup_hdl, add_offset, axis_ref, cell_methods, cell_methods_mode, check_if_active, compression_level &
	456	, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref, freq_offset, freq_op &
	457	, grid_path, grid_ref, group_ref, indexed_output, level, long_name, name, operation, prec, read_access &
[1005]	458	, scalar_ref, scale_factor, standard_name, ts_enabled, ts_split_freq, unit, valid_max, valid_min &
	459	)
[581]	460
[326]	461	END SUBROUTINE xios(get_fieldgroup_attr_hdl)
[581]	462
[326]	463	SUBROUTINE xios(get_fieldgroup_attr_hdl_) &
[1205]	464	( fieldgroup_hdl, add_offset_, axis_ref_, cell_methods_, cell_methods_mode_, check_if_active_ &
	465	, compression_level_, default_value_, detect_missing_value_, domain_ref_, enabled_, expr_, field_ref_ &
	466	, freq_offset_, freq_op_, grid_path_, grid_ref_, group_ref_, indexed_output_, level_, long_name_ &
	467	, name_, operation_, prec_, read_access_, scalar_ref_, scale_factor_, standard_name_, ts_enabled_ &
	468	, ts_split_freq_, unit_, valid_max_, valid_min_ )
[581]	469
[326]	470	IMPLICIT NONE
	471	TYPE(txios(fieldgroup)) , INTENT(IN) :: fieldgroup_hdl
[464]	472	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: add_offset_
[326]	473	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: axis_ref_
[991]	474	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: cell_methods_
	475	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: cell_methods_mode_
[1205]	476	LOGICAL , OPTIONAL, INTENT(OUT) :: check_if_active_
	477	LOGICAL (KIND=C_BOOL) :: check_if_active__tmp
[608]	478	INTEGER , OPTIONAL, INTENT(OUT) :: compression_level_
[326]	479	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: default_value_
[472]	480	LOGICAL , OPTIONAL, INTENT(OUT) :: detect_missing_value_
	481	LOGICAL (KIND=C_BOOL) :: detect_missing_value__tmp
[326]	482	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: domain_ref_
	483	LOGICAL , OPTIONAL, INTENT(OUT) :: enabled_
	484	LOGICAL (KIND=C_BOOL) :: enabled__tmp
[1005]	485	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: expr_
[326]	486	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: field_ref_
[538]	487	TYPE(txios(duration)) , OPTIONAL, INTENT(OUT) :: freq_offset_
	488	TYPE(txios(duration)) , OPTIONAL, INTENT(OUT) :: freq_op_
[790]	489	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: grid_path_
[326]	490	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: grid_ref_
	491	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: group_ref_
[676]	492	LOGICAL , OPTIONAL, INTENT(OUT) :: indexed_output_
	493	LOGICAL (KIND=C_BOOL) :: indexed_output__tmp
[326]	494	INTEGER , OPTIONAL, INTENT(OUT) :: level_
	495	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: long_name_
	496	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name_
	497	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: operation_
	498	INTEGER , OPTIONAL, INTENT(OUT) :: prec_
[593]	499	LOGICAL , OPTIONAL, INTENT(OUT) :: read_access_
	500	LOGICAL (KIND=C_BOOL) :: read_access__tmp
[891]	501	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: scalar_ref_
[464]	502	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: scale_factor_
[326]	503	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: standard_name_
[711]	504	LOGICAL , OPTIONAL, INTENT(OUT) :: ts_enabled_
	505	LOGICAL (KIND=C_BOOL) :: ts_enabled__tmp
	506	TYPE(txios(duration)) , OPTIONAL, INTENT(OUT) :: ts_split_freq_
[326]	507	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: unit_
[463]	508	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: valid_max_
	509	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: valid_min_
[581]	510
[464]	511	IF (PRESENT(add_offset_)) THEN
[966]	512	CALL cxios_get_fieldgroup_add_offset &
	513	(fieldgroup_hdl%daddr, add_offset_)
[464]	514	ENDIF
[581]	515
[326]	516	IF (PRESENT(axis_ref_)) THEN
[966]	517	CALL cxios_get_fieldgroup_axis_ref &
	518	(fieldgroup_hdl%daddr, axis_ref_, len(axis_ref_))
[326]	519	ENDIF
[581]	520
[991]	521	IF (PRESENT(cell_methods_)) THEN
	522	CALL cxios_get_fieldgroup_cell_methods &
	523	(fieldgroup_hdl%daddr, cell_methods_, len(cell_methods_))
	524	ENDIF
	525
	526	IF (PRESENT(cell_methods_mode_)) THEN
	527	CALL cxios_get_fieldgroup_cell_methods_mode &
	528	(fieldgroup_hdl%daddr, cell_methods_mode_, len(cell_methods_mode_))
	529	ENDIF
	530
[1205]	531	IF (PRESENT(check_if_active_)) THEN
	532	CALL cxios_get_fieldgroup_check_if_active &
	533	(fieldgroup_hdl%daddr, check_if_active__tmp)
	534	check_if_active_ = check_if_active__tmp
	535	ENDIF
	536
[608]	537	IF (PRESENT(compression_level_)) THEN
[966]	538	CALL cxios_get_fieldgroup_compression_level &
	539	(fieldgroup_hdl%daddr, compression_level_)
[608]	540	ENDIF
	541
[326]	542	IF (PRESENT(default_value_)) THEN
[966]	543	CALL cxios_get_fieldgroup_default_value &
	544	(fieldgroup_hdl%daddr, default_value_)
[326]	545	ENDIF
[581]	546
[472]	547	IF (PRESENT(detect_missing_value_)) THEN
[966]	548	CALL cxios_get_fieldgroup_detect_missing_value &
	549	(fieldgroup_hdl%daddr, detect_missing_value__tmp)
[581]	550	detect_missing_value_ = detect_missing_value__tmp
[472]	551	ENDIF
[581]	552
[326]	553	IF (PRESENT(domain_ref_)) THEN
[966]	554	CALL cxios_get_fieldgroup_domain_ref &
	555	(fieldgroup_hdl%daddr, domain_ref_, len(domain_ref_))
[326]	556	ENDIF
[581]	557
[326]	558	IF (PRESENT(enabled_)) THEN
[966]	559	CALL cxios_get_fieldgroup_enabled &
	560	(fieldgroup_hdl%daddr, enabled__tmp)
[581]	561	enabled_ = enabled__tmp
[326]	562	ENDIF
[581]	563
[1005]	564	IF (PRESENT(expr_)) THEN
	565	CALL cxios_get_fieldgroup_expr &
	566	(fieldgroup_hdl%daddr, expr_, len(expr_))
	567	ENDIF
	568
[326]	569	IF (PRESENT(field_ref_)) THEN
[966]	570	CALL cxios_get_fieldgroup_field_ref &
	571	(fieldgroup_hdl%daddr, field_ref_, len(field_ref_))
[326]	572	ENDIF
[581]	573
[326]	574	IF (PRESENT(freq_offset_)) THEN
[966]	575	CALL cxios_get_fieldgroup_freq_offset &
	576	(fieldgroup_hdl%daddr, freq_offset_)
[326]	577	ENDIF
[581]	578
[326]	579	IF (PRESENT(freq_op_)) THEN
[966]	580	CALL cxios_get_fieldgroup_freq_op &
	581	(fieldgroup_hdl%daddr, freq_op_)
[326]	582	ENDIF
[581]	583
[790]	584	IF (PRESENT(grid_path_)) THEN
[966]	585	CALL cxios_get_fieldgroup_grid_path &
	586	(fieldgroup_hdl%daddr, grid_path_, len(grid_path_))
[790]	587	ENDIF
	588
[326]	589	IF (PRESENT(grid_ref_)) THEN
[966]	590	CALL cxios_get_fieldgroup_grid_ref &
	591	(fieldgroup_hdl%daddr, grid_ref_, len(grid_ref_))
[326]	592	ENDIF
[581]	593
[326]	594	IF (PRESENT(group_ref_)) THEN
[966]	595	CALL cxios_get_fieldgroup_group_ref &
	596	(fieldgroup_hdl%daddr, group_ref_, len(group_ref_))
[326]	597	ENDIF
[581]	598
[676]	599	IF (PRESENT(indexed_output_)) THEN
[966]	600	CALL cxios_get_fieldgroup_indexed_output &
	601	(fieldgroup_hdl%daddr, indexed_output__tmp)
[676]	602	indexed_output_ = indexed_output__tmp
	603	ENDIF
	604
[326]	605	IF (PRESENT(level_)) THEN
[966]	606	CALL cxios_get_fieldgroup_level &
	607	(fieldgroup_hdl%daddr, level_)
[326]	608	ENDIF
[581]	609
[326]	610	IF (PRESENT(long_name_)) THEN
[966]	611	CALL cxios_get_fieldgroup_long_name &
	612	(fieldgroup_hdl%daddr, long_name_, len(long_name_))
[326]	613	ENDIF
[581]	614
[326]	615	IF (PRESENT(name_)) THEN
[966]	616	CALL cxios_get_fieldgroup_name &
	617	(fieldgroup_hdl%daddr, name_, len(name_))
[326]	618	ENDIF
[581]	619
[326]	620	IF (PRESENT(operation_)) THEN
[966]	621	CALL cxios_get_fieldgroup_operation &
	622	(fieldgroup_hdl%daddr, operation_, len(operation_))
[326]	623	ENDIF
[581]	624
[326]	625	IF (PRESENT(prec_)) THEN
[966]	626	CALL cxios_get_fieldgroup_prec &
	627	(fieldgroup_hdl%daddr, prec_)
[326]	628	ENDIF
[581]	629
[593]	630	IF (PRESENT(read_access_)) THEN
[966]	631	CALL cxios_get_fieldgroup_read_access &
	632	(fieldgroup_hdl%daddr, read_access__tmp)
[593]	633	read_access_ = read_access__tmp
	634	ENDIF
	635
[891]	636	IF (PRESENT(scalar_ref_)) THEN
[966]	637	CALL cxios_get_fieldgroup_scalar_ref &
	638	(fieldgroup_hdl%daddr, scalar_ref_, len(scalar_ref_))
[891]	639	ENDIF
	640
[464]	641	IF (PRESENT(scale_factor_)) THEN
[966]	642	CALL cxios_get_fieldgroup_scale_factor &
	643	(fieldgroup_hdl%daddr, scale_factor_)
[464]	644	ENDIF
[581]	645
[326]	646	IF (PRESENT(standard_name_)) THEN
[966]	647	CALL cxios_get_fieldgroup_standard_name &
	648	(fieldgroup_hdl%daddr, standard_name_, len(standard_name_))
[326]	649	ENDIF
[581]	650
[711]	651	IF (PRESENT(ts_enabled_)) THEN
[966]	652	CALL cxios_get_fieldgroup_ts_enabled &
	653	(fieldgroup_hdl%daddr, ts_enabled__tmp)
[711]	654	ts_enabled_ = ts_enabled__tmp
	655	ENDIF
	656
	657	IF (PRESENT(ts_split_freq_)) THEN
[966]	658	CALL cxios_get_fieldgroup_ts_split_freq &
	659	(fieldgroup_hdl%daddr, ts_split_freq_)
[711]	660	ENDIF
	661
[326]	662	IF (PRESENT(unit_)) THEN
[966]	663	CALL cxios_get_fieldgroup_unit &
	664	(fieldgroup_hdl%daddr, unit_, len(unit_))
[326]	665	ENDIF
[581]	666
[463]	667	IF (PRESENT(valid_max_)) THEN
[966]	668	CALL cxios_get_fieldgroup_valid_max &
	669	(fieldgroup_hdl%daddr, valid_max_)
[463]	670	ENDIF
[581]	671
[463]	672	IF (PRESENT(valid_min_)) THEN
[966]	673	CALL cxios_get_fieldgroup_valid_min &
	674	(fieldgroup_hdl%daddr, valid_min_)
[463]	675	ENDIF
[581]	676
[326]	677	END SUBROUTINE xios(get_fieldgroup_attr_hdl_)
[581]	678
[432]	679	SUBROUTINE xios(is_defined_fieldgroup_attr) &
[1205]	680	( fieldgroup_id, add_offset, axis_ref, cell_methods, cell_methods_mode, check_if_active, compression_level &
	681	, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref, freq_offset, freq_op &
	682	, grid_path, grid_ref, group_ref, indexed_output, level, long_name, name, operation, prec, read_access &
[1005]	683	, scalar_ref, scale_factor, standard_name, ts_enabled, ts_split_freq, unit, valid_max, valid_min &
	684	)
[581]	685
[432]	686	IMPLICIT NONE
	687	TYPE(txios(fieldgroup)) :: fieldgroup_hdl
	688	CHARACTER(LEN=*), INTENT(IN) ::fieldgroup_id
[464]	689	LOGICAL, OPTIONAL, INTENT(OUT) :: add_offset
	690	LOGICAL(KIND=C_BOOL) :: add_offset_tmp
[432]	691	LOGICAL, OPTIONAL, INTENT(OUT) :: axis_ref
	692	LOGICAL(KIND=C_BOOL) :: axis_ref_tmp
[991]	693	LOGICAL, OPTIONAL, INTENT(OUT) :: cell_methods
	694	LOGICAL(KIND=C_BOOL) :: cell_methods_tmp
	695	LOGICAL, OPTIONAL, INTENT(OUT) :: cell_methods_mode
	696	LOGICAL(KIND=C_BOOL) :: cell_methods_mode_tmp
[1205]	697	LOGICAL, OPTIONAL, INTENT(OUT) :: check_if_active
	698	LOGICAL(KIND=C_BOOL) :: check_if_active_tmp
[608]	699	LOGICAL, OPTIONAL, INTENT(OUT) :: compression_level
	700	LOGICAL(KIND=C_BOOL) :: compression_level_tmp
[432]	701	LOGICAL, OPTIONAL, INTENT(OUT) :: default_value
	702	LOGICAL(KIND=C_BOOL) :: default_value_tmp
[472]	703	LOGICAL, OPTIONAL, INTENT(OUT) :: detect_missing_value
	704	LOGICAL(KIND=C_BOOL) :: detect_missing_value_tmp
[432]	705	LOGICAL, OPTIONAL, INTENT(OUT) :: domain_ref
	706	LOGICAL(KIND=C_BOOL) :: domain_ref_tmp
	707	LOGICAL, OPTIONAL, INTENT(OUT) :: enabled
	708	LOGICAL(KIND=C_BOOL) :: enabled_tmp
[1005]	709	LOGICAL, OPTIONAL, INTENT(OUT) :: expr
	710	LOGICAL(KIND=C_BOOL) :: expr_tmp
[432]	711	LOGICAL, OPTIONAL, INTENT(OUT) :: field_ref
	712	LOGICAL(KIND=C_BOOL) :: field_ref_tmp
	713	LOGICAL, OPTIONAL, INTENT(OUT) :: freq_offset
	714	LOGICAL(KIND=C_BOOL) :: freq_offset_tmp
	715	LOGICAL, OPTIONAL, INTENT(OUT) :: freq_op
	716	LOGICAL(KIND=C_BOOL) :: freq_op_tmp
[790]	717	LOGICAL, OPTIONAL, INTENT(OUT) :: grid_path
	718	LOGICAL(KIND=C_BOOL) :: grid_path_tmp
[432]	719	LOGICAL, OPTIONAL, INTENT(OUT) :: grid_ref
	720	LOGICAL(KIND=C_BOOL) :: grid_ref_tmp
	721	LOGICAL, OPTIONAL, INTENT(OUT) :: group_ref
	722	LOGICAL(KIND=C_BOOL) :: group_ref_tmp
[676]	723	LOGICAL, OPTIONAL, INTENT(OUT) :: indexed_output
	724	LOGICAL(KIND=C_BOOL) :: indexed_output_tmp
[432]	725	LOGICAL, OPTIONAL, INTENT(OUT) :: level
	726	LOGICAL(KIND=C_BOOL) :: level_tmp
	727	LOGICAL, OPTIONAL, INTENT(OUT) :: long_name
	728	LOGICAL(KIND=C_BOOL) :: long_name_tmp
	729	LOGICAL, OPTIONAL, INTENT(OUT) :: name
	730	LOGICAL(KIND=C_BOOL) :: name_tmp
	731	LOGICAL, OPTIONAL, INTENT(OUT) :: operation
	732	LOGICAL(KIND=C_BOOL) :: operation_tmp
	733	LOGICAL, OPTIONAL, INTENT(OUT) :: prec
	734	LOGICAL(KIND=C_BOOL) :: prec_tmp
[593]	735	LOGICAL, OPTIONAL, INTENT(OUT) :: read_access
	736	LOGICAL(KIND=C_BOOL) :: read_access_tmp
[891]	737	LOGICAL, OPTIONAL, INTENT(OUT) :: scalar_ref
	738	LOGICAL(KIND=C_BOOL) :: scalar_ref_tmp
[464]	739	LOGICAL, OPTIONAL, INTENT(OUT) :: scale_factor
	740	LOGICAL(KIND=C_BOOL) :: scale_factor_tmp
[432]	741	LOGICAL, OPTIONAL, INTENT(OUT) :: standard_name
	742	LOGICAL(KIND=C_BOOL) :: standard_name_tmp
[711]	743	LOGICAL, OPTIONAL, INTENT(OUT) :: ts_enabled
	744	LOGICAL(KIND=C_BOOL) :: ts_enabled_tmp
	745	LOGICAL, OPTIONAL, INTENT(OUT) :: ts_split_freq
	746	LOGICAL(KIND=C_BOOL) :: ts_split_freq_tmp
[432]	747	LOGICAL, OPTIONAL, INTENT(OUT) :: unit
	748	LOGICAL(KIND=C_BOOL) :: unit_tmp
[463]	749	LOGICAL, OPTIONAL, INTENT(OUT) :: valid_max
	750	LOGICAL(KIND=C_BOOL) :: valid_max_tmp
	751	LOGICAL, OPTIONAL, INTENT(OUT) :: valid_min
	752	LOGICAL(KIND=C_BOOL) :: valid_min_tmp
[581]	753
[966]	754	CALL xios(get_fieldgroup_handle) &
	755	(fieldgroup_id,fieldgroup_hdl)
[432]	756	CALL xios(is_defined_fieldgroup_attr_hdl_) &
[1205]	757	( fieldgroup_hdl, add_offset, axis_ref, cell_methods, cell_methods_mode, check_if_active, compression_level &
	758	, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref, freq_offset, freq_op &
	759	, grid_path, grid_ref, group_ref, indexed_output, level, long_name, name, operation, prec, read_access &
[1005]	760	, scalar_ref, scale_factor, standard_name, ts_enabled, ts_split_freq, unit, valid_max, valid_min &
	761	)
[581]	762
[432]	763	END SUBROUTINE xios(is_defined_fieldgroup_attr)
[581]	764
[432]	765	SUBROUTINE xios(is_defined_fieldgroup_attr_hdl) &
[1205]	766	( fieldgroup_hdl, add_offset, axis_ref, cell_methods, cell_methods_mode, check_if_active, compression_level &
	767	, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref, freq_offset, freq_op &
	768	, grid_path, grid_ref, group_ref, indexed_output, level, long_name, name, operation, prec, read_access &
[1005]	769	, scalar_ref, scale_factor, standard_name, ts_enabled, ts_split_freq, unit, valid_max, valid_min &
	770	)
[581]	771
[432]	772	IMPLICIT NONE
	773	TYPE(txios(fieldgroup)) , INTENT(IN) :: fieldgroup_hdl
[464]	774	LOGICAL, OPTIONAL, INTENT(OUT) :: add_offset
	775	LOGICAL(KIND=C_BOOL) :: add_offset_tmp
[432]	776	LOGICAL, OPTIONAL, INTENT(OUT) :: axis_ref
	777	LOGICAL(KIND=C_BOOL) :: axis_ref_tmp
[991]	778	LOGICAL, OPTIONAL, INTENT(OUT) :: cell_methods
	779	LOGICAL(KIND=C_BOOL) :: cell_methods_tmp
	780	LOGICAL, OPTIONAL, INTENT(OUT) :: cell_methods_mode
	781	LOGICAL(KIND=C_BOOL) :: cell_methods_mode_tmp
[1205]	782	LOGICAL, OPTIONAL, INTENT(OUT) :: check_if_active
	783	LOGICAL(KIND=C_BOOL) :: check_if_active_tmp
[608]	784	LOGICAL, OPTIONAL, INTENT(OUT) :: compression_level
	785	LOGICAL(KIND=C_BOOL) :: compression_level_tmp
[432]	786	LOGICAL, OPTIONAL, INTENT(OUT) :: default_value
	787	LOGICAL(KIND=C_BOOL) :: default_value_tmp
[472]	788	LOGICAL, OPTIONAL, INTENT(OUT) :: detect_missing_value
	789	LOGICAL(KIND=C_BOOL) :: detect_missing_value_tmp
[432]	790	LOGICAL, OPTIONAL, INTENT(OUT) :: domain_ref
	791	LOGICAL(KIND=C_BOOL) :: domain_ref_tmp
	792	LOGICAL, OPTIONAL, INTENT(OUT) :: enabled
	793	LOGICAL(KIND=C_BOOL) :: enabled_tmp
[1005]	794	LOGICAL, OPTIONAL, INTENT(OUT) :: expr
	795	LOGICAL(KIND=C_BOOL) :: expr_tmp
[432]	796	LOGICAL, OPTIONAL, INTENT(OUT) :: field_ref
	797	LOGICAL(KIND=C_BOOL) :: field_ref_tmp
	798	LOGICAL, OPTIONAL, INTENT(OUT) :: freq_offset
	799	LOGICAL(KIND=C_BOOL) :: freq_offset_tmp
	800	LOGICAL, OPTIONAL, INTENT(OUT) :: freq_op
	801	LOGICAL(KIND=C_BOOL) :: freq_op_tmp
[790]	802	LOGICAL, OPTIONAL, INTENT(OUT) :: grid_path
	803	LOGICAL(KIND=C_BOOL) :: grid_path_tmp
[432]	804	LOGICAL, OPTIONAL, INTENT(OUT) :: grid_ref
	805	LOGICAL(KIND=C_BOOL) :: grid_ref_tmp
	806	LOGICAL, OPTIONAL, INTENT(OUT) :: group_ref
	807	LOGICAL(KIND=C_BOOL) :: group_ref_tmp
[676]	808	LOGICAL, OPTIONAL, INTENT(OUT) :: indexed_output
	809	LOGICAL(KIND=C_BOOL) :: indexed_output_tmp
[432]	810	LOGICAL, OPTIONAL, INTENT(OUT) :: level
	811	LOGICAL(KIND=C_BOOL) :: level_tmp
	812	LOGICAL, OPTIONAL, INTENT(OUT) :: long_name
	813	LOGICAL(KIND=C_BOOL) :: long_name_tmp
	814	LOGICAL, OPTIONAL, INTENT(OUT) :: name
	815	LOGICAL(KIND=C_BOOL) :: name_tmp
	816	LOGICAL, OPTIONAL, INTENT(OUT) :: operation
	817	LOGICAL(KIND=C_BOOL) :: operation_tmp
	818	LOGICAL, OPTIONAL, INTENT(OUT) :: prec
	819	LOGICAL(KIND=C_BOOL) :: prec_tmp
[593]	820	LOGICAL, OPTIONAL, INTENT(OUT) :: read_access
	821	LOGICAL(KIND=C_BOOL) :: read_access_tmp
[891]	822	LOGICAL, OPTIONAL, INTENT(OUT) :: scalar_ref
	823	LOGICAL(KIND=C_BOOL) :: scalar_ref_tmp
[464]	824	LOGICAL, OPTIONAL, INTENT(OUT) :: scale_factor
	825	LOGICAL(KIND=C_BOOL) :: scale_factor_tmp
[432]	826	LOGICAL, OPTIONAL, INTENT(OUT) :: standard_name
	827	LOGICAL(KIND=C_BOOL) :: standard_name_tmp
[711]	828	LOGICAL, OPTIONAL, INTENT(OUT) :: ts_enabled
	829	LOGICAL(KIND=C_BOOL) :: ts_enabled_tmp
	830	LOGICAL, OPTIONAL, INTENT(OUT) :: ts_split_freq
	831	LOGICAL(KIND=C_BOOL) :: ts_split_freq_tmp
[432]	832	LOGICAL, OPTIONAL, INTENT(OUT) :: unit
	833	LOGICAL(KIND=C_BOOL) :: unit_tmp
[463]	834	LOGICAL, OPTIONAL, INTENT(OUT) :: valid_max
	835	LOGICAL(KIND=C_BOOL) :: valid_max_tmp
	836	LOGICAL, OPTIONAL, INTENT(OUT) :: valid_min
	837	LOGICAL(KIND=C_BOOL) :: valid_min_tmp
[581]	838
[432]	839	CALL xios(is_defined_fieldgroup_attr_hdl_) &
[1205]	840	( fieldgroup_hdl, add_offset, axis_ref, cell_methods, cell_methods_mode, check_if_active, compression_level &
	841	, default_value, detect_missing_value, domain_ref, enabled, expr, field_ref, freq_offset, freq_op &
	842	, grid_path, grid_ref, group_ref, indexed_output, level, long_name, name, operation, prec, read_access &
[1005]	843	, scalar_ref, scale_factor, standard_name, ts_enabled, ts_split_freq, unit, valid_max, valid_min &
	844	)
[581]	845
[432]	846	END SUBROUTINE xios(is_defined_fieldgroup_attr_hdl)
[581]	847
[432]	848	SUBROUTINE xios(is_defined_fieldgroup_attr_hdl_) &
[1205]	849	( fieldgroup_hdl, add_offset_, axis_ref_, cell_methods_, cell_methods_mode_, check_if_active_ &
	850	, compression_level_, default_value_, detect_missing_value_, domain_ref_, enabled_, expr_, field_ref_ &
	851	, freq_offset_, freq_op_, grid_path_, grid_ref_, group_ref_, indexed_output_, level_, long_name_ &
	852	, name_, operation_, prec_, read_access_, scalar_ref_, scale_factor_, standard_name_, ts_enabled_ &
	853	, ts_split_freq_, unit_, valid_max_, valid_min_ )
[581]	854
[432]	855	IMPLICIT NONE
	856	TYPE(txios(fieldgroup)) , INTENT(IN) :: fieldgroup_hdl
[464]	857	LOGICAL, OPTIONAL, INTENT(OUT) :: add_offset_
	858	LOGICAL(KIND=C_BOOL) :: add_offset__tmp
[432]	859	LOGICAL, OPTIONAL, INTENT(OUT) :: axis_ref_
	860	LOGICAL(KIND=C_BOOL) :: axis_ref__tmp
[991]	861	LOGICAL, OPTIONAL, INTENT(OUT) :: cell_methods_
	862	LOGICAL(KIND=C_BOOL) :: cell_methods__tmp
	863	LOGICAL, OPTIONAL, INTENT(OUT) :: cell_methods_mode_
	864	LOGICAL(KIND=C_BOOL) :: cell_methods_mode__tmp
[1205]	865	LOGICAL, OPTIONAL, INTENT(OUT) :: check_if_active_
	866	LOGICAL(KIND=C_BOOL) :: check_if_active__tmp
[608]	867	LOGICAL, OPTIONAL, INTENT(OUT) :: compression_level_
	868	LOGICAL(KIND=C_BOOL) :: compression_level__tmp
[432]	869	LOGICAL, OPTIONAL, INTENT(OUT) :: default_value_
	870	LOGICAL(KIND=C_BOOL) :: default_value__tmp
[472]	871	LOGICAL, OPTIONAL, INTENT(OUT) :: detect_missing_value_
	872	LOGICAL(KIND=C_BOOL) :: detect_missing_value__tmp
[432]	873	LOGICAL, OPTIONAL, INTENT(OUT) :: domain_ref_
	874	LOGICAL(KIND=C_BOOL) :: domain_ref__tmp
	875	LOGICAL, OPTIONAL, INTENT(OUT) :: enabled_
	876	LOGICAL(KIND=C_BOOL) :: enabled__tmp
[1005]	877	LOGICAL, OPTIONAL, INTENT(OUT) :: expr_
	878	LOGICAL(KIND=C_BOOL) :: expr__tmp
[432]	879	LOGICAL, OPTIONAL, INTENT(OUT) :: field_ref_
	880	LOGICAL(KIND=C_BOOL) :: field_ref__tmp
	881	LOGICAL, OPTIONAL, INTENT(OUT) :: freq_offset_
	882	LOGICAL(KIND=C_BOOL) :: freq_offset__tmp
	883	LOGICAL, OPTIONAL, INTENT(OUT) :: freq_op_
	884	LOGICAL(KIND=C_BOOL) :: freq_op__tmp
[790]	885	LOGICAL, OPTIONAL, INTENT(OUT) :: grid_path_
	886	LOGICAL(KIND=C_BOOL) :: grid_path__tmp
[432]	887	LOGICAL, OPTIONAL, INTENT(OUT) :: grid_ref_
	888	LOGICAL(KIND=C_BOOL) :: grid_ref__tmp
	889	LOGICAL, OPTIONAL, INTENT(OUT) :: group_ref_
	890	LOGICAL(KIND=C_BOOL) :: group_ref__tmp
[676]	891	LOGICAL, OPTIONAL, INTENT(OUT) :: indexed_output_
	892	LOGICAL(KIND=C_BOOL) :: indexed_output__tmp
[432]	893	LOGICAL, OPTIONAL, INTENT(OUT) :: level_
	894	LOGICAL(KIND=C_BOOL) :: level__tmp
	895	LOGICAL, OPTIONAL, INTENT(OUT) :: long_name_
	896	LOGICAL(KIND=C_BOOL) :: long_name__tmp
	897	LOGICAL, OPTIONAL, INTENT(OUT) :: name_
	898	LOGICAL(KIND=C_BOOL) :: name__tmp
	899	LOGICAL, OPTIONAL, INTENT(OUT) :: operation_
	900	LOGICAL(KIND=C_BOOL) :: operation__tmp
	901	LOGICAL, OPTIONAL, INTENT(OUT) :: prec_
	902	LOGICAL(KIND=C_BOOL) :: prec__tmp
[593]	903	LOGICAL, OPTIONAL, INTENT(OUT) :: read_access_
	904	LOGICAL(KIND=C_BOOL) :: read_access__tmp
[891]	905	LOGICAL, OPTIONAL, INTENT(OUT) :: scalar_ref_
	906	LOGICAL(KIND=C_BOOL) :: scalar_ref__tmp
[464]	907	LOGICAL, OPTIONAL, INTENT(OUT) :: scale_factor_
	908	LOGICAL(KIND=C_BOOL) :: scale_factor__tmp
[432]	909	LOGICAL, OPTIONAL, INTENT(OUT) :: standard_name_
	910	LOGICAL(KIND=C_BOOL) :: standard_name__tmp
[711]	911	LOGICAL, OPTIONAL, INTENT(OUT) :: ts_enabled_
	912	LOGICAL(KIND=C_BOOL) :: ts_enabled__tmp
	913	LOGICAL, OPTIONAL, INTENT(OUT) :: ts_split_freq_
	914	LOGICAL(KIND=C_BOOL) :: ts_split_freq__tmp
[432]	915	LOGICAL, OPTIONAL, INTENT(OUT) :: unit_
	916	LOGICAL(KIND=C_BOOL) :: unit__tmp
[463]	917	LOGICAL, OPTIONAL, INTENT(OUT) :: valid_max_
	918	LOGICAL(KIND=C_BOOL) :: valid_max__tmp
	919	LOGICAL, OPTIONAL, INTENT(OUT) :: valid_min_
	920	LOGICAL(KIND=C_BOOL) :: valid_min__tmp
[581]	921
[464]	922	IF (PRESENT(add_offset_)) THEN
[966]	923	add_offset__tmp = cxios_is_defined_fieldgroup_add_offset &
	924	(fieldgroup_hdl%daddr)
[581]	925	add_offset_ = add_offset__tmp
[464]	926	ENDIF
[581]	927
[432]	928	IF (PRESENT(axis_ref_)) THEN
[966]	929	axis_ref__tmp = cxios_is_defined_fieldgroup_axis_ref &
	930	(fieldgroup_hdl%daddr)
[581]	931	axis_ref_ = axis_ref__tmp
[432]	932	ENDIF
[581]	933
[991]	934	IF (PRESENT(cell_methods_)) THEN
	935	cell_methods__tmp = cxios_is_defined_fieldgroup_cell_methods &
	936	(fieldgroup_hdl%daddr)
	937	cell_methods_ = cell_methods__tmp
	938	ENDIF
	939
	940	IF (PRESENT(cell_methods_mode_)) THEN
	941	cell_methods_mode__tmp = cxios_is_defined_fieldgroup_cell_methods_mode &
	942	(fieldgroup_hdl%daddr)
	943	cell_methods_mode_ = cell_methods_mode__tmp
	944	ENDIF
	945
[1205]	946	IF (PRESENT(check_if_active_)) THEN
	947	check_if_active__tmp = cxios_is_defined_fieldgroup_check_if_active &
	948	(fieldgroup_hdl%daddr)
	949	check_if_active_ = check_if_active__tmp
	950	ENDIF
	951
[608]	952	IF (PRESENT(compression_level_)) THEN
[966]	953	compression_level__tmp = cxios_is_defined_fieldgroup_compression_level &
	954	(fieldgroup_hdl%daddr)
[608]	955	compression_level_ = compression_level__tmp
	956	ENDIF
	957
[432]	958	IF (PRESENT(default_value_)) THEN
[966]	959	default_value__tmp = cxios_is_defined_fieldgroup_default_value &
	960	(fieldgroup_hdl%daddr)
[581]	961	default_value_ = default_value__tmp
[432]	962	ENDIF
[581]	963
[472]	964	IF (PRESENT(detect_missing_value_)) THEN
[966]	965	detect_missing_value__tmp = cxios_is_defined_fieldgroup_detect_missing_value &
	966	(fieldgroup_hdl%daddr)
[581]	967	detect_missing_value_ = detect_missing_value__tmp
[472]	968	ENDIF
[581]	969
[432]	970	IF (PRESENT(domain_ref_)) THEN
[966]	971	domain_ref__tmp = cxios_is_defined_fieldgroup_domain_ref &
	972	(fieldgroup_hdl%daddr)
[581]	973	domain_ref_ = domain_ref__tmp
[432]	974	ENDIF
[581]	975
[432]	976	IF (PRESENT(enabled_)) THEN
[966]	977	enabled__tmp = cxios_is_defined_fieldgroup_enabled &
	978	(fieldgroup_hdl%daddr)
[581]	979	enabled_ = enabled__tmp
[432]	980	ENDIF
[581]	981
[1005]	982	IF (PRESENT(expr_)) THEN
	983	expr__tmp = cxios_is_defined_fieldgroup_expr &
	984	(fieldgroup_hdl%daddr)
	985	expr_ = expr__tmp
	986	ENDIF
	987
[432]	988	IF (PRESENT(field_ref_)) THEN
[966]	989	field_ref__tmp = cxios_is_defined_fieldgroup_field_ref &
	990	(fieldgroup_hdl%daddr)
[581]	991	field_ref_ = field_ref__tmp
[432]	992	ENDIF
[581]	993
[432]	994	IF (PRESENT(freq_offset_)) THEN
[966]	995	freq_offset__tmp = cxios_is_defined_fieldgroup_freq_offset &
	996	(fieldgroup_hdl%daddr)
[581]	997	freq_offset_ = freq_offset__tmp
[432]	998	ENDIF
[581]	999
[432]	1000	IF (PRESENT(freq_op_)) THEN
[966]	1001	freq_op__tmp = cxios_is_defined_fieldgroup_freq_op &
	1002	(fieldgroup_hdl%daddr)
[581]	1003	freq_op_ = freq_op__tmp
[432]	1004	ENDIF
[581]	1005
[790]	1006	IF (PRESENT(grid_path_)) THEN
[966]	1007	grid_path__tmp = cxios_is_defined_fieldgroup_grid_path &
	1008	(fieldgroup_hdl%daddr)
[790]	1009	grid_path_ = grid_path__tmp
	1010	ENDIF
	1011
[432]	1012	IF (PRESENT(grid_ref_)) THEN
[966]	1013	grid_ref__tmp = cxios_is_defined_fieldgroup_grid_ref &
	1014	(fieldgroup_hdl%daddr)
[581]	1015	grid_ref_ = grid_ref__tmp
[432]	1016	ENDIF
[581]	1017
[432]	1018	IF (PRESENT(group_ref_)) THEN
[966]	1019	group_ref__tmp = cxios_is_defined_fieldgroup_group_ref &
	1020	(fieldgroup_hdl%daddr)
[581]	1021	group_ref_ = group_ref__tmp
[432]	1022	ENDIF
[581]	1023
[676]	1024	IF (PRESENT(indexed_output_)) THEN
[966]	1025	indexed_output__tmp = cxios_is_defined_fieldgroup_indexed_output &
	1026	(fieldgroup_hdl%daddr)
[676]	1027	indexed_output_ = indexed_output__tmp
	1028	ENDIF
	1029
[432]	1030	IF (PRESENT(level_)) THEN
[966]	1031	level__tmp = cxios_is_defined_fieldgroup_level &
	1032	(fieldgroup_hdl%daddr)
[581]	1033	level_ = level__tmp
[432]	1034	ENDIF
[581]	1035
[432]	1036	IF (PRESENT(long_name_)) THEN
[966]	1037	long_name__tmp = cxios_is_defined_fieldgroup_long_name &
	1038	(fieldgroup_hdl%daddr)
[581]	1039	long_name_ = long_name__tmp
[432]	1040	ENDIF
[581]	1041
[432]	1042	IF (PRESENT(name_)) THEN
[966]	1043	name__tmp = cxios_is_defined_fieldgroup_name &
	1044	(fieldgroup_hdl%daddr)
[581]	1045	name_ = name__tmp
[432]	1046	ENDIF
[581]	1047
[432]	1048	IF (PRESENT(operation_)) THEN
[966]	1049	operation__tmp = cxios_is_defined_fieldgroup_operation &
	1050	(fieldgroup_hdl%daddr)
[581]	1051	operation_ = operation__tmp
[432]	1052	ENDIF
[581]	1053
[432]	1054	IF (PRESENT(prec_)) THEN
[966]	1055	prec__tmp = cxios_is_defined_fieldgroup_prec &
	1056	(fieldgroup_hdl%daddr)
[581]	1057	prec_ = prec__tmp
[432]	1058	ENDIF
[581]	1059
[593]	1060	IF (PRESENT(read_access_)) THEN
[966]	1061	read_access__tmp = cxios_is_defined_fieldgroup_read_access &
	1062	(fieldgroup_hdl%daddr)
[593]	1063	read_access_ = read_access__tmp
	1064	ENDIF
	1065
[891]	1066	IF (PRESENT(scalar_ref_)) THEN
[966]	1067	scalar_ref__tmp = cxios_is_defined_fieldgroup_scalar_ref &
	1068	(fieldgroup_hdl%daddr)
[891]	1069	scalar_ref_ = scalar_ref__tmp
	1070	ENDIF
	1071
[464]	1072	IF (PRESENT(scale_factor_)) THEN
[966]	1073	scale_factor__tmp = cxios_is_defined_fieldgroup_scale_factor &
	1074	(fieldgroup_hdl%daddr)
[581]	1075	scale_factor_ = scale_factor__tmp
[464]	1076	ENDIF
[581]	1077
[432]	1078	IF (PRESENT(standard_name_)) THEN
[966]	1079	standard_name__tmp = cxios_is_defined_fieldgroup_standard_name &
	1080	(fieldgroup_hdl%daddr)
[581]	1081	standard_name_ = standard_name__tmp
[432]	1082	ENDIF
[581]	1083
[711]	1084	IF (PRESENT(ts_enabled_)) THEN
[966]	1085	ts_enabled__tmp = cxios_is_defined_fieldgroup_ts_enabled &
	1086	(fieldgroup_hdl%daddr)
[711]	1087	ts_enabled_ = ts_enabled__tmp
	1088	ENDIF
	1089
	1090	IF (PRESENT(ts_split_freq_)) THEN
[966]	1091	ts_split_freq__tmp = cxios_is_defined_fieldgroup_ts_split_freq &
	1092	(fieldgroup_hdl%daddr)
[711]	1093	ts_split_freq_ = ts_split_freq__tmp
	1094	ENDIF
	1095
[432]	1096	IF (PRESENT(unit_)) THEN
[966]	1097	unit__tmp = cxios_is_defined_fieldgroup_unit &
	1098	(fieldgroup_hdl%daddr)
[581]	1099	unit_ = unit__tmp
[432]	1100	ENDIF
[581]	1101
[463]	1102	IF (PRESENT(valid_max_)) THEN
[966]	1103	valid_max__tmp = cxios_is_defined_fieldgroup_valid_max &
	1104	(fieldgroup_hdl%daddr)
[581]	1105	valid_max_ = valid_max__tmp
[463]	1106	ENDIF
[581]	1107
[463]	1108	IF (PRESENT(valid_min_)) THEN
[966]	1109	valid_min__tmp = cxios_is_defined_fieldgroup_valid_min &
	1110	(fieldgroup_hdl%daddr)
[581]	1111	valid_min_ = valid_min__tmp
[463]	1112	ENDIF
[581]	1113
[432]	1114	END SUBROUTINE xios(is_defined_fieldgroup_attr_hdl_)
[581]	1115
[326]	1116	END MODULE ifieldgroup_attr

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

Download in other formats: