:Disp "cranwell@yahoo.com"
:Input "FSH Newt=",N
:Input "ROD LNTH=",M
:Input "RODô=",A
:Input "CABLEô=",C
:(N cos 60)/sin (A+C)üT
:Disp "CABLE TENSION",T

    Source: geocities.com/paris/arc/1927/ti85

               ( geocities.com/paris/arc/1927)                   ( geocities.com/paris/arc)                   ( geocities.com/paris)