|
|
Initial revision
procedure rarb()
suspend &subject[.&pos:
&pos <- ((*&subject + 1) to &pos by -1)]
end
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.