%% IT33-ban leirt 
syms ia ib ic id ua ub uc ud m n I0 R
eq1 = -I0 + ia + ib == 0;
eq2 = ic + id + ud/R == 0;
eq3 = ib + ic ==0;
eq4 = -ua + ub -uc +ud == 0;
eq5 = ua == n*ub;
eq6 = ib == -n*ia;
eq7 = uc == m*ud;
eq8 = id == -n*ic;
sol = solve([eq1,eq2,eq3,eq4,eq5,eq6,eq7,eq8],[ua,ub,ia,ib,uc,ud,ic,id])
sol.ua
pretty(ua/I0)
pretty(sol.ua/I0)
pretty(collect(sol.ua/I0))