function [ Pt, ut, x ] = ITs2( Rt, R, n, I0 )
%ITS2 IT elemet tartalmazo halozat megoldasa (ITs2.pdf)
% 2017.03.03.iMSc
% function [ Pt, ut, x ] = ITs2( Rt, R, n, I0 )

A = [1 0 0 0 0 0 0 0;-3*R 5*R -2*R 0 -1 0 0 0;...
	0 -2*R 3*R+Rt -R 0 0 0 0;0 0 -R 3*R 1 -1 0 0;...
	0 0 0 0 1 -n 0 0;0 0 0 0 0 0 n 1;0 1 0 -1 0 0 1 0;...
	-1 0 0 1 0 0 0 1];
B = [I0;0;0;0;0;0;0;0];
x = A \ B;
j3 = x(3);
Pt = j3^2*Rt;
ut = j3*Rt;


end

