Topic: Which is better way?

[HasanCAD]

This method

Code: [Select]

(list
  (+ (nth 0 (cadr pt1)) (nth 0 (cdr (cadr pt2))))
  (+ (nth 1 (cadr pt1)) (nth 1 (cdr (cadr pt2))))
  (+ (nth 2 (cadr pt1)) (nth 2 (cdr (cadr pt2))))
  )Or

Code: [Select]

(setq x1 (nth 0 (cadr pt1)))
(setq y1 (nth 1 (cadr pt1)))
(setq z1 (nth 2 (cadr pt1)))

(setq x2 (nth 0 (cadr pt2)))
(setq y2 (nth 1 (cadr pt2)))
(setq z2 (nth 2 (cadr pt2)))

(list
  (+ x1 x2)
  (+ y1 y2)
  (+ z3 z3)
  )

[alanjt]

Code: [Select]

(mapcar '+ pt1 pt2)
As far as your two go, if it's not needed to defined a variable, then I wouldn't, but it doesn't really hurt anything...as long as you ARE localizing your variables. 

[Lee Mac]

What are the forms of pt1 and pt2?  Your two examples seem to contradict each other.

[CAB]

Yes, please give an example with numbers and not variables so we can see what you are trying to do.

[HasanCAD]

See this Example
http://www.theswamp.org/index.php?topic=38219.msg432345#msg432345

[gile]

As Alanjt said:

Code: [Select]

(cons 10 (mapcar '+ pt (cdr (assoc 10 ent))))