RosettaCodeData/Task/Inheritance-Single/Factor/inheritance-single.factor

TUPLE: animal ;
TUPLE: dog < animal ;
TUPLE: cat < animal ;
TUPLE: lab < dog ;
TUPLE: collie < dog ;