Context Navigation

source: XIOS/dev/XIOS_DEV_CMIP6/src/interface/fortran_attr/iaxisgroup_attr.F90 @ 1626

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

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

duplicate_scalar_to_axis
reduce_axis_to_axis
reduce_scalar_to_scalar
reorder_domain
temporal_splitting.

Property copyright set to
Software name : XIOS (Xml I/O Server)
http://forge.ipsl.jussieu.fr/ioserver
Creation date : January 2009
Licence : CeCCIL version2
see license file in root directory : Licence_CeCILL_V2-en.txt
or http://www.cecill.info/licences/Licence_CeCILL_V2-en.html
Holder : CEA/LSCE (Laboratoire des Sciences du CLimat et de l'Environnement)
CNRS/IPSL (Institut Pierre Simon Laplace)
Project Manager : Yann Meurdesoif
yann.meurdesoif@cea.fr

File size: 37.8 KB

Rev	Line
[326]	1	! * ************************************************************************** *
	2	! * Interface auto generated - do not modify *
	3	! * ************************************************************************** *
	4	#include "xios_fortran_prefix.hpp"
	5
	6	MODULE iaxisgroup_attr
	7	USE, INTRINSIC :: ISO_C_BINDING
	8	USE iaxis
	9	USE axisgroup_interface_attr
[581]	10
[326]	11	CONTAINS
[581]	12
[326]	13	SUBROUTINE xios(set_axisgroup_attr) &
[1492]	14	( axisgroup_id, axis_ref, axis_type, begin, bounds, bounds_name, comment, data_begin, data_index &
	15	, data_n, dim_name, formula, formula_bounds, formula_term, formula_term_bounds, group_ref, index &
	16	, label, long_name, mask, n, n_distributed_partition, n_glo, name, positive, prec, standard_name &
	17	, unit, value )
[581]	18
[326]	19	IMPLICIT NONE
	20	TYPE(txios(axisgroup)) :: axisgroup_hdl
	21	CHARACTER(LEN=*), INTENT(IN) ::axisgroup_id
[546]	22	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: axis_ref
[1492]	23	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: axis_type
[666]	24	INTEGER , OPTIONAL, INTENT(IN) :: begin
[609]	25	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: bounds(:,:)
[1492]	26	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: bounds_name
	27	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: comment
[555]	28	INTEGER , OPTIONAL, INTENT(IN) :: data_begin
	29	INTEGER , OPTIONAL, INTENT(IN) :: data_index(:)
	30	INTEGER , OPTIONAL, INTENT(IN) :: data_n
[1492]	31	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: dim_name
	32	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: formula
	33	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: formula_bounds
	34	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: formula_term
	35	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: formula_term_bounds
[326]	36	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: group_ref
[817]	37	INTEGER , OPTIONAL, INTENT(IN) :: index(:)
[1158]	38	CHARACTER(len=*) , OPTIONAL, INTENT(IN) :: label(:)
[326]	39	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: long_name
[555]	40	LOGICAL , OPTIONAL, INTENT(IN) :: mask(:)
	41	LOGICAL (KIND=C_BOOL) , ALLOCATABLE :: mask_tmp(:)
[666]	42	INTEGER , OPTIONAL, INTENT(IN) :: n
[779]	43	INTEGER , OPTIONAL, INTENT(IN) :: n_distributed_partition
[666]	44	INTEGER , OPTIONAL, INTENT(IN) :: n_glo
[326]	45	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name
[415]	46	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: positive
[1158]	47	INTEGER , OPTIONAL, INTENT(IN) :: prec
[326]	48	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: standard_name
	49	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: unit
	50	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: value(:)
[581]	51
[966]	52	CALL xios(get_axisgroup_handle) &
	53	(axisgroup_id,axisgroup_hdl)
[326]	54	CALL xios(set_axisgroup_attr_hdl_) &
[1492]	55	( axisgroup_hdl, axis_ref, axis_type, begin, bounds, bounds_name, comment, data_begin, data_index &
	56	, data_n, dim_name, formula, formula_bounds, formula_term, formula_term_bounds, group_ref, index &
	57	, label, long_name, mask, n, n_distributed_partition, n_glo, name, positive, prec, standard_name &
	58	, unit, value )
[581]	59
[326]	60	END SUBROUTINE xios(set_axisgroup_attr)
[581]	61
[326]	62	SUBROUTINE xios(set_axisgroup_attr_hdl) &
[1492]	63	( axisgroup_hdl, axis_ref, axis_type, begin, bounds, bounds_name, comment, data_begin, data_index &
	64	, data_n, dim_name, formula, formula_bounds, formula_term, formula_term_bounds, group_ref, index &
	65	, label, long_name, mask, n, n_distributed_partition, n_glo, name, positive, prec, standard_name &
	66	, unit, value )
[581]	67
[326]	68	IMPLICIT NONE
	69	TYPE(txios(axisgroup)) , INTENT(IN) :: axisgroup_hdl
[546]	70	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: axis_ref
[1492]	71	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: axis_type
[666]	72	INTEGER , OPTIONAL, INTENT(IN) :: begin
[609]	73	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: bounds(:,:)
[1492]	74	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: bounds_name
	75	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: comment
[555]	76	INTEGER , OPTIONAL, INTENT(IN) :: data_begin
	77	INTEGER , OPTIONAL, INTENT(IN) :: data_index(:)
	78	INTEGER , OPTIONAL, INTENT(IN) :: data_n
[1492]	79	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: dim_name
	80	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: formula
	81	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: formula_bounds
	82	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: formula_term
	83	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: formula_term_bounds
[326]	84	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: group_ref
[817]	85	INTEGER , OPTIONAL, INTENT(IN) :: index(:)
[1158]	86	CHARACTER(len=*) , OPTIONAL, INTENT(IN) :: label(:)
[326]	87	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: long_name
[555]	88	LOGICAL , OPTIONAL, INTENT(IN) :: mask(:)
	89	LOGICAL (KIND=C_BOOL) , ALLOCATABLE :: mask_tmp(:)
[666]	90	INTEGER , OPTIONAL, INTENT(IN) :: n
[779]	91	INTEGER , OPTIONAL, INTENT(IN) :: n_distributed_partition
[666]	92	INTEGER , OPTIONAL, INTENT(IN) :: n_glo
[326]	93	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name
[415]	94	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: positive
[1158]	95	INTEGER , OPTIONAL, INTENT(IN) :: prec
[326]	96	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: standard_name
	97	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: unit
	98	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: value(:)
[581]	99
[326]	100	CALL xios(set_axisgroup_attr_hdl_) &
[1492]	101	( axisgroup_hdl, axis_ref, axis_type, begin, bounds, bounds_name, comment, data_begin, data_index &
	102	, data_n, dim_name, formula, formula_bounds, formula_term, formula_term_bounds, group_ref, index &
	103	, label, long_name, mask, n, n_distributed_partition, n_glo, name, positive, prec, standard_name &
	104	, unit, value )
[581]	105
[326]	106	END SUBROUTINE xios(set_axisgroup_attr_hdl)
[581]	107
[326]	108	SUBROUTINE xios(set_axisgroup_attr_hdl_) &
[1492]	109	( axisgroup_hdl, axis_ref_, axis_type_, begin_, bounds_, bounds_name_, comment_, data_begin_ &
	110	, data_index_, data_n_, dim_name_, formula_, formula_bounds_, formula_term_, formula_term_bounds_ &
	111	, group_ref_, index_, label_, long_name_, mask_, n_, n_distributed_partition_, n_glo_, name_ &
	112	, positive_, prec_, standard_name_, unit_, value_ )
[581]	113
[326]	114	IMPLICIT NONE
	115	TYPE(txios(axisgroup)) , INTENT(IN) :: axisgroup_hdl
[546]	116	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: axis_ref_
[1492]	117	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: axis_type_
[666]	118	INTEGER , OPTIONAL, INTENT(IN) :: begin_
[609]	119	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: bounds_(:,:)
[1492]	120	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: bounds_name_
	121	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: comment_
[555]	122	INTEGER , OPTIONAL, INTENT(IN) :: data_begin_
	123	INTEGER , OPTIONAL, INTENT(IN) :: data_index_(:)
	124	INTEGER , OPTIONAL, INTENT(IN) :: data_n_
[1492]	125	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: dim_name_
	126	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: formula_
	127	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: formula_bounds_
	128	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: formula_term_
	129	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: formula_term_bounds_
[326]	130	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: group_ref_
[817]	131	INTEGER , OPTIONAL, INTENT(IN) :: index_(:)
[1158]	132	CHARACTER(len=*) , OPTIONAL, INTENT(IN) :: label_(:)
[326]	133	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: long_name_
[555]	134	LOGICAL , OPTIONAL, INTENT(IN) :: mask_(:)
	135	LOGICAL (KIND=C_BOOL) , ALLOCATABLE :: mask__tmp(:)
[666]	136	INTEGER , OPTIONAL, INTENT(IN) :: n_
[779]	137	INTEGER , OPTIONAL, INTENT(IN) :: n_distributed_partition_
[666]	138	INTEGER , OPTIONAL, INTENT(IN) :: n_glo_
[326]	139	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: name_
[415]	140	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: positive_
[1158]	141	INTEGER , OPTIONAL, INTENT(IN) :: prec_
[326]	142	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: standard_name_
	143	CHARACTER(len = *) , OPTIONAL, INTENT(IN) :: unit_
	144	REAL (KIND=8) , OPTIONAL, INTENT(IN) :: value_(:)
[581]	145
[546]	146	IF (PRESENT(axis_ref_)) THEN
[966]	147	CALL cxios_set_axisgroup_axis_ref &
	148	(axisgroup_hdl%daddr, axis_ref_, len(axis_ref_))
[546]	149	ENDIF
[581]	150
[1492]	151	IF (PRESENT(axis_type_)) THEN
	152	CALL cxios_set_axisgroup_axis_type &
	153	(axisgroup_hdl%daddr, axis_type_, len(axis_type_))
	154	ENDIF
	155
[666]	156	IF (PRESENT(begin_)) THEN
[966]	157	CALL cxios_set_axisgroup_begin &
	158	(axisgroup_hdl%daddr, begin_)
[666]	159	ENDIF
	160
[609]	161	IF (PRESENT(bounds_)) THEN
[966]	162	CALL cxios_set_axisgroup_bounds &
	163	(axisgroup_hdl%daddr, bounds_, SHAPE(bounds_))
[609]	164	ENDIF
	165
[1492]	166	IF (PRESENT(bounds_name_)) THEN
	167	CALL cxios_set_axisgroup_bounds_name &
	168	(axisgroup_hdl%daddr, bounds_name_, len(bounds_name_))
	169	ENDIF
	170
	171	IF (PRESENT(comment_)) THEN
	172	CALL cxios_set_axisgroup_comment &
	173	(axisgroup_hdl%daddr, comment_, len(comment_))
	174	ENDIF
	175
[555]	176	IF (PRESENT(data_begin_)) THEN
[966]	177	CALL cxios_set_axisgroup_data_begin &
	178	(axisgroup_hdl%daddr, data_begin_)
[555]	179	ENDIF
[581]	180
[555]	181	IF (PRESENT(data_index_)) THEN
[966]	182	CALL cxios_set_axisgroup_data_index &
	183	(axisgroup_hdl%daddr, data_index_, SHAPE(data_index_))
[555]	184	ENDIF
[581]	185
[555]	186	IF (PRESENT(data_n_)) THEN
[966]	187	CALL cxios_set_axisgroup_data_n &
	188	(axisgroup_hdl%daddr, data_n_)
[555]	189	ENDIF
[581]	190
[1492]	191	IF (PRESENT(dim_name_)) THEN
	192	CALL cxios_set_axisgroup_dim_name &
	193	(axisgroup_hdl%daddr, dim_name_, len(dim_name_))
	194	ENDIF
	195
	196	IF (PRESENT(formula_)) THEN
	197	CALL cxios_set_axisgroup_formula &
	198	(axisgroup_hdl%daddr, formula_, len(formula_))
	199	ENDIF
	200
	201	IF (PRESENT(formula_bounds_)) THEN
	202	CALL cxios_set_axisgroup_formula_bounds &
	203	(axisgroup_hdl%daddr, formula_bounds_, len(formula_bounds_))
	204	ENDIF
	205
	206	IF (PRESENT(formula_term_)) THEN
	207	CALL cxios_set_axisgroup_formula_term &
	208	(axisgroup_hdl%daddr, formula_term_, len(formula_term_))
	209	ENDIF
	210
	211	IF (PRESENT(formula_term_bounds_)) THEN
	212	CALL cxios_set_axisgroup_formula_term_bounds &
	213	(axisgroup_hdl%daddr, formula_term_bounds_, len(formula_term_bounds_))
	214	ENDIF
	215
[326]	216	IF (PRESENT(group_ref_)) THEN
[966]	217	CALL cxios_set_axisgroup_group_ref &
	218	(axisgroup_hdl%daddr, group_ref_, len(group_ref_))
[326]	219	ENDIF
[581]	220
[817]	221	IF (PRESENT(index_)) THEN
[966]	222	CALL cxios_set_axisgroup_index &
	223	(axisgroup_hdl%daddr, index_, SHAPE(index_))
[817]	224	ENDIF
	225
[1158]	226	IF (PRESENT(label_)) THEN
	227	CALL cxios_set_axisgroup_label &
	228	(axisgroup_hdl%daddr, label_, LEN(label_), LEN_TRIM(label_), SHAPE(label_))
	229	ENDIF
	230
[326]	231	IF (PRESENT(long_name_)) THEN
[966]	232	CALL cxios_set_axisgroup_long_name &
	233	(axisgroup_hdl%daddr, long_name_, len(long_name_))
[326]	234	ENDIF
[581]	235
[555]	236	IF (PRESENT(mask_)) THEN
[674]	237	ALLOCATE(mask__tmp(SIZE(mask_,1)))
[581]	238	mask__tmp = mask_
[966]	239	CALL cxios_set_axisgroup_mask &
	240	(axisgroup_hdl%daddr, mask__tmp, SHAPE(mask_))
[555]	241	ENDIF
[581]	242
[666]	243	IF (PRESENT(n_)) THEN
[966]	244	CALL cxios_set_axisgroup_n &
	245	(axisgroup_hdl%daddr, n_)
[666]	246	ENDIF
	247
[779]	248	IF (PRESENT(n_distributed_partition_)) THEN
[966]	249	CALL cxios_set_axisgroup_n_distributed_partition &
	250	(axisgroup_hdl%daddr, n_distributed_partition_)
[779]	251	ENDIF
	252
[666]	253	IF (PRESENT(n_glo_)) THEN
[966]	254	CALL cxios_set_axisgroup_n_glo &
	255	(axisgroup_hdl%daddr, n_glo_)
[666]	256	ENDIF
	257
[326]	258	IF (PRESENT(name_)) THEN
[966]	259	CALL cxios_set_axisgroup_name &
	260	(axisgroup_hdl%daddr, name_, len(name_))
[326]	261	ENDIF
[581]	262
[415]	263	IF (PRESENT(positive_)) THEN
[966]	264	CALL cxios_set_axisgroup_positive &
	265	(axisgroup_hdl%daddr, positive_, len(positive_))
[415]	266	ENDIF
[581]	267
[1158]	268	IF (PRESENT(prec_)) THEN
	269	CALL cxios_set_axisgroup_prec &
	270	(axisgroup_hdl%daddr, prec_)
	271	ENDIF
	272
[326]	273	IF (PRESENT(standard_name_)) THEN
[966]	274	CALL cxios_set_axisgroup_standard_name &
	275	(axisgroup_hdl%daddr, standard_name_, len(standard_name_))
[326]	276	ENDIF
[581]	277
[326]	278	IF (PRESENT(unit_)) THEN
[966]	279	CALL cxios_set_axisgroup_unit &
	280	(axisgroup_hdl%daddr, unit_, len(unit_))
[326]	281	ENDIF
[581]	282
[326]	283	IF (PRESENT(value_)) THEN
[966]	284	CALL cxios_set_axisgroup_value &
	285	(axisgroup_hdl%daddr, value_, SHAPE(value_))
[326]	286	ENDIF
[581]	287
[326]	288	END SUBROUTINE xios(set_axisgroup_attr_hdl_)
[581]	289
[326]	290	SUBROUTINE xios(get_axisgroup_attr) &
[1492]	291	( axisgroup_id, axis_ref, axis_type, begin, bounds, bounds_name, comment, data_begin, data_index &
	292	, data_n, dim_name, formula, formula_bounds, formula_term, formula_term_bounds, group_ref, index &
	293	, label, long_name, mask, n, n_distributed_partition, n_glo, name, positive, prec, standard_name &
	294	, unit, value )
[581]	295
[326]	296	IMPLICIT NONE
	297	TYPE(txios(axisgroup)) :: axisgroup_hdl
	298	CHARACTER(LEN=*), INTENT(IN) ::axisgroup_id
[546]	299	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: axis_ref
[1492]	300	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: axis_type
[666]	301	INTEGER , OPTIONAL, INTENT(OUT) :: begin
[609]	302	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: bounds(:,:)
[1492]	303	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: bounds_name
	304	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: comment
[555]	305	INTEGER , OPTIONAL, INTENT(OUT) :: data_begin
	306	INTEGER , OPTIONAL, INTENT(OUT) :: data_index(:)
	307	INTEGER , OPTIONAL, INTENT(OUT) :: data_n
[1492]	308	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: dim_name
	309	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: formula
	310	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: formula_bounds
	311	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: formula_term
	312	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: formula_term_bounds
[326]	313	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: group_ref
[817]	314	INTEGER , OPTIONAL, INTENT(OUT) :: index(:)
[1158]	315	CHARACTER(len=*) , OPTIONAL, INTENT(OUT) :: label(:)
[326]	316	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: long_name
[555]	317	LOGICAL , OPTIONAL, INTENT(OUT) :: mask(:)
	318	LOGICAL (KIND=C_BOOL) , ALLOCATABLE :: mask_tmp(:)
[666]	319	INTEGER , OPTIONAL, INTENT(OUT) :: n
[779]	320	INTEGER , OPTIONAL, INTENT(OUT) :: n_distributed_partition
[666]	321	INTEGER , OPTIONAL, INTENT(OUT) :: n_glo
[326]	322	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name
[415]	323	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: positive
[1158]	324	INTEGER , OPTIONAL, INTENT(OUT) :: prec
[326]	325	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: standard_name
	326	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: unit
	327	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: value(:)
[581]	328
[966]	329	CALL xios(get_axisgroup_handle) &
	330	(axisgroup_id,axisgroup_hdl)
[326]	331	CALL xios(get_axisgroup_attr_hdl_) &
[1492]	332	( axisgroup_hdl, axis_ref, axis_type, begin, bounds, bounds_name, comment, data_begin, data_index &
	333	, data_n, dim_name, formula, formula_bounds, formula_term, formula_term_bounds, group_ref, index &
	334	, label, long_name, mask, n, n_distributed_partition, n_glo, name, positive, prec, standard_name &
	335	, unit, value )
[581]	336
[326]	337	END SUBROUTINE xios(get_axisgroup_attr)
[581]	338
[326]	339	SUBROUTINE xios(get_axisgroup_attr_hdl) &
[1492]	340	( axisgroup_hdl, axis_ref, axis_type, begin, bounds, bounds_name, comment, data_begin, data_index &
	341	, data_n, dim_name, formula, formula_bounds, formula_term, formula_term_bounds, group_ref, index &
	342	, label, long_name, mask, n, n_distributed_partition, n_glo, name, positive, prec, standard_name &
	343	, unit, value )
[581]	344
[326]	345	IMPLICIT NONE
	346	TYPE(txios(axisgroup)) , INTENT(IN) :: axisgroup_hdl
[546]	347	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: axis_ref
[1492]	348	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: axis_type
[666]	349	INTEGER , OPTIONAL, INTENT(OUT) :: begin
[609]	350	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: bounds(:,:)
[1492]	351	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: bounds_name
	352	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: comment
[555]	353	INTEGER , OPTIONAL, INTENT(OUT) :: data_begin
	354	INTEGER , OPTIONAL, INTENT(OUT) :: data_index(:)
	355	INTEGER , OPTIONAL, INTENT(OUT) :: data_n
[1492]	356	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: dim_name
	357	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: formula
	358	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: formula_bounds
	359	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: formula_term
	360	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: formula_term_bounds
[326]	361	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: group_ref
[817]	362	INTEGER , OPTIONAL, INTENT(OUT) :: index(:)
[1158]	363	CHARACTER(len=*) , OPTIONAL, INTENT(OUT) :: label(:)
[326]	364	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: long_name
[555]	365	LOGICAL , OPTIONAL, INTENT(OUT) :: mask(:)
	366	LOGICAL (KIND=C_BOOL) , ALLOCATABLE :: mask_tmp(:)
[666]	367	INTEGER , OPTIONAL, INTENT(OUT) :: n
[779]	368	INTEGER , OPTIONAL, INTENT(OUT) :: n_distributed_partition
[666]	369	INTEGER , OPTIONAL, INTENT(OUT) :: n_glo
[326]	370	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name
[415]	371	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: positive
[1158]	372	INTEGER , OPTIONAL, INTENT(OUT) :: prec
[326]	373	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: standard_name
	374	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: unit
	375	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: value(:)
[581]	376
[326]	377	CALL xios(get_axisgroup_attr_hdl_) &
[1492]	378	( axisgroup_hdl, axis_ref, axis_type, begin, bounds, bounds_name, comment, data_begin, data_index &
	379	, data_n, dim_name, formula, formula_bounds, formula_term, formula_term_bounds, group_ref, index &
	380	, label, long_name, mask, n, n_distributed_partition, n_glo, name, positive, prec, standard_name &
	381	, unit, value )
[581]	382
[326]	383	END SUBROUTINE xios(get_axisgroup_attr_hdl)
[581]	384
[326]	385	SUBROUTINE xios(get_axisgroup_attr_hdl_) &
[1492]	386	( axisgroup_hdl, axis_ref_, axis_type_, begin_, bounds_, bounds_name_, comment_, data_begin_ &
	387	, data_index_, data_n_, dim_name_, formula_, formula_bounds_, formula_term_, formula_term_bounds_ &
	388	, group_ref_, index_, label_, long_name_, mask_, n_, n_distributed_partition_, n_glo_, name_ &
	389	, positive_, prec_, standard_name_, unit_, value_ )
[581]	390
[326]	391	IMPLICIT NONE
	392	TYPE(txios(axisgroup)) , INTENT(IN) :: axisgroup_hdl
[546]	393	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: axis_ref_
[1492]	394	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: axis_type_
[666]	395	INTEGER , OPTIONAL, INTENT(OUT) :: begin_
[609]	396	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: bounds_(:,:)
[1492]	397	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: bounds_name_
	398	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: comment_
[555]	399	INTEGER , OPTIONAL, INTENT(OUT) :: data_begin_
	400	INTEGER , OPTIONAL, INTENT(OUT) :: data_index_(:)
	401	INTEGER , OPTIONAL, INTENT(OUT) :: data_n_
[1492]	402	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: dim_name_
	403	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: formula_
	404	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: formula_bounds_
	405	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: formula_term_
	406	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: formula_term_bounds_
[326]	407	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: group_ref_
[817]	408	INTEGER , OPTIONAL, INTENT(OUT) :: index_(:)
[1158]	409	CHARACTER(len=*) , OPTIONAL, INTENT(OUT) :: label_(:)
[326]	410	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: long_name_
[555]	411	LOGICAL , OPTIONAL, INTENT(OUT) :: mask_(:)
	412	LOGICAL (KIND=C_BOOL) , ALLOCATABLE :: mask__tmp(:)
[666]	413	INTEGER , OPTIONAL, INTENT(OUT) :: n_
[779]	414	INTEGER , OPTIONAL, INTENT(OUT) :: n_distributed_partition_
[666]	415	INTEGER , OPTIONAL, INTENT(OUT) :: n_glo_
[326]	416	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: name_
[415]	417	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: positive_
[1158]	418	INTEGER , OPTIONAL, INTENT(OUT) :: prec_
[326]	419	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: standard_name_
	420	CHARACTER(len = *) , OPTIONAL, INTENT(OUT) :: unit_
	421	REAL (KIND=8) , OPTIONAL, INTENT(OUT) :: value_(:)
[581]	422
[546]	423	IF (PRESENT(axis_ref_)) THEN
[966]	424	CALL cxios_get_axisgroup_axis_ref &
	425	(axisgroup_hdl%daddr, axis_ref_, len(axis_ref_))
[546]	426	ENDIF
[581]	427
[1492]	428	IF (PRESENT(axis_type_)) THEN
	429	CALL cxios_get_axisgroup_axis_type &
	430	(axisgroup_hdl%daddr, axis_type_, len(axis_type_))
	431	ENDIF
	432
[666]	433	IF (PRESENT(begin_)) THEN
[966]	434	CALL cxios_get_axisgroup_begin &
	435	(axisgroup_hdl%daddr, begin_)
[666]	436	ENDIF
	437
[609]	438	IF (PRESENT(bounds_)) THEN
[966]	439	CALL cxios_get_axisgroup_bounds &
	440	(axisgroup_hdl%daddr, bounds_, SHAPE(bounds_))
[609]	441	ENDIF
	442
[1492]	443	IF (PRESENT(bounds_name_)) THEN
	444	CALL cxios_get_axisgroup_bounds_name &
	445	(axisgroup_hdl%daddr, bounds_name_, len(bounds_name_))
	446	ENDIF
	447
	448	IF (PRESENT(comment_)) THEN
	449	CALL cxios_get_axisgroup_comment &
	450	(axisgroup_hdl%daddr, comment_, len(comment_))
	451	ENDIF
	452
[555]	453	IF (PRESENT(data_begin_)) THEN
[966]	454	CALL cxios_get_axisgroup_data_begin &
	455	(axisgroup_hdl%daddr, data_begin_)
[555]	456	ENDIF
[581]	457
[555]	458	IF (PRESENT(data_index_)) THEN
[966]	459	CALL cxios_get_axisgroup_data_index &
	460	(axisgroup_hdl%daddr, data_index_, SHAPE(data_index_))
[555]	461	ENDIF
[581]	462
[555]	463	IF (PRESENT(data_n_)) THEN
[966]	464	CALL cxios_get_axisgroup_data_n &
	465	(axisgroup_hdl%daddr, data_n_)
[555]	466	ENDIF
[581]	467
[1492]	468	IF (PRESENT(dim_name_)) THEN
	469	CALL cxios_get_axisgroup_dim_name &
	470	(axisgroup_hdl%daddr, dim_name_, len(dim_name_))
	471	ENDIF
	472
	473	IF (PRESENT(formula_)) THEN
	474	CALL cxios_get_axisgroup_formula &
	475	(axisgroup_hdl%daddr, formula_, len(formula_))
	476	ENDIF
	477
	478	IF (PRESENT(formula_bounds_)) THEN
	479	CALL cxios_get_axisgroup_formula_bounds &
	480	(axisgroup_hdl%daddr, formula_bounds_, len(formula_bounds_))
	481	ENDIF
	482
	483	IF (PRESENT(formula_term_)) THEN
	484	CALL cxios_get_axisgroup_formula_term &
	485	(axisgroup_hdl%daddr, formula_term_, len(formula_term_))
	486	ENDIF
	487
	488	IF (PRESENT(formula_term_bounds_)) THEN
	489	CALL cxios_get_axisgroup_formula_term_bounds &
	490	(axisgroup_hdl%daddr, formula_term_bounds_, len(formula_term_bounds_))
	491	ENDIF
	492
[326]	493	IF (PRESENT(group_ref_)) THEN
[966]	494	CALL cxios_get_axisgroup_group_ref &
	495	(axisgroup_hdl%daddr, group_ref_, len(group_ref_))
[326]	496	ENDIF
[581]	497
[817]	498	IF (PRESENT(index_)) THEN
[966]	499	CALL cxios_get_axisgroup_index &
	500	(axisgroup_hdl%daddr, index_, SHAPE(index_))
[817]	501	ENDIF
	502
[1158]	503	IF (PRESENT(label_)) THEN
	504	CALL cxios_get_axisgroup_label &
	505	(axisgroup_hdl%daddr, label_, LEN(label_), SHAPE(label_))
	506	ENDIF
	507
[326]	508	IF (PRESENT(long_name_)) THEN
[966]	509	CALL cxios_get_axisgroup_long_name &
	510	(axisgroup_hdl%daddr, long_name_, len(long_name_))
[326]	511	ENDIF
[581]	512
[555]	513	IF (PRESENT(mask_)) THEN
[674]	514	ALLOCATE(mask__tmp(SIZE(mask_,1)))
[966]	515	CALL cxios_get_axisgroup_mask &
	516	(axisgroup_hdl%daddr, mask__tmp, SHAPE(mask_))
[581]	517	mask_ = mask__tmp
[555]	518	ENDIF
[581]	519
[666]	520	IF (PRESENT(n_)) THEN
[966]	521	CALL cxios_get_axisgroup_n &
	522	(axisgroup_hdl%daddr, n_)
[666]	523	ENDIF
	524
[779]	525	IF (PRESENT(n_distributed_partition_)) THEN
[966]	526	CALL cxios_get_axisgroup_n_distributed_partition &
	527	(axisgroup_hdl%daddr, n_distributed_partition_)
[779]	528	ENDIF
	529
[666]	530	IF (PRESENT(n_glo_)) THEN
[966]	531	CALL cxios_get_axisgroup_n_glo &
	532	(axisgroup_hdl%daddr, n_glo_)
[666]	533	ENDIF
	534
[326]	535	IF (PRESENT(name_)) THEN
[966]	536	CALL cxios_get_axisgroup_name &
	537	(axisgroup_hdl%daddr, name_, len(name_))
[326]	538	ENDIF
[581]	539
[415]	540	IF (PRESENT(positive_)) THEN
[966]	541	CALL cxios_get_axisgroup_positive &
	542	(axisgroup_hdl%daddr, positive_, len(positive_))
[415]	543	ENDIF
[581]	544
[1158]	545	IF (PRESENT(prec_)) THEN
	546	CALL cxios_get_axisgroup_prec &
	547	(axisgroup_hdl%daddr, prec_)
	548	ENDIF
	549
[326]	550	IF (PRESENT(standard_name_)) THEN
[966]	551	CALL cxios_get_axisgroup_standard_name &
	552	(axisgroup_hdl%daddr, standard_name_, len(standard_name_))
[326]	553	ENDIF
[581]	554
[326]	555	IF (PRESENT(unit_)) THEN
[966]	556	CALL cxios_get_axisgroup_unit &
	557	(axisgroup_hdl%daddr, unit_, len(unit_))
[326]	558	ENDIF
[581]	559
[326]	560	IF (PRESENT(value_)) THEN
[966]	561	CALL cxios_get_axisgroup_value &
	562	(axisgroup_hdl%daddr, value_, SHAPE(value_))
[326]	563	ENDIF
[581]	564
[326]	565	END SUBROUTINE xios(get_axisgroup_attr_hdl_)
[581]	566
[432]	567	SUBROUTINE xios(is_defined_axisgroup_attr) &
[1492]	568	( axisgroup_id, axis_ref, axis_type, begin, bounds, bounds_name, comment, data_begin, data_index &
	569	, data_n, dim_name, formula, formula_bounds, formula_term, formula_term_bounds, group_ref, index &
	570	, label, long_name, mask, n, n_distributed_partition, n_glo, name, positive, prec, standard_name &
	571	, unit, value )
[581]	572
[432]	573	IMPLICIT NONE
	574	TYPE(txios(axisgroup)) :: axisgroup_hdl
	575	CHARACTER(LEN=*), INTENT(IN) ::axisgroup_id
[546]	576	LOGICAL, OPTIONAL, INTENT(OUT) :: axis_ref
	577	LOGICAL(KIND=C_BOOL) :: axis_ref_tmp
[1492]	578	LOGICAL, OPTIONAL, INTENT(OUT) :: axis_type
	579	LOGICAL(KIND=C_BOOL) :: axis_type_tmp
[666]	580	LOGICAL, OPTIONAL, INTENT(OUT) :: begin
	581	LOGICAL(KIND=C_BOOL) :: begin_tmp
[609]	582	LOGICAL, OPTIONAL, INTENT(OUT) :: bounds
	583	LOGICAL(KIND=C_BOOL) :: bounds_tmp
[1492]	584	LOGICAL, OPTIONAL, INTENT(OUT) :: bounds_name
	585	LOGICAL(KIND=C_BOOL) :: bounds_name_tmp
	586	LOGICAL, OPTIONAL, INTENT(OUT) :: comment
	587	LOGICAL(KIND=C_BOOL) :: comment_tmp
[555]	588	LOGICAL, OPTIONAL, INTENT(OUT) :: data_begin
	589	LOGICAL(KIND=C_BOOL) :: data_begin_tmp
	590	LOGICAL, OPTIONAL, INTENT(OUT) :: data_index
	591	LOGICAL(KIND=C_BOOL) :: data_index_tmp
	592	LOGICAL, OPTIONAL, INTENT(OUT) :: data_n
	593	LOGICAL(KIND=C_BOOL) :: data_n_tmp
[1492]	594	LOGICAL, OPTIONAL, INTENT(OUT) :: dim_name
	595	LOGICAL(KIND=C_BOOL) :: dim_name_tmp
	596	LOGICAL, OPTIONAL, INTENT(OUT) :: formula
	597	LOGICAL(KIND=C_BOOL) :: formula_tmp
	598	LOGICAL, OPTIONAL, INTENT(OUT) :: formula_bounds
	599	LOGICAL(KIND=C_BOOL) :: formula_bounds_tmp
	600	LOGICAL, OPTIONAL, INTENT(OUT) :: formula_term
	601	LOGICAL(KIND=C_BOOL) :: formula_term_tmp
	602	LOGICAL, OPTIONAL, INTENT(OUT) :: formula_term_bounds
	603	LOGICAL(KIND=C_BOOL) :: formula_term_bounds_tmp
[432]	604	LOGICAL, OPTIONAL, INTENT(OUT) :: group_ref
	605	LOGICAL(KIND=C_BOOL) :: group_ref_tmp
[817]	606	LOGICAL, OPTIONAL, INTENT(OUT) :: index
	607	LOGICAL(KIND=C_BOOL) :: index_tmp
[1158]	608	LOGICAL, OPTIONAL, INTENT(OUT) :: label
	609	LOGICAL(KIND=C_BOOL) :: label_tmp
[432]	610	LOGICAL, OPTIONAL, INTENT(OUT) :: long_name
	611	LOGICAL(KIND=C_BOOL) :: long_name_tmp
[555]	612	LOGICAL, OPTIONAL, INTENT(OUT) :: mask
	613	LOGICAL(KIND=C_BOOL) :: mask_tmp
[666]	614	LOGICAL, OPTIONAL, INTENT(OUT) :: n
	615	LOGICAL(KIND=C_BOOL) :: n_tmp
[779]	616	LOGICAL, OPTIONAL, INTENT(OUT) :: n_distributed_partition
	617	LOGICAL(KIND=C_BOOL) :: n_distributed_partition_tmp
[666]	618	LOGICAL, OPTIONAL, INTENT(OUT) :: n_glo
	619	LOGICAL(KIND=C_BOOL) :: n_glo_tmp
[432]	620	LOGICAL, OPTIONAL, INTENT(OUT) :: name
	621	LOGICAL(KIND=C_BOOL) :: name_tmp
	622	LOGICAL, OPTIONAL, INTENT(OUT) :: positive
	623	LOGICAL(KIND=C_BOOL) :: positive_tmp
[1158]	624	LOGICAL, OPTIONAL, INTENT(OUT) :: prec
	625	LOGICAL(KIND=C_BOOL) :: prec_tmp
[432]	626	LOGICAL, OPTIONAL, INTENT(OUT) :: standard_name
	627	LOGICAL(KIND=C_BOOL) :: standard_name_tmp
	628	LOGICAL, OPTIONAL, INTENT(OUT) :: unit
	629	LOGICAL(KIND=C_BOOL) :: unit_tmp
	630	LOGICAL, OPTIONAL, INTENT(OUT) :: value
	631	LOGICAL(KIND=C_BOOL) :: value_tmp
[581]	632
[966]	633	CALL xios(get_axisgroup_handle) &
	634	(axisgroup_id,axisgroup_hdl)
[432]	635	CALL xios(is_defined_axisgroup_attr_hdl_) &
[1492]	636	( axisgroup_hdl, axis_ref, axis_type, begin, bounds, bounds_name, comment, data_begin, data_index &
	637	, data_n, dim_name, formula, formula_bounds, formula_term, formula_term_bounds, group_ref, index &
	638	, label, long_name, mask, n, n_distributed_partition, n_glo, name, positive, prec, standard_name &
	639	, unit, value )
[581]	640
[432]	641	END SUBROUTINE xios(is_defined_axisgroup_attr)
[581]	642
[432]	643	SUBROUTINE xios(is_defined_axisgroup_attr_hdl) &
[1492]	644	( axisgroup_hdl, axis_ref, axis_type, begin, bounds, bounds_name, comment, data_begin, data_index &
	645	, data_n, dim_name, formula, formula_bounds, formula_term, formula_term_bounds, group_ref, index &
	646	, label, long_name, mask, n, n_distributed_partition, n_glo, name, positive, prec, standard_name &
	647	, unit, value )
[581]	648
[432]	649	IMPLICIT NONE
	650	TYPE(txios(axisgroup)) , INTENT(IN) :: axisgroup_hdl
[546]	651	LOGICAL, OPTIONAL, INTENT(OUT) :: axis_ref
	652	LOGICAL(KIND=C_BOOL) :: axis_ref_tmp
[1492]	653	LOGICAL, OPTIONAL, INTENT(OUT) :: axis_type
	654	LOGICAL(KIND=C_BOOL) :: axis_type_tmp
[666]	655	LOGICAL, OPTIONAL, INTENT(OUT) :: begin
	656	LOGICAL(KIND=C_BOOL) :: begin_tmp
[609]	657	LOGICAL, OPTIONAL, INTENT(OUT) :: bounds
	658	LOGICAL(KIND=C_BOOL) :: bounds_tmp
[1492]	659	LOGICAL, OPTIONAL, INTENT(OUT) :: bounds_name
	660	LOGICAL(KIND=C_BOOL) :: bounds_name_tmp
	661	LOGICAL, OPTIONAL, INTENT(OUT) :: comment
	662	LOGICAL(KIND=C_BOOL) :: comment_tmp
[555]	663	LOGICAL, OPTIONAL, INTENT(OUT) :: data_begin
	664	LOGICAL(KIND=C_BOOL) :: data_begin_tmp
	665	LOGICAL, OPTIONAL, INTENT(OUT) :: data_index
	666	LOGICAL(KIND=C_BOOL) :: data_index_tmp
	667	LOGICAL, OPTIONAL, INTENT(OUT) :: data_n
	668	LOGICAL(KIND=C_BOOL) :: data_n_tmp
[1492]	669	LOGICAL, OPTIONAL, INTENT(OUT) :: dim_name
	670	LOGICAL(KIND=C_BOOL) :: dim_name_tmp
	671	LOGICAL, OPTIONAL, INTENT(OUT) :: formula
	672	LOGICAL(KIND=C_BOOL) :: formula_tmp
	673	LOGICAL, OPTIONAL, INTENT(OUT) :: formula_bounds
	674	LOGICAL(KIND=C_BOOL) :: formula_bounds_tmp
	675	LOGICAL, OPTIONAL, INTENT(OUT) :: formula_term
	676	LOGICAL(KIND=C_BOOL) :: formula_term_tmp
	677	LOGICAL, OPTIONAL, INTENT(OUT) :: formula_term_bounds
	678	LOGICAL(KIND=C_BOOL) :: formula_term_bounds_tmp
[432]	679	LOGICAL, OPTIONAL, INTENT(OUT) :: group_ref
	680	LOGICAL(KIND=C_BOOL) :: group_ref_tmp
[817]	681	LOGICAL, OPTIONAL, INTENT(OUT) :: index
	682	LOGICAL(KIND=C_BOOL) :: index_tmp
[1158]	683	LOGICAL, OPTIONAL, INTENT(OUT) :: label
	684	LOGICAL(KIND=C_BOOL) :: label_tmp
[432]	685	LOGICAL, OPTIONAL, INTENT(OUT) :: long_name
	686	LOGICAL(KIND=C_BOOL) :: long_name_tmp
[555]	687	LOGICAL, OPTIONAL, INTENT(OUT) :: mask
	688	LOGICAL(KIND=C_BOOL) :: mask_tmp
[666]	689	LOGICAL, OPTIONAL, INTENT(OUT) :: n
	690	LOGICAL(KIND=C_BOOL) :: n_tmp
[779]	691	LOGICAL, OPTIONAL, INTENT(OUT) :: n_distributed_partition
	692	LOGICAL(KIND=C_BOOL) :: n_distributed_partition_tmp
[666]	693	LOGICAL, OPTIONAL, INTENT(OUT) :: n_glo
	694	LOGICAL(KIND=C_BOOL) :: n_glo_tmp
[432]	695	LOGICAL, OPTIONAL, INTENT(OUT) :: name
	696	LOGICAL(KIND=C_BOOL) :: name_tmp
	697	LOGICAL, OPTIONAL, INTENT(OUT) :: positive
	698	LOGICAL(KIND=C_BOOL) :: positive_tmp
[1158]	699	LOGICAL, OPTIONAL, INTENT(OUT) :: prec
	700	LOGICAL(KIND=C_BOOL) :: prec_tmp
[432]	701	LOGICAL, OPTIONAL, INTENT(OUT) :: standard_name
	702	LOGICAL(KIND=C_BOOL) :: standard_name_tmp
	703	LOGICAL, OPTIONAL, INTENT(OUT) :: unit
	704	LOGICAL(KIND=C_BOOL) :: unit_tmp
	705	LOGICAL, OPTIONAL, INTENT(OUT) :: value
	706	LOGICAL(KIND=C_BOOL) :: value_tmp
[581]	707
[432]	708	CALL xios(is_defined_axisgroup_attr_hdl_) &
[1492]	709	( axisgroup_hdl, axis_ref, axis_type, begin, bounds, bounds_name, comment, data_begin, data_index &
	710	, data_n, dim_name, formula, formula_bounds, formula_term, formula_term_bounds, group_ref, index &
	711	, label, long_name, mask, n, n_distributed_partition, n_glo, name, positive, prec, standard_name &
	712	, unit, value )
[581]	713
[432]	714	END SUBROUTINE xios(is_defined_axisgroup_attr_hdl)
[581]	715
[432]	716	SUBROUTINE xios(is_defined_axisgroup_attr_hdl_) &
[1492]	717	( axisgroup_hdl, axis_ref_, axis_type_, begin_, bounds_, bounds_name_, comment_, data_begin_ &
	718	, data_index_, data_n_, dim_name_, formula_, formula_bounds_, formula_term_, formula_term_bounds_ &
	719	, group_ref_, index_, label_, long_name_, mask_, n_, n_distributed_partition_, n_glo_, name_ &
	720	, positive_, prec_, standard_name_, unit_, value_ )
[581]	721
[432]	722	IMPLICIT NONE
	723	TYPE(txios(axisgroup)) , INTENT(IN) :: axisgroup_hdl
[546]	724	LOGICAL, OPTIONAL, INTENT(OUT) :: axis_ref_
	725	LOGICAL(KIND=C_BOOL) :: axis_ref__tmp
[1492]	726	LOGICAL, OPTIONAL, INTENT(OUT) :: axis_type_
	727	LOGICAL(KIND=C_BOOL) :: axis_type__tmp
[666]	728	LOGICAL, OPTIONAL, INTENT(OUT) :: begin_
	729	LOGICAL(KIND=C_BOOL) :: begin__tmp
[609]	730	LOGICAL, OPTIONAL, INTENT(OUT) :: bounds_
	731	LOGICAL(KIND=C_BOOL) :: bounds__tmp
[1492]	732	LOGICAL, OPTIONAL, INTENT(OUT) :: bounds_name_
	733	LOGICAL(KIND=C_BOOL) :: bounds_name__tmp
	734	LOGICAL, OPTIONAL, INTENT(OUT) :: comment_
	735	LOGICAL(KIND=C_BOOL) :: comment__tmp
[555]	736	LOGICAL, OPTIONAL, INTENT(OUT) :: data_begin_
	737	LOGICAL(KIND=C_BOOL) :: data_begin__tmp
	738	LOGICAL, OPTIONAL, INTENT(OUT) :: data_index_
	739	LOGICAL(KIND=C_BOOL) :: data_index__tmp
	740	LOGICAL, OPTIONAL, INTENT(OUT) :: data_n_
	741	LOGICAL(KIND=C_BOOL) :: data_n__tmp
[1492]	742	LOGICAL, OPTIONAL, INTENT(OUT) :: dim_name_
	743	LOGICAL(KIND=C_BOOL) :: dim_name__tmp
	744	LOGICAL, OPTIONAL, INTENT(OUT) :: formula_
	745	LOGICAL(KIND=C_BOOL) :: formula__tmp
	746	LOGICAL, OPTIONAL, INTENT(OUT) :: formula_bounds_
	747	LOGICAL(KIND=C_BOOL) :: formula_bounds__tmp
	748	LOGICAL, OPTIONAL, INTENT(OUT) :: formula_term_
	749	LOGICAL(KIND=C_BOOL) :: formula_term__tmp
	750	LOGICAL, OPTIONAL, INTENT(OUT) :: formula_term_bounds_
	751	LOGICAL(KIND=C_BOOL) :: formula_term_bounds__tmp
[432]	752	LOGICAL, OPTIONAL, INTENT(OUT) :: group_ref_
	753	LOGICAL(KIND=C_BOOL) :: group_ref__tmp
[817]	754	LOGICAL, OPTIONAL, INTENT(OUT) :: index_
	755	LOGICAL(KIND=C_BOOL) :: index__tmp
[1158]	756	LOGICAL, OPTIONAL, INTENT(OUT) :: label_
	757	LOGICAL(KIND=C_BOOL) :: label__tmp
[432]	758	LOGICAL, OPTIONAL, INTENT(OUT) :: long_name_
	759	LOGICAL(KIND=C_BOOL) :: long_name__tmp
[555]	760	LOGICAL, OPTIONAL, INTENT(OUT) :: mask_
	761	LOGICAL(KIND=C_BOOL) :: mask__tmp
[666]	762	LOGICAL, OPTIONAL, INTENT(OUT) :: n_
	763	LOGICAL(KIND=C_BOOL) :: n__tmp
[779]	764	LOGICAL, OPTIONAL, INTENT(OUT) :: n_distributed_partition_
	765	LOGICAL(KIND=C_BOOL) :: n_distributed_partition__tmp
[666]	766	LOGICAL, OPTIONAL, INTENT(OUT) :: n_glo_
	767	LOGICAL(KIND=C_BOOL) :: n_glo__tmp
[432]	768	LOGICAL, OPTIONAL, INTENT(OUT) :: name_
	769	LOGICAL(KIND=C_BOOL) :: name__tmp
	770	LOGICAL, OPTIONAL, INTENT(OUT) :: positive_
	771	LOGICAL(KIND=C_BOOL) :: positive__tmp
[1158]	772	LOGICAL, OPTIONAL, INTENT(OUT) :: prec_
	773	LOGICAL(KIND=C_BOOL) :: prec__tmp
[432]	774	LOGICAL, OPTIONAL, INTENT(OUT) :: standard_name_
	775	LOGICAL(KIND=C_BOOL) :: standard_name__tmp
	776	LOGICAL, OPTIONAL, INTENT(OUT) :: unit_
	777	LOGICAL(KIND=C_BOOL) :: unit__tmp
	778	LOGICAL, OPTIONAL, INTENT(OUT) :: value_
	779	LOGICAL(KIND=C_BOOL) :: value__tmp
[581]	780
[546]	781	IF (PRESENT(axis_ref_)) THEN
[966]	782	axis_ref__tmp = cxios_is_defined_axisgroup_axis_ref &
	783	(axisgroup_hdl%daddr)
[581]	784	axis_ref_ = axis_ref__tmp
[546]	785	ENDIF
[581]	786
[1492]	787	IF (PRESENT(axis_type_)) THEN
	788	axis_type__tmp = cxios_is_defined_axisgroup_axis_type &
	789	(axisgroup_hdl%daddr)
	790	axis_type_ = axis_type__tmp
	791	ENDIF
	792
[666]	793	IF (PRESENT(begin_)) THEN
[966]	794	begin__tmp = cxios_is_defined_axisgroup_begin &
	795	(axisgroup_hdl%daddr)
[666]	796	begin_ = begin__tmp
	797	ENDIF
	798
[609]	799	IF (PRESENT(bounds_)) THEN
[966]	800	bounds__tmp = cxios_is_defined_axisgroup_bounds &
	801	(axisgroup_hdl%daddr)
[609]	802	bounds_ = bounds__tmp
	803	ENDIF
	804
[1492]	805	IF (PRESENT(bounds_name_)) THEN
	806	bounds_name__tmp = cxios_is_defined_axisgroup_bounds_name &
	807	(axisgroup_hdl%daddr)
	808	bounds_name_ = bounds_name__tmp
	809	ENDIF
	810
	811	IF (PRESENT(comment_)) THEN
	812	comment__tmp = cxios_is_defined_axisgroup_comment &
	813	(axisgroup_hdl%daddr)
	814	comment_ = comment__tmp
	815	ENDIF
	816
[555]	817	IF (PRESENT(data_begin_)) THEN
[966]	818	data_begin__tmp = cxios_is_defined_axisgroup_data_begin &
	819	(axisgroup_hdl%daddr)
[581]	820	data_begin_ = data_begin__tmp
[555]	821	ENDIF
[581]	822
[555]	823	IF (PRESENT(data_index_)) THEN
[966]	824	data_index__tmp = cxios_is_defined_axisgroup_data_index &
	825	(axisgroup_hdl%daddr)
[581]	826	data_index_ = data_index__tmp
[555]	827	ENDIF
[581]	828
[555]	829	IF (PRESENT(data_n_)) THEN
[966]	830	data_n__tmp = cxios_is_defined_axisgroup_data_n &
	831	(axisgroup_hdl%daddr)
[581]	832	data_n_ = data_n__tmp
[555]	833	ENDIF
[581]	834
[1492]	835	IF (PRESENT(dim_name_)) THEN
	836	dim_name__tmp = cxios_is_defined_axisgroup_dim_name &
	837	(axisgroup_hdl%daddr)
	838	dim_name_ = dim_name__tmp
	839	ENDIF
	840
	841	IF (PRESENT(formula_)) THEN
	842	formula__tmp = cxios_is_defined_axisgroup_formula &
	843	(axisgroup_hdl%daddr)
	844	formula_ = formula__tmp
	845	ENDIF
	846
	847	IF (PRESENT(formula_bounds_)) THEN
	848	formula_bounds__tmp = cxios_is_defined_axisgroup_formula_bounds &
	849	(axisgroup_hdl%daddr)
	850	formula_bounds_ = formula_bounds__tmp
	851	ENDIF
	852
	853	IF (PRESENT(formula_term_)) THEN
	854	formula_term__tmp = cxios_is_defined_axisgroup_formula_term &
	855	(axisgroup_hdl%daddr)
	856	formula_term_ = formula_term__tmp
	857	ENDIF
	858
	859	IF (PRESENT(formula_term_bounds_)) THEN
	860	formula_term_bounds__tmp = cxios_is_defined_axisgroup_formula_term_bounds &
	861	(axisgroup_hdl%daddr)
	862	formula_term_bounds_ = formula_term_bounds__tmp
	863	ENDIF
	864
[432]	865	IF (PRESENT(group_ref_)) THEN
[966]	866	group_ref__tmp = cxios_is_defined_axisgroup_group_ref &
	867	(axisgroup_hdl%daddr)
[581]	868	group_ref_ = group_ref__tmp
[432]	869	ENDIF
[581]	870
[817]	871	IF (PRESENT(index_)) THEN
[966]	872	index__tmp = cxios_is_defined_axisgroup_index &
	873	(axisgroup_hdl%daddr)
[817]	874	index_ = index__tmp
	875	ENDIF
	876
[1158]	877	IF (PRESENT(label_)) THEN
	878	label__tmp = cxios_is_defined_axisgroup_label &
	879	(axisgroup_hdl%daddr)
	880	label_ = label__tmp
	881	ENDIF
	882
[432]	883	IF (PRESENT(long_name_)) THEN
[966]	884	long_name__tmp = cxios_is_defined_axisgroup_long_name &
	885	(axisgroup_hdl%daddr)
[581]	886	long_name_ = long_name__tmp
[432]	887	ENDIF
[581]	888
[555]	889	IF (PRESENT(mask_)) THEN
[966]	890	mask__tmp = cxios_is_defined_axisgroup_mask &
	891	(axisgroup_hdl%daddr)
[581]	892	mask_ = mask__tmp
[555]	893	ENDIF
[581]	894
[666]	895	IF (PRESENT(n_)) THEN
[966]	896	n__tmp = cxios_is_defined_axisgroup_n &
	897	(axisgroup_hdl%daddr)
[666]	898	n_ = n__tmp
	899	ENDIF
	900
[779]	901	IF (PRESENT(n_distributed_partition_)) THEN
[966]	902	n_distributed_partition__tmp = cxios_is_defined_axisgroup_n_distributed_partition &
	903	(axisgroup_hdl%daddr)
[779]	904	n_distributed_partition_ = n_distributed_partition__tmp
	905	ENDIF
	906
[666]	907	IF (PRESENT(n_glo_)) THEN
[966]	908	n_glo__tmp = cxios_is_defined_axisgroup_n_glo &
	909	(axisgroup_hdl%daddr)
[666]	910	n_glo_ = n_glo__tmp
	911	ENDIF
	912
[432]	913	IF (PRESENT(name_)) THEN
[966]	914	name__tmp = cxios_is_defined_axisgroup_name &
	915	(axisgroup_hdl%daddr)
[581]	916	name_ = name__tmp
[432]	917	ENDIF
[581]	918
[432]	919	IF (PRESENT(positive_)) THEN
[966]	920	positive__tmp = cxios_is_defined_axisgroup_positive &
	921	(axisgroup_hdl%daddr)
[581]	922	positive_ = positive__tmp
[432]	923	ENDIF
[581]	924
[1158]	925	IF (PRESENT(prec_)) THEN
	926	prec__tmp = cxios_is_defined_axisgroup_prec &
	927	(axisgroup_hdl%daddr)
	928	prec_ = prec__tmp
	929	ENDIF
	930
[432]	931	IF (PRESENT(standard_name_)) THEN
[966]	932	standard_name__tmp = cxios_is_defined_axisgroup_standard_name &
	933	(axisgroup_hdl%daddr)
[581]	934	standard_name_ = standard_name__tmp
[432]	935	ENDIF
[581]	936
[432]	937	IF (PRESENT(unit_)) THEN
[966]	938	unit__tmp = cxios_is_defined_axisgroup_unit &
	939	(axisgroup_hdl%daddr)
[581]	940	unit_ = unit__tmp
[432]	941	ENDIF
[581]	942
[432]	943	IF (PRESENT(value_)) THEN
[966]	944	value__tmp = cxios_is_defined_axisgroup_value &
	945	(axisgroup_hdl%daddr)
[581]	946	value_ = value__tmp
[432]	947	ENDIF
[581]	948
[432]	949	END SUBROUTINE xios(is_defined_axisgroup_attr_hdl_)
[581]	950
[326]	951	END MODULE iaxisgroup_attr

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

Download in other formats: