* lib/kirjasto/avain.scm: use fcond