some rebol code snippets