renamed *all-social-net-groups* to *all-soc-net-groups*
added some utility functions to social-net.lisp
modified utility functions