Context Navigation

source: XIOS/trunk/src/interface/fortran_attr/domaingroup_interface_attr.F90 @ 2338

Last change on this file since 2338 was 2131, checked in by oabramkina, 3 years ago
Merging branch dev_oa with tiling into trunk
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: 47.7 KB

Rev	Line
[326]	1	! * ************************************************************************** *
	2	! * Interface auto generated - do not modify *
	3	! * ************************************************************************** *
[532]	4	#include "../fortran/xios_fortran_prefix.hpp"
[326]	5
	6	MODULE domaingroup_interface_attr
	7	USE, INTRINSIC :: ISO_C_BINDING
[581]	8
	9	INTERFACE
	10	! Do not call directly / interface FORTRAN 2003 <-> C99
	11
[674]	12	SUBROUTINE cxios_set_domaingroup_area(domaingroup_hdl, area, extent) BIND(C)
[611]	13	USE ISO_C_BINDING
	14	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	15	REAL (KIND=C_DOUBLE) , DIMENSION(*) :: area
[674]	16	INTEGER (kind = C_INT), DIMENSION(*) :: extent
[611]	17	END SUBROUTINE cxios_set_domaingroup_area
	18
[674]	19	SUBROUTINE cxios_get_domaingroup_area(domaingroup_hdl, area, extent) BIND(C)
[611]	20	USE ISO_C_BINDING
	21	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	22	REAL (KIND=C_DOUBLE) , DIMENSION(*) :: area
[674]	23	INTEGER (kind = C_INT), DIMENSION(*) :: extent
[611]	24	END SUBROUTINE cxios_get_domaingroup_area
	25
	26	FUNCTION cxios_is_defined_domaingroup_area(domaingroup_hdl) BIND(C)
	27	USE ISO_C_BINDING
	28	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_area
	29	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	30	END FUNCTION cxios_is_defined_domaingroup_area
	31
	32
[674]	33	SUBROUTINE cxios_set_domaingroup_bounds_lat_1d(domaingroup_hdl, bounds_lat_1d, extent) BIND(C)
[449]	34	USE ISO_C_BINDING
	35	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
[664]	36	REAL (KIND=C_DOUBLE) , DIMENSION(*) :: bounds_lat_1d
[674]	37	INTEGER (kind = C_INT), DIMENSION(*) :: extent
[664]	38	END SUBROUTINE cxios_set_domaingroup_bounds_lat_1d
[581]	39
[674]	40	SUBROUTINE cxios_get_domaingroup_bounds_lat_1d(domaingroup_hdl, bounds_lat_1d, extent) BIND(C)
[449]	41	USE ISO_C_BINDING
	42	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
[664]	43	REAL (KIND=C_DOUBLE) , DIMENSION(*) :: bounds_lat_1d
[674]	44	INTEGER (kind = C_INT), DIMENSION(*) :: extent
[664]	45	END SUBROUTINE cxios_get_domaingroup_bounds_lat_1d
[581]	46
[664]	47	FUNCTION cxios_is_defined_domaingroup_bounds_lat_1d(domaingroup_hdl) BIND(C)
[449]	48	USE ISO_C_BINDING
[664]	49	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_bounds_lat_1d
[449]	50	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
[664]	51	END FUNCTION cxios_is_defined_domaingroup_bounds_lat_1d
[581]	52
	53
[674]	54	SUBROUTINE cxios_set_domaingroup_bounds_lat_2d(domaingroup_hdl, bounds_lat_2d, extent) BIND(C)
[449]	55	USE ISO_C_BINDING
	56	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
[664]	57	REAL (KIND=C_DOUBLE) , DIMENSION(*) :: bounds_lat_2d
[674]	58	INTEGER (kind = C_INT), DIMENSION(*) :: extent
[664]	59	END SUBROUTINE cxios_set_domaingroup_bounds_lat_2d
[581]	60
[674]	61	SUBROUTINE cxios_get_domaingroup_bounds_lat_2d(domaingroup_hdl, bounds_lat_2d, extent) BIND(C)
[449]	62	USE ISO_C_BINDING
	63	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
[664]	64	REAL (KIND=C_DOUBLE) , DIMENSION(*) :: bounds_lat_2d
[674]	65	INTEGER (kind = C_INT), DIMENSION(*) :: extent
[664]	66	END SUBROUTINE cxios_get_domaingroup_bounds_lat_2d
[581]	67
[664]	68	FUNCTION cxios_is_defined_domaingroup_bounds_lat_2d(domaingroup_hdl) BIND(C)
[449]	69	USE ISO_C_BINDING
[664]	70	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_bounds_lat_2d
[449]	71	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
[664]	72	END FUNCTION cxios_is_defined_domaingroup_bounds_lat_2d
[581]	73
	74
[1492]	75	SUBROUTINE cxios_set_domaingroup_bounds_lat_name(domaingroup_hdl, bounds_lat_name, bounds_lat_name_size) BIND(C)
	76	USE ISO_C_BINDING
	77	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	78	CHARACTER(kind = C_CHAR) , DIMENSION(*) :: bounds_lat_name
	79	INTEGER (kind = C_INT) , VALUE :: bounds_lat_name_size
	80	END SUBROUTINE cxios_set_domaingroup_bounds_lat_name
	81
	82	SUBROUTINE cxios_get_domaingroup_bounds_lat_name(domaingroup_hdl, bounds_lat_name, bounds_lat_name_size) BIND(C)
	83	USE ISO_C_BINDING
	84	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	85	CHARACTER(kind = C_CHAR) , DIMENSION(*) :: bounds_lat_name
	86	INTEGER (kind = C_INT) , VALUE :: bounds_lat_name_size
	87	END SUBROUTINE cxios_get_domaingroup_bounds_lat_name
	88
	89	FUNCTION cxios_is_defined_domaingroup_bounds_lat_name(domaingroup_hdl) BIND(C)
	90	USE ISO_C_BINDING
	91	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_bounds_lat_name
	92	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	93	END FUNCTION cxios_is_defined_domaingroup_bounds_lat_name
	94
	95
[674]	96	SUBROUTINE cxios_set_domaingroup_bounds_lon_1d(domaingroup_hdl, bounds_lon_1d, extent) BIND(C)
[664]	97	USE ISO_C_BINDING
	98	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	99	REAL (KIND=C_DOUBLE) , DIMENSION(*) :: bounds_lon_1d
[674]	100	INTEGER (kind = C_INT), DIMENSION(*) :: extent
[664]	101	END SUBROUTINE cxios_set_domaingroup_bounds_lon_1d
	102
[674]	103	SUBROUTINE cxios_get_domaingroup_bounds_lon_1d(domaingroup_hdl, bounds_lon_1d, extent) BIND(C)
[664]	104	USE ISO_C_BINDING
	105	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	106	REAL (KIND=C_DOUBLE) , DIMENSION(*) :: bounds_lon_1d
[674]	107	INTEGER (kind = C_INT), DIMENSION(*) :: extent
[664]	108	END SUBROUTINE cxios_get_domaingroup_bounds_lon_1d
	109
	110	FUNCTION cxios_is_defined_domaingroup_bounds_lon_1d(domaingroup_hdl) BIND(C)
	111	USE ISO_C_BINDING
	112	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_bounds_lon_1d
	113	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	114	END FUNCTION cxios_is_defined_domaingroup_bounds_lon_1d
	115
	116
[674]	117	SUBROUTINE cxios_set_domaingroup_bounds_lon_2d(domaingroup_hdl, bounds_lon_2d, extent) BIND(C)
[664]	118	USE ISO_C_BINDING
	119	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	120	REAL (KIND=C_DOUBLE) , DIMENSION(*) :: bounds_lon_2d
[674]	121	INTEGER (kind = C_INT), DIMENSION(*) :: extent
[664]	122	END SUBROUTINE cxios_set_domaingroup_bounds_lon_2d
	123
[674]	124	SUBROUTINE cxios_get_domaingroup_bounds_lon_2d(domaingroup_hdl, bounds_lon_2d, extent) BIND(C)
[664]	125	USE ISO_C_BINDING
	126	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	127	REAL (KIND=C_DOUBLE) , DIMENSION(*) :: bounds_lon_2d
[674]	128	INTEGER (kind = C_INT), DIMENSION(*) :: extent
[664]	129	END SUBROUTINE cxios_get_domaingroup_bounds_lon_2d
	130
	131	FUNCTION cxios_is_defined_domaingroup_bounds_lon_2d(domaingroup_hdl) BIND(C)
	132	USE ISO_C_BINDING
	133	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_bounds_lon_2d
	134	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	135	END FUNCTION cxios_is_defined_domaingroup_bounds_lon_2d
	136
	137
[1492]	138	SUBROUTINE cxios_set_domaingroup_bounds_lon_name(domaingroup_hdl, bounds_lon_name, bounds_lon_name_size) BIND(C)
	139	USE ISO_C_BINDING
	140	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	141	CHARACTER(kind = C_CHAR) , DIMENSION(*) :: bounds_lon_name
	142	INTEGER (kind = C_INT) , VALUE :: bounds_lon_name_size
	143	END SUBROUTINE cxios_set_domaingroup_bounds_lon_name
	144
	145	SUBROUTINE cxios_get_domaingroup_bounds_lon_name(domaingroup_hdl, bounds_lon_name, bounds_lon_name_size) BIND(C)
	146	USE ISO_C_BINDING
	147	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	148	CHARACTER(kind = C_CHAR) , DIMENSION(*) :: bounds_lon_name
	149	INTEGER (kind = C_INT) , VALUE :: bounds_lon_name_size
	150	END SUBROUTINE cxios_get_domaingroup_bounds_lon_name
	151
	152	FUNCTION cxios_is_defined_domaingroup_bounds_lon_name(domaingroup_hdl) BIND(C)
	153	USE ISO_C_BINDING
	154	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_bounds_lon_name
	155	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	156	END FUNCTION cxios_is_defined_domaingroup_bounds_lon_name
	157
	158
	159	SUBROUTINE cxios_set_domaingroup_comment(domaingroup_hdl, comment, comment_size) BIND(C)
	160	USE ISO_C_BINDING
	161	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	162	CHARACTER(kind = C_CHAR) , DIMENSION(*) :: comment
	163	INTEGER (kind = C_INT) , VALUE :: comment_size
	164	END SUBROUTINE cxios_set_domaingroup_comment
	165
	166	SUBROUTINE cxios_get_domaingroup_comment(domaingroup_hdl, comment, comment_size) BIND(C)
	167	USE ISO_C_BINDING
	168	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	169	CHARACTER(kind = C_CHAR) , DIMENSION(*) :: comment
	170	INTEGER (kind = C_INT) , VALUE :: comment_size
	171	END SUBROUTINE cxios_get_domaingroup_comment
	172
	173	FUNCTION cxios_is_defined_domaingroup_comment(domaingroup_hdl) BIND(C)
	174	USE ISO_C_BINDING
	175	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_comment
	176	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	177	END FUNCTION cxios_is_defined_domaingroup_comment
	178
	179
[326]	180	SUBROUTINE cxios_set_domaingroup_data_dim(domaingroup_hdl, data_dim) BIND(C)
	181	USE ISO_C_BINDING
	182	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	183	INTEGER (KIND=C_INT) , VALUE :: data_dim
	184	END SUBROUTINE cxios_set_domaingroup_data_dim
[581]	185
[326]	186	SUBROUTINE cxios_get_domaingroup_data_dim(domaingroup_hdl, data_dim) BIND(C)
	187	USE ISO_C_BINDING
	188	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	189	INTEGER (KIND=C_INT) :: data_dim
	190	END SUBROUTINE cxios_get_domaingroup_data_dim
[581]	191
	192	FUNCTION cxios_is_defined_domaingroup_data_dim(domaingroup_hdl) BIND(C)
[432]	193	USE ISO_C_BINDING
	194	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_data_dim
	195	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	196	END FUNCTION cxios_is_defined_domaingroup_data_dim
[581]	197
	198
[674]	199	SUBROUTINE cxios_set_domaingroup_data_i_index(domaingroup_hdl, data_i_index, extent) BIND(C)
[326]	200	USE ISO_C_BINDING
	201	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	202	INTEGER (KIND=C_INT) , DIMENSION(*) :: data_i_index
[674]	203	INTEGER (kind = C_INT), DIMENSION(*) :: extent
[326]	204	END SUBROUTINE cxios_set_domaingroup_data_i_index
[581]	205
[674]	206	SUBROUTINE cxios_get_domaingroup_data_i_index(domaingroup_hdl, data_i_index, extent) BIND(C)
[326]	207	USE ISO_C_BINDING
	208	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	209	INTEGER (KIND=C_INT) , DIMENSION(*) :: data_i_index
[674]	210	INTEGER (kind = C_INT), DIMENSION(*) :: extent
[326]	211	END SUBROUTINE cxios_get_domaingroup_data_i_index
[581]	212
	213	FUNCTION cxios_is_defined_domaingroup_data_i_index(domaingroup_hdl) BIND(C)
[432]	214	USE ISO_C_BINDING
	215	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_data_i_index
	216	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	217	END FUNCTION cxios_is_defined_domaingroup_data_i_index
[581]	218
	219
[326]	220	SUBROUTINE cxios_set_domaingroup_data_ibegin(domaingroup_hdl, data_ibegin) BIND(C)
	221	USE ISO_C_BINDING
	222	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	223	INTEGER (KIND=C_INT) , VALUE :: data_ibegin
	224	END SUBROUTINE cxios_set_domaingroup_data_ibegin
[581]	225
[326]	226	SUBROUTINE cxios_get_domaingroup_data_ibegin(domaingroup_hdl, data_ibegin) BIND(C)
	227	USE ISO_C_BINDING
	228	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	229	INTEGER (KIND=C_INT) :: data_ibegin
	230	END SUBROUTINE cxios_get_domaingroup_data_ibegin
[581]	231
	232	FUNCTION cxios_is_defined_domaingroup_data_ibegin(domaingroup_hdl) BIND(C)
[432]	233	USE ISO_C_BINDING
	234	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_data_ibegin
	235	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	236	END FUNCTION cxios_is_defined_domaingroup_data_ibegin
[581]	237
	238
[674]	239	SUBROUTINE cxios_set_domaingroup_data_j_index(domaingroup_hdl, data_j_index, extent) BIND(C)
[326]	240	USE ISO_C_BINDING
	241	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	242	INTEGER (KIND=C_INT) , DIMENSION(*) :: data_j_index
[674]	243	INTEGER (kind = C_INT), DIMENSION(*) :: extent
[326]	244	END SUBROUTINE cxios_set_domaingroup_data_j_index
[581]	245
[674]	246	SUBROUTINE cxios_get_domaingroup_data_j_index(domaingroup_hdl, data_j_index, extent) BIND(C)
[326]	247	USE ISO_C_BINDING
	248	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	249	INTEGER (KIND=C_INT) , DIMENSION(*) :: data_j_index
[674]	250	INTEGER (kind = C_INT), DIMENSION(*) :: extent
[326]	251	END SUBROUTINE cxios_get_domaingroup_data_j_index
[581]	252
	253	FUNCTION cxios_is_defined_domaingroup_data_j_index(domaingroup_hdl) BIND(C)
[432]	254	USE ISO_C_BINDING
	255	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_data_j_index
	256	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	257	END FUNCTION cxios_is_defined_domaingroup_data_j_index
[581]	258
	259
[326]	260	SUBROUTINE cxios_set_domaingroup_data_jbegin(domaingroup_hdl, data_jbegin) BIND(C)
	261	USE ISO_C_BINDING
	262	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	263	INTEGER (KIND=C_INT) , VALUE :: data_jbegin
	264	END SUBROUTINE cxios_set_domaingroup_data_jbegin
[581]	265
[326]	266	SUBROUTINE cxios_get_domaingroup_data_jbegin(domaingroup_hdl, data_jbegin) BIND(C)
	267	USE ISO_C_BINDING
	268	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	269	INTEGER (KIND=C_INT) :: data_jbegin
	270	END SUBROUTINE cxios_get_domaingroup_data_jbegin
[581]	271
	272	FUNCTION cxios_is_defined_domaingroup_data_jbegin(domaingroup_hdl) BIND(C)
[432]	273	USE ISO_C_BINDING
	274	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_data_jbegin
	275	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	276	END FUNCTION cxios_is_defined_domaingroup_data_jbegin
[581]	277
	278
[326]	279	SUBROUTINE cxios_set_domaingroup_data_ni(domaingroup_hdl, data_ni) BIND(C)
	280	USE ISO_C_BINDING
	281	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	282	INTEGER (KIND=C_INT) , VALUE :: data_ni
	283	END SUBROUTINE cxios_set_domaingroup_data_ni
[581]	284
[326]	285	SUBROUTINE cxios_get_domaingroup_data_ni(domaingroup_hdl, data_ni) BIND(C)
	286	USE ISO_C_BINDING
	287	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	288	INTEGER (KIND=C_INT) :: data_ni
	289	END SUBROUTINE cxios_get_domaingroup_data_ni
[581]	290
	291	FUNCTION cxios_is_defined_domaingroup_data_ni(domaingroup_hdl) BIND(C)
[432]	292	USE ISO_C_BINDING
	293	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_data_ni
	294	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	295	END FUNCTION cxios_is_defined_domaingroup_data_ni
[581]	296
	297
[326]	298	SUBROUTINE cxios_set_domaingroup_data_nj(domaingroup_hdl, data_nj) BIND(C)
	299	USE ISO_C_BINDING
	300	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	301	INTEGER (KIND=C_INT) , VALUE :: data_nj
	302	END SUBROUTINE cxios_set_domaingroup_data_nj
[581]	303
[326]	304	SUBROUTINE cxios_get_domaingroup_data_nj(domaingroup_hdl, data_nj) BIND(C)
	305	USE ISO_C_BINDING
	306	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	307	INTEGER (KIND=C_INT) :: data_nj
	308	END SUBROUTINE cxios_get_domaingroup_data_nj
[581]	309
	310	FUNCTION cxios_is_defined_domaingroup_data_nj(domaingroup_hdl) BIND(C)
[432]	311	USE ISO_C_BINDING
	312	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_data_nj
	313	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	314	END FUNCTION cxios_is_defined_domaingroup_data_nj
[581]	315
	316
[1492]	317	SUBROUTINE cxios_set_domaingroup_dim_i_name(domaingroup_hdl, dim_i_name, dim_i_name_size) BIND(C)
	318	USE ISO_C_BINDING
	319	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	320	CHARACTER(kind = C_CHAR) , DIMENSION(*) :: dim_i_name
	321	INTEGER (kind = C_INT) , VALUE :: dim_i_name_size
	322	END SUBROUTINE cxios_set_domaingroup_dim_i_name
	323
	324	SUBROUTINE cxios_get_domaingroup_dim_i_name(domaingroup_hdl, dim_i_name, dim_i_name_size) BIND(C)
	325	USE ISO_C_BINDING
	326	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	327	CHARACTER(kind = C_CHAR) , DIMENSION(*) :: dim_i_name
	328	INTEGER (kind = C_INT) , VALUE :: dim_i_name_size
	329	END SUBROUTINE cxios_get_domaingroup_dim_i_name
	330
	331	FUNCTION cxios_is_defined_domaingroup_dim_i_name(domaingroup_hdl) BIND(C)
	332	USE ISO_C_BINDING
	333	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_dim_i_name
	334	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	335	END FUNCTION cxios_is_defined_domaingroup_dim_i_name
	336
	337
	338	SUBROUTINE cxios_set_domaingroup_dim_j_name(domaingroup_hdl, dim_j_name, dim_j_name_size) BIND(C)
	339	USE ISO_C_BINDING
	340	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	341	CHARACTER(kind = C_CHAR) , DIMENSION(*) :: dim_j_name
	342	INTEGER (kind = C_INT) , VALUE :: dim_j_name_size
	343	END SUBROUTINE cxios_set_domaingroup_dim_j_name
	344
	345	SUBROUTINE cxios_get_domaingroup_dim_j_name(domaingroup_hdl, dim_j_name, dim_j_name_size) BIND(C)
	346	USE ISO_C_BINDING
	347	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	348	CHARACTER(kind = C_CHAR) , DIMENSION(*) :: dim_j_name
	349	INTEGER (kind = C_INT) , VALUE :: dim_j_name_size
	350	END SUBROUTINE cxios_get_domaingroup_dim_j_name
	351
	352	FUNCTION cxios_is_defined_domaingroup_dim_j_name(domaingroup_hdl) BIND(C)
	353	USE ISO_C_BINDING
	354	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_dim_j_name
	355	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	356	END FUNCTION cxios_is_defined_domaingroup_dim_j_name
	357
	358
[546]	359	SUBROUTINE cxios_set_domaingroup_domain_ref(domaingroup_hdl, domain_ref, domain_ref_size) BIND(C)
	360	USE ISO_C_BINDING
	361	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	362	CHARACTER(kind = C_CHAR) , DIMENSION(*) :: domain_ref
	363	INTEGER (kind = C_INT) , VALUE :: domain_ref_size
	364	END SUBROUTINE cxios_set_domaingroup_domain_ref
[581]	365
[546]	366	SUBROUTINE cxios_get_domaingroup_domain_ref(domaingroup_hdl, domain_ref, domain_ref_size) BIND(C)
	367	USE ISO_C_BINDING
	368	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	369	CHARACTER(kind = C_CHAR) , DIMENSION(*) :: domain_ref
	370	INTEGER (kind = C_INT) , VALUE :: domain_ref_size
	371	END SUBROUTINE cxios_get_domaingroup_domain_ref
[581]	372
	373	FUNCTION cxios_is_defined_domaingroup_domain_ref(domaingroup_hdl) BIND(C)
[546]	374	USE ISO_C_BINDING
	375	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_domain_ref
	376	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	377	END FUNCTION cxios_is_defined_domaingroup_domain_ref
[581]	378
	379
[326]	380	SUBROUTINE cxios_set_domaingroup_group_ref(domaingroup_hdl, group_ref, group_ref_size) BIND(C)
	381	USE ISO_C_BINDING
	382	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	383	CHARACTER(kind = C_CHAR) , DIMENSION(*) :: group_ref
	384	INTEGER (kind = C_INT) , VALUE :: group_ref_size
	385	END SUBROUTINE cxios_set_domaingroup_group_ref
[581]	386
[326]	387	SUBROUTINE cxios_get_domaingroup_group_ref(domaingroup_hdl, group_ref, group_ref_size) BIND(C)
	388	USE ISO_C_BINDING
	389	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	390	CHARACTER(kind = C_CHAR) , DIMENSION(*) :: group_ref
	391	INTEGER (kind = C_INT) , VALUE :: group_ref_size
	392	END SUBROUTINE cxios_get_domaingroup_group_ref
[581]	393
	394	FUNCTION cxios_is_defined_domaingroup_group_ref(domaingroup_hdl) BIND(C)
[432]	395	USE ISO_C_BINDING
	396	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_group_ref
	397	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	398	END FUNCTION cxios_is_defined_domaingroup_group_ref
[581]	399
	400
[674]	401	SUBROUTINE cxios_set_domaingroup_i_index(domaingroup_hdl, i_index, extent) BIND(C)
[467]	402	USE ISO_C_BINDING
	403	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	404	INTEGER (KIND=C_INT) , DIMENSION(*) :: i_index
[674]	405	INTEGER (kind = C_INT), DIMENSION(*) :: extent
[467]	406	END SUBROUTINE cxios_set_domaingroup_i_index
[581]	407
[674]	408	SUBROUTINE cxios_get_domaingroup_i_index(domaingroup_hdl, i_index, extent) BIND(C)
[467]	409	USE ISO_C_BINDING
	410	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	411	INTEGER (KIND=C_INT) , DIMENSION(*) :: i_index
[674]	412	INTEGER (kind = C_INT), DIMENSION(*) :: extent
[467]	413	END SUBROUTINE cxios_get_domaingroup_i_index
[581]	414
	415	FUNCTION cxios_is_defined_domaingroup_i_index(domaingroup_hdl) BIND(C)
[467]	416	USE ISO_C_BINDING
	417	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_i_index
	418	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	419	END FUNCTION cxios_is_defined_domaingroup_i_index
[581]	420
	421
[326]	422	SUBROUTINE cxios_set_domaingroup_ibegin(domaingroup_hdl, ibegin) BIND(C)
	423	USE ISO_C_BINDING
	424	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	425	INTEGER (KIND=C_INT) , VALUE :: ibegin
	426	END SUBROUTINE cxios_set_domaingroup_ibegin
[581]	427
[326]	428	SUBROUTINE cxios_get_domaingroup_ibegin(domaingroup_hdl, ibegin) BIND(C)
	429	USE ISO_C_BINDING
	430	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	431	INTEGER (KIND=C_INT) :: ibegin
	432	END SUBROUTINE cxios_get_domaingroup_ibegin
[581]	433
	434	FUNCTION cxios_is_defined_domaingroup_ibegin(domaingroup_hdl) BIND(C)
[432]	435	USE ISO_C_BINDING
	436	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_ibegin
	437	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	438	END FUNCTION cxios_is_defined_domaingroup_ibegin
[581]	439
	440
[674]	441	SUBROUTINE cxios_set_domaingroup_j_index(domaingroup_hdl, j_index, extent) BIND(C)
[326]	442	USE ISO_C_BINDING
[467]	443	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	444	INTEGER (KIND=C_INT) , DIMENSION(*) :: j_index
[674]	445	INTEGER (kind = C_INT), DIMENSION(*) :: extent
[467]	446	END SUBROUTINE cxios_set_domaingroup_j_index
[581]	447
[674]	448	SUBROUTINE cxios_get_domaingroup_j_index(domaingroup_hdl, j_index, extent) BIND(C)
[467]	449	USE ISO_C_BINDING
	450	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	451	INTEGER (KIND=C_INT) , DIMENSION(*) :: j_index
[674]	452	INTEGER (kind = C_INT), DIMENSION(*) :: extent
[467]	453	END SUBROUTINE cxios_get_domaingroup_j_index
[581]	454
	455	FUNCTION cxios_is_defined_domaingroup_j_index(domaingroup_hdl) BIND(C)
[467]	456	USE ISO_C_BINDING
	457	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_j_index
	458	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	459	END FUNCTION cxios_is_defined_domaingroup_j_index
[581]	460
	461
[326]	462	SUBROUTINE cxios_set_domaingroup_jbegin(domaingroup_hdl, jbegin) BIND(C)
	463	USE ISO_C_BINDING
	464	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	465	INTEGER (KIND=C_INT) , VALUE :: jbegin
	466	END SUBROUTINE cxios_set_domaingroup_jbegin
[581]	467
[326]	468	SUBROUTINE cxios_get_domaingroup_jbegin(domaingroup_hdl, jbegin) BIND(C)
	469	USE ISO_C_BINDING
	470	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	471	INTEGER (KIND=C_INT) :: jbegin
	472	END SUBROUTINE cxios_get_domaingroup_jbegin
[581]	473
	474	FUNCTION cxios_is_defined_domaingroup_jbegin(domaingroup_hdl) BIND(C)
[432]	475	USE ISO_C_BINDING
	476	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_jbegin
	477	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	478	END FUNCTION cxios_is_defined_domaingroup_jbegin
[581]	479
	480
[1492]	481	SUBROUTINE cxios_set_domaingroup_lat_name(domaingroup_hdl, lat_name, lat_name_size) BIND(C)
	482	USE ISO_C_BINDING
	483	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	484	CHARACTER(kind = C_CHAR) , DIMENSION(*) :: lat_name
	485	INTEGER (kind = C_INT) , VALUE :: lat_name_size
	486	END SUBROUTINE cxios_set_domaingroup_lat_name
	487
	488	SUBROUTINE cxios_get_domaingroup_lat_name(domaingroup_hdl, lat_name, lat_name_size) BIND(C)
	489	USE ISO_C_BINDING
	490	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	491	CHARACTER(kind = C_CHAR) , DIMENSION(*) :: lat_name
	492	INTEGER (kind = C_INT) , VALUE :: lat_name_size
	493	END SUBROUTINE cxios_get_domaingroup_lat_name
	494
	495	FUNCTION cxios_is_defined_domaingroup_lat_name(domaingroup_hdl) BIND(C)
	496	USE ISO_C_BINDING
	497	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_lat_name
	498	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	499	END FUNCTION cxios_is_defined_domaingroup_lat_name
	500
	501
[674]	502	SUBROUTINE cxios_set_domaingroup_latvalue_1d(domaingroup_hdl, latvalue_1d, extent) BIND(C)
[326]	503	USE ISO_C_BINDING
	504	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
[664]	505	REAL (KIND=C_DOUBLE) , DIMENSION(*) :: latvalue_1d
[674]	506	INTEGER (kind = C_INT), DIMENSION(*) :: extent
[664]	507	END SUBROUTINE cxios_set_domaingroup_latvalue_1d
[581]	508
[674]	509	SUBROUTINE cxios_get_domaingroup_latvalue_1d(domaingroup_hdl, latvalue_1d, extent) BIND(C)
[326]	510	USE ISO_C_BINDING
	511	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
[664]	512	REAL (KIND=C_DOUBLE) , DIMENSION(*) :: latvalue_1d
[674]	513	INTEGER (kind = C_INT), DIMENSION(*) :: extent
[664]	514	END SUBROUTINE cxios_get_domaingroup_latvalue_1d
[581]	515
[664]	516	FUNCTION cxios_is_defined_domaingroup_latvalue_1d(domaingroup_hdl) BIND(C)
[432]	517	USE ISO_C_BINDING
[664]	518	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_latvalue_1d
[432]	519	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
[664]	520	END FUNCTION cxios_is_defined_domaingroup_latvalue_1d
[581]	521
	522
[674]	523	SUBROUTINE cxios_set_domaingroup_latvalue_2d(domaingroup_hdl, latvalue_2d, extent) BIND(C)
[664]	524	USE ISO_C_BINDING
	525	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	526	REAL (KIND=C_DOUBLE) , DIMENSION(*) :: latvalue_2d
[674]	527	INTEGER (kind = C_INT), DIMENSION(*) :: extent
[664]	528	END SUBROUTINE cxios_set_domaingroup_latvalue_2d
	529
[674]	530	SUBROUTINE cxios_get_domaingroup_latvalue_2d(domaingroup_hdl, latvalue_2d, extent) BIND(C)
[664]	531	USE ISO_C_BINDING
	532	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	533	REAL (KIND=C_DOUBLE) , DIMENSION(*) :: latvalue_2d
[674]	534	INTEGER (kind = C_INT), DIMENSION(*) :: extent
[664]	535	END SUBROUTINE cxios_get_domaingroup_latvalue_2d
	536
	537	FUNCTION cxios_is_defined_domaingroup_latvalue_2d(domaingroup_hdl) BIND(C)
	538	USE ISO_C_BINDING
	539	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_latvalue_2d
	540	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	541	END FUNCTION cxios_is_defined_domaingroup_latvalue_2d
	542
	543
[1492]	544	SUBROUTINE cxios_set_domaingroup_lon_name(domaingroup_hdl, lon_name, lon_name_size) BIND(C)
	545	USE ISO_C_BINDING
	546	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	547	CHARACTER(kind = C_CHAR) , DIMENSION(*) :: lon_name
	548	INTEGER (kind = C_INT) , VALUE :: lon_name_size
	549	END SUBROUTINE cxios_set_domaingroup_lon_name
	550
	551	SUBROUTINE cxios_get_domaingroup_lon_name(domaingroup_hdl, lon_name, lon_name_size) BIND(C)
	552	USE ISO_C_BINDING
	553	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	554	CHARACTER(kind = C_CHAR) , DIMENSION(*) :: lon_name
	555	INTEGER (kind = C_INT) , VALUE :: lon_name_size
	556	END SUBROUTINE cxios_get_domaingroup_lon_name
	557
	558	FUNCTION cxios_is_defined_domaingroup_lon_name(domaingroup_hdl) BIND(C)
	559	USE ISO_C_BINDING
	560	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_lon_name
	561	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	562	END FUNCTION cxios_is_defined_domaingroup_lon_name
	563
	564
[326]	565	SUBROUTINE cxios_set_domaingroup_long_name(domaingroup_hdl, long_name, long_name_size) BIND(C)
	566	USE ISO_C_BINDING
	567	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	568	CHARACTER(kind = C_CHAR) , DIMENSION(*) :: long_name
	569	INTEGER (kind = C_INT) , VALUE :: long_name_size
	570	END SUBROUTINE cxios_set_domaingroup_long_name
[581]	571
[326]	572	SUBROUTINE cxios_get_domaingroup_long_name(domaingroup_hdl, long_name, long_name_size) BIND(C)
	573	USE ISO_C_BINDING
	574	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	575	CHARACTER(kind = C_CHAR) , DIMENSION(*) :: long_name
	576	INTEGER (kind = C_INT) , VALUE :: long_name_size
	577	END SUBROUTINE cxios_get_domaingroup_long_name
[581]	578
	579	FUNCTION cxios_is_defined_domaingroup_long_name(domaingroup_hdl) BIND(C)
[432]	580	USE ISO_C_BINDING
	581	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_long_name
	582	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	583	END FUNCTION cxios_is_defined_domaingroup_long_name
[581]	584
	585
[674]	586	SUBROUTINE cxios_set_domaingroup_lonvalue_1d(domaingroup_hdl, lonvalue_1d, extent) BIND(C)
[326]	587	USE ISO_C_BINDING
	588	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
[664]	589	REAL (KIND=C_DOUBLE) , DIMENSION(*) :: lonvalue_1d
[674]	590	INTEGER (kind = C_INT), DIMENSION(*) :: extent
[664]	591	END SUBROUTINE cxios_set_domaingroup_lonvalue_1d
[581]	592
[674]	593	SUBROUTINE cxios_get_domaingroup_lonvalue_1d(domaingroup_hdl, lonvalue_1d, extent) BIND(C)
[326]	594	USE ISO_C_BINDING
	595	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
[664]	596	REAL (KIND=C_DOUBLE) , DIMENSION(*) :: lonvalue_1d
[674]	597	INTEGER (kind = C_INT), DIMENSION(*) :: extent
[664]	598	END SUBROUTINE cxios_get_domaingroup_lonvalue_1d
[581]	599
[664]	600	FUNCTION cxios_is_defined_domaingroup_lonvalue_1d(domaingroup_hdl) BIND(C)
[432]	601	USE ISO_C_BINDING
[664]	602	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_lonvalue_1d
[432]	603	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
[664]	604	END FUNCTION cxios_is_defined_domaingroup_lonvalue_1d
[581]	605
	606
[674]	607	SUBROUTINE cxios_set_domaingroup_lonvalue_2d(domaingroup_hdl, lonvalue_2d, extent) BIND(C)
[326]	608	USE ISO_C_BINDING
	609	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
[664]	610	REAL (KIND=C_DOUBLE) , DIMENSION(*) :: lonvalue_2d
[674]	611	INTEGER (kind = C_INT), DIMENSION(*) :: extent
[664]	612	END SUBROUTINE cxios_set_domaingroup_lonvalue_2d
[581]	613
[674]	614	SUBROUTINE cxios_get_domaingroup_lonvalue_2d(domaingroup_hdl, lonvalue_2d, extent) BIND(C)
[326]	615	USE ISO_C_BINDING
	616	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
[664]	617	REAL (KIND=C_DOUBLE) , DIMENSION(*) :: lonvalue_2d
[674]	618	INTEGER (kind = C_INT), DIMENSION(*) :: extent
[664]	619	END SUBROUTINE cxios_get_domaingroup_lonvalue_2d
[581]	620
[664]	621	FUNCTION cxios_is_defined_domaingroup_lonvalue_2d(domaingroup_hdl) BIND(C)
[432]	622	USE ISO_C_BINDING
[664]	623	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_lonvalue_2d
[432]	624	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
[664]	625	END FUNCTION cxios_is_defined_domaingroup_lonvalue_2d
[581]	626
	627
[674]	628	SUBROUTINE cxios_set_domaingroup_mask_1d(domaingroup_hdl, mask_1d, extent) BIND(C)
[664]	629	USE ISO_C_BINDING
	630	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	631	LOGICAL (KIND=C_BOOL) , DIMENSION(*) :: mask_1d
[674]	632	INTEGER (kind = C_INT), DIMENSION(*) :: extent
[664]	633	END SUBROUTINE cxios_set_domaingroup_mask_1d
	634
[674]	635	SUBROUTINE cxios_get_domaingroup_mask_1d(domaingroup_hdl, mask_1d, extent) BIND(C)
[664]	636	USE ISO_C_BINDING
	637	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	638	LOGICAL (KIND=C_BOOL) , DIMENSION(*) :: mask_1d
[674]	639	INTEGER (kind = C_INT), DIMENSION(*) :: extent
[664]	640	END SUBROUTINE cxios_get_domaingroup_mask_1d
	641
	642	FUNCTION cxios_is_defined_domaingroup_mask_1d(domaingroup_hdl) BIND(C)
	643	USE ISO_C_BINDING
	644	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_mask_1d
	645	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	646	END FUNCTION cxios_is_defined_domaingroup_mask_1d
	647
	648
[674]	649	SUBROUTINE cxios_set_domaingroup_mask_2d(domaingroup_hdl, mask_2d, extent) BIND(C)
[664]	650	USE ISO_C_BINDING
	651	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	652	LOGICAL (KIND=C_BOOL) , DIMENSION(*) :: mask_2d
[674]	653	INTEGER (kind = C_INT), DIMENSION(*) :: extent
[664]	654	END SUBROUTINE cxios_set_domaingroup_mask_2d
	655
[674]	656	SUBROUTINE cxios_get_domaingroup_mask_2d(domaingroup_hdl, mask_2d, extent) BIND(C)
[664]	657	USE ISO_C_BINDING
	658	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	659	LOGICAL (KIND=C_BOOL) , DIMENSION(*) :: mask_2d
[674]	660	INTEGER (kind = C_INT), DIMENSION(*) :: extent
[664]	661	END SUBROUTINE cxios_get_domaingroup_mask_2d
	662
	663	FUNCTION cxios_is_defined_domaingroup_mask_2d(domaingroup_hdl) BIND(C)
	664	USE ISO_C_BINDING
	665	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_mask_2d
	666	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	667	END FUNCTION cxios_is_defined_domaingroup_mask_2d
	668
	669
[326]	670	SUBROUTINE cxios_set_domaingroup_name(domaingroup_hdl, name, name_size) BIND(C)
	671	USE ISO_C_BINDING
	672	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	673	CHARACTER(kind = C_CHAR) , DIMENSION(*) :: name
	674	INTEGER (kind = C_INT) , VALUE :: name_size
	675	END SUBROUTINE cxios_set_domaingroup_name
[581]	676
[326]	677	SUBROUTINE cxios_get_domaingroup_name(domaingroup_hdl, name, name_size) BIND(C)
	678	USE ISO_C_BINDING
	679	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	680	CHARACTER(kind = C_CHAR) , DIMENSION(*) :: name
	681	INTEGER (kind = C_INT) , VALUE :: name_size
	682	END SUBROUTINE cxios_get_domaingroup_name
[581]	683
	684	FUNCTION cxios_is_defined_domaingroup_name(domaingroup_hdl) BIND(C)
[432]	685	USE ISO_C_BINDING
	686	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_name
	687	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	688	END FUNCTION cxios_is_defined_domaingroup_name
[581]	689
	690
[326]	691	SUBROUTINE cxios_set_domaingroup_ni(domaingroup_hdl, ni) BIND(C)
	692	USE ISO_C_BINDING
	693	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	694	INTEGER (KIND=C_INT) , VALUE :: ni
	695	END SUBROUTINE cxios_set_domaingroup_ni
[581]	696
[326]	697	SUBROUTINE cxios_get_domaingroup_ni(domaingroup_hdl, ni) BIND(C)
	698	USE ISO_C_BINDING
	699	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	700	INTEGER (KIND=C_INT) :: ni
	701	END SUBROUTINE cxios_get_domaingroup_ni
[581]	702
	703	FUNCTION cxios_is_defined_domaingroup_ni(domaingroup_hdl) BIND(C)
[432]	704	USE ISO_C_BINDING
	705	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_ni
	706	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	707	END FUNCTION cxios_is_defined_domaingroup_ni
[581]	708
	709
[326]	710	SUBROUTINE cxios_set_domaingroup_ni_glo(domaingroup_hdl, ni_glo) BIND(C)
	711	USE ISO_C_BINDING
	712	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	713	INTEGER (KIND=C_INT) , VALUE :: ni_glo
	714	END SUBROUTINE cxios_set_domaingroup_ni_glo
[581]	715
[326]	716	SUBROUTINE cxios_get_domaingroup_ni_glo(domaingroup_hdl, ni_glo) BIND(C)
	717	USE ISO_C_BINDING
	718	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	719	INTEGER (KIND=C_INT) :: ni_glo
	720	END SUBROUTINE cxios_get_domaingroup_ni_glo
[581]	721
	722	FUNCTION cxios_is_defined_domaingroup_ni_glo(domaingroup_hdl) BIND(C)
[432]	723	USE ISO_C_BINDING
	724	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_ni_glo
	725	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	726	END FUNCTION cxios_is_defined_domaingroup_ni_glo
[581]	727
	728
[326]	729	SUBROUTINE cxios_set_domaingroup_nj(domaingroup_hdl, nj) BIND(C)
	730	USE ISO_C_BINDING
	731	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	732	INTEGER (KIND=C_INT) , VALUE :: nj
	733	END SUBROUTINE cxios_set_domaingroup_nj
[581]	734
[326]	735	SUBROUTINE cxios_get_domaingroup_nj(domaingroup_hdl, nj) BIND(C)
	736	USE ISO_C_BINDING
	737	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	738	INTEGER (KIND=C_INT) :: nj
	739	END SUBROUTINE cxios_get_domaingroup_nj
[581]	740
	741	FUNCTION cxios_is_defined_domaingroup_nj(domaingroup_hdl) BIND(C)
[432]	742	USE ISO_C_BINDING
	743	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_nj
	744	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	745	END FUNCTION cxios_is_defined_domaingroup_nj
[581]	746
	747
[326]	748	SUBROUTINE cxios_set_domaingroup_nj_glo(domaingroup_hdl, nj_glo) BIND(C)
	749	USE ISO_C_BINDING
	750	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	751	INTEGER (KIND=C_INT) , VALUE :: nj_glo
	752	END SUBROUTINE cxios_set_domaingroup_nj_glo
[581]	753
[326]	754	SUBROUTINE cxios_get_domaingroup_nj_glo(domaingroup_hdl, nj_glo) BIND(C)
	755	USE ISO_C_BINDING
	756	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	757	INTEGER (KIND=C_INT) :: nj_glo
	758	END SUBROUTINE cxios_get_domaingroup_nj_glo
[581]	759
	760	FUNCTION cxios_is_defined_domaingroup_nj_glo(domaingroup_hdl) BIND(C)
[432]	761	USE ISO_C_BINDING
	762	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_nj_glo
	763	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	764	END FUNCTION cxios_is_defined_domaingroup_nj_glo
[581]	765
	766
[2131]	767	SUBROUTINE cxios_set_domaingroup_ntiles(domaingroup_hdl, ntiles) BIND(C)
	768	USE ISO_C_BINDING
	769	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	770	INTEGER (KIND=C_INT) , VALUE :: ntiles
	771	END SUBROUTINE cxios_set_domaingroup_ntiles
	772
	773	SUBROUTINE cxios_get_domaingroup_ntiles(domaingroup_hdl, ntiles) BIND(C)
	774	USE ISO_C_BINDING
	775	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	776	INTEGER (KIND=C_INT) :: ntiles
	777	END SUBROUTINE cxios_get_domaingroup_ntiles
	778
	779	FUNCTION cxios_is_defined_domaingroup_ntiles(domaingroup_hdl) BIND(C)
	780	USE ISO_C_BINDING
	781	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_ntiles
	782	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	783	END FUNCTION cxios_is_defined_domaingroup_ntiles
	784
	785
[449]	786	SUBROUTINE cxios_set_domaingroup_nvertex(domaingroup_hdl, nvertex) BIND(C)
	787	USE ISO_C_BINDING
	788	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	789	INTEGER (KIND=C_INT) , VALUE :: nvertex
	790	END SUBROUTINE cxios_set_domaingroup_nvertex
[581]	791
[449]	792	SUBROUTINE cxios_get_domaingroup_nvertex(domaingroup_hdl, nvertex) BIND(C)
	793	USE ISO_C_BINDING
	794	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	795	INTEGER (KIND=C_INT) :: nvertex
	796	END SUBROUTINE cxios_get_domaingroup_nvertex
[581]	797
	798	FUNCTION cxios_is_defined_domaingroup_nvertex(domaingroup_hdl) BIND(C)
[449]	799	USE ISO_C_BINDING
	800	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_nvertex
	801	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	802	END FUNCTION cxios_is_defined_domaingroup_nvertex
[581]	803
	804
[1158]	805	SUBROUTINE cxios_set_domaingroup_prec(domaingroup_hdl, prec) BIND(C)
	806	USE ISO_C_BINDING
	807	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	808	INTEGER (KIND=C_INT) , VALUE :: prec
	809	END SUBROUTINE cxios_set_domaingroup_prec
	810
	811	SUBROUTINE cxios_get_domaingroup_prec(domaingroup_hdl, prec) BIND(C)
	812	USE ISO_C_BINDING
	813	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	814	INTEGER (KIND=C_INT) :: prec
	815	END SUBROUTINE cxios_get_domaingroup_prec
	816
	817	FUNCTION cxios_is_defined_domaingroup_prec(domaingroup_hdl) BIND(C)
	818	USE ISO_C_BINDING
	819	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_prec
	820	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	821	END FUNCTION cxios_is_defined_domaingroup_prec
	822
	823
[1626]	824	SUBROUTINE cxios_set_domaingroup_radius(domaingroup_hdl, radius) BIND(C)
	825	USE ISO_C_BINDING
	826	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	827	REAL (KIND=C_DOUBLE) , VALUE :: radius
	828	END SUBROUTINE cxios_set_domaingroup_radius
	829
	830	SUBROUTINE cxios_get_domaingroup_radius(domaingroup_hdl, radius) BIND(C)
	831	USE ISO_C_BINDING
	832	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	833	REAL (KIND=C_DOUBLE) :: radius
	834	END SUBROUTINE cxios_get_domaingroup_radius
	835
	836	FUNCTION cxios_is_defined_domaingroup_radius(domaingroup_hdl) BIND(C)
	837	USE ISO_C_BINDING
	838	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_radius
	839	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	840	END FUNCTION cxios_is_defined_domaingroup_radius
	841
	842
[326]	843	SUBROUTINE cxios_set_domaingroup_standard_name(domaingroup_hdl, standard_name, standard_name_size) BIND(C)
	844	USE ISO_C_BINDING
	845	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	846	CHARACTER(kind = C_CHAR) , DIMENSION(*) :: standard_name
	847	INTEGER (kind = C_INT) , VALUE :: standard_name_size
	848	END SUBROUTINE cxios_set_domaingroup_standard_name
[581]	849
[326]	850	SUBROUTINE cxios_get_domaingroup_standard_name(domaingroup_hdl, standard_name, standard_name_size) BIND(C)
	851	USE ISO_C_BINDING
	852	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	853	CHARACTER(kind = C_CHAR) , DIMENSION(*) :: standard_name
	854	INTEGER (kind = C_INT) , VALUE :: standard_name_size
	855	END SUBROUTINE cxios_get_domaingroup_standard_name
[581]	856
	857	FUNCTION cxios_is_defined_domaingroup_standard_name(domaingroup_hdl) BIND(C)
[432]	858	USE ISO_C_BINDING
	859	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_standard_name
	860	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	861	END FUNCTION cxios_is_defined_domaingroup_standard_name
[581]	862
	863
[2131]	864	SUBROUTINE cxios_set_domaingroup_tile_data_ibegin(domaingroup_hdl, tile_data_ibegin, extent) BIND(C)
	865	USE ISO_C_BINDING
	866	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	867	INTEGER (KIND=C_INT) , DIMENSION(*) :: tile_data_ibegin
	868	INTEGER (kind = C_INT), DIMENSION(*) :: extent
	869	END SUBROUTINE cxios_set_domaingroup_tile_data_ibegin
	870
	871	SUBROUTINE cxios_get_domaingroup_tile_data_ibegin(domaingroup_hdl, tile_data_ibegin, extent) BIND(C)
	872	USE ISO_C_BINDING
	873	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	874	INTEGER (KIND=C_INT) , DIMENSION(*) :: tile_data_ibegin
	875	INTEGER (kind = C_INT), DIMENSION(*) :: extent
	876	END SUBROUTINE cxios_get_domaingroup_tile_data_ibegin
	877
	878	FUNCTION cxios_is_defined_domaingroup_tile_data_ibegin(domaingroup_hdl) BIND(C)
	879	USE ISO_C_BINDING
	880	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_tile_data_ibegin
	881	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	882	END FUNCTION cxios_is_defined_domaingroup_tile_data_ibegin
	883
	884
	885	SUBROUTINE cxios_set_domaingroup_tile_data_jbegin(domaingroup_hdl, tile_data_jbegin, extent) BIND(C)
	886	USE ISO_C_BINDING
	887	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	888	INTEGER (KIND=C_INT) , DIMENSION(*) :: tile_data_jbegin
	889	INTEGER (kind = C_INT), DIMENSION(*) :: extent
	890	END SUBROUTINE cxios_set_domaingroup_tile_data_jbegin
	891
	892	SUBROUTINE cxios_get_domaingroup_tile_data_jbegin(domaingroup_hdl, tile_data_jbegin, extent) BIND(C)
	893	USE ISO_C_BINDING
	894	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	895	INTEGER (KIND=C_INT) , DIMENSION(*) :: tile_data_jbegin
	896	INTEGER (kind = C_INT), DIMENSION(*) :: extent
	897	END SUBROUTINE cxios_get_domaingroup_tile_data_jbegin
	898
	899	FUNCTION cxios_is_defined_domaingroup_tile_data_jbegin(domaingroup_hdl) BIND(C)
	900	USE ISO_C_BINDING
	901	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_tile_data_jbegin
	902	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	903	END FUNCTION cxios_is_defined_domaingroup_tile_data_jbegin
	904
	905
	906	SUBROUTINE cxios_set_domaingroup_tile_data_ni(domaingroup_hdl, tile_data_ni, extent) BIND(C)
	907	USE ISO_C_BINDING
	908	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	909	INTEGER (KIND=C_INT) , DIMENSION(*) :: tile_data_ni
	910	INTEGER (kind = C_INT), DIMENSION(*) :: extent
	911	END SUBROUTINE cxios_set_domaingroup_tile_data_ni
	912
	913	SUBROUTINE cxios_get_domaingroup_tile_data_ni(domaingroup_hdl, tile_data_ni, extent) BIND(C)
	914	USE ISO_C_BINDING
	915	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	916	INTEGER (KIND=C_INT) , DIMENSION(*) :: tile_data_ni
	917	INTEGER (kind = C_INT), DIMENSION(*) :: extent
	918	END SUBROUTINE cxios_get_domaingroup_tile_data_ni
	919
	920	FUNCTION cxios_is_defined_domaingroup_tile_data_ni(domaingroup_hdl) BIND(C)
	921	USE ISO_C_BINDING
	922	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_tile_data_ni
	923	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	924	END FUNCTION cxios_is_defined_domaingroup_tile_data_ni
	925
	926
	927	SUBROUTINE cxios_set_domaingroup_tile_data_nj(domaingroup_hdl, tile_data_nj, extent) BIND(C)
	928	USE ISO_C_BINDING
	929	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	930	INTEGER (KIND=C_INT) , DIMENSION(*) :: tile_data_nj
	931	INTEGER (kind = C_INT), DIMENSION(*) :: extent
	932	END SUBROUTINE cxios_set_domaingroup_tile_data_nj
	933
	934	SUBROUTINE cxios_get_domaingroup_tile_data_nj(domaingroup_hdl, tile_data_nj, extent) BIND(C)
	935	USE ISO_C_BINDING
	936	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	937	INTEGER (KIND=C_INT) , DIMENSION(*) :: tile_data_nj
	938	INTEGER (kind = C_INT), DIMENSION(*) :: extent
	939	END SUBROUTINE cxios_get_domaingroup_tile_data_nj
	940
	941	FUNCTION cxios_is_defined_domaingroup_tile_data_nj(domaingroup_hdl) BIND(C)
	942	USE ISO_C_BINDING
	943	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_tile_data_nj
	944	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	945	END FUNCTION cxios_is_defined_domaingroup_tile_data_nj
	946
	947
	948	SUBROUTINE cxios_set_domaingroup_tile_ibegin(domaingroup_hdl, tile_ibegin, extent) BIND(C)
	949	USE ISO_C_BINDING
	950	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	951	INTEGER (KIND=C_INT) , DIMENSION(*) :: tile_ibegin
	952	INTEGER (kind = C_INT), DIMENSION(*) :: extent
	953	END SUBROUTINE cxios_set_domaingroup_tile_ibegin
	954
	955	SUBROUTINE cxios_get_domaingroup_tile_ibegin(domaingroup_hdl, tile_ibegin, extent) BIND(C)
	956	USE ISO_C_BINDING
	957	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	958	INTEGER (KIND=C_INT) , DIMENSION(*) :: tile_ibegin
	959	INTEGER (kind = C_INT), DIMENSION(*) :: extent
	960	END SUBROUTINE cxios_get_domaingroup_tile_ibegin
	961
	962	FUNCTION cxios_is_defined_domaingroup_tile_ibegin(domaingroup_hdl) BIND(C)
	963	USE ISO_C_BINDING
	964	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_tile_ibegin
	965	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	966	END FUNCTION cxios_is_defined_domaingroup_tile_ibegin
	967
	968
	969	SUBROUTINE cxios_set_domaingroup_tile_jbegin(domaingroup_hdl, tile_jbegin, extent) BIND(C)
	970	USE ISO_C_BINDING
	971	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	972	INTEGER (KIND=C_INT) , DIMENSION(*) :: tile_jbegin
	973	INTEGER (kind = C_INT), DIMENSION(*) :: extent
	974	END SUBROUTINE cxios_set_domaingroup_tile_jbegin
	975
	976	SUBROUTINE cxios_get_domaingroup_tile_jbegin(domaingroup_hdl, tile_jbegin, extent) BIND(C)
	977	USE ISO_C_BINDING
	978	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	979	INTEGER (KIND=C_INT) , DIMENSION(*) :: tile_jbegin
	980	INTEGER (kind = C_INT), DIMENSION(*) :: extent
	981	END SUBROUTINE cxios_get_domaingroup_tile_jbegin
	982
	983	FUNCTION cxios_is_defined_domaingroup_tile_jbegin(domaingroup_hdl) BIND(C)
	984	USE ISO_C_BINDING
	985	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_tile_jbegin
	986	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	987	END FUNCTION cxios_is_defined_domaingroup_tile_jbegin
	988
	989
	990	SUBROUTINE cxios_set_domaingroup_tile_ni(domaingroup_hdl, tile_ni, extent) BIND(C)
	991	USE ISO_C_BINDING
	992	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	993	INTEGER (KIND=C_INT) , DIMENSION(*) :: tile_ni
	994	INTEGER (kind = C_INT), DIMENSION(*) :: extent
	995	END SUBROUTINE cxios_set_domaingroup_tile_ni
	996
	997	SUBROUTINE cxios_get_domaingroup_tile_ni(domaingroup_hdl, tile_ni, extent) BIND(C)
	998	USE ISO_C_BINDING
	999	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	1000	INTEGER (KIND=C_INT) , DIMENSION(*) :: tile_ni
	1001	INTEGER (kind = C_INT), DIMENSION(*) :: extent
	1002	END SUBROUTINE cxios_get_domaingroup_tile_ni
	1003
	1004	FUNCTION cxios_is_defined_domaingroup_tile_ni(domaingroup_hdl) BIND(C)
	1005	USE ISO_C_BINDING
	1006	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_tile_ni
	1007	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	1008	END FUNCTION cxios_is_defined_domaingroup_tile_ni
	1009
	1010
	1011	SUBROUTINE cxios_set_domaingroup_tile_nj(domaingroup_hdl, tile_nj, extent) BIND(C)
	1012	USE ISO_C_BINDING
	1013	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	1014	INTEGER (KIND=C_INT) , DIMENSION(*) :: tile_nj
	1015	INTEGER (kind = C_INT), DIMENSION(*) :: extent
	1016	END SUBROUTINE cxios_set_domaingroup_tile_nj
	1017
	1018	SUBROUTINE cxios_get_domaingroup_tile_nj(domaingroup_hdl, tile_nj, extent) BIND(C)
	1019	USE ISO_C_BINDING
	1020	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	1021	INTEGER (KIND=C_INT) , DIMENSION(*) :: tile_nj
	1022	INTEGER (kind = C_INT), DIMENSION(*) :: extent
	1023	END SUBROUTINE cxios_get_domaingroup_tile_nj
	1024
	1025	FUNCTION cxios_is_defined_domaingroup_tile_nj(domaingroup_hdl) BIND(C)
	1026	USE ISO_C_BINDING
	1027	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_tile_nj
	1028	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	1029	END FUNCTION cxios_is_defined_domaingroup_tile_nj
	1030
	1031
[449]	1032	SUBROUTINE cxios_set_domaingroup_type(domaingroup_hdl, type, type_size) BIND(C)
	1033	USE ISO_C_BINDING
	1034	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	1035	CHARACTER(kind = C_CHAR) , DIMENSION(*) :: type
	1036	INTEGER (kind = C_INT) , VALUE :: type_size
	1037	END SUBROUTINE cxios_set_domaingroup_type
[581]	1038
[449]	1039	SUBROUTINE cxios_get_domaingroup_type(domaingroup_hdl, type, type_size) BIND(C)
	1040	USE ISO_C_BINDING
	1041	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	1042	CHARACTER(kind = C_CHAR) , DIMENSION(*) :: type
	1043	INTEGER (kind = C_INT) , VALUE :: type_size
	1044	END SUBROUTINE cxios_get_domaingroup_type
[581]	1045
	1046	FUNCTION cxios_is_defined_domaingroup_type(domaingroup_hdl) BIND(C)
[449]	1047	USE ISO_C_BINDING
	1048	LOGICAL(kind=C_BOOL) :: cxios_is_defined_domaingroup_type
	1049	INTEGER (kind = C_INTPTR_T), VALUE :: domaingroup_hdl
	1050	END FUNCTION cxios_is_defined_domaingroup_type
[581]	1051
	1052	END INTERFACE
	1053
[326]	1054	END MODULE domaingroup_interface_attr

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

Download in other formats: