;;;; -*- mode:Lisp; syntax:Common-Lisp; package:user -*- ;;;;
;;;; Copyright 1992 Patrick H. Winston.  All rights reserved.
;;;; Version 1.1, copied from master file on 21 Jan 93       
;;;; 
;;;; This software is licensed by Patrick H. Winston (licensor) for
;;;; instructional use with the textbooks ``Artificial Intelligence,'' by
;;;; Patrick H. Winston, and ``Lisp,'' by Patrick H. Winston and Berthold
;;;; K. P. Horn.  Your are free to make copies of this software and
;;;; modify it for such instructional use as long as:
;;;; 1. You keep this notice intact.
;;;; 2. You cause any modified files to carry a prominent notice stating
;;;;    that you modified the files and the date of your modifications.
;;;; This software is licensed ``AS IS'' without warranty and the licensor
;;;; shall have no liability for any alleged defect or damages.

;;;; REMARKS

#|

City distances differ slightly from those reported in the
text---neither set is likely to be particularly accurate.

|#

;;;; TEST DATA FOR SEARCH PROCEDURES

(defun make-text-cities ()
  (defplace s (a d)	(-.89 2.75))
  (defplace a (s b d)	(1.0 5.1))
  (defplace d (s a e)	(2.0 0.0))
  (defplace e (b d f)	(4.0 0.0))
  (defplace b (a c e)	(5.0 5.1))
  (defplace f (e g)	(8.0 0.0))
  (defplace c (b)	(9.0 5.1))
  (defplace g (f)	(9.89 2.35)))