From 6b4acb7e0c4460582e9df501ff1cc74841920d1d Mon Sep 17 00:00:00 2001 From: daniel watson Date: Wed, 9 Mar 2016 21:46:30 -0800 Subject: [PATCH] make bigger function --- guess.rkt | 3 +++ 1 file changed, 3 insertions(+) diff --git a/guess.rkt b/guess.rkt index 587819b..922a844 100644 --- a/guess.rkt +++ b/guess.rkt @@ -11,3 +11,6 @@ (set! upper (max lower (sub1 (guess)))) (guess)) +(define (bigger) + (set! lower (min upper (add1 (guess)))) + (guess)) -- 2.30.2