(define (expert x) (and (bold x) (italic x) (underline x) (overline x))) (display (expert "Is this Satori?"))