Appendix B. Matlab Code
SS=0;SS1=0;SS2=0; SS3=0;SS4=0;
kongvalue1=5;
kongvalue2=6;
kongvalue3=7;
SSmin=10000;
TRSSN=zeroSS(3,9);
trSSn=zeroSS(3,9);
for timeSS=1:2000 for i=1:2 tr1=randi([2,10]);
tr2=randi([2,10]);
tr3=randi([2,10]);
tr4=randi([4,12]);
tr5=randi([4,12]);
tr6=randi([4,12]);
tr7=randi([6,16]);
tr8=randi([6,16]);
tr9=randi([6,16]);
TRSSN(i,:)=[tr1,tr2,tr3,tr4,tr5,tr6,tr7,tr8,tr9];
SymS vv1;
SymS v2;
SymS v3;
SymS v4;
SymS v5;
SymS v6;
SymS v7;
SymS v8;
SymS v9;
[vv1]=vpaSolve([(3.9638/(1-vv1))/2.0736==1.5+2*(1+tr1/2.0736)*(tr1/2.0736)*(tr1/2.0736)+1.5*vv1*vv1* (1+tr1/2.0736)],[vv1]);
[v2]=vpaSolve([(3.6729/(1-v2))/1.9214==1.5+2*(1+tr2/1.9214)*(tr2/1.9214)*(tr2/1.9214)+1.5*v2*v2* (1+tr2/1.9214)],[v2]);
[v3]=vpaSolve([(3.4442/(1-v3))/1.8018==1.5+2*(1+tr3/1.8018)*(tr3/1.8018)*(tr3/1.8018)+1.5*v3*v3* (1+tr3/1.8018)],[v3]);
[v4]=vpaSolve([(8.2578/(1-v4))/3.5795==1.5+2*(1+tr4/3.5795)*(tr4/3.5795)*(tr4/3.5795)+1.5*v4*v4* (1+tr4/3.5795)],[v4]);
[v5]=vpaSolve([(8.0229/(1-v5))/3.4777==1.5+2*(1+tr5/3.4777)*(tr5/3.4777)*(tr5/3.4777)+1.5*v5*v5* (1+tr5/3.4777)],[v5]);
[v6]=vpaSolve([(7.5248/(1-v6))/3.2617==1.5+2*(1+tr6/3.2617)*(tr6/3.2617)*(tr6/3.2617)+1.5*v6*v6* (1+tr6/3.2617)],[v6]);
[v7]=vpaSolve([(13.7822/(1-v7))/5.1146==1.5+2*(1+tr7/5.1146)*(tr7/5.1146)*(tr7/5.1146)+1.5*v7*v7* (1+tr7/5.1146)],[v7]);
[v8]=vpaSolve([(12.9585/(1-v8))/4.8089==1.5+2*(1+tr8/4.8089)*(tr8/4.8089)*(tr8/4.8089)+1.5*v8*v8* (1+tr8/4.8089)],[v8]);
[v9]=vpaSolve([(12.1348/(1-v9))/4.5032==1.5+2*(1+tr9/4.5032)*(tr9/4.5032)*(tr9/4.5032)+1.5*v9*v9* (1+tr9/4.5032)],[v9]);
vv1=real(vv1(1,1));
v2=real(v2(1,1));
v3=real(v3(1,1));
v4=real(v4(1,1));
v5=real(v5(1,1));
v6=real(v6(1,1));
v7=real(v7(1,1));
v8=real(v8(1,1));
v9=real(v9(1,1));
T1=1/vv1;
T2=1/v2;
T3=1/v3;
T4=1/v4;
T5=1/v5;
T6=1/v6;
T7=1/v7;
T8=1/v8;
T9=1/v9;
SS2=T1+T2+T3+T4+T5+T6+T7+T8+T9+kongvalue1*3+kongvalue2*3+kongvalue3*3;
SS1=SS2+SS1;
clear vv1;
clear v2;
clear v3;
clear v4;
clear v5;
clear v6;
clear v7;
clear v8;
clear v9;
SS=tr1+tr2+tr3+tr4+tr5+tr6+tr7+tr8+tr9;
SS3=SS+SS3;
if SS3>=197 break end
end
for j=1:100 SS4=SS3;
tr1=randi([2,10]);
tr2=randi([2,10]);
tr3=randi([2,10]);
tr4=randi([4,12]);
tr5=randi([4,12]);
tr6=randi([4,12]);
tr7=randi([6,16]);
tr8=randi([6,16]);
tr9=randi([6,16]);
ifnot=round(rand(1,9));
tr1=tr1*ifnot(1,1);
tr2=tr2*ifnot(1,2);
tr3=tr3*ifnot(1,3);
tr4=tr4*ifnot(1,4);
tr5=tr5*ifnot(1,5);
tr6=tr6*ifnot(1,6);
tr7=tr7*ifnot(1,7);
tr8=tr8*ifnot(1,8);
tr9=tr9*ifnot(1,9);
SS=tr1+tr2+tr3+tr4+tr5+tr6+tr7+tr8+tr9;
SS4=SS4+SS;
if SS4<197 continue end
TRSSN(3,:)=[tr1,tr2,tr3,tr4,tr5,tr6,tr7,tr8,tr9];
SymS vv1;
SymS v2;
SymS v3;
SymS v4;
SymS v5;
SymS v6;
SymS v7;
SymS v8;
SymS v9;
[vv1]=vpaSolve([(3.9638/(1-vv1))/2.0736==1.5+2*(1+tr1/2.0736)*(tr1/2.0736)*(tr1/2.0736)+1.5*vv1*vv1* (1+tr1/2.0736)],[vv1]);
[v2]=vpaSolve([(3.6729/(1-v2))/1.9214==1.5+2*(1+tr2/1.9214)*(tr2/1.9214)*(tr2/1.9214)+1.5*v2*v2* (1+tr2/1.9214)],[v2]);
[v3]=vpaSolve([(3.4442/(1-v3))/1.8018==1.5+2*(1+tr3/1.8018)*(tr3/1.8018)*(tr3/1.8018)+1.5*v3*v3* (1+tr3/1.8018)],[v3]);
[v4]=vpaSolve([(8.2578/(1-v4))/3.5795==1.5+2*(1+tr4/3.5795)*(tr4/3.5795)*(tr4/3.5795)+1.5*v4*v4* (1+tr4/3.5795)],[v4]);
[v5]=vpaSolve([(8.0229/(1-v5))/3.4777==1.5+2*(1+tr5/3.4777)*(tr5/3.4777)*(tr5/3.4777)+1.5*v5*v5* (1+tr5/3.4777)],[v5]);
[v6]=vpaSolve([(7.5248/(1-v6))/3.2617==1.5+2*(1+tr6/3.2617)*(tr6/3.2617)*(tr6/3.2617)+1.5*v6*v6* (1+tr6/3.2617)],[v6]);
[v7]=vpaSolve([(13.7822/(1-v7))/5.1146==1.5+2*(1+tr7/5.1146)*(tr7/5.1146)*(tr7/5.1146)+1.5*v7*v7* (1+tr7/5.1146)],[v7]);
[v8]=vpaSolve([(12.9585/(1-v8))/4.8089==1.5+2*(1+tr8/4.8089)*(tr8/4.8089)*(tr8/4.8089)+1.5*v8*v8* (1+tr8/4.8089)],[v8]);
[v9]=vpaSolve([(12.1348/(1-v9))/4.5032==1.5+2*(1+tr9/4.5032)*(tr9/4.5032)*(tr9/4.5032)+1.5*v9*v9* (1+tr9/4.5032)],[v9]);
vv1=real(vv1(1,1));
v2=real(v2(1,1));
v3=real(v3(1,1));
v4=real(v4(1,1));
v5=real(v5(1,1));
v6=real(v6(1,1));
v7=real(v7(1,1));
v8=real(v8(1,1));
v9=real(v9(1,1));
T1=1/vv1;
T2=1/v2;
T3=1/v3;
T4=1/v4;
T5=1/v5;
T6=1/v6;
T7=1/v7;
T8=1/v8;
T9=1/v9;
SS2=T1+T2+T3+T4+T5+T6+T7+T8+T9+ifnot(1,1)*kongvalue1+ifnot(1,2)*kongvalue1+ifnot(1,3)* kongvalue1+ifnot(1,4)*kongvalue2+ifnot(1,5)*kongvalue2+ifnot(1,6)*kongvalue2+ifnot(1,7) *kongvalue3+ifnot(1,8)*kongvalue3+ifnot(1,9)*kongvalue3;
SS1=SS2+SS1;
clear vv1;
clear v2;
clear v3;
clear v4;
clear v5;
clear v6;
clear v7;
clear v8;
clear v9;
if SS1<SSmin SSmin=SS1;
trSSn=TRSSN;
end
if SS4>197 break end end end