((/rtl/rel5/user/sumbits.lisp::sumbits (nil nil nil nil (if) nil nil) (nil (0) (zp) (+) nil nil nil) ((n) nil nil (* recursive-call) nil nil nil) ((x) nil (1-) (expt bitn) nil nil nil) ((x n) (2) (1- 1-) nil nil nil nil) ((n n) nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/rtl/rel5/user/sumbits.lisp::sumbits-badguy (nil nil nil nil (if) nil nil) (nil (0) (zp) nil (if) nil nil) ((k) nil (not 1-) nil (recursive-call) nil nil) ((k x y) nil (1-) (equal) nil nil nil) ((k) nil nil (bitn bitn) nil nil nil) ((x y) nil (1- 1-) nil nil nil nil) ((k k) nil nil nil nil nil nil)))