A program for generation of artificial social networks