ahh maybe a graulate gen is actually a closure and so it doesnt get optmized? cm> (define a (make-granulate)) a cm> (procedure? a) #t