CADsite

  • do 25 04 2019, 16:41:17
  • Welkom, gast
Log in of registreer jezelf.

Login met gebruikersnaam, wachtwoord en sessielengte
Geavanceerd zoeken  

Nieuws:

Pagina's: [1]   Omlaag

Auteur Topic: Positie vergelijken  (gelezen 880 keer)

delangstevandestraat

  • vaste forumklant
  • *****
  • Offline Offline
  • Berichten: 175
  • a penny for your thoughts
    • Bekijk profiel
Positie vergelijken
« Gepost op: di 17 07 2018, 13:23:57 »

Ik heb 2 entiteiten, en ik wil via lisp checken of deze op de zelfde plaats staan...
(if (= apos bpos)
  (doe iets)
)

dit doet niets, alsof hij niet ziet dat het wél gelijk is

wat is de makkelijkste manier om dit te doen ?
Gelogd
Ik hou van werken,
ik kan er uuuren naar kijken...
daarom zorg ik ook dat er altijd genoeg overblijft voor morgen :-)

roy_043

  • forumverslaafde
  • ******
  • Offline Offline
  • Berichten: 1431
  • BricsCAD 18
    • Bekijk profiel
    • www.b-k-g.nl
Re: Positie vergelijken
« Reactie #1 Gepost op: di 17 07 2018, 13:36:26 »

Om lijsten te vergelijken moet je de equal functie gebruiken.
Vaak is het nodig om met een tolerantie te werken:
(equal pt1 pt2 1e-8)
« Laatst bewerkt op: di 17 07 2018, 13:38:45 door roy_043 »
Gelogd

delangstevandestraat

  • vaste forumklant
  • *****
  • Offline Offline
  • Berichten: 175
  • a penny for your thoughts
    • Bekijk profiel
Re: Positie vergelijken
« Reactie #2 Gepost op: di 17 07 2018, 14:16:43 »

Ik had het voorlopig zo opgelost

(if (and (= (car posa)     (car posb))
           (= (cadr posa)   (cadr posb))
           (= (caddr posa) (caddr posb))
    )
   (doe iets)
)
[/font]

maar bedankt 'k zal het eens proberen
Gelogd
Ik hou van werken,
ik kan er uuuren naar kijken...
daarom zorg ik ook dat er altijd genoeg overblijft voor morgen :-)
Pagina's: [1]   Omhoog