:- object(great_crested_flycatcher,
	imports(descriptors),
	extends(flycatcher)).


	tail(long_rusty).


:- end_object.