card(one_to_many,G,R) :- one_to_many_xref(G,R,'RHEA').
card(many_to_many,G,R) :- many_to_many_xref(G,R,'RHEA').
card(many_to_one,G,R) :- many_to_one_xref(G,R,'RHEA').