From 《ANSI Common Lisp》Chapter Three Section Thirteen Dotted Lists and Section Fourteen Assoc-lists
Added function

	proper-list?
	our-assoc