rule Arc {
from
	e : EPK!Arc
	
to 
	b : BPMN!SequenceFlow
	 (
	 	id <- e.id,
	 	name <- e.name
	 	
 	)
 }

rule Flow {
from
	e : EPK!ControlFlow

to 
	b : BPMN!SequenceFlow
	 (
	 	sourceRef <- e.source,
	 	targetRef <- e.target
	 	
 	)
 }