(egs :debug4
     (eg '(my-random 1)
	 :of "generating a random floating-point number"
	 :out 'any)
     (eg '(line-y 10 (point-to-line 0 0 5 5))
	 :of "finding the 'y' point on a line"
	 :out 10)
     (eg '(interpolate 5 0 0 10 10)
	 :of "interpolating a 'y' point on a line"
	 :out 5)
     (eg '(as-list 5)
	 :of "ensuring that the argument is a list"
	 :out '(5))
     (eg '(geta 'a '((a . 1) (b . 2) (c . 3)))
	 :of "returning a value from an association list"
	 :out 1)
     (eg '(euclidean 3 4)
	 :of "returning the distance of a point in n-dimensional space from the origin"
	 :out 5)
     (eg '(list2stdev '(5 5 5 5 5))
	 :of "calculating the standard deviation of a list of numbers"
	 :out 0)
     (eg '(sum '(1 2 3 4 5))
	 :of "calculating the sum of a list of numbers"
	 :out 15)
     (eg '(mean '(1 2 3 4 5))
	 :of "calculating the mean of a list of numbers"
	 :out 3)
     (eg '(median '(1 3 5 7 100))
	 :of "calculating the median of a list of numbers"
	 :out 5)
     (eg '(?elt '(1 2 3 4 5))
	 :of "choosing a random item from a list"
	 :out 'any)
     (eg '(?bag (make-bag :range '(1 2 3 4 5)))
	 :of "choosing a random item from a bag"
	 :out 'any)
     (eg '(?num (make-num :min 1 :max 100))
	 :of "choosing a random number from a range"
	 :out 'any)
     (eg '(coco '(1 2 3))
	 :of "converting to COCOMO values"
	 :out '(1 2 3))
     (eg '(coco '(vl l n))
	 :of "converting to COCOMO values"
	 :out '(1 2 3))
     (eg '(progn (init-db) (! 'kloc))
	 :of "choosing a random number of lines of code"
	 :out 'any)
     (eg '(progn (init-db) (em2effort 'acap))
	 :of "choosing a random effort value for an effort multiplier"
	 :out 'any)
     (eg '(progn (init-db) (sf2effort 'flex))
	 :of "choosing a random effort value for a scale factor"
	 :out 'any)
     (eg '(progn (init-db) (sf2rin 'flex))
	 :of "choosing a random defect introduction value for a scale factor"
	 :out 'any)
     (eg '(progn (init-db) (dr2rout 'aa))
	 :of "choosing a random defect removal value for a defect remover"
	 :out 'any))