Was ist der einfachste Weg, um sicherzustellen, dass 2 Listen in Lisp die gleiche Länge haben?

Question

Angesichts 2 Listen, ich möchte sicherstellen, dass sie die gleiche Größe haben, habe ich eine harte Zeit mit diesem Code. Soll ich dazu Variablen verwenden?

(defun samesize (list1 list2) 
    (cond (;logic here) T)) 

Answer 1

Beide Common Lisp und elisp haben length:

(defun samesize (list1 list2) 
    (= (length list1) (length list2))) 

Answer 2

Sie können Rekursion verwenden, wenn Sie dies selbst implementieren möchten.

2 Listen haben die gleiche Größe, wenn sie beide leer sind. Sie sind unterschiedlich groß, wenn einer leer ist und der andere nicht. Und wenn keiner von ihnen wahr, sie sind von der gleichen Größe-Vergleich wie diese Listen sans ein Element (dh ihre cdr -s)

Answer 3

Keine Notwendigkeit, explizit Länge zweimal verwenden.

(defun samesize (l1 l2) 
    (apply #'= (mapcar #'length (list l1 l2))) 

wie vergebliche Mühe Dies mag, aber diese Art der Sache mit längeren Funktionsnamen ist nützlich.

Ich hoffte auch, ein neues Konzept zu demonstrieren.

TROCKEN (wiederholen Sie nicht)