More lisp speed

* construct list of node data in READ-PLACES without junk
* replace DEFPARAMETER calls with LET*
* use LABELS to have recursion within GET-LONGEST-PATH