I'm not discounting the posted code, but couldn't you just draw a line using tan osnap on arc and circle?
eg.
(command "_.line" "_tan" pause "_tan" pause "")
I read the OP and considering the replies I was thinking I misinterpreted what he was wanting to do.
So many ways to do this and I think basic AutoCAD commands are the best solution.