The Museum of HP Calculators

Butterworth and Chebyshev LP Normalised Coefs for the HP-41C/CV/CX

This program is Copyright © HP and is used here by permission. It was originally printed in the HP-67 Filters Solution Book. This program was entered and uploaded by Tony Duell.

This program is supplied without representation or warranty of any kind. Tony Duell, Hewlett Packard 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.

Documentation Information (CD or source code)
How to get this Program to your Calculator (via HP-IL, disk, wand, and fingers)
Download Binary (.raw) program for disk or PC HP-IL Card download
Download Hexadecimal (.dat) program for Serial Port download

Program Listing

LINE  KEYS
 01 LBL "BCNORM"
 02 LBL 10
 03 LBL A
 04 STO 06
 05 1/X
 06 PI
 07 *
 08 STO 01
 09 XEQ 09
 10 RTN
 11 LBL 11
 12 LBL B
 13 STO 09
 14 10
 15 /
 16 10^X
 17 1
 18 -
 19 SQRT
 20 1/X
 21 XEQ 18
 22 RCL 06
 23 /
 24 XEQ 13
 25 STO 00
 26 7PRTX
 27 RCL 09
 28 ADV
 29 ENTER
 30 40
 31 /
 32 10^X
 33 ENTER
 34 ENTER
 35 ENTER
 36 1/X
 37 +
 38 RDN
 39 RDN
 40 1/X
 41 -
 42 /
 43 LN
 44 RCL 06
 45 2
 46 *
 47 /
 48 XEQ 12
 49 STO 04
 50 X^2
 51 STO 02
 52 XEQ 09
 53 LBL 02
 54 RCL 05
 55 RCL 01
 56 2
 57 /
 58 RCL 08
 59 *
 60 SIN
 61 STO 05
 62 *
 63 RCL 03
 64 RCL 04
 65 *
 66 /
 67 4
 68 *
 69 STO 04
 70 RCL 02
 71 RCL 01
 72 RCL 07
 73 *
 74 SIN
 75 X^2
 76 +
 77 STO 03
 78 XEQ 08
 79 X<=Y?
 80 GTO 02
 81 ADV
 82 RTN
 83 LBL 15
 84 LBL a
 85 XEQ 09
 86 ADV
 87 LBL 00
 88 RCL 08
 89 RCL 01
 90 2
 91 /
 92 *
 93 SIN
 94 2
 95 *
 96 STO 04
 97 XEQ 08
 98 X<=Y?
 99 GTO 00
100 ADV
101 RTN
102 LBL 08
103 RCL 07
104 9
105 +
106 STO 25
107 RCL 04
108 7PRTX
109 STO IND 25
110 1
111 ST+ 07
112 2
113 ST+ 08
114 RCL 06
115 2
116 *
117 RCL 08
118 RTN
119 LBL 09
120 7P<>S
121 7CLREG
122 7P<>S
123 1
124 STO 05
125 STO 07
126 STO 08
127 2
128 STO 03
129 RTN
130 LBL 12
131 LBL C
132 E^X
133 ENTER
134 1/X
135 -
136 2
137 /
138 RTN
139 LBL 13
140 LBL D
141 E^X
142 ENTER
143 1/X
144 +
145 2
146 /
147 RTN
148 LBL 14
149 LBL E
150 STO 24
151 XEQ 12
152 RCL 24
153 XEQ 13
154 /
155 RTN
156 LBL 17
157 LBL c
158 ENTER
159 X^2
160 1
161 +
162 SQRT
163 +
164 LN
165 RTN
166 LBL 18
167 LBL d
168 ENTER
169 X^2
170 1
171 -
172 SQRT
173 +
174 LN
175 RTN
176 LBL 19
177 LBL e
178 STO 24
179 1
180 +
181 LN
182 2
183 /
184 1
185 RCL 24
186 -
187 LN
188 2
189 /
190 -
191 RTN
192 LBL 16
193 LBL b
194 1
195 STO 07
196 ADV
197 LBL 03
198 RCL 07
199 9
200 +
201 STO 25
202 RCL IND 25
203 RCL 00
204 *
205 STO IND 25
206 7PRTX
207 1
208 ST+ 07
209 RCL 06
210 RCL 07
211 X<=Y?
212 GTO 03
213 ADV
214 RTN
215 STOP
216 END

Go back to the HP-41 software library
Go back to the general software library
Go back to the main exhibit hall