the premature exit (~^) has no effect here. omitted.
symbolconc and concat did essentially the same thing, so after a slight
changed lhop-numden to return multiple values.
replaced destructuring-let with destructuring-bind.
removed the commented out version of getfnsplit
replaced destructuring-let by destructuring-bind wherever trivially
changed numden* to return multiple values.
switched from destructuring-let to destructuring-bind in simplimexpt,