Evaluates each expression sequentially and returns the value of the last expression
(progn [expr]...)
progn to evaluate several expressions where only one expression is expected.
You can useArguments
One or more AutoLISP expressions.
Return Values
The result of the last evaluated expression.
Examples
if function normally evaluates one then expression if the test expression evaluates to anything but nil. The following example uses progn to evaluate two expressions following if:
The(if (= a b)
(progn
(princ "\nA = B ")
(setq a (+ a 10) b (- b 10))
)
)
if function.
The