<- relationship x: e.g. claim page, get supporting evidence
for block x
x
for every block r that contains a page reference to x
r
get parent block p of r
p
if block p contains -> and a page reference to relationship
->
relationship
return parent of s
s
get child block c of r
c
if block c contains <- and a page reference to relationship
<-
return all children of s