01 LBL "EPD" 02 LBL A 03 STO 01 04 1 05 GTO 01 06 LBL B 07 STO 02 08 2 09 GTO 01 10 LBL C 11 STO 03 12 4 13 GTO 01 14 LBL D 15 STO 04 16 8 17 GTO 01 18 LBL E 19 STO 05 20 16 21 LBL 01 22 ST+ 06 23 X<>Y 24 RTN 25 LBL a 26 XEQ IND 06 27 GTO IND Y 28 LBL 30 29 RCL 03 30 RCL 04 31 + 32 RCL 02 33 * 34 2 35 / 36 1 37 STO 01 38 "X" 39 GTO 01 40 LBL 29 41 BEEP 42 XEQ 28 43 RCL Z 44 STO 00 45 -1 46 ST* 03 47 LBL 28 48 RCL 03 49 RCL 04 50 - 51 RCL 05 52 / 53 GTO 00 54 LBL 13 55 RCL 01 56 2 57 * 58 RCL 03 59 RCL 04 60 + 61 / 62 LBL 00 63 STO 02 64 "T" 65 2 66 GTO 01 67 LBL 27 68 LBL 26 69 RCL 05 70 RCL 02 71 * 72 RCL 04 73 + 74 GTO 00 75 LBL 11 76 RCL 01 77 2 78 * 79 RCL 02 80 / 81 RCL 04 82 - 83 GTO 00 84 LBL 25 85 RCL 05 86 2 87 * 88 RCL 01 89 * 90 RCL 04 91 X^2 92 + 93 SQRT 94 LBL 00 95 STO 03 96 "VF" 97 4 98 GTO 01 99 LBL 22 100 LBL 23 101 RCL 03 102 RCL 05 103 RCL 02 104 * 105 - 106 GTO 00 107 LBL 07 108 RCL 01 109 2 110 * 111 RCL 02 112 / 113 RCL 03 114 - 115 GTO 00 116 LBL 19 117 RCL 01 118 RCL 02 119 / 120 RCL 05 121 RCL 02 122 * 123 2 124 / 125 - 126 GTO 00 127 LBL 21 128 RCL 03 129 X^2 130 RCL 05 131 2 132 * 133 RCL 01 134 * 135 - 136 SQRT 137 LBL 00 138 STO 04 139 "V0" 140 8 141 GTO 01 142 LBL 14 143 LBL 15 144 RCL 03 145 RCL 04 146 - 147 RCL 02 148 / 149 STO 05 150 "A" 151 16 152 LBL 01 153 >"=" 154 ARCL Y 155 AVIEW 156 RCL 06 157 + 158 LBL e 159 0 160 STO 06 161 END