(define impc:ti:closure-exists? (lambda (closure-name) (let ((res (impc:ti:get-closure-type closure-name))) (if (and res (not (null? res))) #t #f))))