Lze uvnitř skupiny progn aplikovat další "vnořenou" skupinu progn? Něco jako
...
(if (/= XXX YYY)
  (progn
    (command "_...")
    (command "_...")
    (setq DS (getvar "dimscale"))
    (progn
      (princ (strcat "\n bylo nalezeno " (strcase XXX) "prvků"))
      (setq POOP (getint "\npočet opakování: "))
      (command "_...")
    )
  )
  (progn
    (princ "\nbez výsledku")
    (setq DS 1)
  )
)
...
 Ferdinand2008-06-12 08:38:28

lze

V tom vašem příkladu k tomu (progn) není důvod, ale jinak se vnořené podmínky a další programové bloky (kde je progn potřeba) používají běžně.