instance creation
createDefault
	^ self new
		addContact: (Contact
			newNamed: 'Damien Cassou'
			email: 'damien@cassou.me');
		addContact: (Contact
			newNamed: 'Marcus Denker'
			email: 'marcus.denker@inria.fr');
		addContact: (Contact
			newNamed: 'Tudor Girba'
			email: 'tudor@tudorgirba.com');
		addContact: (Contact
			newNamed: 'Clara Allende'
			email: 'clari.allende@gmail.com');
		yourself