Class Boolean
back
and: aBlock
^ self
ifTrue: [ aBlock value ]
ifFalse: [ false ]