"| library book1 book2 checkoutAction |
 
book1 := Dictionary new at: #title put: 'BookA'; at: #available put: true; yourself.
book2 := Dictionary new at: #title put: 'BookB'; at: #available put: true; yourself.
 
library := OrderedCollection with: book1 with: book2.
 
checkoutAction := [:aLibrary :aTitle |
    | book |
    book := aLibrary detect: [:b | (b at: #title) = aTitle] ifNone: [nil].
    (book notNil and: [book at: #available])
        ifTrue: [
            book at: #available put: false.
            Transcript show: 'Success: ', aTitle, ' checked out.'; cr.]
        ifFalse: [
            Transcript show: 'Failed: ', aTitle, ' not available.'; cr.]
].
 
checkoutAction value: library value: 'BookA'.
checkoutAction value: library value: 'BookA'.your code goes here"

InwgbGlicmFyeSBib29rMSBib29rMiBjaGVja291dEFjdGlvbiB8Cgpib29rMSA6PSBEaWN0aW9uYXJ5IG5ldyBhdDogI3RpdGxlIHB1dDogJ0Jvb2tBJzsgYXQ6ICNhdmFpbGFibGUgcHV0OiB0cnVlOyB5b3Vyc2VsZi4KYm9vazIgOj0gRGljdGlvbmFyeSBuZXcgYXQ6ICN0aXRsZSBwdXQ6ICdCb29rQic7IGF0OiAjYXZhaWxhYmxlIHB1dDogdHJ1ZTsgeW91cnNlbGYuCgpsaWJyYXJ5IDo9IE9yZGVyZWRDb2xsZWN0aW9uIHdpdGg6IGJvb2sxIHdpdGg6IGJvb2syLgoKY2hlY2tvdXRBY3Rpb24gOj0gWzphTGlicmFyeSA6YVRpdGxlIHwKICAgIHwgYm9vayB8CiAgICBib29rIDo9IGFMaWJyYXJ5IGRldGVjdDogWzpiIHwgKGIgYXQ6ICN0aXRsZSkgPSBhVGl0bGVdIGlmTm9uZTogW25pbF0uCiAgICAoYm9vayBub3ROaWwgYW5kOiBbYm9vayBhdDogI2F2YWlsYWJsZV0pCiAgICAgICAgaWZUcnVlOiBbCiAgICAgICAgICAgIGJvb2sgYXQ6ICNhdmFpbGFibGUgcHV0OiBmYWxzZS4KICAgICAgICAgICAgVHJhbnNjcmlwdCBzaG93OiAnU3VjY2VzczogJywgYVRpdGxlLCAnIGNoZWNrZWQgb3V0Lic7IGNyLl0KICAgICAgICBpZkZhbHNlOiBbCiAgICAgICAgICAgIFRyYW5zY3JpcHQgc2hvdzogJ0ZhaWxlZDogJywgYVRpdGxlLCAnIG5vdCBhdmFpbGFibGUuJzsgY3IuXQpdLgoKY2hlY2tvdXRBY3Rpb24gdmFsdWU6IGxpYnJhcnkgdmFsdWU6ICdCb29rQScuCmNoZWNrb3V0QWN0aW9uIHZhbHVlOiBsaWJyYXJ5IHZhbHVlOiAnQm9va0EnLnlvdXIgY29kZSBnb2VzIGhlcmUi