* lib/kirjasto/arkisto.scm: rewrite as r7rs library