Z版的程序： 求一句注释。。谢谢

freeok

Z版的程序：   

(setq r (cdr(assoc 40 ent)));;;;;;;;;从关联表中搜索一个元素，如果找到则返回该关联表条目;求取圆的分类参数半径
   (if (setq rl (assoc r cl));;;;;;;;;;;cl表中是否含有某一半径，返回此值给 r1
    (setq cl (subst (list r (cons (caadr rl) (1+ (cdadr rl)))) rl cl))---这句谁帮下，太长了，不会解了！