PasteRack.org | ||
Paste # 1879 | ||
2017-08-09 21:46:31 | ||
Fork as a new paste. | ||
Paste viewed 139 times. | ||
Tweet | ||
Embed: | ||
#lang racket (define (smaller) (set! upper (max lower (sub1 (guess)))) (guess)) (define (bigger) (set! lower (min upper (add1 (guess)))) (guess))