@prog think-global.muf
1 99 d
1 i
: main
	me @ name swap " . o O { " swap " }" 4 "" rimplode
	loc @ #-1 rot notify_except
;
.
c
q