We still have one thing we need to describe: If there are any objects on the floor at the location we are standing in, we'll want to describe them as well. Let's first write a helper function that tells us whether an item is in a given place:

      (defun is-at (obj loc obj-loc)
        (eq (second (assoc obj obj-loc)) loc))

The `eq` function tells us if the symbol from the object location list is the current location.
Let's try this out:

      (is-at 'whiskey-bottle 'living-room object-locations)

      ==> t

The symbol `t` (or any value other than nil) means that it's true that the whiskey-bottle is in living-room.
<< begin < previous - next > end >>