summaryrefslogtreecommitdiff
path: root/671/CH2/EX2.9/2_9.sce
blob: 29df508179664fc6f47b0684b4237d3a363c56c1 (plain)
1
2
3
4
5
6
7
8
9
10
11
//KCLs

A=[2,-1;-4,19]
V=inv(A)*[10;25]

Pc=1*V(1)
Iv=(5-V(2))/2 + (5-V(1))/5
Pv=5*Iv

disp(V)
disp(Pv,Pc)