Weeks begin in #Monday and end in #Sunday

	enumerating
	do:

	inquiries
	duration firstDate index indexInMonth: lastDate

	printing
	printOn:

	instance creation
	fromDate:

	converting	top
	asDate Answer the first day of the week.
	next
	previous

	enumerating	top
	do:

	inquiries	top
	duration
	firstDate
	index
	indexInMonth: 1=first week, 2=second week, etc.
	lastDate

	printing	top
	printOn: Append to the argument, aStream, a sequence of characters that identifies the receiver.

	class variables	top
	startMonday
	toggleStartMonday

	instance creation	top
	fromDate: