(setf *hs-assoc* '(("konstan" 16024) ("smoot" 15695) ("skel" 12428) ("marcia" 3996) ("bsmith" 3400) ("paschall" 2944) ("johnb" 1022) ("chungl" 904)))