Context Navigation

source: XIOS/trunk/src/interface/fortran_attr/ifieldgroup_attr.F90 @ 608

Last change on this file since 608 was 608, checked in by rlacroix, 9 years ago

Add the Fortran interface for the "compression_level" attribute.

It had been forgotten in r606.

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: 32.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) &
[608]	14	( fieldgroup_id, add_offset, axis_ref, compression_level, default_value, detect_missing_value &
	15	, domain_ref, enabled, field_ref, freq_offset, freq_op, grid_ref, group_ref, level, long_name &
	16	, name, operation, prec, read_access, scale_factor, standard_name, unit, valid_max, valid_min &
	17	)
[581]	18
[326]	19	IMPLICIT NONE
	20	TYPE(txios(fieldgroup)) :: fieldgroup_hdl
	21	CHARACTER(LEN=*), INTENT(IN) ::fieldgroup_id
[464]	22	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: add_offset
[326]	23	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: axis_ref
[608]	24	INTEGER , OPTIONAL, INTENT(IN) :: compression_level
[326]	25	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: default_value
[472]	26	LOGICAL , OPTIONAL, INTENT(IN) :: detect_missing_value
	27	LOGICAL (KIND=C_BOOL) :: detect_missing_value_tmp
[326]	28	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: domain_ref
	29	LOGICAL , OPTIONAL, INTENT(IN) :: enabled
	30	LOGICAL (KIND=C_BOOL) :: enabled_tmp
	31	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: field_ref
[538]	32	TYPE(txios(duration)) , OPTIONAL, INTENT(IN) :: freq_offset
	33	TYPE(txios(duration)) , OPTIONAL, INTENT(IN) :: freq_op
[326]	34	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: grid_ref
	35	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: group_ref
	36	INTEGER , OPTIONAL, INTENT(IN) :: level
	37	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: long_name
	38	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name
	39	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: operation
	40	INTEGER , OPTIONAL, INTENT(IN) :: prec
[593]	41	LOGICAL , OPTIONAL, INTENT(IN) :: read_access
	42	LOGICAL (KIND=C_BOOL) :: read_access_tmp
[464]	43	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: scale_factor
[326]	44	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: standard_name
	45	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: unit
[463]	46	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: valid_max
	47	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: valid_min
[581]	48
[326]	49	CALL xios(get_fieldgroup_handle)(fieldgroup_id,fieldgroup_hdl)
	50	CALL xios(set_fieldgroup_attr_hdl_) &
[608]	51	( fieldgroup_hdl, add_offset, axis_ref, compression_level, default_value, detect_missing_value &
	52	, domain_ref, enabled, field_ref, freq_offset, freq_op, grid_ref, group_ref, level, long_name &
	53	, name, operation, prec, read_access, scale_factor, standard_name, unit, valid_max, valid_min &
	54	)
[581]	55
[326]	56	END SUBROUTINE xios(set_fieldgroup_attr)
[581]	57
[326]	58	SUBROUTINE xios(set_fieldgroup_attr_hdl) &
[608]	59	( fieldgroup_hdl, add_offset, axis_ref, compression_level, default_value, detect_missing_value &
	60	, domain_ref, enabled, field_ref, freq_offset, freq_op, grid_ref, group_ref, level, long_name &
	61	, name, operation, prec, read_access, scale_factor, standard_name, unit, valid_max, valid_min &
	62	)
[581]	63
[326]	64	IMPLICIT NONE
	65	TYPE(txios(fieldgroup)) , INTENT(IN) :: fieldgroup_hdl
[464]	66	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: add_offset
[326]	67	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: axis_ref
[608]	68	INTEGER , OPTIONAL, INTENT(IN) :: compression_level
[326]	69	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: default_value
[472]	70	LOGICAL , OPTIONAL, INTENT(IN) :: detect_missing_value
	71	LOGICAL (KIND=C_BOOL) :: detect_missing_value_tmp
[326]	72	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: domain_ref
	73	LOGICAL , OPTIONAL, INTENT(IN) :: enabled
	74	LOGICAL (KIND=C_BOOL) :: enabled_tmp
	75	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: field_ref
[538]	76	TYPE(txios(duration)) , OPTIONAL, INTENT(IN) :: freq_offset
	77	TYPE(txios(duration)) , OPTIONAL, INTENT(IN) :: freq_op
[326]	78	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: grid_ref
	79	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: group_ref
	80	INTEGER , OPTIONAL, INTENT(IN) :: level
	81	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: long_name
	82	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name
	83	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: operation
	84	INTEGER , OPTIONAL, INTENT(IN) :: prec
[593]	85	LOGICAL , OPTIONAL, INTENT(IN) :: read_access
	86	LOGICAL (KIND=C_BOOL) :: read_access_tmp
[464]	87	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: scale_factor
[326]	88	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: standard_name
	89	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: unit
[463]	90	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: valid_max
	91	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: valid_min
[581]	92
[326]	93	CALL xios(set_fieldgroup_attr_hdl_) &
[608]	94	( fieldgroup_hdl, add_offset, axis_ref, compression_level, default_value, detect_missing_value &
	95	, domain_ref, enabled, field_ref, freq_offset, freq_op, grid_ref, group_ref, level, long_name &
	96	, name, operation, prec, read_access, scale_factor, standard_name, unit, valid_max, valid_min &
	97	)
[581]	98
[326]	99	END SUBROUTINE xios(set_fieldgroup_attr_hdl)
[581]	100
[326]	101	SUBROUTINE xios(set_fieldgroup_attr_hdl_) &
[608]	102	( fieldgroup_hdl, add_offset_, axis_ref_, compression_level_, default_value_, detect_missing_value_ &
	103	, domain_ref_, enabled_, field_ref_, freq_offset_, freq_op_, grid_ref_, group_ref_, level_, long_name_ &
	104	, name_, operation_, prec_, read_access_, scale_factor_, standard_name_, unit_, valid_max_, valid_min_ &
[593]	105	)
[581]	106
[326]	107	IMPLICIT NONE
	108	TYPE(txios(fieldgroup)) , INTENT(IN) :: fieldgroup_hdl
[464]	109	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: add_offset_
[326]	110	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: axis_ref_
[608]	111	INTEGER , OPTIONAL, INTENT(IN) :: compression_level_
[326]	112	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: default_value_
[472]	113	LOGICAL , OPTIONAL, INTENT(IN) :: detect_missing_value_
	114	LOGICAL (KIND=C_BOOL) :: detect_missing_value__tmp
[326]	115	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: domain_ref_
	116	LOGICAL , OPTIONAL, INTENT(IN) :: enabled_
	117	LOGICAL (KIND=C_BOOL) :: enabled__tmp
	118	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: field_ref_
[538]	119	TYPE(txios(duration)) , OPTIONAL, INTENT(IN) :: freq_offset_
	120	TYPE(txios(duration)) , OPTIONAL, INTENT(IN) :: freq_op_
[326]	121	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: grid_ref_
	122	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: group_ref_
	123	INTEGER , OPTIONAL, INTENT(IN) :: level_
	124	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: long_name_
	125	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name_
	126	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: operation_
	127	INTEGER , OPTIONAL, INTENT(IN) :: prec_
[593]	128	LOGICAL , OPTIONAL, INTENT(IN) :: read_access_
	129	LOGICAL (KIND=C_BOOL) :: read_access__tmp
[464]	130	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: scale_factor_
[326]	131	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: standard_name_
	132	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: unit_
[463]	133	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: valid_max_
	134	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: valid_min_
[581]	135
[464]	136	IF (PRESENT(add_offset_)) THEN
	137	CALL cxios_set_fieldgroup_add_offset(fieldgroup_hdl%daddr, add_offset_)
	138	ENDIF
[581]	139
[326]	140	IF (PRESENT(axis_ref_)) THEN
	141	CALL cxios_set_fieldgroup_axis_ref(fieldgroup_hdl%daddr, axis_ref_, len(axis_ref_))
	142	ENDIF
[581]	143
[608]	144	IF (PRESENT(compression_level_)) THEN
	145	CALL cxios_set_fieldgroup_compression_level(fieldgroup_hdl%daddr, compression_level_)
	146	ENDIF
	147
[326]	148	IF (PRESENT(default_value_)) THEN
	149	CALL cxios_set_fieldgroup_default_value(fieldgroup_hdl%daddr, default_value_)
	150	ENDIF
[581]	151
[472]	152	IF (PRESENT(detect_missing_value_)) THEN
[581]	153	detect_missing_value__tmp = detect_missing_value_
[472]	154	CALL cxios_set_fieldgroup_detect_missing_value(fieldgroup_hdl%daddr, detect_missing_value__tmp)
	155	ENDIF
[581]	156
[326]	157	IF (PRESENT(domain_ref_)) THEN
	158	CALL cxios_set_fieldgroup_domain_ref(fieldgroup_hdl%daddr, domain_ref_, len(domain_ref_))
	159	ENDIF
[581]	160
[326]	161	IF (PRESENT(enabled_)) THEN
[581]	162	enabled__tmp = enabled_
[326]	163	CALL cxios_set_fieldgroup_enabled(fieldgroup_hdl%daddr, enabled__tmp)
	164	ENDIF
[581]	165
[326]	166	IF (PRESENT(field_ref_)) THEN
	167	CALL cxios_set_fieldgroup_field_ref(fieldgroup_hdl%daddr, field_ref_, len(field_ref_))
	168	ENDIF
[581]	169
[326]	170	IF (PRESENT(freq_offset_)) THEN
[538]	171	CALL cxios_set_fieldgroup_freq_offset(fieldgroup_hdl%daddr, freq_offset_)
[326]	172	ENDIF
[581]	173
[326]	174	IF (PRESENT(freq_op_)) THEN
[538]	175	CALL cxios_set_fieldgroup_freq_op(fieldgroup_hdl%daddr, freq_op_)
[326]	176	ENDIF
[581]	177
[326]	178	IF (PRESENT(grid_ref_)) THEN
	179	CALL cxios_set_fieldgroup_grid_ref(fieldgroup_hdl%daddr, grid_ref_, len(grid_ref_))
	180	ENDIF
[581]	181
[326]	182	IF (PRESENT(group_ref_)) THEN
	183	CALL cxios_set_fieldgroup_group_ref(fieldgroup_hdl%daddr, group_ref_, len(group_ref_))
	184	ENDIF
[581]	185
[326]	186	IF (PRESENT(level_)) THEN
	187	CALL cxios_set_fieldgroup_level(fieldgroup_hdl%daddr, level_)
	188	ENDIF
[581]	189
[326]	190	IF (PRESENT(long_name_)) THEN
	191	CALL cxios_set_fieldgroup_long_name(fieldgroup_hdl%daddr, long_name_, len(long_name_))
	192	ENDIF
[581]	193
[326]	194	IF (PRESENT(name_)) THEN
	195	CALL cxios_set_fieldgroup_name(fieldgroup_hdl%daddr, name_, len(name_))
	196	ENDIF
[581]	197
[326]	198	IF (PRESENT(operation_)) THEN
	199	CALL cxios_set_fieldgroup_operation(fieldgroup_hdl%daddr, operation_, len(operation_))
	200	ENDIF
[581]	201
[326]	202	IF (PRESENT(prec_)) THEN
	203	CALL cxios_set_fieldgroup_prec(fieldgroup_hdl%daddr, prec_)
	204	ENDIF
[581]	205
[593]	206	IF (PRESENT(read_access_)) THEN
	207	read_access__tmp = read_access_
	208	CALL cxios_set_fieldgroup_read_access(fieldgroup_hdl%daddr, read_access__tmp)
	209	ENDIF
	210
[464]	211	IF (PRESENT(scale_factor_)) THEN
	212	CALL cxios_set_fieldgroup_scale_factor(fieldgroup_hdl%daddr, scale_factor_)
	213	ENDIF
[581]	214
[326]	215	IF (PRESENT(standard_name_)) THEN
	216	CALL cxios_set_fieldgroup_standard_name(fieldgroup_hdl%daddr, standard_name_, len(standard_name_))
	217	ENDIF
[581]	218
[326]	219	IF (PRESENT(unit_)) THEN
	220	CALL cxios_set_fieldgroup_unit(fieldgroup_hdl%daddr, unit_, len(unit_))
	221	ENDIF
[581]	222
[463]	223	IF (PRESENT(valid_max_)) THEN
	224	CALL cxios_set_fieldgroup_valid_max(fieldgroup_hdl%daddr, valid_max_)
	225	ENDIF
[581]	226
[463]	227	IF (PRESENT(valid_min_)) THEN
	228	CALL cxios_set_fieldgroup_valid_min(fieldgroup_hdl%daddr, valid_min_)
	229	ENDIF
[581]	230
[326]	231	END SUBROUTINE xios(set_fieldgroup_attr_hdl_)
[581]	232
[326]	233	SUBROUTINE xios(get_fieldgroup_attr) &
[608]	234	( fieldgroup_id, add_offset, axis_ref, compression_level, default_value, detect_missing_value &
	235	, domain_ref, enabled, field_ref, freq_offset, freq_op, grid_ref, group_ref, level, long_name &
	236	, name, operation, prec, read_access, scale_factor, standard_name, unit, valid_max, valid_min &
	237	)
[581]	238
[326]	239	IMPLICIT NONE
	240	TYPE(txios(fieldgroup)) :: fieldgroup_hdl
	241	CHARACTER(LEN=*), INTENT(IN) ::fieldgroup_id
[464]	242	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: add_offset
[326]	243	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: axis_ref
[608]	244	INTEGER , OPTIONAL, INTENT(OUT) :: compression_level
[326]	245	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: default_value
[472]	246	LOGICAL , OPTIONAL, INTENT(OUT) :: detect_missing_value
	247	LOGICAL (KIND=C_BOOL) :: detect_missing_value_tmp
[326]	248	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: domain_ref
	249	LOGICAL , OPTIONAL, INTENT(OUT) :: enabled
	250	LOGICAL (KIND=C_BOOL) :: enabled_tmp
	251	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: field_ref
[538]	252	TYPE(txios(duration)) , OPTIONAL, INTENT(OUT) :: freq_offset
	253	TYPE(txios(duration)) , OPTIONAL, INTENT(OUT) :: freq_op
[326]	254	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: grid_ref
	255	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: group_ref
	256	INTEGER , OPTIONAL, INTENT(OUT) :: level
	257	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: long_name
	258	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name
	259	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: operation
	260	INTEGER , OPTIONAL, INTENT(OUT) :: prec
[593]	261	LOGICAL , OPTIONAL, INTENT(OUT) :: read_access
	262	LOGICAL (KIND=C_BOOL) :: read_access_tmp
[464]	263	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: scale_factor
[326]	264	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: standard_name
	265	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: unit
[463]	266	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: valid_max
	267	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: valid_min
[581]	268
[326]	269	CALL xios(get_fieldgroup_handle)(fieldgroup_id,fieldgroup_hdl)
	270	CALL xios(get_fieldgroup_attr_hdl_) &
[608]	271	( fieldgroup_hdl, add_offset, axis_ref, compression_level, default_value, detect_missing_value &
	272	, domain_ref, enabled, field_ref, freq_offset, freq_op, grid_ref, group_ref, level, long_name &
	273	, name, operation, prec, read_access, scale_factor, standard_name, unit, valid_max, valid_min &
	274	)
[581]	275
[326]	276	END SUBROUTINE xios(get_fieldgroup_attr)
[581]	277
[326]	278	SUBROUTINE xios(get_fieldgroup_attr_hdl) &
[608]	279	( fieldgroup_hdl, add_offset, axis_ref, compression_level, default_value, detect_missing_value &
	280	, domain_ref, enabled, field_ref, freq_offset, freq_op, grid_ref, group_ref, level, long_name &
	281	, name, operation, prec, read_access, scale_factor, standard_name, unit, valid_max, valid_min &
	282	)
[581]	283
[326]	284	IMPLICIT NONE
	285	TYPE(txios(fieldgroup)) , INTENT(IN) :: fieldgroup_hdl
[464]	286	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: add_offset
[326]	287	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: axis_ref
[608]	288	INTEGER , OPTIONAL, INTENT(OUT) :: compression_level
[326]	289	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: default_value
[472]	290	LOGICAL , OPTIONAL, INTENT(OUT) :: detect_missing_value
	291	LOGICAL (KIND=C_BOOL) :: detect_missing_value_tmp
[326]	292	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: domain_ref
	293	LOGICAL , OPTIONAL, INTENT(OUT) :: enabled
	294	LOGICAL (KIND=C_BOOL) :: enabled_tmp
	295	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: field_ref
[538]	296	TYPE(txios(duration)) , OPTIONAL, INTENT(OUT) :: freq_offset
	297	TYPE(txios(duration)) , OPTIONAL, INTENT(OUT) :: freq_op
[326]	298	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: grid_ref
	299	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: group_ref
	300	INTEGER , OPTIONAL, INTENT(OUT) :: level
	301	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: long_name
	302	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name
	303	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: operation
	304	INTEGER , OPTIONAL, INTENT(OUT) :: prec
[593]	305	LOGICAL , OPTIONAL, INTENT(OUT) :: read_access
	306	LOGICAL (KIND=C_BOOL) :: read_access_tmp
[464]	307	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: scale_factor
[326]	308	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: standard_name
	309	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: unit
[463]	310	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: valid_max
	311	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: valid_min
[581]	312
[326]	313	CALL xios(get_fieldgroup_attr_hdl_) &
[608]	314	( fieldgroup_hdl, add_offset, axis_ref, compression_level, default_value, detect_missing_value &
	315	, domain_ref, enabled, field_ref, freq_offset, freq_op, grid_ref, group_ref, level, long_name &
	316	, name, operation, prec, read_access, scale_factor, standard_name, unit, valid_max, valid_min &
	317	)
[581]	318
[326]	319	END SUBROUTINE xios(get_fieldgroup_attr_hdl)
[581]	320
[326]	321	SUBROUTINE xios(get_fieldgroup_attr_hdl_) &
[608]	322	( fieldgroup_hdl, add_offset_, axis_ref_, compression_level_, default_value_, detect_missing_value_ &
	323	, domain_ref_, enabled_, field_ref_, freq_offset_, freq_op_, grid_ref_, group_ref_, level_, long_name_ &
	324	, name_, operation_, prec_, read_access_, scale_factor_, standard_name_, unit_, valid_max_, valid_min_ &
[593]	325	)
[581]	326
[326]	327	IMPLICIT NONE
	328	TYPE(txios(fieldgroup)) , INTENT(IN) :: fieldgroup_hdl
[464]	329	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: add_offset_
[326]	330	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: axis_ref_
[608]	331	INTEGER , OPTIONAL, INTENT(OUT) :: compression_level_
[326]	332	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: default_value_
[472]	333	LOGICAL , OPTIONAL, INTENT(OUT) :: detect_missing_value_
	334	LOGICAL (KIND=C_BOOL) :: detect_missing_value__tmp
[326]	335	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: domain_ref_
	336	LOGICAL , OPTIONAL, INTENT(OUT) :: enabled_
	337	LOGICAL (KIND=C_BOOL) :: enabled__tmp
	338	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: field_ref_
[538]	339	TYPE(txios(duration)) , OPTIONAL, INTENT(OUT) :: freq_offset_
	340	TYPE(txios(duration)) , OPTIONAL, INTENT(OUT) :: freq_op_
[326]	341	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: grid_ref_
	342	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: group_ref_
	343	INTEGER , OPTIONAL, INTENT(OUT) :: level_
	344	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: long_name_
	345	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name_
	346	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: operation_
	347	INTEGER , OPTIONAL, INTENT(OUT) :: prec_
[593]	348	LOGICAL , OPTIONAL, INTENT(OUT) :: read_access_
	349	LOGICAL (KIND=C_BOOL) :: read_access__tmp
[464]	350	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: scale_factor_
[326]	351	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: standard_name_
	352	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: unit_
[463]	353	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: valid_max_
	354	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: valid_min_
[581]	355
[464]	356	IF (PRESENT(add_offset_)) THEN
	357	CALL cxios_get_fieldgroup_add_offset(fieldgroup_hdl%daddr, add_offset_)
	358	ENDIF
[581]	359
[326]	360	IF (PRESENT(axis_ref_)) THEN
	361	CALL cxios_get_fieldgroup_axis_ref(fieldgroup_hdl%daddr, axis_ref_, len(axis_ref_))
	362	ENDIF
[581]	363
[608]	364	IF (PRESENT(compression_level_)) THEN
	365	CALL cxios_get_fieldgroup_compression_level(fieldgroup_hdl%daddr, compression_level_)
	366	ENDIF
	367
[326]	368	IF (PRESENT(default_value_)) THEN
	369	CALL cxios_get_fieldgroup_default_value(fieldgroup_hdl%daddr, default_value_)
	370	ENDIF
[581]	371
[472]	372	IF (PRESENT(detect_missing_value_)) THEN
	373	CALL cxios_get_fieldgroup_detect_missing_value(fieldgroup_hdl%daddr, detect_missing_value__tmp)
[581]	374	detect_missing_value_ = detect_missing_value__tmp
[472]	375	ENDIF
[581]	376
[326]	377	IF (PRESENT(domain_ref_)) THEN
	378	CALL cxios_get_fieldgroup_domain_ref(fieldgroup_hdl%daddr, domain_ref_, len(domain_ref_))
	379	ENDIF
[581]	380
[326]	381	IF (PRESENT(enabled_)) THEN
	382	CALL cxios_get_fieldgroup_enabled(fieldgroup_hdl%daddr, enabled__tmp)
[581]	383	enabled_ = enabled__tmp
[326]	384	ENDIF
[581]	385
[326]	386	IF (PRESENT(field_ref_)) THEN
	387	CALL cxios_get_fieldgroup_field_ref(fieldgroup_hdl%daddr, field_ref_, len(field_ref_))
	388	ENDIF
[581]	389
[326]	390	IF (PRESENT(freq_offset_)) THEN
[538]	391	CALL cxios_get_fieldgroup_freq_offset(fieldgroup_hdl%daddr, freq_offset_)
[326]	392	ENDIF
[581]	393
[326]	394	IF (PRESENT(freq_op_)) THEN
[538]	395	CALL cxios_get_fieldgroup_freq_op(fieldgroup_hdl%daddr, freq_op_)
[326]	396	ENDIF
[581]	397
[326]	398	IF (PRESENT(grid_ref_)) THEN
	399	CALL cxios_get_fieldgroup_grid_ref(fieldgroup_hdl%daddr, grid_ref_, len(grid_ref_))
	400	ENDIF
[581]	401
[326]	402	IF (PRESENT(group_ref_)) THEN
	403	CALL cxios_get_fieldgroup_group_ref(fieldgroup_hdl%daddr, group_ref_, len(group_ref_))
	404	ENDIF
[581]	405
[326]	406	IF (PRESENT(level_)) THEN
	407	CALL cxios_get_fieldgroup_level(fieldgroup_hdl%daddr, level_)
	408	ENDIF
[581]	409
[326]	410	IF (PRESENT(long_name_)) THEN
	411	CALL cxios_get_fieldgroup_long_name(fieldgroup_hdl%daddr, long_name_, len(long_name_))
	412	ENDIF
[581]	413
[326]	414	IF (PRESENT(name_)) THEN
	415	CALL cxios_get_fieldgroup_name(fieldgroup_hdl%daddr, name_, len(name_))
	416	ENDIF
[581]	417
[326]	418	IF (PRESENT(operation_)) THEN
	419	CALL cxios_get_fieldgroup_operation(fieldgroup_hdl%daddr, operation_, len(operation_))
	420	ENDIF
[581]	421
[326]	422	IF (PRESENT(prec_)) THEN
	423	CALL cxios_get_fieldgroup_prec(fieldgroup_hdl%daddr, prec_)
	424	ENDIF
[581]	425
[593]	426	IF (PRESENT(read_access_)) THEN
	427	CALL cxios_get_fieldgroup_read_access(fieldgroup_hdl%daddr, read_access__tmp)
	428	read_access_ = read_access__tmp
	429	ENDIF
	430
[464]	431	IF (PRESENT(scale_factor_)) THEN
	432	CALL cxios_get_fieldgroup_scale_factor(fieldgroup_hdl%daddr, scale_factor_)
	433	ENDIF
[581]	434
[326]	435	IF (PRESENT(standard_name_)) THEN
	436	CALL cxios_get_fieldgroup_standard_name(fieldgroup_hdl%daddr, standard_name_, len(standard_name_))
	437	ENDIF
[581]	438
[326]	439	IF (PRESENT(unit_)) THEN
	440	CALL cxios_get_fieldgroup_unit(fieldgroup_hdl%daddr, unit_, len(unit_))
	441	ENDIF
[581]	442
[463]	443	IF (PRESENT(valid_max_)) THEN
	444	CALL cxios_get_fieldgroup_valid_max(fieldgroup_hdl%daddr, valid_max_)
	445	ENDIF
[581]	446
[463]	447	IF (PRESENT(valid_min_)) THEN
	448	CALL cxios_get_fieldgroup_valid_min(fieldgroup_hdl%daddr, valid_min_)
	449	ENDIF
[581]	450
[326]	451	END SUBROUTINE xios(get_fieldgroup_attr_hdl_)
[581]	452
[432]	453	SUBROUTINE xios(is_defined_fieldgroup_attr) &
[608]	454	( fieldgroup_id, add_offset, axis_ref, compression_level, default_value, detect_missing_value &
	455	, domain_ref, enabled, field_ref, freq_offset, freq_op, grid_ref, group_ref, level, long_name &
	456	, name, operation, prec, read_access, scale_factor, standard_name, unit, valid_max, valid_min &
	457	)
[581]	458
[432]	459	IMPLICIT NONE
	460	TYPE(txios(fieldgroup)) :: fieldgroup_hdl
	461	CHARACTER(LEN=*), INTENT(IN) ::fieldgroup_id
[464]	462	LOGICAL, OPTIONAL, INTENT(OUT) :: add_offset
	463	LOGICAL(KIND=C_BOOL) :: add_offset_tmp
[432]	464	LOGICAL, OPTIONAL, INTENT(OUT) :: axis_ref
	465	LOGICAL(KIND=C_BOOL) :: axis_ref_tmp
[608]	466	LOGICAL, OPTIONAL, INTENT(OUT) :: compression_level
	467	LOGICAL(KIND=C_BOOL) :: compression_level_tmp
[432]	468	LOGICAL, OPTIONAL, INTENT(OUT) :: default_value
	469	LOGICAL(KIND=C_BOOL) :: default_value_tmp
[472]	470	LOGICAL, OPTIONAL, INTENT(OUT) :: detect_missing_value
	471	LOGICAL(KIND=C_BOOL) :: detect_missing_value_tmp
[432]	472	LOGICAL, OPTIONAL, INTENT(OUT) :: domain_ref
	473	LOGICAL(KIND=C_BOOL) :: domain_ref_tmp
	474	LOGICAL, OPTIONAL, INTENT(OUT) :: enabled
	475	LOGICAL(KIND=C_BOOL) :: enabled_tmp
	476	LOGICAL, OPTIONAL, INTENT(OUT) :: field_ref
	477	LOGICAL(KIND=C_BOOL) :: field_ref_tmp
	478	LOGICAL, OPTIONAL, INTENT(OUT) :: freq_offset
	479	LOGICAL(KIND=C_BOOL) :: freq_offset_tmp
	480	LOGICAL, OPTIONAL, INTENT(OUT) :: freq_op
	481	LOGICAL(KIND=C_BOOL) :: freq_op_tmp
	482	LOGICAL, OPTIONAL, INTENT(OUT) :: grid_ref
	483	LOGICAL(KIND=C_BOOL) :: grid_ref_tmp
	484	LOGICAL, OPTIONAL, INTENT(OUT) :: group_ref
	485	LOGICAL(KIND=C_BOOL) :: group_ref_tmp
	486	LOGICAL, OPTIONAL, INTENT(OUT) :: level
	487	LOGICAL(KIND=C_BOOL) :: level_tmp
	488	LOGICAL, OPTIONAL, INTENT(OUT) :: long_name
	489	LOGICAL(KIND=C_BOOL) :: long_name_tmp
	490	LOGICAL, OPTIONAL, INTENT(OUT) :: name
	491	LOGICAL(KIND=C_BOOL) :: name_tmp
	492	LOGICAL, OPTIONAL, INTENT(OUT) :: operation
	493	LOGICAL(KIND=C_BOOL) :: operation_tmp
	494	LOGICAL, OPTIONAL, INTENT(OUT) :: prec
	495	LOGICAL(KIND=C_BOOL) :: prec_tmp
[593]	496	LOGICAL, OPTIONAL, INTENT(OUT) :: read_access
	497	LOGICAL(KIND=C_BOOL) :: read_access_tmp
[464]	498	LOGICAL, OPTIONAL, INTENT(OUT) :: scale_factor
	499	LOGICAL(KIND=C_BOOL) :: scale_factor_tmp
[432]	500	LOGICAL, OPTIONAL, INTENT(OUT) :: standard_name
	501	LOGICAL(KIND=C_BOOL) :: standard_name_tmp
	502	LOGICAL, OPTIONAL, INTENT(OUT) :: unit
	503	LOGICAL(KIND=C_BOOL) :: unit_tmp
[463]	504	LOGICAL, OPTIONAL, INTENT(OUT) :: valid_max
	505	LOGICAL(KIND=C_BOOL) :: valid_max_tmp
	506	LOGICAL, OPTIONAL, INTENT(OUT) :: valid_min
	507	LOGICAL(KIND=C_BOOL) :: valid_min_tmp
[581]	508
[432]	509	CALL xios(get_fieldgroup_handle)(fieldgroup_id,fieldgroup_hdl)
	510	CALL xios(is_defined_fieldgroup_attr_hdl_) &
[608]	511	( fieldgroup_hdl, add_offset, axis_ref, compression_level, default_value, detect_missing_value &
	512	, domain_ref, enabled, field_ref, freq_offset, freq_op, grid_ref, group_ref, level, long_name &
	513	, name, operation, prec, read_access, scale_factor, standard_name, unit, valid_max, valid_min &
	514	)
[581]	515
[432]	516	END SUBROUTINE xios(is_defined_fieldgroup_attr)
[581]	517
[432]	518	SUBROUTINE xios(is_defined_fieldgroup_attr_hdl) &
[608]	519	( fieldgroup_hdl, add_offset, axis_ref, compression_level, default_value, detect_missing_value &
	520	, domain_ref, enabled, field_ref, freq_offset, freq_op, grid_ref, group_ref, level, long_name &
	521	, name, operation, prec, read_access, scale_factor, standard_name, unit, valid_max, valid_min &
	522	)
[581]	523
[432]	524	IMPLICIT NONE
	525	TYPE(txios(fieldgroup)) , INTENT(IN) :: fieldgroup_hdl
[464]	526	LOGICAL, OPTIONAL, INTENT(OUT) :: add_offset
	527	LOGICAL(KIND=C_BOOL) :: add_offset_tmp
[432]	528	LOGICAL, OPTIONAL, INTENT(OUT) :: axis_ref
	529	LOGICAL(KIND=C_BOOL) :: axis_ref_tmp
[608]	530	LOGICAL, OPTIONAL, INTENT(OUT) :: compression_level
	531	LOGICAL(KIND=C_BOOL) :: compression_level_tmp
[432]	532	LOGICAL, OPTIONAL, INTENT(OUT) :: default_value
	533	LOGICAL(KIND=C_BOOL) :: default_value_tmp
[472]	534	LOGICAL, OPTIONAL, INTENT(OUT) :: detect_missing_value
	535	LOGICAL(KIND=C_BOOL) :: detect_missing_value_tmp
[432]	536	LOGICAL, OPTIONAL, INTENT(OUT) :: domain_ref
	537	LOGICAL(KIND=C_BOOL) :: domain_ref_tmp
	538	LOGICAL, OPTIONAL, INTENT(OUT) :: enabled
	539	LOGICAL(KIND=C_BOOL) :: enabled_tmp
	540	LOGICAL, OPTIONAL, INTENT(OUT) :: field_ref
	541	LOGICAL(KIND=C_BOOL) :: field_ref_tmp
	542	LOGICAL, OPTIONAL, INTENT(OUT) :: freq_offset
	543	LOGICAL(KIND=C_BOOL) :: freq_offset_tmp
	544	LOGICAL, OPTIONAL, INTENT(OUT) :: freq_op
	545	LOGICAL(KIND=C_BOOL) :: freq_op_tmp
	546	LOGICAL, OPTIONAL, INTENT(OUT) :: grid_ref
	547	LOGICAL(KIND=C_BOOL) :: grid_ref_tmp
	548	LOGICAL, OPTIONAL, INTENT(OUT) :: group_ref
	549	LOGICAL(KIND=C_BOOL) :: group_ref_tmp
	550	LOGICAL, OPTIONAL, INTENT(OUT) :: level
	551	LOGICAL(KIND=C_BOOL) :: level_tmp
	552	LOGICAL, OPTIONAL, INTENT(OUT) :: long_name
	553	LOGICAL(KIND=C_BOOL) :: long_name_tmp
	554	LOGICAL, OPTIONAL, INTENT(OUT) :: name
	555	LOGICAL(KIND=C_BOOL) :: name_tmp
	556	LOGICAL, OPTIONAL, INTENT(OUT) :: operation
	557	LOGICAL(KIND=C_BOOL) :: operation_tmp
	558	LOGICAL, OPTIONAL, INTENT(OUT) :: prec
	559	LOGICAL(KIND=C_BOOL) :: prec_tmp
[593]	560	LOGICAL, OPTIONAL, INTENT(OUT) :: read_access
	561	LOGICAL(KIND=C_BOOL) :: read_access_tmp
[464]	562	LOGICAL, OPTIONAL, INTENT(OUT) :: scale_factor
	563	LOGICAL(KIND=C_BOOL) :: scale_factor_tmp
[432]	564	LOGICAL, OPTIONAL, INTENT(OUT) :: standard_name
	565	LOGICAL(KIND=C_BOOL) :: standard_name_tmp
	566	LOGICAL, OPTIONAL, INTENT(OUT) :: unit
	567	LOGICAL(KIND=C_BOOL) :: unit_tmp
[463]	568	LOGICAL, OPTIONAL, INTENT(OUT) :: valid_max
	569	LOGICAL(KIND=C_BOOL) :: valid_max_tmp
	570	LOGICAL, OPTIONAL, INTENT(OUT) :: valid_min
	571	LOGICAL(KIND=C_BOOL) :: valid_min_tmp
[581]	572
[432]	573	CALL xios(is_defined_fieldgroup_attr_hdl_) &
[608]	574	( fieldgroup_hdl, add_offset, axis_ref, compression_level, default_value, detect_missing_value &
	575	, domain_ref, enabled, field_ref, freq_offset, freq_op, grid_ref, group_ref, level, long_name &
	576	, name, operation, prec, read_access, scale_factor, standard_name, unit, valid_max, valid_min &
	577	)
[581]	578
[432]	579	END SUBROUTINE xios(is_defined_fieldgroup_attr_hdl)
[581]	580
[432]	581	SUBROUTINE xios(is_defined_fieldgroup_attr_hdl_) &
[608]	582	( fieldgroup_hdl, add_offset_, axis_ref_, compression_level_, default_value_, detect_missing_value_ &
	583	, domain_ref_, enabled_, field_ref_, freq_offset_, freq_op_, grid_ref_, group_ref_, level_, long_name_ &
	584	, name_, operation_, prec_, read_access_, scale_factor_, standard_name_, unit_, valid_max_, valid_min_ &
[593]	585	)
[581]	586
[432]	587	IMPLICIT NONE
	588	TYPE(txios(fieldgroup)) , INTENT(IN) :: fieldgroup_hdl
[464]	589	LOGICAL, OPTIONAL, INTENT(OUT) :: add_offset_
	590	LOGICAL(KIND=C_BOOL) :: add_offset__tmp
[432]	591	LOGICAL, OPTIONAL, INTENT(OUT) :: axis_ref_
	592	LOGICAL(KIND=C_BOOL) :: axis_ref__tmp
[608]	593	LOGICAL, OPTIONAL, INTENT(OUT) :: compression_level_
	594	LOGICAL(KIND=C_BOOL) :: compression_level__tmp
[432]	595	LOGICAL, OPTIONAL, INTENT(OUT) :: default_value_
	596	LOGICAL(KIND=C_BOOL) :: default_value__tmp
[472]	597	LOGICAL, OPTIONAL, INTENT(OUT) :: detect_missing_value_
	598	LOGICAL(KIND=C_BOOL) :: detect_missing_value__tmp
[432]	599	LOGICAL, OPTIONAL, INTENT(OUT) :: domain_ref_
	600	LOGICAL(KIND=C_BOOL) :: domain_ref__tmp
	601	LOGICAL, OPTIONAL, INTENT(OUT) :: enabled_
	602	LOGICAL(KIND=C_BOOL) :: enabled__tmp
	603	LOGICAL, OPTIONAL, INTENT(OUT) :: field_ref_
	604	LOGICAL(KIND=C_BOOL) :: field_ref__tmp
	605	LOGICAL, OPTIONAL, INTENT(OUT) :: freq_offset_
	606	LOGICAL(KIND=C_BOOL) :: freq_offset__tmp
	607	LOGICAL, OPTIONAL, INTENT(OUT) :: freq_op_
	608	LOGICAL(KIND=C_BOOL) :: freq_op__tmp
	609	LOGICAL, OPTIONAL, INTENT(OUT) :: grid_ref_
	610	LOGICAL(KIND=C_BOOL) :: grid_ref__tmp
	611	LOGICAL, OPTIONAL, INTENT(OUT) :: group_ref_
	612	LOGICAL(KIND=C_BOOL) :: group_ref__tmp
	613	LOGICAL, OPTIONAL, INTENT(OUT) :: level_
	614	LOGICAL(KIND=C_BOOL) :: level__tmp
	615	LOGICAL, OPTIONAL, INTENT(OUT) :: long_name_
	616	LOGICAL(KIND=C_BOOL) :: long_name__tmp
	617	LOGICAL, OPTIONAL, INTENT(OUT) :: name_
	618	LOGICAL(KIND=C_BOOL) :: name__tmp
	619	LOGICAL, OPTIONAL, INTENT(OUT) :: operation_
	620	LOGICAL(KIND=C_BOOL) :: operation__tmp
	621	LOGICAL, OPTIONAL, INTENT(OUT) :: prec_
	622	LOGICAL(KIND=C_BOOL) :: prec__tmp
[593]	623	LOGICAL, OPTIONAL, INTENT(OUT) :: read_access_
	624	LOGICAL(KIND=C_BOOL) :: read_access__tmp
[464]	625	LOGICAL, OPTIONAL, INTENT(OUT) :: scale_factor_
	626	LOGICAL(KIND=C_BOOL) :: scale_factor__tmp
[432]	627	LOGICAL, OPTIONAL, INTENT(OUT) :: standard_name_
	628	LOGICAL(KIND=C_BOOL) :: standard_name__tmp
	629	LOGICAL, OPTIONAL, INTENT(OUT) :: unit_
	630	LOGICAL(KIND=C_BOOL) :: unit__tmp
[463]	631	LOGICAL, OPTIONAL, INTENT(OUT) :: valid_max_
	632	LOGICAL(KIND=C_BOOL) :: valid_max__tmp
	633	LOGICAL, OPTIONAL, INTENT(OUT) :: valid_min_
	634	LOGICAL(KIND=C_BOOL) :: valid_min__tmp
[581]	635
[464]	636	IF (PRESENT(add_offset_)) THEN
[581]	637	add_offset__tmp = cxios_is_defined_fieldgroup_add_offset(fieldgroup_hdl%daddr)
	638	add_offset_ = add_offset__tmp
[464]	639	ENDIF
[581]	640
[432]	641	IF (PRESENT(axis_ref_)) THEN
[581]	642	axis_ref__tmp = cxios_is_defined_fieldgroup_axis_ref(fieldgroup_hdl%daddr)
	643	axis_ref_ = axis_ref__tmp
[432]	644	ENDIF
[581]	645
[608]	646	IF (PRESENT(compression_level_)) THEN
	647	compression_level__tmp = cxios_is_defined_fieldgroup_compression_level(fieldgroup_hdl%daddr)
	648	compression_level_ = compression_level__tmp
	649	ENDIF
	650
[432]	651	IF (PRESENT(default_value_)) THEN
[581]	652	default_value__tmp = cxios_is_defined_fieldgroup_default_value(fieldgroup_hdl%daddr)
	653	default_value_ = default_value__tmp
[432]	654	ENDIF
[581]	655
[472]	656	IF (PRESENT(detect_missing_value_)) THEN
[581]	657	detect_missing_value__tmp = cxios_is_defined_fieldgroup_detect_missing_value(fieldgroup_hdl%daddr)
	658	detect_missing_value_ = detect_missing_value__tmp
[472]	659	ENDIF
[581]	660
[432]	661	IF (PRESENT(domain_ref_)) THEN
[581]	662	domain_ref__tmp = cxios_is_defined_fieldgroup_domain_ref(fieldgroup_hdl%daddr)
	663	domain_ref_ = domain_ref__tmp
[432]	664	ENDIF
[581]	665
[432]	666	IF (PRESENT(enabled_)) THEN
[581]	667	enabled__tmp = cxios_is_defined_fieldgroup_enabled(fieldgroup_hdl%daddr)
	668	enabled_ = enabled__tmp
[432]	669	ENDIF
[581]	670
[432]	671	IF (PRESENT(field_ref_)) THEN
[581]	672	field_ref__tmp = cxios_is_defined_fieldgroup_field_ref(fieldgroup_hdl%daddr)
	673	field_ref_ = field_ref__tmp
[432]	674	ENDIF
[581]	675
[432]	676	IF (PRESENT(freq_offset_)) THEN
[581]	677	freq_offset__tmp = cxios_is_defined_fieldgroup_freq_offset(fieldgroup_hdl%daddr)
	678	freq_offset_ = freq_offset__tmp
[432]	679	ENDIF
[581]	680
[432]	681	IF (PRESENT(freq_op_)) THEN
[581]	682	freq_op__tmp = cxios_is_defined_fieldgroup_freq_op(fieldgroup_hdl%daddr)
	683	freq_op_ = freq_op__tmp
[432]	684	ENDIF
[581]	685
[432]	686	IF (PRESENT(grid_ref_)) THEN
[581]	687	grid_ref__tmp = cxios_is_defined_fieldgroup_grid_ref(fieldgroup_hdl%daddr)
	688	grid_ref_ = grid_ref__tmp
[432]	689	ENDIF
[581]	690
[432]	691	IF (PRESENT(group_ref_)) THEN
[581]	692	group_ref__tmp = cxios_is_defined_fieldgroup_group_ref(fieldgroup_hdl%daddr)
	693	group_ref_ = group_ref__tmp
[432]	694	ENDIF
[581]	695
[432]	696	IF (PRESENT(level_)) THEN
[581]	697	level__tmp = cxios_is_defined_fieldgroup_level(fieldgroup_hdl%daddr)
	698	level_ = level__tmp
[432]	699	ENDIF
[581]	700
[432]	701	IF (PRESENT(long_name_)) THEN
[581]	702	long_name__tmp = cxios_is_defined_fieldgroup_long_name(fieldgroup_hdl%daddr)
	703	long_name_ = long_name__tmp
[432]	704	ENDIF
[581]	705
[432]	706	IF (PRESENT(name_)) THEN
[581]	707	name__tmp = cxios_is_defined_fieldgroup_name(fieldgroup_hdl%daddr)
	708	name_ = name__tmp
[432]	709	ENDIF
[581]	710
[432]	711	IF (PRESENT(operation_)) THEN
[581]	712	operation__tmp = cxios_is_defined_fieldgroup_operation(fieldgroup_hdl%daddr)
	713	operation_ = operation__tmp
[432]	714	ENDIF
[581]	715
[432]	716	IF (PRESENT(prec_)) THEN
[581]	717	prec__tmp = cxios_is_defined_fieldgroup_prec(fieldgroup_hdl%daddr)
	718	prec_ = prec__tmp
[432]	719	ENDIF
[581]	720
[593]	721	IF (PRESENT(read_access_)) THEN
	722	read_access__tmp = cxios_is_defined_fieldgroup_read_access(fieldgroup_hdl%daddr)
	723	read_access_ = read_access__tmp
	724	ENDIF
	725
[464]	726	IF (PRESENT(scale_factor_)) THEN
[581]	727	scale_factor__tmp = cxios_is_defined_fieldgroup_scale_factor(fieldgroup_hdl%daddr)
	728	scale_factor_ = scale_factor__tmp
[464]	729	ENDIF
[581]	730
[432]	731	IF (PRESENT(standard_name_)) THEN
[581]	732	standard_name__tmp = cxios_is_defined_fieldgroup_standard_name(fieldgroup_hdl%daddr)
	733	standard_name_ = standard_name__tmp
[432]	734	ENDIF
[581]	735
[432]	736	IF (PRESENT(unit_)) THEN
[581]	737	unit__tmp = cxios_is_defined_fieldgroup_unit(fieldgroup_hdl%daddr)
	738	unit_ = unit__tmp
[432]	739	ENDIF
[581]	740
[463]	741	IF (PRESENT(valid_max_)) THEN
[581]	742	valid_max__tmp = cxios_is_defined_fieldgroup_valid_max(fieldgroup_hdl%daddr)
	743	valid_max_ = valid_max__tmp
[463]	744	ENDIF
[581]	745
[463]	746	IF (PRESENT(valid_min_)) THEN
[581]	747	valid_min__tmp = cxios_is_defined_fieldgroup_valid_min(fieldgroup_hdl%daddr)
	748	valid_min_ = valid_min__tmp
[463]	749	ENDIF
[581]	750
[432]	751	END SUBROUTINE xios(is_defined_fieldgroup_attr_hdl_)
[581]	752
[326]	753	END MODULE ifieldgroup_attr

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

Download in other formats: