instance creation
newNamed: aNameString email: anEmailString
	^ self new
		fullname: aNameString;
		email: anEmailString;
		yourself