secdtool.scm: (free-varables) works

0) refactored recursive list routines to use `list-fold` if possible
1) (free-variables) fixed; now handles #.SEL branches as well