wronzky
Ehrenmitglied V.I.P. h.c.
CAD-Dienstleistungen für Architekten
   Beiträge: 2154
Registriert: 02.05.2005 CAD:
AutoCAD 2.6 bis 2014
ADT 2005 - 2014
Arcibem
System:
Windows 2000, XP, NO VISTA
Internet-Startseite:
http://www.archi.de
|
erstellt am: 06. Apr. 2011 14:34  <-- editieren / zitieren -->   Unities abgeben:          
Hallo zusammen, die Diskussion um "equal", "eq" und "=" ist hier ja durch die Jahre hinweg immer wieder mal geführt worden, aber ich ärgere mich immer noch darüber, und tappe in die Falle. Aktuelles Beispiel: Code:
(defun c:equal-test ( / a b)
(setq a -250.0 b -250.1)
(repeat 250 (setq a (1+ a)) (setq b (1+ b)))
(print a)
(repeat 250
(prin1 (equal (setq a (1+ a)) (setq b (1+ b)) 0.1))
)
(print a)
(setq a 0.0 b -0.1)
(print a)
(repeat 250
(prin1 (equal (setq a (1+ a)) (setq b (1+ b)) 0.1))
)
(print a)
)
Es läßt sich sicher nachvollziehen (nicht von mir), aber sinnvoll ist das Ergebnis auf jeden Fall nicht.Grüsse, Henning [Ja, ich weiß, ich habe keine Frage gestellt, und es braucht auch niemand zu antworten, ich habe hier nur eben wieder kopfschüttelnd vorm Rechner gesessen...] ------------------
Henning Jesse
VoxelManufaktur
Computer-Dienstleistungen für Architekten und Ingenieure  http://www.voxelman.de [Diese Nachricht wurde von wronzky am 06. Apr. 2011 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Foren auf CAD.de (alle Foren)
| 
