Trovare la differenza fra 2 liste con molte stringhe

x11start

Utente Standard
Professione: Disegnatore prefabbricati
Software: Autocad
Regione: Piemonte
Ho due liste con molte stringhe e vorrei estrarne la differenza ponendole in una nuova lista. E possibile farlo in modo semplice (magari con un comando VL-xxx) senza dovrle confrontare elemento per elemento usando FOREACH e MEMBER?
Sostanzialmente vorrei confrontare ("aaa" "BBB" "CCC" "ddd" "eee") con ("aaa" "ddd" "eee") ed ottenere una lista contenente ("BBB" "CCC").
(le maiuscole le ho messe solo per evidenziare).
Grazie
 

x11start

Utente Standard
Professione: Disegnatore prefabbricati
Software: Autocad
Regione: Piemonte
Lee Mac ci aveva già pensato ...
 

rpor66

Utente Standard
Professione: Programmatore
Software: Lisp, Vba per Autocad e GstarCAD, CadWorx, Termus BIM.
Regione: Sicilia
anche così
(defun fnESL (L1 L2)
(foreach a L2 (setq L1 (vl-remove a L1)))
)
 

x11start

Utente Standard
Professione: Disegnatore prefabbricati
Software: Autocad
Regione: Piemonte
Grazie Rpor...
Quando avrò un attimo di tempo proverò le varie soluzioni ... e poi condividerò il lisp per il quale mi serviva questa routine.
 

x11start

Utente Standard
Professione: Disegnatore prefabbricati
Software: Autocad
Regione: Piemonte
.... alla fine ho scelto la soluzione di Lee Mac (scusa Rpor!)

Il lisp che ho allegato, serve per evidenziare le variabili "orfane" (cioè non poste a NIL in uscita), dei miei lisp.
Sostanzialmente l'utilizzo è questo:

; - Aprire autocad
; - Lanciare questo lisp: verra' creata la lista [imath]LISTAINIZ[/imath]
; - Eseguire il lisp che si vuole analizzare: in modo che se questo imposta delle
; variabili (solo le numeriche, non le stringhe!) e non le pone a nil in uscita, si potranno rilevare.
; - Lanciare nuovamente questo lisp: verra' creata la lista [imath]LISTAFIN[/imath] e confrontate le 2 liste

Nella domanda iniziale avevo posto come esempio delle liste di stringhe.... mentre qui vengono rilevate solo le variabili numeriche (da qui il nome "listNUMS")!
A questo punto, chiedo il vostro aiuto per estrarre anche i valori stringa: suppongo che la chiave sia in un diverso valore di ATOMS-FAMILY....
 

Allegati

  • LISTNUMS.lsp
    1.4 KB · Views : 4

Utenti online

Statistiche forum

Discussioni
55,594
Messaggi
474,334
Utenti registrati
95,861
Ultimo utente registrato
Cucurbitacea

Top