Changes to SDIF-tools.lisp -starting to write a dictionary (SDIF) generation function)