Circuit Theory/Extra Element/code

[[Media:]] r1:=1:r2:=1;r3:=1;r4:=1;c:=1; linsolve([ (vs-va)/r1 - va/(s*c) - (va-vb)/r2 = 0, (va-vb)/r2 - vb/r4 + (vs-vb)/r3 = 0, current = va/(s*c) + vb/r4],[current, va, vb])

5*(1 + 3*s/5)/(3*(1 + 5*s/3))