Version 4 SHEET 1 6108 4308 WIRE -384 128 -448 128 WIRE -224 128 -304 128 WIRE 400 128 288 128 WIRE 512 128 480 128 WIRE 608 128 512 128 WIRE 1104 128 1024 128 WIRE 1232 128 1184 128 WIRE 1232 144 1232 128 WIRE 1024 160 1024 128 WIRE -224 176 -224 128 WIRE 288 176 288 128 WIRE -448 240 -448 128 WIRE 608 256 608 128 WIRE 1024 288 1024 240 WIRE -224 320 -224 256 WIRE -192 320 -224 320 WIRE 288 320 288 256 WIRE 320 320 288 320 WIRE -224 384 -224 320 WIRE 288 384 288 320 WIRE 1104 400 1024 400 WIRE 1232 400 1184 400 WIRE 1232 416 1232 400 WIRE 1024 432 1024 400 WIRE -448 512 -448 320 WIRE -224 512 -224 464 WIRE -224 512 -448 512 WIRE 288 512 288 464 WIRE 608 512 608 336 WIRE 608 512 288 512 WIRE -448 528 -448 512 WIRE 288 528 288 512 WIRE 1024 560 1024 512 WIRE 32 688 -96 688 WIRE 160 688 112 688 WIRE 160 704 160 688 WIRE -96 720 -96 688 WIRE -144 736 -256 736 WIRE -144 832 -144 784 WIRE -144 832 -192 832 WIRE -96 832 -96 800 WIRE -96 832 -144 832 WIRE -192 848 -192 832 WIRE 32 928 -96 928 WIRE 160 928 112 928 WIRE 160 944 160 928 WIRE -96 960 -96 928 WIRE -144 976 -256 976 WIRE -144 1072 -144 1024 WIRE -144 1072 -176 1072 WIRE -96 1072 -96 1040 WIRE -96 1072 -144 1072 WIRE -176 1088 -176 1072 WIRE 32 1152 -96 1152 WIRE 160 1152 112 1152 WIRE 160 1168 160 1152 WIRE -96 1184 -96 1152 WIRE -144 1200 -224 1200 WIRE -144 1280 -144 1248 WIRE -144 1280 -176 1280 WIRE -96 1280 -96 1264 WIRE -96 1280 -144 1280 WIRE -176 1296 -176 1280 WIRE 32 1360 -96 1360 WIRE 160 1360 112 1360 WIRE 160 1376 160 1360 WIRE -96 1392 -96 1360 WIRE -144 1408 -224 1408 WIRE -144 1488 -144 1456 WIRE -144 1488 -176 1488 WIRE -96 1488 -96 1472 WIRE -96 1488 -144 1488 WIRE -176 1504 -176 1488 WIRE 32 1584 -96 1584 WIRE 160 1584 112 1584 WIRE 160 1600 160 1584 WIRE -96 1616 -96 1584 WIRE -144 1632 -256 1632 WIRE -144 1712 -144 1680 WIRE -144 1712 -192 1712 WIRE -96 1712 -96 1696 WIRE -96 1712 -144 1712 WIRE -192 1728 -192 1712 WIRE 32 1808 -96 1808 WIRE 160 1808 112 1808 WIRE 160 1824 160 1808 WIRE -96 1840 -96 1808 WIRE -144 1856 -208 1856 WIRE -144 1936 -144 1904 WIRE -144 1936 -176 1936 WIRE -96 1936 -96 1920 WIRE -96 1936 -144 1936 WIRE -176 1952 -176 1936 WIRE 32 2016 -96 2016 WIRE 160 2016 112 2016 WIRE 160 2032 160 2016 WIRE -96 2048 -96 2016 WIRE -144 2064 -224 2064 WIRE -144 2144 -144 2112 WIRE -144 2144 -176 2144 WIRE -96 2144 -96 2128 WIRE -96 2144 -144 2144 WIRE -176 2160 -176 2144 WIRE 32 2240 -96 2240 WIRE 160 2240 112 2240 WIRE 160 2256 160 2240 WIRE -96 2272 -96 2240 WIRE -144 2288 -256 2288 WIRE -144 2368 -144 2336 WIRE -144 2368 -192 2368 WIRE -96 2368 -96 2352 WIRE -96 2368 -144 2368 WIRE -192 2384 -192 2368 WIRE 32 2432 -96 2432 WIRE 160 2432 112 2432 WIRE 160 2448 160 2432 WIRE -96 2464 -96 2432 WIRE -144 2480 -208 2480 WIRE -144 2560 -144 2528 WIRE -144 2560 -176 2560 WIRE -96 2560 -96 2544 WIRE -96 2560 -144 2560 WIRE -176 2576 -176 2560 FLAG -448 528 0 FLAG -448 128 1 FLAG -224 128 3 FLAG -192 320 4 FLAG 320 320 6 FLAG 288 528 0 FLAG 288 128 5 FLAG 512 128 2 FLAG 1232 144 0 FLAG 1024 288 0 FLAG 1232 416 0 FLAG 1024 560 0 FLAG 1024 128 Q1 IOPIN 1024 128 Out FLAG 1024 400 Q2 IOPIN 1024 400 Out FLAG -176 1296 0 FLAG 160 1168 0 FLAG -96 1152 Q2_over_G21 IOPIN -96 1152 Out FLAG -224 1200 A_ratio_times_Ya1_plus_Yb1_times_Q2 IOPIN -224 1200 In FLAG -192 848 0 FLAG 160 704 0 FLAG -96 688 A_ratio_times_Ya1_plus_Yb1_times_Q2 IOPIN -96 688 Out FLAG -256 736 Q2 IOPIN -256 736 In FLAG -192 1728 0 FLAG 160 1600 0 FLAG -96 1584 A_ratio_over_Ya1_plus_Yb1_times_P1 IOPIN -96 1584 Out FLAG -256 1632 1 IOPIN -256 1632 In FLAG -176 2160 0 FLAG 160 2032 0 FLAG -96 2016 G11_times_P1 IOPIN -96 2016 Out FLAG -224 2064 A_ratio_over_Ya1_plus_Yb1_times_P1 IOPIN -224 2064 In FLAG -192 2384 0 FLAG 160 2256 0 FLAG -96 2240 A_ratio_over_Ya1_plus_Yb1_times_Q1 IOPIN -96 2240 Out FLAG -256 2288 Q1 IOPIN -256 2288 In FLAG -176 2576 0 FLAG 160 2448 0 FLAG -96 2432 G12_times_Q1 IOPIN -96 2432 Out FLAG -208 2480 A_ratio_over_Ya1_plus_Yb1_times_Q1 IOPIN -208 2480 In FLAG -176 1088 0 FLAG 160 944 0 FLAG -96 928 A_ratio_times_Ya1_plus_Yb1_times_Q1 IOPIN -96 928 Out FLAG -256 976 Q1 IOPIN -256 976 In FLAG -176 1504 0 FLAG -96 1360 Q1_over_G21 IOPIN -96 1360 Out FLAG -224 1408 A_ratio_times_Ya1_plus_Yb1_times_Q1 IOPIN -224 1408 In FLAG 160 1376 0 FLAG -176 1952 0 FLAG 160 1824 0 FLAG -96 1808 minus_Q1_times_G22_over_G21 IOPIN -96 1808 Out FLAG -208 1856 Q1_over_G21 IOPIN -208 1856 In SYMBOL voltage -400 128 R270 WINDOW 0 32 56 VTop 2 WINDOW 3 -32 56 VBottom 2 WINDOW 123 0 0 Left 0 WINDOW 39 0 0 Left 0 SYMATTR InstName V1 SYMATTR Value 0 SYMBOL bv -224 160 R0 WINDOW 123 24 124 Left 2 SYMATTR InstName B11 SYMATTR Value V=V(minus_Q1_times_G22_over_G21) SYMBOL bv -224 368 R0 WINDOW 123 24 124 Left 2 SYMATTR InstName B12 SYMATTR Value V=V(Q2_over_G21) SYMBOL current -448 320 R180 WINDOW 0 24 80 Left 2 WINDOW 3 24 -56 Left 2 WINDOW 123 24 -28 Left 2 WINDOW 39 0 0 Left 0 SYMATTR InstName I1 SYMATTR Value "" SYMATTR Value2 AC 1 SYMBOL bv 288 160 R0 WINDOW 123 16 121 Left 2 SYMATTR InstName B21 SYMATTR Value V=V(G11_times_P1) SYMBOL voltage 384 128 R270 WINDOW 0 32 56 VTop 2 WINDOW 3 -32 56 VBottom 2 WINDOW 123 0 0 Left 0 WINDOW 39 0 0 Left 0 SYMATTR InstName V2 SYMATTR Value 0 SYMBOL h 1024 144 R0 WINDOW 3 39 65 Left 2 WINDOW 123 42 93 Left 2 WINDOW 0 36 34 Left 2 SYMATTR Value V1 SYMATTR Value2 1 SYMATTR InstName H1 SYMBOL res 1200 112 R90 WINDOW 0 0 56 VBottom 2 WINDOW 3 32 56 VTop 2 SYMATTR InstName R1 SYMATTR Value 1 SYMBOL h 1024 416 R0 WINDOW 3 39 65 Left 2 WINDOW 123 42 93 Left 2 WINDOW 0 36 34 Left 2 SYMATTR Value V2 SYMATTR Value2 1 SYMATTR InstName H2 SYMBOL res 1200 384 R90 WINDOW 0 0 56 VBottom 2 WINDOW 3 32 56 VTop 2 SYMATTR InstName R2 SYMATTR Value 1 SYMBOL res 592 240 R0 SYMATTR InstName R3 SYMATTR Value 1e-9 SYMBOL bv 288 368 R0 WINDOW 123 24 124 Left 2 SYMATTR InstName B22 SYMATTR Value V=V(G12_times_Q1) SYMBOL e -96 1168 R0 WINDOW 3 36 50 Left 2 SYMATTR Value laplace( ( {A2}/({rho}*(s+{s_fix}) ) * ( {s_fix} + (s+{s_fix})/{c} + (sqrt({A2})-sqrt({A1}))/({L}*sqrt({A2}))) * {A1}/({rho}*(s+{s_fix})) * ((s+{s_fix})/{c} - (sqrt({A2})-sqrt({A1}))/({L}*sqrt({A1}))) * exp(-s*{L}/{c}) - {A2}/({rho}*(s+{s_fix})) * ((s+{s_fix})/{c} - (sqrt({A2})-sqrt({A1}))/({L}*sqrt({A2}))) * {A1}/({rho}*(s+{s_fix})) * ((s+{s_fix})/{c} + (sqrt({A2})-sqrt({A1}))/({L}*sqrt({A1}))) * exp(s*{L}/{c}) )^(-1)) SYMATTR InstName E1 SYMBOL res 128 1136 R90 WINDOW 0 0 56 VBottom 2 WINDOW 3 32 56 VTop 2 SYMATTR InstName R4 SYMATTR Value 1 SYMBOL e -96 704 R0 WINDOW 3 36 50 Left 2 SYMATTR Value laplace( sqrt({A2}/{A1}) * ( {A1}/({rho}*(s+{s_fix})) * (s/{c} + (sqrt({A2})-sqrt({A1}))/({L}*sqrt({A1}))) + {A1}/({rho}*(s+{s_fix})) * (s/{c} - (sqrt({A2})-sqrt({A1}))/({L}*sqrt({A1}))) ) ) SYMATTR InstName E2 SYMBOL res 128 672 R90 WINDOW 0 0 56 VBottom 2 WINDOW 3 32 56 VTop 2 SYMATTR InstName R5 SYMATTR Value 1 SYMBOL e -96 1600 R0 WINDOW 3 36 50 Left 2 SYMATTR Value laplace( sqrt({A1}/{A2}) * ( {A1}/({rho}*(s+{s_fix})) * ((s+{s_fix})/{c} + (sqrt({A2})-sqrt({A1}))/({L}*sqrt({A1}))) + {A1}/({rho}*(s+{s_fix})) * ((s+{s_fix})/{c} - (sqrt({A2})-sqrt({A1}))/({L}*sqrt({A1}))) )^(-1) ) SYMATTR InstName E3 SYMBOL res 128 1568 R90 WINDOW 0 0 56 VBottom 2 WINDOW 3 32 56 VTop 2 SYMATTR InstName R6 SYMATTR Value 1 SYMBOL e -96 2032 R0 WINDOW 3 36 50 Left 2 SYMATTR Value laplace( {A1}/({rho}*(s+{s_fix})) * (s/{c} - (sqrt({A2})-sqrt({A1}))/({L}*sqrt({A1}))) * exp(-s*{L}/{c}) + {A1}/({rho}*(s+{s_fix})) * (s/{c} + (sqrt({A2})-sqrt({A1}))/({L}*sqrt({A1}))) * exp(s*{L}/{c}) ) SYMATTR InstName E4 SYMBOL res 128 2000 R90 WINDOW 0 0 56 VBottom 2 WINDOW 3 32 56 VTop 2 SYMATTR InstName R7 SYMATTR Value 1 SYMBOL e -96 2256 R0 WINDOW 3 36 50 Left 2 SYMATTR Value laplace( sqrt({A1}/{A2}) * ( {A1}/({rho}*(s+{s_fix})) * ((s+{s_fix})/{c} + (sqrt({A2})-sqrt({A1}))/({L}*sqrt({A1}))) + {A1}/({rho}*(s+{s_fix})) * ((s+{s_fix})/{c} - (sqrt({A2})-sqrt({A1}))/({L}*sqrt({A1}))) )^(-1) ) SYMATTR InstName E5 SYMBOL res 128 2224 R90 WINDOW 0 0 56 VBottom 2 WINDOW 3 32 56 VTop 2 SYMATTR InstName R8 SYMATTR Value 1 SYMBOL e -96 2448 R0 WINDOW 3 36 50 Left 2 SYMATTR Value laplace( exp(-s*{L}/{c}) - exp(s*{L}/{c}) ) SYMATTR InstName E6 SYMBOL res 128 2416 R90 WINDOW 0 0 56 VBottom 2 WINDOW 3 32 56 VTop 2 SYMATTR InstName R9 SYMATTR Value 1 SYMBOL e -96 944 R0 WINDOW 3 36 50 Left 2 SYMATTR Value laplace( sqrt({A2}/{A1}) * ( {A1}/({rho}*(s+{s_fix})) * (s/{c} + (sqrt({A2})-sqrt({A1}))/({L}*sqrt({A1}))) + {A1}/({rho}*(s+{s_fix})) * (s/{c} - (sqrt({A2})-sqrt({A1}))/({L}*sqrt({A1}))) ) ) SYMATTR InstName E7 SYMBOL res 128 912 R90 WINDOW 0 0 56 VBottom 2 WINDOW 3 32 56 VTop 2 SYMATTR InstName R10 SYMATTR Value 1 SYMBOL e -96 1376 R0 WINDOW 3 36 50 Left 2 SYMATTR Value laplace( ( {A2}/({rho}*(s+{s_fix}) ) * ( {s_fix} + (s+{s_fix})/{c} + (sqrt({A2})-sqrt({A1}))/({L}*sqrt({A2}))) * {A1}/({rho}*(s+{s_fix})) * ((s+{s_fix})/{c} - (sqrt({A2})-sqrt({A1}))/({L}*sqrt({A1}))) * exp(-s*{L}/{c}) - {A2}/({rho}*(s+{s_fix})) * ((s+{s_fix})/{c} - (sqrt({A2})-sqrt({A1}))/({L}*sqrt({A2}))) * {A1}/({rho}*(s+{s_fix})) * ((s+{s_fix})/{c} + (sqrt({A2})-sqrt({A1}))/({L}*sqrt({A1}))) * exp(s*{L}/{c}) )^(-1)) SYMATTR InstName E8 SYMBOL res 128 1344 R90 WINDOW 0 0 56 VBottom 2 WINDOW 3 32 56 VTop 2 SYMATTR InstName R11 SYMATTR Value 1 SYMBOL e -96 1824 R0 WINDOW 3 36 50 Left 2 SYMATTR Value laplace( -( sqrt({A1}/{A2}) * ( {A1}/({rho}*(s+{s_fix})) * ((s+{s_fix})/{c} + (sqrt({A2})-sqrt({A1}))/({L}*sqrt({A1}))) + {A1}/({rho}*(s+{s_fix})) * ((s+{s_fix})/{c} - (sqrt({A2})-sqrt({A1}))/({L}*sqrt({A1}))) )^(-1) )* ( {A2}/({rho}*(s+{s_fix})) * ((s+{s_fix})/{c} + (sqrt({A2})-sqrt({A1}))/({L}*sqrt({A2}))) * exp(-s*{L}/{c}) + {A2}/({rho}*(s+{s_fix})) * ((s+{s_fix})/{c} - (sqrt({A2})-sqrt({A1}))/({L}*sqrt({A2}))) * exp(s*{L}/{c}) ) ) SYMATTR InstName E9 SYMBOL res 128 1792 R90 WINDOW 0 0 56 VBottom 2 WINDOW 3 32 56 VTop 2 SYMATTR InstName R12 SYMATTR Value 1 TEXT 1400 160 Left 2 !.ac dec 100 1 1000 TEXT 1392 224 Left 2 !.param A1 = 10e-4\n.param A2=10e-4\n.param L=2 TEXT 1384 344 Left 2 !.param c = 344.8\n.param rho = 1.18 TEXT 1392 424 Left 2 !.param s_fix = 1e-9 TEXT 1656 424 Left 2 ;s_fix is used to prevent DC Laplician errors caused by dividing by zero TEXT 704 296 Left 2 ;Termination TEXT 1712 128 Left 4 ;This Spice model uses equations from Leach's paper ("A two port analogous circuit ..."\nand my own notes. It can be extended to all Salmon horns (not just conical) \nby a few changes, such as changing what is used for A' and gamma.\nIt was validated for constant cross section waveguides as well as a \nconical waveguide with rho*c/A termination.