-- TTCN3 module extracted from ITU-T Z.169 (03/2011)

module Example3 { 

	import from XSD language "XML" all; 

	type record C1 {
		XSD.Integer base,
		XSD.Integer a1 optional,
		XSD.Integer a2 optional
	} with {
	  variant(a1,a2)"name as capitalized";
	  variant(a1,a2) "attribute";
   variant(base) "untagged"
   }

	 

	type record C2 { 
		XSD.Integer (23 .. 26) base, 
		XSD.Byte        a1, 
		XSD.NegativeInteger  a2 optional 
	} with {
	  variant(a1,a2)"name as capitalized";
	  variant(a1,a2) "attribute";
   variant(base) "untagged" ;
  }


	type record C3 { 
		XSD.Integer (25 .. 26) base, 
		XSD.Byte        a1, 
		XSD.NegativeInteger  a2 optional 
	} with {
	  variant(a1,a2)"name as capitalized";
	  variant(a1,a2) "attribute";
   variant(base) "untagged"
  	}
} with { 
encode "XML";

variant "namespace as ‘nsA''"
}