Domainmodel:
	'dmodel' name=ID
	"{"
		('cmpTypes' '{' ctps+=CMPType	( "," ctps+=CMPType)* '}' )? 
	   	('set' '{'
	   		(cmps+=CMP ("," cmps+=CMP)*)?
	   		(prt=[PRT | QualifiedName])?
	   	'}'
	   	)?
	'}'
	;
CMPType: 
	'type' name=ID	'{' ('prts' '(' prts+=PRT ( "," prts+=PRT)* ')' )? '}'
	;
CMP:
	'cmp'	name=QualifiedName 'as' cmpType=[CMPType|QualifiedName]
	;
PRT:
	name=ID
	;
QualifiedName:
    ID ('.' ID)*
    ;

dmodel D1 {
  cmpTypes { 
	type C1 { 
		prts (P1, P2)
	},
	type C2 {  
		prts (P3, P4)
		}
	}
  set { 
	cmp x as C1,
	cmp y as C1,
        cmp z as C2

        //access items in 'prts' (P1, P2, ...) by  cmp IDs (x, y, z)
	x.P1 // rather than C1.P1 which works 
	y.P3
	}		
}

PRTRef: cmp=[CMP|ID] '.' prt=[PRT|ID];