The Museum of HP Calculators The Museum of HP Calculators
This program is Copyright © 2002 by Patricia Stoffel and is used here by permission.
This program is supplied without representation or warranty of any kind. Patricia Stoffel and The Museum of HP Calculators therefore assume no responsibility and shall have no liability, consequential or otherwise, of any kind arising from the use of this program material or any part thereof.
Usage: ax2+bx+c=0; enter a, b, c on the stack (as above) and press 'f' 'E'. The roots are returned on the stack in levels x and y. This program handles all cases, real and complex. Written by Patricia Stoffel.
001 f LBL E 002 g F? 8 003 GTO .9 004 STO 3 005 R↓ 006 CHS 007 STO 2 008 g x2 009 x⇔y 010 2 011 × 012 STO 1 013 RCL× 3 014 2 015 × 016 - 017 f PSE 018 g TEST 2 019 GTO .8 020 √x 021 STO 0 022 RCL+ 2 023 RCL÷ 1 024 RCL 2 025 RCL- 0 026 RCL÷ 1 027 g RTN 028 f LBL .8 029 g SF 8 030 √x 031 f Re⇔Im 032 RCL÷ 1 033 STO .0 034 RCL 2 035 RCL÷ 1 036 f I 037 f Re⇔Im 038 RCL 2 039 RCL÷ 1 040 RCL .0 041 CHS 042 f I 043 g RTN 044 f LBL .9 045 STO 3 046 f Re⇔Im 047 STO .3 048 R↓ 049 CHS 050 STO 2 051 f Re⇔Im 052 CHS 053 STO .2 054 f Re⇔Im 055 g √x 056 x⇔y 057 2 058 × 059 STO 1 060 f Re⇔Im 061 STO .1 062 f Re⇔Im 063 RCL 3 064 RCL .3 065 f I 066 × 067 2 068 × 069 - 070 f PSE 071 f Re⇔Im 072 f PSE 073 f Re⇔Im 074 √x 075 STO 0 076 f Re⇔Im 077 STO .0 078 RCL+ .2 079 f Re⇔Im 080 RCL+ 2 081 RCL 1 082 RCL .1 083 f I 084 ÷ 085 RCL 2 086 RCL- 0 087 RCL .2 088 RCL- .0 089 f I 090 RCL 1 091 RCL .1 092 f I 093 ÷ 094 g RTN
Go back to the software library
Go back to the main exhibit hall