L• - Inductanse of a straight conductor of circular section / HP-42S

for the HP 42S

L• - Inductanse of a straight conductor of circular section

Input

Var "Len" : ℓ ‐ Conductor length [mm]
Var "Dia" : d ‐ Conductor diameter [mm]
Var "F" : f₀ ‐ frequency [Hz]
Var "G" : σ ‐ Conductance of the conductor material [S/m]
Var "μr" : μ_r ‐ Relative permiability of the conductor material_m

Resources used

Mem 00: χ,T(χ) ‐ skin effect compensation term

Output

REG y: L ‐ Inductance at "F" [H]
REG x: X_L ‐ Reactance of the inductor at "F" [Ω]

Straight conductor
of circular section Relative permiability and conductance
of popular materials

Program list

Lsc - Rev.1.00, Aug. 11 2011


00 { 258-Byte Progm }
01 LBL "L•"
02 MVAR "Len"
03 MVAR "Dia"
04 MVAR "F"
05 MVAR "G"
06 MVAR 'μr"
07 VARMENU "L•"
08 STOP
09 EXITALL
10 XEQ 00
11 4e-7
12 RCL÷ "G"
13 RCL× "2Π"
14 RCL× "μr"
15 RCL× "F"
16 SQRT
17 RCL× "Dia"
18 PI
19 ×
20 STO 00
21 1.86128e-4
22 ×
23 0.873011
24 +
25 1.27964e-3
26 RCL× 00
27 0.0278381
28 -
29 RCL× 00
30 1
31 +
32 ÷
33 SQRT
34 STO 00
35 RCL× "μr"
36 4
37 ÷
38 RCL "Dia"
39 RCL÷ "Len"
40 ENTER
41 ENTER
42 2
43 ÷
44 X<>Y
45 4
46 X<>Y
47 ÷
48 LN
49 +
50 1
51 -
52 +
53 RCL× "Len"
54 2e-10
55 ×
56 STO "L"
57 ENTER
58 "RCL× "F"
59 RCL× "2π"
60 STO "X"
61 CLA
62 "L="
63 ARCL "L"
64 "[H]^L_FX="
65 ARCL "X"
66 "[Ohm]"
67 AVIEW
68 RTN
69 LBL 00
70 PI
71 ENTER
72 +
73 STO "2π"
74 RCL "F"
75 X≤0?
76 1e9
77 STO "F"
78 RCL "μr"
79 X≤0?
80 0.999991
81 STO "μr"
82 RCL "G"
83 X≤0?
84 5.88e7
85 STO G
86 RTN
87 .END.

Example

Input

Var "Len" = 10 [mm]
Var "Dia" = 1 [mm]
Var "F" = 1e9 [Hz]
Var "G" = 5.76e7 [S/m]
Var "μm" = 0.999991

Output

L=5.9450658958e-9 [H]
X=37.353950687e0 [Ohm]
Mem 00: 934.62238679e-3
y: 5.94506589582e-9
x: 37.3539506869e0

DOWNLOAD

'Lsc-1.02' (Lsc.raw, 260 byte, raw program file for the Free42)

REFERENCE

Brian C. Wadell, "Transmission line design handbook", Artech House, Boston, 1991.
F.W. Grouvers, "Inductance calculations", Van Nostrand, New York, 1946.