rule Class2Block
  transform c: Class
  to b : Block {
    ...
    b.block.addAll(c.ownedAttribute.collect(oa | oa.type).equivalent());
    ...
  }

rule Class2Block
  transform c: Class
  to b : Block {
    ...
    b.block.addAll(c.ownedAttribute.equivalent());
    ...
  }

rule oA2Block
  transform a : attribute
  to b : Block {
    ...
    b.port.addAll(a.type.ownedConnecter.equivalent());
  }

// Since a property references the Class in its type, we clone all the 
// class attributes of interest so that they can be generated from
// transformations
var ports = new Set;
// Since he flow port may have been cloned previously, make sure that
// we only clone the correct flow ports.
var flowPorts = new Set(SysML!FlowPort);
for (a in property.type.ownedAttribute.select(oa | oa.isTypeOf(SysML!Port)))
{
	flowPorts.add(SysML!FlowPort.all().selectOne(fp | fp.base_Port = a));
}
for (port in flowPorts)
{
	var cp = new SysML!FlowPort;
	cp.base_Port = port.base_Port;
	//cp.isAtomic = port.isAtomic;  // isAtomic is derived
	cp.isConjugated = port.isConjugated;
	cp.direction = port.direction;
	cp.~partWithPort = property;
	ports.add(cp);
}
property.~port = ports;