Курсовая работа: Расчёт электрических сетей железных дорог

b1=diag(b1)

b1 =

5.5000 0 0 0 0 0 0 0 0

0 1.4887 0 0 0 0 0 0 0

0 0 0.7887 0 0 0 0 0 0

0 0 0 0.0887 0 0 0 0 0

0 0 0 0 -0.4586 0 0 0 0

0 0 0 0 0 1.9526 0 0 0

0 0 0 0 0 0 0.9526 0 0

0 0 0 0 0 0 0 -1.3586 0

0 0 0 0 0 0 0 0 0.2526

c1=diag(c1)

c1 =

3.8000 0 0 0 0 0 0 0 0

0 1.2280 0 0 0 0 0 0 0

0 0 0.5280 0 0 0 0 0 0

0 0 0 0.0280 0 0 0 0 0

0 0 0 0 -0.3266 0 0 0 0

0 0 0 0 0 1.2454 0 0 0

0 0 0 0 0 0 0.9454 0 0

0 0 0 0 0 0 0 -1.0266 0

0 0 0 0 0 0 0 0 0.2454

s=sqrt(b1*b1+c1*c1)

s =

6.6851 0 0 0 0 0 0 0 0

0 1.9299 0 0 0 0 0 0 0

0 0 0.9492 0 0 0 0 0 0

0 0 0 0.0931 0 0 0 0 0

0 0 0 0 0.5630 0 0 0 0