X-Git-Url: http://challenge-bot.com/repos/?a=blobdiff_plain;f=guess.rkt;h=21a6a6390f2689390897a6120ac294b2d76cc2eb;hb=6a227e987e1ad5d2c702feb913a7cc686d0f1888;hp=922a8445b3af39612f52499b4ba7ce0bbb137425;hpb=6b4acb7e0c4460582e9df501ff1cc74841920d1d;p=ozzloy%40gmail.com%2Frealm-of-racket-journey

diff --git a/guess.rkt b/guess.rkt
index 922a844..21a6a63 100644
--- a/guess.rkt
+++ b/guess.rkt
@@ -14,3 +14,8 @@
 (define (bigger)
   (set! lower (min upper (add1 (guess))))
   (guess))
+
+(define (start n m)
+  (set! lower (min n m))
+  (set! upper (max n m))
+  (guess))