CL-USER> (is-x-a-y? {person} {animal})
T
CL-USER> (is-x-a-y? {dog} {animal})
T
CL-USER> (is-x-a-y? {dog} {person})
NIL
CL-USER> (is-x-a-y? {boy} {person})
T
CL-USER> (is-x-a-y? {boy} {animal})
T
CL-USER> (is-x-a-y? {boy} {girl})
NIL
CL-USER> (is-x-a-y? {woman} {girl})
NIL
CL-USER> (is-x-a-y? {girl} {woman})
NIL
CL-USER> (is-x-a-y? {girl} {female})
T
CL-USER> (is-x-a-y? {woman} {female})
T
CL-USER> (is-x-a-y? {cat} {female})
NIL
CL-USER> (is-x-a-y? {person} {sexually reproducing})
T
CL-USER> (is-x-a-y? {boy} {sexually reproducing})
T
CL-USER> (is-x-a-y? {bat} {man})
NIL
(no subject)
Date: 2007-06-25 07:36 pm (UTC)T
CL-USER> (is-x-a-y? {fig-newton} {just-a-cookie})
NIL
CL-USER> (is-x-a-y? {fig-newton} {fruit-and-cake})
T
(no subject)
Date: 2007-06-25 09:15 pm (UTC)