tests/org.eclipse.m2m.tests.qvt.oml/unparserTestData/sources/tuples/tuples.qvto

modeltype ECORE uses "http://www.eclipse.org/emf/2002/Ecore";
modeltype SIMPLEUML uses 'http://www.eclipse.org/qvt/1.0.0/Operational/examples/simpleuml';

transformation tuples(in model : ECORE, out model1 : SIMPLEUML);

mapping main(in inModel : EPackage) : EPackage { 
	init {   
 		var tuplesVar : Set(Tuple(name:String)) := Set { Tuple{name='A'},Tuple{name='B'} };
		result := object EPackage {
            	name:= inModel.name;
                eClassifiers := tuplesVar->collect(t| tupleToClass(t))->asOrderedSet(); };
}}

mapping tupleToClass(in tup:Tuple(name:String)): EClass {
        name:=tup.name;
}