电路理论/联立方程/示例 3/ex3-3MuPad

i_1 := Symbol::subScript(i,1):i_2 := Symbol::subScript(i,2):
i_3 := Symbol::subScript(i,3):i_4 := Symbol::subScript(i,4):
i_5 := Symbol::subScript(i,5):i_6 := Symbol::subScript(i,6):
i_7 := Symbol::subScript(i,7):i_8 := Symbol::subScript(i,8):
i_9 := Symbol::subScript(i,9):
linsolve ([i_1+i_2=0,i_6-i_7=0,i_2-i_3-i_4-i_5-i_6=0,i_8+i_4-i_9=0,
i_1+i_3-i_8=0],[i_1,i_2,i_7,i_8,i_9]);
i_3:=-1:i_4:=1:i_5:=-1:i_6:=1:
linsolve ([i_1+i_2=0,i_6-i_7=0,i_2-i_3-i_4-i_5-i_6=0,i_8+i_4-i_9=0,
i_1+i_3-i_8=0],[i_1,i_2,i_7,i_8,i_9]);