;;; Additional sample animal data for COBWEB

(setf *feature-names* '(body-cover air water mouth birth appendage color place feet))

(setf *domains* 
      '((HAIR FEATHERS) (FLY NO-FLY) (NO-SWIM SWIM) (TEETH BEAK) (LIVE-BIRTH EGGS) (LEGS WINGS)
	(BROWN WHITE TAWNY BLACK RED-BREAST TUXEDO) (WEST UT-CAMPUS AFRICA MIDWEST ANTARTIC)
	(NO-WEB WEBBED)))

(setf *raw-examples*
      '(
	(Penguin   (feathers  no-fly swim    beak   eggs         wings  tuxedo      Antartic  webbed))
	(Robin     (feathers  fly    no-swim beak   eggs         wings  red-breast  Midwest   no-web))
	(Panther   (hair      no-fly no-swim teeth  live-birth   legs   black       Africa    no-web))
	(Grackle   (feathers  fly    no-swim beak   eggs         wings  black       UT-Campus no-web))
	(Lion      (hair      no-fly no-swim teeth  live-birth   legs   tawny       Africa    no-web))
	(Eagle     (feathers  fly    no-swim beak   eggs         wings  white       West      no-web))
	(Bear      (hair      no-fly no-swim teeth  live-birth   legs   black       West      no-web))
	(Duck      (feathers  fly    swim    beak   eggs         wings  brown       Midwest   webbed))
       ))