(beam-ps width slope thick)
"}"))
+(define
+ (bracket o h) (empty o))
+
(define
(char o n)
((invoke-output o "char") n))
(empty-tex)
"%\n\\empty%\n")
-(define
- (emptybar o h) (empty o))
-
(define
(end-output o)
((invoke-output o "end-output")))
(define
(repeatbar o h) (empty o))
-(define
- (repeatbarstartrepeat o h) (empty o))
-
(define
(rulesym o x y)
((invoke-output o "rulesym") x y))
(setbold o s)
((invoke-output o "text") "bold" s))
+(define
+ (setdynamic o s) (empty o))
+
(define
(setfinger o s)
((invoke-output o "text") "finger" s))