DomainModel:
	objectTypes+=ObjectType*
	relationTypes+=RelationType*
	objects+=DomainObject*
	perspectives+=Perspective*;
	
	
ObjectType:
	'ObjectType' name=ID;

RelationType:
	'RelationType' name=ID ('From' sourceTypes+=[ObjectType]*)? ('To' targetTypes+=[ObjectType]*)?;

DomainObject:
	'Object' type=[ObjectType|ID] name=ID;

Perspective:
	'Perspective 'name=ID
	(objects+=DomainObject|relations+=Relation)*;	
	
Relation:
	'Relation'
	from=[DomainObject|ID] type=[RelationType|ID] '--->' to=[DomainObject|ID];

    def IScope scope_Relation_to(Relation context, EReference reference) 
    {
    	if (context.type.sourceTypes.length > 0)
		{
			return Scopes.scopeFor(context.AllDomainObjects.filter[context.type.targetTypes.contains(it.type)])
		} 
		else
		{
			return Scopes.scopeFor(context.AllDomainObjects)
		}
    }
	
    
    def Iterable<DomainObject> AllDomainObjects(EObject start) {
    	// Here I need all objects of type DomainObject. Not only the ones for the current DomainModel container
    	return EcoreUtil2.getAllContentsOfType(EcoreUtil2.getContainerOfType(start, DomainModel), DomainObject)
	}

 def IScope scope_Relation_to(Relation relation, EReference reference) 
    {
    	var IScope delegateScope = delegateGetScope(EcoreUtil2.getContainerOfType(relation, DomainModel), reference ); 
    	
    	if (relation.type.sourceTypes.length > 0)
		{
			var Predicate<IEObjectDescription> filter = new Predicate<IEObjectDescription>() {
				override boolean apply(IEObjectDescription input) {
					var DomainObject v = input.getEObjectOrProxy() as DomainObject
					var b = relation.type.targetTypes.contains(v.type)
					return b
				}
			}

			// should return all objects of type DomainObject that are in the list of the relations target types 			
			return  new FilteringScope(delegateScope, filter) 
		} 
		else
		{
			// should return all objects of type DomainObject
			return delegateScope
		}
    }

// Typelevel
ObjectType "Server" Tags: UITEST
ObjectType "Application" 
RelationType "installed on" From Application To Server 

// Instancelevel
Perspective  "Servers"
	Object "Server" "server1"
	
Perspective  "ApplicationLandscape"
	Object "Application" "myapp"
	
	Relation "myapp" "installed on" ---> "Servers.server1" // don't want to write "Servers." here but I have to

public class DomainModelRuntimeModule extends com.kws.rddm.AbstractDomainModelRuntimeModule {

	public Class<? extends IQualifiedNameProvider> bindIQualifiedNameProvider() {
		return SimpleNameProvider.class;
	}
	
}

var Predicate<IEObjectDescription> filter = new Predicate<IEObjectDescription>() {
	override boolean apply(IEObjectDescription input) {
					
		var DomainObject v = EcoreUtil.resolve(input.getEObjectOrProxy(), relation) as DomainObject
		return relation.type.sourceTypes.map[it.name].contains(v.type.name)
	}
}