(setq a nil)
(setq b nil)
(defun one ()
(if a
(funcall two)
(progn
(print 's)
(if b
(funcall two)
(progn
(print 'ss)
(funcall one)
)
)
)
)
)
(defun two ()
(print 'sss)
)
(one)
(setq a nil)
(setq b nil)
(defun one ()
(if a
(funcall two)
(progn
(print 's)
(if b
(funcall two)
(progn
(print 'ss)
(funcall one)
)
)
)
)
)
(defun two ()
(print 'sss)
)
(one)