Download - Wolfram Research

2.4 Setting up and Solving Circuit Equations 79
In[11]:= rlcstaext = CircuitEquations[rlcfilter,
Formulation −> ExtendedTableau];
DisplayForm[rlcstaext]
Out[12]//DisplayForm=
1 0 0 0 0 0 0 0 0 0 0 0 1 0 0
0 1 0 0 0 0 0 0 0 0 0 0 1 1 0
0 0 1 0 0 0 0 0 0 0 0 0 0 1 0
0 0 0 1 0 0 0 0 0 0 0 0 0 1 1
0 0 0 0 1 0 0 0 0 0 0 0 0 0 1
0 0 0 0 0 1 0 0 0 0 0 0 0 0 1
0 0 0 0 0 0 1 1 0 0 0 0 0 0 0
0 0 0 0 0 0 0 1 1 1 0 0 0 0 0 .
0 0 0 0 0 0 0 0 0 1 1 1 0 0 0
1 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 1 0 0 0 0 0 RA 0 0 0 0 0 0 0
0 0 C1 s 0 0 0 0 0 1 0 0 0 0 0 0
0 0 0 1 0 0 0 0 0 L1 s 0 0 0 0 0
0
0 0 0 C2 s 0 0 0 0 0 1 0 0 0 0
0 0 0 0 0 1 0 0 0 0 0 RB 0 0 0
V$V0
V$RA
V$C1
V$L1
V$C2
V$RB
I$V0
I$RA ⩵⩵
I$C1
I$L1
I$C2
I$RB
V$1
V$2
V$3
0
0
0
0
0
0
0
0
0
V0
0
0
0
0
0
Of course, the solution for a particular quantity in a circuit does not depend on the type of equations
from which the solution is computed. So the value for V$3 obtained by an extended sparse tableau
analysis is identical to the one computed by modified nodal analysis:
In[13]:= V$3 /. First[Solve[rlcstaext, V$3]]
Out[13]=
L1 RB s V0
RA RB RA L1 s 1 C1 RA s RB L1 s 1 C2 RB s