HP 5526A Operating Note And Program Listings page 54

r9
44: r9-3.033*(.001*r3>exp(.057627*r1)}r11
45: le12/(r11+1e6)-999000)r12
46: r12-r4*(r8-T)}r13
47: if flg2;prt "Not used."
48: spc 2;prt "THUMBWHEEL",r13
49: dap "THUMBWHEEL SETTING: ",r13
50: spc 5;stp
51: gto "START"
52: end
*14709
52