static Lisp nlFromCons(Lisp term) {
  Lisp l = lisp("[]");
  while (term.is("[]", 3) && term.get(0).is("cons", 0)) {
    l.add(term.get(1));
    term = term.get(2);
  }
  if (!term.is("end")) l.add(term);
  ret l;
}