CADsite

  • wo 20 06 2018, 18:44:44
  • Welkom, gast
Log in of registreer jezelf.

Login met gebruikersnaam, wachtwoord en sessielengte
Geavanceerd zoeken  

Nieuws:

Pagina's: [1]   Omlaag

Auteur Topic: Dotted pair Lijst maken in lisp  (gelezen 203 keer)

EddyBeerke

  • forumverslaafde
  • ******
  • Offline Offline
  • Berichten: 2254
  • 1d CADSITE.be niet bezoeken = 1 dag niet geleefd!
    • Bekijk profiel
    • Mijn site
Dotted pair Lijst maken in lisp
« Gepost op: zo 11 03 2018, 08:56:15 »

Ik wil graag een lijst maken die er zo uit ziet:
((block1 . layer1) (block1 . layer2) (block2 . layer1))
In de routine vraag ik de naam van een block en de layer waar het block op geplaatst is.
Dit is een selectie van div blocks.
Ik kom er niet uit met (cons x y) en (append x y)
Gelogd

EddyBeerke

  • forumverslaafde
  • ******
  • Offline Offline
  • Berichten: 2254
  • 1d CADSITE.be niet bezoeken = 1 dag niet geleefd!
    • Bekijk profiel
    • Mijn site
Re: Dotted pair Lijst maken in lisp
« Reactie #1 Gepost op: ma 12 03 2018, 11:41:38 »

Ik heb het nu zo opgelost:
(if (= lijst nil)
      (setq lijst (list (strcat bnaam ":" CL ""))) ; 1e keer
      (setq lijst (cons (strcat bnaam ":" CL) lijst)) ; alle volgende keren
    )
Gelogd

roy_043

  • forumverslaafde
  • ******
  • Offline Offline
  • Berichten: 1403
  • BricsCAD 18
    • Bekijk profiel
    • www.b-k-g.nl
Re: Dotted pair Lijst maken in lisp
« Reactie #2 Gepost op: ma 12 03 2018, 19:28:13 »

Deze enkele regel volstaat:
(setq lijst (cons (cons bnaam cl) lijst)
« Laatst bewerkt op: ma 12 03 2018, 19:55:39 door roy_043 »
Gelogd

EddyBeerke

  • forumverslaafde
  • ******
  • Offline Offline
  • Berichten: 2254
  • 1d CADSITE.be niet bezoeken = 1 dag niet geleefd!
    • Bekijk profiel
    • Mijn site
Re: Dotted pair Lijst maken in lisp
« Reactie #3 Gepost op: za 24 03 2018, 23:42:22 »

Deze enkele regel volstaat:
(setq lijst (cons (cons bnaam cl) lijst)
Bedankt Roy,
Zal t in mn  volgende project eens proberen
Gelogd
Pagina's: [1]   Omhoog