[plt-scheme] How to let a new symbol (created in _syntax-case_) visible at top level ?

[Veer]

b2sgLCBpIGRvbid0IHJlYWxseSB1bmRlcnN0YW5kIG1hY3JvcyAsIHNvIHRoaXMgaXMgYSBibGlu
ZCBoYWNrIGFuZCBpdApzZWVtcyB0byB3b3JrCgoocmVxdWlyZSBzY2hlbWUpCgooZGVmaW5lLXN5
bnRheCBkZWZzeW1ib2wKICAopssgKHN0eCkKICAgIChzeW50YXgtY2FzZSBzdHggKCkKICAgICAg
WyhrIG5hbWUgdmFsKQogICAgICAgKHdpdGgtc3ludGF4CiAgICAgICAgICAgKFtuZXctbmFtZQog
ICAgICAgICAgICAgKGRhdHVtLT5zeW50YXggIydrCiAgICAgICAgICAgICAgICAgICAgICAgICAg
ICAoc3RyaW5nLT5zeW1ib2wKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAoc3RyaW5nLWFw
cGVuZAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAibnYtIiAoc3ltYm9sLT5zdHJpbmcg
KHN5bnRheC0+ZGF0dW0gIyduYW1lKSkpKSldKQoKICAgICAgICAgIycoZGVmaW5lIG5ldy1uYW1l
IHZhbCkpXSkpKQoKCihkZWZzeW1ib2wgYml6IDQpCm52LWJpegoKCgpPbiAxMS80LzA4LCBBbmRy
ZSBNYXllcnMgPGFuZHJlLm1heWVyc0B1c2hlcmJyb29rZS5jYT4gd3JvdGU6Cj4gI2xhbmcgc2No
ZW1lCj4gKGRlZmluZS1zeW50YXggZGVmc3ltYm9sCj4gICAopssgKHN0eCkKPiAgICAgKHN5bnRh
eC1jYXNlIHN0eCAoKQo+ICAgICAgIFsoXyBuYW1lIHZhbCkKPiAgICAgICAgKHdpdGgtc3ludGF4
Cj4gICAgICAgICAgICAoW25ldy1uYW1lCj4gICAgICAgICAgICAgIChzdHJpbmctPnN5bWJvbAo+
ICAgICAgICAgICAgICAgKHN0cmluZy1hcHBlbmQgIm52LSIgKHN5bWJvbC0+c3RyaW5nIChzeW50
YXgtPmRhdHVtCj4gIyduYW1lKSkpKV0pCj4gICAgICAgICAgKGRhdHVtLT5zeW50YXgKPiAgICAg
ICAgICAgI2YKPiAgICAgICAgICAgKGxpc3QgIydkZWZpbmUgKHN5bnRheC0+ZGF0dW0gIyduZXct
bmFtZSkgIyd2YWwpCj4gICAgICAgICAgICNmKSldKSkpCj4KPiAoZGVmc3ltYm9sIGJpeiA0KQo+
Cj4gbnYtYml6Cj4gPT0+Cj4gZXhwYW5kOiB1bmJvdW5kIGlkZW50aWZpZXIgaW4gbW9kdWxlIGlu
OiBudi1iaXoKPgo+IEkgYW0gcHJldHR5IHN1cmUgdGhhdCBJIGFtIG5vdCB0aGUgZmlyc3QgdG8g
YXNrIHRoZSBxdWVzdGlvbiBidXQgSSBjYW4ndAo+IGZpbmQgdGhlIGFuc3dlci4KPgo+Cj4gQW5k
cqimIE1heWVycywgUGguRC4sIE0uIFBzLgo+IHByb2Zlc3NldXIgYWdyqKZnqKYKPiBEqKZwYXJ0
ZW1lbnQgZCdpbmZvcm1hdGlxdWUKPiBVbml2ZXJzaXSopiBkZSBTaGVyYnJvb2tlCj4gU2hlcmJy
b29rZSAoUXWopmJlYykgQ2FuYWRhIEoxSyAyUjEKPiB0qKZsOiArMSA4MTktODIxLTgwMDAgcG9z
dGUgNjIwNDEKPiBmYXg6ICsxIDgxOS04MjEtODIwMAo+IGFuZHJlLm1heWVyc0B1c2hlcmJyb29r
ZS5jYQo+IGh0dHA6Ly93d3cuZG1pLnVzaGVyYi5jYS9+YW1heWVycwo+Cj4KPgo+IF9fX19fX19f
X19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX18KPiAgIEZvciBsaXN0LXJl
bGF0ZWQgYWRtaW5pc3RyYXRpdmUgdGFza3M6Cj4gICBodHRwOi8vbGlzdC5jcy5icm93bi5lZHUv
bWFpbG1hbi9saXN0aW5mby9wbHQtc2NoZW1lCj4K