bldc/tests/test_deconstruct_let_4.lisp

(defun punisher (n arg)
  (if (= n 0) arg
    (progn
      (let (( (a  (b0 _ b2) . c) '(1 (100 200 300) . 77) ))
        (punisher (- n 1) (+ a b0 b2 c))
        )
      )
    )
  )


(check (= (punisher 100000 0) 478))