Add missing close paren in Racket listing

Author: siadat

book.tex

@@ -1328,7 +1328,7 @@ \section{Recursive Functions}
     [(Program '() e) (is_exp e)]
     [else #f]))
 
-(is_Lint (Program '() ast1_1)
+(is_Lint (Program '() ast1_1))
 (is_Lint (Program '()
        (Prim '* (list (Prim 'read '())
                       (Prim '+ (list (Int 8)))))))