mapping Property :: Property2Property() : Property {
	result.name := self.name;
	result.type := self.type;
	result.visibility := self.visibility;
	result.lower := self.lower;
	result.upper := self.upper;
	result.association := self.association;
}