Class True Boolean
Methods True

	not
		^ false

]
Methods True

	printString
		^ 'true'

]
Methods True

	xor: aBoolean
		^ aBoolean not

]
Methods True
	ifTrue: trueBlock ifFalse: falseBlock
		^ trueBlock value

]