( DEFUN eLiniara(Lista) ( COND ( (NULL Lista) T) ( (ATOM (CAR Lista) ) (eLiniara(CDR Lista) )) ( (NUMBERP (CAR Lista) ) (eLiniara(CDR Lista))) ) ) ( write ( eLiniara '( 1 3 5 7 9 ) ) ) ( write ( eLiniara '( 1 (3 5) 7 9 ) ) )
We use cookies to provide and improve our services. By using our site, you consent to our Cookies Policy. Accept Learn more