(File ucido.l) (dofor lambda append list quote cons eq cond selectq) (dowhile lambda append cons quote list) (do macro append cons cdddr caddr dofor quote list cdr car dowhile eq cond cddr cadr)