The problem is that you are reversing the string a few times. The following will do: (defun base8 (n) (let ((t8 (truncate n 8)) (m8 (mod n 8))) (if (= t8 0) (list m8) (append (base8 t8) (list m8))))) EDIT Here's a solution without append, using a helper function.
So, the average weight for a healthy, human kidney is 0.26-0.30 pounds. (approx.) The average weight for a healthy, human kidney is 120-140 grams. 1 pound= 453.59237 grams. So, the average weight for a healthy, human kidney is 0.26-0.30 pounds. (approx.) The average weight for a healthy, human kidney is 120-140 grams. 1 pound= 453.59237 grams. So, the average weight for a healthy, human kidney is 0.26-0.30 pounds.
On top of each kidney is an adrenal gland. The upper parts of the kidneys are partially protected by the 11th and 12th ribs. Each kidney, with its adrenal gland, is surrounded by two layers of fat: the perirenal and pararenal fat) and the renal fascia. In adult males, the kidney weighs between 125 and 170 grams.