The Museum of HP Calculators

Matrix Algebra 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 High Level Math Solution Book. This program was ported to the HP-41C by reading with the HP-41C card reader and the card reader may be required for operation of this program. 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 "MATRIX"
 02 LBL 10
 03 LBL A
 04 CF 00
 05 7CLREG
 06 GTO 00
 07 LBL 11
 08 LBL B
 09 SF 00
 10 7P<>S
 11 7CLREG
 12 7P<>S
 13 LBL 00
 14 ABS
 15 INT
 16 STO 00
 17 4
 18 X<=Y?
 19 CLX
 20 1/X
 21 LBL 01
 22 RCL 20
 23 STOP
 24 7ISZ
 25 FS? 00
 26 7P<>S
 27 STO IND 25
 28 FS? 00
 29 7P<>S
 30 STO 20
 31 RCL 00
 32 RCL 25
 33 X#Y?
 34 GTO 01
 35 RCL 25
 36 3.1
 37 /
 38 INT
 39 1
 40 +
 41 3
 42 *
 43 STO 25
 44 3
 45 ST+ 00
 46 GTO 01
 47 LBL 12
 48 LBL C
 49 RCL 01
 50 STO 20
 51 RCL 02
 52 STO 21
 53 RCL 03
 54 STO 22
 55 XEQ 02
 56 STO 01
 57 RCL 23
 58 STO 02
 59 RCL 24
 60 STO 03
 61 RCL 04
 62 STO 20
 63 RCL 05
 64 STO 21
 65 RCL 06
 66 STO 22
 67 XEQ 02
 68 STO 04
 69 RCL 23
 70 STO 05
 71 RCL 24
 72 STO 06
 73 RCL 07
 74 STO 20
 75 RCL 08
 76 STO 21
 77 RCL 09
 78 STO 22
 79 XEQ 02
 80 STO 07
 81 RCL 23
 82 STO 08
 83 RCL 24
 84 STO 09
 85 CLX
 86 RTN
 87 LBL 02
 88 7P<>S
 89 RCL 09
 90 *
 91 RCL 21
 92 RCL 06
 93 *
 94 +
 95 RCL 20
 96 RCL 03
 97 *
 98 +
 99 STO 24
100 RCL 22
101 RCL 08
102 *
103 RCL 21
104 RCL 05
105 *
106 +
107 RCL 20
108 RCL 02
109 *
110 +
111 STO 23
112 RCL 22
113 RCL 07
114 *
115 RCL 21
116 RCL 04
117 *
118 +
119 RCL 20
120 RCL 01
121 *
122 +
123 7P<>S
124 RTN
125 LBL 16
126 LBL b
127 SF 01
128 GTO 03
129 LBL 15
130 LBL a
131 CF 01
132 LBL 03
133 1
134 STO 25
135 LBL 04
136 FS? 01
137 7P<>S
138 RCL IND 25
139 FS? 01
140 7P<>S
141 7PRTX
142 7ISZ
143 9
144 RCL 25
145 X<=Y?
146 GTO 04
147 CLX
148 RTN
149 LBL 17
150 LBL c
151 9
152 STO 25
153 LBL 05
154 RCL IND 25
155 7P<>S
156 STO IND 25
157 7P<>S
158 7DSZ
159 GTO 05
160 CLX
161 RTN
162 LBL 18
163 LBL d
164 SF 01
165 GTO 06
166 LBL 13
167 LBL D
168 CF 01
169 LBL 06
170 9
171 STO 25
172 LBL 07
173 7P<>S
174 RCL IND 25
175 7P<>S
176 FS? 01
177 CHS
178 ST+ IND 25
179 7DSZ
180 GTO 07
181 CLX
182 RTN
183 LBL 19
184 LBL e
185 SF 02
186 7P<>S
187 LBL 14
188 LBL E
189 9
190 STO 25
191 CLX
192 +
193 LBL 08
194 ST* IND 25
195 7DSZ
196 GTO 08
197 FS?C 02
198 7P<>S
199 RTN
200 STOP
201 END

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