The Museum of HP Calculators

Wye <-> Delta Transformations 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 EE(lab) 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 "YDELTA"
 02 LBL 10
 03 LBL A
 04 STO 00
 05 X<>Y
 06 STO 01
 07 RTN
 08 LBL 11
 09 LBL B
 10 STO 02
 11 X<>Y
 12 STO 03
 13 RTN
 14 LBL 12
 15 LBL C
 16 STO 04
 17 X<>Y
 18 STO 05
 19 RTN
 20 LBL 13
 21 LBL D
 22 XEQ 00
 23 RCL 03
 24 RCL 02
 25 XEQ 03
 26 RCL 05
 27 RCL 04
 28 XEQ 03
 29 RCL 01
 30 RCL 00
 31 XEQ 03
 32 RTN
 33 LBL 14
 34 LBL E
 35 RCL 01
 36 RCL 00
 37 XEQ 01
 38 RCL 03
 39 RCL 02
 40 XEQ 02
 41 XEQ 04
 42 RCL 03
 43 RCL 02
 44 XEQ 01
 45 RCL 05
 46 RCL 04
 47 XEQ 02
 48 XEQ 04
 49 RCL 01
 50 RCL 00
 51 XEQ 01
 52 RCL 05
 53 RCL 04
 54 XEQ 02
 55 XEQ 04
 56 RTN
 57 LBL 00
 58 7P<>S
 59 0
 60 STO 04
 61 STO 06
 62 7P<>S
 63 RCL 01
 64 RCL 00
 65 XEQ 01
 66 RCL 03
 67 RCL 02
 68 XEQ 02
 69 SREG 14
 70 S+
 71 RCL 03
 72 RCL 02
 73 XEQ 01
 74 RCL 05
 75 RCL 04
 76 XEQ 02
 77 SREG 14
 78 S+
 79 RCL 01
 80 RCL 00
 81 XEQ 01
 82 RCL 05
 83 RCL 04
 84 XEQ 02
 85 SREG 14
 86 S+
 87 7RCL
 88 XEQ 01
 89 RTN
 90 LBL 01
 91 R-P
 92 STO 06
 93 X<>Y
 94 STO 07
 95 RTN
 96 LBL 02
 97 R-P
 98 ST* 06
 99 X<>Y
100 ST+ 07
101 RCL 07
102 RCL 06
103 P-R
104 RTN
105 LBL 03
106 R-P
107 STO 08
108 X<>Y
109 STO 09
110 RCL 06
111 RCL 08
112 /
113 STO 20
114 RCL 07
115 RCL 09
116 -
117 RCL 20
118 P-R
119 7PRTX
120 X<>Y
121 7PRTX
122 RTN
123 LBL 04
124 RCL 00
125 RCL 02
126 RCL 04
127 +
128 +
129 STO 24
130 RCL 01
131 RCL 03
132 RCL 05
133 +
134 +
135 RCL 24
136 XEQ 03
137 RTN
138 STOP
139 END

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