Молодой учёный

136 Информатика
«Молодой учёный» . № 3 (50) . Март, 2013 г.
A(12,10)=R(11)*Lr*v0/(2*tz);
A(12,11)=-(rr+Lr/dt)*R(12)-(Lr*(R(12)+R(11))+1)*v0/(2*tz);
A(12,12)=(rr+Lr/dt)*(R(13)+R(12))+(R(12)-R(13))*Lr*v0/(2*tz)+1/dt;
A(12,13)=-(rr+Lr/dt)*R(13)+(Lr*(R(14)+R(13))+1)*v0/(2*tz);
A(12,14)=-R(14)*Lr*v0/(2*tz);
% n=13
A(13,11)=R(12)*Lr*v0/(2*tz);
A(13,12)=-(rr+Lr/dt)*R(13)-(Lr*(R(13)+R(12))+1)*v0/(2*tz);
A(13,13)=(rr+Lr/dt)*(R(14)+R(13))+(R(13)-R(14))*Lr*v0/(2*tz)+1/dt;
A(13,14)=-(rr+Lr/dt)*R(14)+(Lr*(R(15)+R(14))+1)*v0/(2*tz);
A(13,15)=-R(15)*Lr*v0/(2*tz);
% n=14
A(14,12)=R(13)*Lr*v0/(2*tz);
A(14,13)=-(rr+Lr/dt)*R(14)-(Lr*(R(14)+R(13))+1)*v0/(2*tz);
A(14,14)=(rr+Lr/dt)*(R(15)+R(14))+(R(14)-R(15))*Lr*v0/(2*tz)+1/dt;
A(14,15)=-(rr+Lr/dt)*R(15)+(Lr*(R(16)+R(15))+1)*v0/(2*tz);
A(14,16)=-R(16)*Lr*v0/(2*tz);
% n=15
A(15,13)=R(14)*Lr*v0/(2*tz);
A(15,14)=-(rr+Lr/dt)*R(15)-(Lr*(R(15)+R(14))+1)*v0/(2*tz);
A(15,15)=(rr+Lr/dt)*(R(16)+R(15))+(R(15)-R(16))*Lr*v0/(2*tz)+1/dt;
A(15,16)=-(rr+Lr/dt)*R(16)+(Lr*(R(17)+R(16))+1)*v0/(2*tz);
A(15,17)=-R(17)*Lr*v0/(2*tz);
% n=16
A(16,14)=R(15)*Lr*v0/(2*tz);
A(16,15)=-(rr+Lr/dt)*R(16)-(Lr*(R(16)+R(15))+1)*v0/(2*tz);
A(16,16)=(rr+Lr/dt)*(R(17)+R(16))+(R(16)-R(17))*Lr*v0/(2*tz)+1/dt;
A(16,17)=-(rr+Lr/dt)*R(17)+(Lr*(R(18)+R(17))+1)*v0/(2*tz);
A(16,18)=-R(18)*Lr*v0/(2*tz);
% n=17
A(17,15)=R(16)*Lr*v0/(2*tz);
A(17,16)=-(rr+Lr/dt)*R(17)-(Lr*(R(17)+R(16))+1)*v0/(2*tz);
A(17,17)=(rr+Lr/dt)*(R(18)+R(17))+(R(17)-R(18))*Lr*v0/(2*tz)+1/dt;
A(17,18)=-(rr+Lr/dt)*R(18)+(Lr*(R(19)+R(18))+1)*v0/(2*tz);
A(17,19)=-R(19)*Lr*v0/(2*tz);
% n=18
A(18,16)=R(17)*Lr*v0/(2*tz);
A(18,17)=-(rr+Lr/dt)*R(18)-(Lr*(R(18)+R(17))+1)*v0/(2*tz);
A(18,18)=(rr+Lr/dt)*(R(19)+R(18))+(R(18)-R(19))*Lr*v0/(2*tz)+1/dt;
A(18,19)=-(rr+Lr/dt)*R(19)+(Lr*(R(20)+R(19))+1)*v0/(2*tz);
A(18,20)=-R(20)*Lr*v0/(2*tz);
% n=19
A(19,17)=R(18)*Lr*v0/(2*tz);
A(19,18)=-(rr+Lr/dt)*R(19)-(Lr*(R(19)+R(18))+1)*v0/(2*tz);
A(19,19)=(rr+Lr/dt)*(R(20)+R(19))+(R(19)-R(20))*Lr*v0/(2*tz)+1/dt;
A(19,20)=-(rr+Lr/dt)*R(20)+(Lr*(R(21)+R(20))+1)*v0/(2*tz);
% n=20
A(20,18)=R(19)*Lr*v0/(2*tz);
A(20,19)=-(rr+Lr/dt)*R(20)-(Lr*(R(20)+R(19))+1)*v0/(2*tz);
A(20,20)=(rr+Lr/dt)*(R(21)+R(20))+(R(20)-R(21))*Lr*v0/(2*tz)+1/dt;
% Напряжения
A(21,5)=U;
A(21,6)=U;
A(21,9)=-U;
A(21,10)=-U;
A(21,11)=-U;