:- object(fulmar, imports(descriptors), extends(tubenose)). size(medium). flight(flap_glide). :- end_object.