- ;;"<g tranform='translate(50,-250)'>
- (set! system-y (+ system-y height))
- ;;(format #f "<g tranform='translate(0,~1,'~f)'>" y)))
- (string-append
- "\n"
- (comment "start-system")
- (comment "URG, transform does not work!")
- (format #f "<g tranform='translate(0.0,~f)'>\n" (* output-scale y)))))
-
+ ;;"<g transform='translate(50,-250)'>
+ (set! system-y (+ system-y height))
+ ;;(format #f "<g transform='translate(0,~1,'~f)'>" y)))
+ (string-append
+ "\n"
+ (comment "start-system")
+ (format #f "<g transform='translate(0.0,~f)'>\n" (* output-scale y)))))
+