* lib/kirjasto/työkalu.scm: add constant function
* lib/kirjasto/avain.scm: accept function as update function argument