Funkcia, ktorá vráti počet tých prvkov zoznamu, ktoré sú číslami na ľubovoľnej úrovni v zozname.
Príklad:
(pocetc '((1 2)((3 x) 4 5 6))) ; -> 6