1. Prerequisites (please double-click on the right paranthesis to unfold cells)

Suppress messages

Off[Power::infy]
Off[Infinity::indet]
Off[Solve::svars]

Probabilities to carry a certain label conditional on playing strategy x, given equilibrium distribution of labels

cooperation indicator for strategies 1-16 for given label XY,  '1' stands for cooperation

"1-CCCC";
(Subscript[ind, CC])[1]=1;
(Subscript[ind, CD])[1]=1;
(Subscript[ind, DC])[1]=1;
(Subscript[ind, DD])[1]=1;
"2-CCCD";
(Subscript[ind, CC])[2]=1;
(Subscript[ind, CD])[2]=1;
(Subscript[ind, DC])[2]=1;
(Subscript[ind, DD])[2]=0;
"3-CCDC";
(Subscript[ind, CC])[3]=1;
(Subscript[ind, CD])[3]=1;
(Subscript[ind, DC])[3]=0;
(Subscript[ind, DD])[3]=1;
"4-CDCC";
(Subscript[ind, CC])[4]=1;
(Subscript[ind, CD])[4]=0;
(Subscript[ind, DC])[4]=1;
(Subscript[ind, DD])[4]=1;
"5-DCCC";
(Subscript[ind, CC])[5]=0;
(Subscript[ind, CD])[5]=1;
(Subscript[ind, DC])[5]=1;
(Subscript[ind, DD])[5]=1;
"6-CCDD";
(Subscript[ind, CC])[6]=1;
(Subscript[ind, CD])[6]=1;
(Subscript[ind, DC])[6]=0;
(Subscript[ind, DD])[6]=0;
"7-CDCD";
(Subscript[ind, CC])[7]=1;
(Subscript[ind, CD])[7]=0;
(Subscript[ind, DC])[7]=1;
(Subscript[ind, DD])[7]=0;
"8-DCCD";
(Subscript[ind, CC])[8]=0;
(Subscript[ind, CD])[8]=1;
(Subscript[ind, DC])[8]=1;
(Subscript[ind, DD])[8]=0;
"9-DCDC";
(Subscript[ind, CC])[9]=0;
(Subscript[ind, CD])[9]=1;
(Subscript[ind, DC])[9]=0;
(Subscript[ind, DD])[9]=1;
"10-DDCC";
(Subscript[ind, CC])[10]=0;
(Subscript[ind, CD])[10]=0;
(Subscript[ind, DC])[10]=1;
(Subscript[ind, DD])[10]=1;
"11-CDDC";
(Subscript[ind, CC])[11]=1;
(Subscript[ind, CD])[11]=0;
(Subscript[ind, DC])[11]=0;
(Subscript[ind, DD])[11]=1;
"12-CDDD";
(Subscript[ind, CC])[12]=1;
(Subscript[ind, CD])[12]=0;
(Subscript[ind, DC])[12]=0;
(Subscript[ind, DD])[12]=0;
"13-DCDD";
(Subscript[ind, CC])[13]=0;
(Subscript[ind, CD])[13]=1;
(Subscript[ind, DC])[13]=0;
(Subscript[ind, DD])[13]=0;
"14-DDCD";
(Subscript[ind, CC])[14]=0;
(Subscript[ind, CD])[14]=0;
(Subscript[ind, DC])[14]=1;
(Subscript[ind, DD])[14]=0;
"15-DDDC";
(Subscript[ind, CC])[15]=0;
(Subscript[ind, CD])[15]=0;
(Subscript[ind, DC])[15]=0;
(Subscript[ind, DD])[15]=1;
"16-DDDD";
(Subscript[ind, CC])[16]=0;
(Subscript[ind, CD])[16]=0;
(Subscript[ind, DC])[16]=0;
(Subscript[ind, DD])[16]=0;

cooperation probability for strategies i for given label XY, 1-16, '1' stands for cooperation

(Subscript[inde, CC])[i_,ϵ_,γ_]=((Subscript[ind, CC])[i](1-ϵ)+(1/3)ϵ*(Subscript[ind, CD])[i]+(1/3)ϵ*(Subscript[ind, DC])[i]+(1/3)ϵ*(Subscript[ind, DD])[i])(1-γ);
(Subscript[inde, CD])[i_,ϵ_,γ_]=((Subscript[ind, CD])[i](1-ϵ)+(1/3)ϵ*(Subscript[ind, CC])[i]+(1/3)ϵ*(Subscript[ind, DC])[i]+(1/3)ϵ*(Subscript[ind, DD])[i])(1-γ);
(Subscript[inde, DC])[i_,ϵ_,γ_]=((Subscript[ind, DC])[i](1-ϵ)+(1/3)ϵ*(Subscript[ind, CD])[i]+(1/3)ϵ*(Subscript[ind, CC])[i]+(1/3)ϵ*(Subscript[ind, DD])[i])(1-γ);
(Subscript[inde, DD])[i_,ϵ_,γ_]=((Subscript[ind, DD])[i](1-ϵ)+(1/3)ϵ*(Subscript[ind, CD])[i]+(1/3)ϵ*(Subscript[ind, DC])[i]+(1/3)ϵ*(Subscript[ind, CC])[i])(1-γ);

Transitionmatrix for distribution of labels, p(t)=W*p(t-1)

(Subscript[we, 11])=Sum[(Subscript[x, i])[t]*(Subscript[inde, CC])[i,ϵ,γ],{i,1,16}]//FullSimplify;
	%/.{ϵ->0, γ->0}//FullSimplify;
(Subscript[we, 12])=Sum[(Subscript[x, i])[t]*(Subscript[inde, CD])[i,ϵ,γ],{i,1,16}]//FullSimplify;
	%/.{ϵ->0, γ->0}//FullSimplify;
(Subscript[we, 23])=Sum[(Subscript[x, i])[t]*(Subscript[inde, DC])[i,ϵ,γ],{i,1,16}]//FullSimplify;
	%/.{ϵ->0, γ->0}//FullSimplify;
(Subscript[we, 24])=Sum[(Subscript[x, i])[t]*(Subscript[inde, DD])[i,ϵ,γ],{i,1,16}]//FullSimplify;
	%/.{ϵ->0, γ->0}//FullSimplify;
(Subscript[we, 31])=1-(Subscript[we, 11]);
(Subscript[we, 32])=1-(Subscript[we, 12]);
(Subscript[we, 43])=1-(Subscript[we, 23]);
(Subscript[we, 44])=1-(Subscript[we, 24]);

long run limits for the shares of the different labels (for given distribution of strategies) and the probabilty to cooperate for strategy i for given long run label distribution; p=Wp ->

PCD=1/(2+(Subscript[we, 12])/(1-(Subscript[we, 11]))+(1-(Subscript[we, 23]))/(Subscript[we, 24]))//Simplify;
PDC=PCD//Simplify;
PCC=(Subscript[we, 12])/(1-(Subscript[we, 11]))PCD//Simplify;
PDD=(1-(Subscript[we, 23]))/(Subscript[we, 24])PCD//Simplify;
"TEST of eigenvector"
{PCC,PCD,PDC,PDD}-{{(Subscript[we, 11]),(Subscript[we, 12]),0,0},{0,0,(Subscript[we, 23]),(Subscript[we, 24])},{1-(Subscript[we, 11]),1- (Subscript[we, 12]), 0,0},{0,0,1-(Subscript[we, 23]),1-(Subscript[we, 24])}}.{PCC,PCD,PDC,PDD}//Simplify
"long run label probs";
(Subscript[p, CC])[i_]=(Subscript[inde, CC])[i,ϵ,γ]*PCC+(Subscript[inde, CD])[i,ϵ,γ]*PCD;
(Subscript[p, CD])[i_]=(Subscript[inde, DC])[i,ϵ,γ]*PDC+(Subscript[inde, DD])[i,ϵ,γ]*PDD;
(Subscript[p, DC])[i_]=(1-(Subscript[inde, CC])[i,ϵ,γ])*PCC+(1-(Subscript[inde, CD])[i,ϵ,γ])*PCD;
(Subscript[p, DD])[i_]=(1-(Subscript[inde, DC])[i,ϵ,γ])*PDC+(1-(Subscript[inde, DD])[i,ϵ,γ])*PDD;
"prob to cooperate for strategy i";
(Subscript[p, C])[i_]=(Subscript[inde, CC])[i,ϵ,γ]*PCC+(Subscript[inde, CD])[i,ϵ,γ]*PCD+(Subscript[inde, DC])[i,ϵ,γ]*PDC+(Subscript[inde, DD])[i,ϵ,γ]*PDD;

Profits

Π[i_,t_,b_,c_,ϵ_,γ_]=(b*Sum[(Subscript[x, j])[t]*((Subscript[inde, CC])[j,ϵ,γ]*(Subscript[p, CC])[i]+(Subscript[inde, CD])[j,ϵ,γ]*(Subscript[p, CD])[i]+(Subscript[inde, DC])[j,ϵ,γ]*(Subscript[p, DC])[i]+(Subscript[inde, DD])[j,ϵ,γ]*(Subscript[p, DD])[i]),{j,1,16}]-c*(Subscript[p, C])[i])/.(Subscript[x, 16])[t]->1-((Subscript[x, 1])[t]+(Subscript[x, 2])[t]+(Subscript[x, 3])[t]+(Subscript[x, 4])[t]+(Subscript[x, 5])[t]+(Subscript[x, 6])[t]+(Subscript[x, 7])[t]+(Subscript[x, 8])[t]+(Subscript[x, 9])[t]+(Subscript[x, 10])[t]+(Subscript[x, 11])[t]+(Subscript[x, 12])[t]+(Subscript[x, 13])[t]+(Subscript[x, 14])[t]+(Subscript[x, 15])[t]);
"average payoff";
Ave[t_,b_,c_,ϵ_,γ_]=Sum[(Subscript[x, i])[t]*Π[i,t,b,c,ϵ,γ],{i,1,16}]/.(Subscript[x, 16])[t]->1-((Subscript[x, 1])[t]+(Subscript[x, 2])[t]+(Subscript[x, 3])[t]+(Subscript[x, 4])[t]+(Subscript[x, 5])[t]+(Subscript[x, 6])[t]+(Subscript[x, 7])[t]+(Subscript[x, 8])[t]+(Subscript[x, 9])[t]+(Subscript[x, 10])[t]+(Subscript[x, 11])[t]+(Subscript[x, 12])[t]+(Subscript[x, 13])[t]+(Subscript[x, 14])[t]+(Subscript[x, 15])[t]);
eqn[i_,b_,c_,ϵ_,γ_]=D[(Subscript[x, i])[t],t]==(Subscript[x, i])[t]*(Π[i,t,b,c,ϵ,γ]-Ave[t,b,c,ϵ,γ]);

2. Check Lemma 1: Pi(CCCC)-Pi(CCCD)=...=Pi(DDDC)-Pi(DDDD) etc.

Single deviation

diff12gens=(Π[1, t, b,c,η,η]-Π[2, t, b, c, η,η])//Simplify

diff36gens=(Π[3, t, b,c,η,η]-Π[6, t, b, c, η,η])//Simplify

"(CCCC-CCCD)-(CCDC-CCDD)"
diff12gens-diff36gens//Simplify

Double deviation

"(CCCC-CCDD)-(DCCC-DCDD)"
diff16gens=(Π[1, t,  b,c,η,η]-Π[6, t, b,c,η,η])//Simplify
diff513gens=(Π[5, t, b,c,η,η]-Π[13, t,  b,c,η,η])//Simplify
diff16gens-diff513gens//Simplify

Triple deviation

"(CCDC-DCCD)-(CDDC-DDCD)"
diff38gens=(Π[3, t,  b,c,η,η]-Π[8, t, b,c,η,η])//Simplify
diff1114gens=(Π[11, t, b,c,η,η]-Π[14, t,  b,c,η,η])//Simplify
diff38gens-diff1114gens//Simplify

"(DCDC-CDCC)-(DCDD-CDCD)"
diff94gens=(Π[9, t,  b,c,η,η]-Π[4, t, b,c,η,η])//Simplify
diff137gens=(Π[13, t, b,c,η,η]-Π[7, t,  b,c,η,η])//Simplify
diff94gens-diff137gens//Simplify

3.Table 1: Test of the 81 remaining equilibrium candidates, reduces to 30 potentially stable; Simplifying Assumption: η=ϵ=γ

3.1 Equilibria with a single strategy (16 candidates)

"CCCC"
diff1a=(Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->1,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff1b=(Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->1,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff1c=(Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->1,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff1d=(Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->1,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
FindInstance[diff1a!=0&&diff1b!=0&&diff1c!=0&&diff1d!=0&&b>c>0&&0<η<0.2,{b,c,η}]

"CCCD"
diff2a=(Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->1,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff2b=(Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->1,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff2c=(Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->1,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff2d=(Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->1,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
FindInstance[diff2a!=0&&diff2b!=0&&diff2c!=0&&diff2d!=0&&b>c>0&&0<η<0.2,{b,c,η}]

"CCDC"
diff3a=(Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->1,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff3b=(Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->1,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff3c=(Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->1,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff3d=(Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->1,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
FindInstance[diff3a!=0&&diff3b!=0&&diff3c!=0&&diff3d!=0&&b>c>0&&0<η<0.2,{b,c,η}]

"CDCC"
diff4a=(Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->1,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff4b=(Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->1,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff4c=(Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->1,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff4d=(Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->1,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
FindInstance[diff4a!=0&&diff4b!=0&&diff4c!=0&&diff4d!=0&&b>c>0&&0<η<0.2,{b,c,η}]

"DCCC"
diff5a=(Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->1,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff5b=(Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->1,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff5c=(Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->1,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff5d=(Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->1,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
FindInstance[diff5a!=0&&diff5b!=0&&diff5c!=0&&diff5d!=0&&b>c>0&&0<η<0.2,{b,c,η}]

"CCDD"
diff6a=(Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->1,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff6b=(Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->1,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff6c=(Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->1,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff6d=(Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->1,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
FindInstance[diff6a!=0&&diff6b!=0&&diff6c!=0&&diff6d!=0&&b>c>0&&0<η<0.2,{b,c,η}]

"CDCD"
diff7a=(Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->1,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff7b=(Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->1,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff7c=(Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->1,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff7d=(Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->1,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
FindInstance[diff7a!=0&&diff7b!=0&&diff7c!=0&&diff7d!=0&&b>c>0&&0<η<0.2,{b,c,η}]

"DCCD"
diff8a=(Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->1,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff8b=(Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->1,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff8c=(Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->1,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff8d=(Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->1,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
FindInstance[diff8a!=0&&diff8b!=0&&diff8c!=0&&diff8d!=0&&b>c>0&&0<η<0.2,{b,c,η}]

"DCDC"
diff9a=(Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->1,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff9b=(Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->1,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;diff9c=(Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->1,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;diff9d=(Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->1,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
FindInstance[diff9a!=0&&diff9b!=0&&diff9c!=0&&diff9d!=0&&b>c>0&&0<η<0.2,{b,c,η}]

"DDCC"
diff10a=(Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->1,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff10b=(Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->1,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff10c=(Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->1,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff10d=(Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->1,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
FindInstance[diff10a!=0&&diff10b!=0&&diff10c!=0&&diff10d!=0&&b>c>0&&0<η<0.2,{b,c,η}]

"CDDC"
diff11a=(Π[11, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->1,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff11b=(Π[11, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->1,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;diff11c=(Π[11, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->1,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;diff11d=(Π[11, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->1,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
FindInstance[diff11a!=0&&diff11b!=0&&diff11c!=0&&diff11d!=0&&b>c>0&&0<η<0.2,{b,c,η}]

"CDDD"
diff12a=(Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff12b=(Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff12c=(Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff12d=(Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
FindInstance[diff12a!=0&&diff12b!=0&&diff12c!=0&&diff12d!=0&&b>c>0&&0<η<0.2,{b,c,η}]

"DCDD"
diff13a=(Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->1,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff13b=(Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->1,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff13c=(Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->1,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff13d=(Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->1,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
FindInstance[diff13a!=0&&diff13b!=0&&diff13c!=0&&diff13d!=0&&b>c>0&&0<η<0.2,{b,c,η}]

"DDCD"
diff14a=(Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->1,(Subscript[x, 15])[t]->0}//Simplify;
diff14b=(Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->1,(Subscript[x, 15])[t]->0}//Simplify;
diff14c=(Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->1,(Subscript[x, 15])[t]->0}//Simplify;
diff14d=(Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->1,(Subscript[x, 15])[t]->0}//Simplify;
FindInstance[diff14a!=0&&diff14b!=0&&diff14c!=0&&diff14d!=0&&b>c>0&&0<η<0.2,{b,c,η}]

"DDDC"
diff15a=(Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->1}//Simplify;
diff15b=(Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->1}//Simplify;
diff15c=(Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->1}//Simplify;
diff15d=(Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->1}//Simplify;
FindInstance[diff15a!=0&&diff15b!=0&&diff15c!=0&&diff15d!=0&&b>c>0&&0<η<0.2,{b,c,η}]

"DDDD"
diff16a=((Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0}//Simplify)/.{(Subscript[x, 15])[t]->0};
diff16b=((Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0}//Simplify)/.{(Subscript[x, 15])[t]->0};
diff16c=((Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0}//Simplify)/.{(Subscript[x, 15])[t]->0};
diff16d=((Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0}//Simplify)/.{(Subscript[x, 15])[t]->0};
FindInstance[diff16a!=0&&diff16b!=0&&diff16c!=0&&diff16d!=0&&b>c>0&&0<η<0.2,{b,c,η}]

RESULT: All 16 Equilibria are consistent with all basic differences being different from zero.

3.2 Equilibria with two strategies (32=8x4 candidates, one payoff difference zero, make use of the nessary condition that all other differences are different from zero.)

D1=0 (solutions 500+)

CCCC and DCCC (1 and 5)

sol500=Solve[((Π[1, t, b,c,η,η]-Π[5, t, b,c,η,η])/.{(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->1-(Subscript[x, 1])[t],(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,(Subscript[x, 1])[t]]//FullSimplify;
FindInstance[1>=((Subscript[x, 1])[t]/.sol500[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
FindInstance[1>=((Subscript[x, 1])[t]/.sol500[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]

CCCD and DCCD (2 and 8)

sol510=Solve[((Π[2, t, b,c,η,η]-Π[8, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->1-(Subscript[x, 2])[t],(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,(Subscript[x, 2])[t]]//FullSimplify;
FindInstance[1>=((Subscript[x, 2])[t]/.sol510[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
FindInstance[1>=((Subscript[x, 2])[t]/.sol510[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]

CCDC and DCDC (3 and 9)

sol520=Solve[((Π[3, t, b,c,η,η]-Π[9, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->1-(Subscript[x, 3])[t],(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,(Subscript[x, 3])[t]]//FullSimplify
FindInstance[1>=((Subscript[x, 3])[t]/.sol520[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
ex520=FindInstance[1>=((Subscript[x, 3])[t]/.sol520[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
"There exists a parameter constellation such that D2,D3,D4 are different from zero";
((Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->((Subscript[x, 3])[t]/.sol520[[2]]),(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->1-((Subscript[x, 3])[t]/.sol520[[2]]),(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})/.ex520[[1]]
((Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->((Subscript[x, 3])[t]/.sol520[[2]]),(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->1-((Subscript[x, 3])[t]/.sol520[[2]]),(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})/.ex520[[1]]
((Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->((Subscript[x, 3])[t]/.sol520[[2]]),(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->1-((Subscript[x, 3])[t]/.sol520[[2]]),(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})/.ex520[[1]]

CDCC and DDCC (4 and 10)

sol530=Solve[((Π[4, t, b,c,η,η]-Π[10, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->1-(Subscript[x, 4])[t],(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,(Subscript[x, 4])[t]]//FullSimplify;
FindInstance[1>=((Subscript[x, 4])[t]/.sol530[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
FindInstance[1>=((Subscript[x, 4])[t]/.sol530[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]

CCDD and DCDD (6 and 13)

sol540=Solve[((Π[6, t, b,c,η,η]-Π[13, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->1-(Subscript[x, 6])[t],(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,(Subscript[x, 6])[t]]//FullSimplify;
FindInstance[1>=((Subscript[x, 6])[t]/.sol540[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
FindInstance[1>=((Subscript[x, 6])[t]/.sol540[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]

CDDC and DDDC (11 and 15)

sol550=Solve[((Π[11, t, b,c,η,η]-Π[15, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->1-(Subscript[x, 11])[t]})==0,(Subscript[x, 11])[t]]//FullSimplify;
FindInstance[1>=((Subscript[x, 11])[t]/.sol550[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
FindInstance[1>=((Subscript[x, 11])[t]/.sol550[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]

CDCD and DDCD (7 and 14)

sol560=Solve[((Π[7, t, b,c,η,η]-Π[14, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->1-(Subscript[x, 7])[t],(Subscript[x, 15])[t]->0})==0,(Subscript[x, 7])[t]]//FullSimplify;
FindInstance[1>=((Subscript[x, 7])[t]/.sol560[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
FindInstance[1>=((Subscript[x, 7])[t]/.sol560[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]

CDDD and DDDD (12 and 16)

sol570=Solve[((Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,(Subscript[x, 12])[t]]//FullSimplify;
FindInstance[1>=((Subscript[x, 12])[t]/.sol570[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
ex570=FindInstance[1>=((Subscript[x, 12])[t]/.sol570[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
"There exists a parameter constellation such that D2,D3,D4 are different from zero";
((Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 12])[t]->((Subscript[x, 12])[t]/.sol570[[2]]),(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})/.ex570[[1]]
((Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 12])[t]->((Subscript[x, 12])[t]/.sol570[[2]]),(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})/.ex570[[1]]
((Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 12])[t]->((Subscript[x, 12])[t]/.sol570[[2]]),(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})/.ex570[[1]]

D2=0 (solutions 600+)

CCCC and CDCC (1 and 4)

sol600=Solve[((Π[1, t, b,c,η,η]-Π[4, t, b,c,η,η])/.{(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->1-(Subscript[x, 1])[t],(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,(Subscript[x, 1])[t]]//FullSimplify;
FindInstance[1>=((Subscript[x, 1])[t]/.sol600[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
FindInstance[1>=((Subscript[x, 1])[t]/.sol600[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]

CCCD and CDCD (2 and 7)

sol610=Solve[((Π[2, t, b,c,η,η]-Π[7, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->1-(Subscript[x, 2])[t],(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,(Subscript[x, 2])[t]]//FullSimplify;
FindInstance[1>=((Subscript[x, 2])[t]/.sol610[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
FindInstance[1>=((Subscript[x, 2])[t]/.sol610[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]

CCDC and CDDC (3 and 11)

sol620=Solve[((Π[3, t, b,c,η,η]-Π[11, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->1-(Subscript[x, 3])[t],(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,(Subscript[x, 3])[t]]//FullSimplify;
ex620=FindInstance[1>=((Subscript[x, 3])[t]/.sol620[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
"FindInstance[1>=((Subscript[x, 3])[t]/.sol620[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]";
"There exists a parameter constellation such that D1,D3,D4 are different from zero";
(Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 3])[t]->((Subscript[x, 3])[t]/.sol620[[1]]),(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->1-((Subscript[x, 3])[t]/.sol620[[1]]),(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}/.ex620[[1]]
(Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 3])[t]->((Subscript[x, 3])[t]/.sol620[[1]]),(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->1-((Subscript[x, 3])[t]/.sol620[[1]]),(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}/.ex620[[1]]
(Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 3])[t]->((Subscript[x, 3])[t]/.sol620[[1]]),(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->1-((Subscript[x, 3])[t]/.sol620[[1]]),(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}/.ex620[[1]]

DCCC and DDCC (5 and 10)

sol630=Solve[((Π[5, t, b,c,η,η]-Π[10, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->1-(Subscript[x, 5])[t],(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,(Subscript[x, 5])[t]]//FullSimplify;
FindInstance[1>=((Subscript[x, 5])[t]/.sol630[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
FindInstance[1>=((Subscript[x, 5])[t]/.sol630[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]

CCDD and CDDD (6 and 12)

sol640=Solve[((Π[6, t, b,c,η,η]-Π[12, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1-(Subscript[x, 6])[t],(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,(Subscript[x, 6])[t]]//FullSimplify;
FindInstance[1>=((Subscript[x, 6])[t]/.sol640[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
FindInstance[1>=((Subscript[x, 6])[t]/.sol640[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]

DCDC and DDDC (9 and 15)

sol650=Solve[((Π[9, t, b,c,η,η]-Π[15, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->1-(Subscript[x, 9])[t]})==0,(Subscript[x, 9])[t]]//FullSimplify;
FindInstance[1>=((Subscript[x, 9])[t]/.sol650[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
FindInstance[1>=((Subscript[x, 9])[t]/.sol650[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]

DCCD and DDCD (8 and 14)

sol660=Solve[((Π[8, t, b,c,η,η]-Π[14, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->1-(Subscript[x, 8])[t],(Subscript[x, 15])[t]->0})==0,(Subscript[x, 8])[t]]//Simplify;
FindInstance[1>=((Subscript[x, 8])[t]/.sol660[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
FindInstance[1>=((Subscript[x, 8])[t]/.sol660[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]

DCDD and DDDD (13 and 16)

sol670=Solve[((Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,(Subscript[x, 13])[t]]//FullSimplify
ex670=FindInstance[1>=((Subscript[x, 13])[t]/.sol670[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
FindInstance[1>=((Subscript[x, 13])[t]/.sol670[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
"There exists a parameter constellation such that D1,D3,D4 are different from zero";
(Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->((Subscript[x, 13])[t]/.sol670[[1]]),(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}/.ex670[[1]]
(Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->((Subscript[x, 13])[t]/.sol670[[1]]),(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}/.ex670[[1]]
(Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->((Subscript[x, 13])[t]/.sol670[[1]]),(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}/.ex670[[1]]

D3=0 (solutions 700+)

CCCC and CCDC (1 and 3)

sol700=Solve[((Π[1, t, b,c,η,η]-Π[3, t, b,c,η,η])/.{(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->1-(Subscript[x, 1])[t],(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,(Subscript[x, 1])[t]]//FullSimplify;
FindInstance[1>=((Subscript[x, 1])[t]/.sol700[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
ex700=FindInstance[1>=((Subscript[x, 1])[t]/.sol700[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
"There exists a parameter constellation such that D1,D2,D4 are different from zero";
(Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->((Subscript[x, 1])[t]/.sol700[[2]]),(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->1-((Subscript[x, 1])[t]/.sol700[[2]]),(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}/.ex700[[1]]
(Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->((Subscript[x, 1])[t]/.sol700[[2]]),(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->1-((Subscript[x, 1])[t]/.sol700[[2]]),(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}/.ex700[[1]]
(Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->((Subscript[x, 1])[t]/.sol700[[2]]),(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->1-((Subscript[x, 1])[t]/.sol700[[2]]),(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}/.ex700[[1]]

CCCD and CCDD (2 and 6)

sol710=Solve[((Π[2, t, b,c,η,η]-Π[6, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->1-(Subscript[x, 2])[t],(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,(Subscript[x, 2])[t]]//FullSimplify;
FindInstance[1>=((Subscript[x, 2])[t]/.sol710[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
ex710=FindInstance[1>=((Subscript[x, 2])[t]/.sol710[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
"There exists a parameter constellation such that D1,D2,D4 are different from zero";
(Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->((Subscript[x, 2])[t]/.sol710[[1]]),(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->1-((Subscript[x, 2])[t]/.sol710[[1]]),(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}/.ex710[[1]]
(Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->((Subscript[x, 2])[t]/.sol710[[1]]),(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->1-((Subscript[x, 2])[t]/.sol710[[1]]),(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}/.ex710[[1]]
(Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->((Subscript[x, 2])[t]/.sol710[[1]]),(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->1-((Subscript[x, 2])[t]/.sol710[[1]]),(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}/.ex710[[1]]

CDCC and CDDC (4 and 11)

sol720=Solve[((Π[4, t, b,c,η,η]-Π[11, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->1-(Subscript[x, 4])[t],(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,(Subscript[x, 4])[t]]//FullSimplify;
FindInstance[1>=((Subscript[x, 4])[t]/.sol720[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
FindInstance[1>=((Subscript[x, 4])[t]/.sol720[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]

DCCC and DCDC (5 and 9)

sol730=Solve[((Π[5, t, b,c,η,η]-Π[9, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->1-(Subscript[x, 5])[t],(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,(Subscript[x, 5])[t]]//FullSimplify;
FindInstance[1>=((Subscript[x, 5])[t]/.sol730[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
FindInstance[1>=((Subscript[x, 5])[t]/.sol730[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]

CDCD and CDDD (7 and 12)

sol740=Solve[((Π[7, t, b,c,η,η]-Π[12, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1-(Subscript[x, 7])[t],(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,(Subscript[x, 7])[t]]//FullSimplify
ex740=FindInstance[1>=((Subscript[x, 7])[t]/.sol740[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
FindInstance[1>=((Subscript[x, 7])[t]/.sol740[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
"There exists a parameter constellation such that D1,D2,D4 are different from zero";
(Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->((Subscript[x, 7])[t]/.sol740[[1]]),(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1-((Subscript[x, 7])[t]/.sol740[[1]]),(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}/.ex740[[1]]
(Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->((Subscript[x, 7])[t]/.sol740[[1]]),(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1-((Subscript[x, 7])[t]/.sol740[[1]]),(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}/.ex740[[1]]
(Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->((Subscript[x, 7])[t]/.sol740[[1]]),(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1-((Subscript[x, 7])[t]/.sol740[[1]]),(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}/.ex740[[1]]

DDCC and DDDC (10 and 15)

sol750=Solve[((Π[10, t, b,c,η,η]-Π[15, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->1-(Subscript[x, 10])[t]})==0,(Subscript[x, 10])[t]]//FullSimplify;
FindInstance[1>=((Subscript[x, 10])[t]/.sol750[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
FindInstance[1>=((Subscript[x, 10])[t]/.sol750[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]

DCCD and DCDD (8 and 13)

sol760=Solve[((Π[8, t, b,c,η,η]-Π[13, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->1-(Subscript[x, 8])[t],(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,(Subscript[x, 8])[t]]//FullSimplify;
FindInstance[1>=((Subscript[x, 8])[t]/.sol760[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
ex760=FindInstance[1>=((Subscript[x, 8])[t]/.sol760[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
"There exists a parameter constellation such that D1,D2,D4 are different from zero";
(Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->((Subscript[x, 8])[t]/.sol760[[2]]),(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->1-((Subscript[x, 8])[t]/.sol760[[2]]),(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}/.ex760[[1]]
(Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->((Subscript[x, 8])[t]/.sol760[[2]]),(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->1-((Subscript[x, 8])[t]/.sol760[[2]]),(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}/.ex760[[1]]
(Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->((Subscript[x, 8])[t]/.sol760[[2]]),(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->1-((Subscript[x, 8])[t]/.sol760[[2]]),(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}/.ex760[[1]]

DDCD and DDDD (14 and 16)

sol770=Solve[((Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 15])[t]->0})==0,(Subscript[x, 14])[t]]//FullSimplify;
FindInstance[1>=((Subscript[x, 14])[t]/.sol770[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
FindInstance[1>=((Subscript[x, 14])[t]/.sol770[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]

D4=0 (solutions 800+)

CCCC and CCCD (1 and 2)

sol800=Solve[((Π[1, t, b,c,η,η]-Π[2, t, b,c,η,η])/.{(Subscript[x, 2])[t]->1-(Subscript[x, 1])[t],(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,(Subscript[x, 1])[t]]//FullSimplify;
ex800=FindInstance[1>=((Subscript[x, 1])[t]/.sol800[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
FindInstance[1>=((Subscript[x, 1])[t]/.sol800[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
"There exists a parameter constellation such that D1,D2,D3 are different from zero";
(Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->((Subscript[x, 1])[t]/.sol800[[1]]),(Subscript[x, 2])[t]->1-((Subscript[x, 1])[t]/.sol800[[1]]),(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}/.ex800[[1]]
(Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->((Subscript[x, 1])[t]/.sol800[[1]]),(Subscript[x, 2])[t]->1-((Subscript[x, 1])[t]/.sol800[[1]]),(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}/.ex800[[1]]
(Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->((Subscript[x, 1])[t]/.sol800[[1]]),(Subscript[x, 2])[t]->1-((Subscript[x, 1])[t]/.sol800[[1]]),(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}/.ex800[[1]]

CCDC and CCDD (3 and 6)

sol810=Solve[((Π[3, t, b,c,η,η]-Π[6, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->1-(Subscript[x, 3])[t],(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,(Subscript[x, 3])[t]]//FullSimplify;
FindInstance[1>=((Subscript[x, 3])[t]/.sol810[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
FindInstance[1>=((Subscript[x, 3])[t]/.sol810[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]

CDCC and CDCD (4 and 7)

sol820=Solve[((Π[4, t, b,c,η,η]-Π[7, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->1-(Subscript[x, 4])[t],(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,(Subscript[x, 4])[t]]//FullSimplify;
FindInstance[1>=((Subscript[x, 4])[t]/.sol820[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
FindInstance[1>=((Subscript[x, 4])[t]/.sol820[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]

DCCC and DCCD (5 and 8)

sol830=Solve[((Π[5, t, b,c,η,η]-Π[8, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->1-(Subscript[x, 5])[t],(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,(Subscript[x, 5])[t]]//FullSimplify;
FindInstance[1>=((Subscript[x, 5])[t]/.sol830[[1]])>0&&b>c>0&&0<η<0.2,{b,c,η}]
FindInstance[1>=((Subscript[x, 5])[t]/.sol830[[2]])>0&&b>c>0&&0<η<0.2,{b,c,η}]

CDDC and CDDD (11 and 12)

sol840=Solve[((Π[11, t, b,c,η,η]-Π[12, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 12])[t]->1-(Subscript[x, 11])[t],(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,(Subscript[x, 11])[t]]//FullSimplify;
FindInstance[1>=((Subscript[x, 11])[t]/.sol840[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
FindInstance[1>=((Subscript[x, 11])[t]/.sol840[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]

DCDC and DCDD (9 and 13)

sol850=Solve[((Π[9, t, b,c,η,η]-Π[13, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->1-(Subscript[x, 9])[t],(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,(Subscript[x, 9])[t]]//FullSimplify;
FindInstance[1>=((Subscript[x, 9])[t]/.sol850[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
FindInstance[1>=((Subscript[x, 9])[t]/.sol850[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]

DDCC and DDCD (10 and 14)

sol860=Solve[((Π[10, t, b,c,η,η]-Π[14, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->1-(Subscript[x, 10])[t],(Subscript[x, 15])[t]->0})==0,(Subscript[x, 10])[t]]//FullSimplify;
FindInstance[1>=((Subscript[x, 10])[t]/.sol860[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
FindInstance[1≥((Subscript[x, 10])[t]/.sol860[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]

DDDC and DDDD (15 and 16)

sol870=Solve[((Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0})==0,(Subscript[x, 15])[t]]//FullSimplify;
FindInstance[1>=((Subscript[x, 15])[t]/.sol870[[1]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]
FindInstance[1>=((Subscript[x, 15])[t]/.sol870[[2]])>=0&&b>c>0&&0<η<0.2,{b,c,η}]

RESULT: (3,9) (12,16) (3,11) (13,16) (1,3) (2,6) (7,12) (8,13) (1,2) could be a stable!

3.3 Equilibria with 4 strategies (24=6x4 candidates, two basic payoff difference zero, make use of the nessary condition that all other differences)

D1=D2=0 (solutions 1000+)

XYCC (1, 4, 5, 10)

var3=((Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->1-(Subscript[x, 1])[t]-(Subscript[x, 4])[t]-(Subscript[x, 5])[t],(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})//Simplify;
var4=((Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->1-(Subscript[x, 1])[t]-(Subscript[x, 4])[t]-(Subscript[x, 5])[t],(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})//Simplify;
Denominator[var3]-Denominator[var4]//Simplify
sol1000a=Solve[Numerator[var3]==0&&Numerator[var4]==0,{(Subscript[x, 1])[t],(Subscript[x, 4])[t],(Subscript[x, 5])[t]}]//Simplify

FindInstance[((Subscript[x, 4])[t]/.sol1000a[[1,1]])>=0&&((Subscript[x, 5])[t]/.sol1000a[[1,2]])>=0&&(Subscript[x, 1])[t]>=0&&(Subscript[x, 1])[t]+((Subscript[x, 4])[t]/.sol1000a[[1,1]])+((Subscript[x, 5])[t]/.sol1000a[[1,2]])<=1&&b>1&&0<τ<0.2,{b,τ,(Subscript[x, 1])[t]}]
FindInstance[((Subscript[x, 4])[t]/.sol1000a[[2,1]])>=0&&((Subscript[x, 5])[t]/.sol1000a[[2,2]])>=0&&(Subscript[x, 1])[t]>=0&&(Subscript[x, 1])[t]+((Subscript[x, 4])[t]/.sol1000a[[2,1]])+((Subscript[x, 5])[t]/.sol1000a[[2,2]])<=1&&b>1&&0<τ<0.2,{b,τ,(Subscript[x, 1])[t]}]
FindInstance[((Subscript[x, 4])[t]/.sol1000a[[3,1]])>=0&&((Subscript[x, 5])[t]/.sol1000a[[3,2]])>=0&&(Subscript[x, 1])[t]>=0&&(Subscript[x, 1])[t]+((Subscript[x, 4])[t]/.sol1000a[[3,1]])+((Subscript[x, 5])[t]/.sol1000a[[3,2]])<=1&&b>1&&0<τ<0.2,{b,τ,(Subscript[x, 1])[t]}]
FindInstance[((Subscript[x, 4])[t]/.sol1000a[[4,1]])>=0&&((Subscript[x, 5])[t]/.sol1000a[[4,2]])>=0&&(Subscript[x, 1])[t]>=0&&(Subscript[x, 1])[t]+((Subscript[x, 4])[t]/.sol1000a[[4,1]])+((Subscript[x, 5])[t]/.sol1000a[[4,2]])<=1&&b>1&&0<τ<0.2,{b,τ,(Subscript[x, 1])[t]}]
FindInstance[((Subscript[x, 4])[t]/.sol1000a[[5,1]])>=0&&((Subscript[x, 5])[t]/.sol1000a[[5,2]])>=0&&(Subscript[x, 1])[t]>=0&&(Subscript[x, 1])[t]+((Subscript[x, 4])[t]/.sol1000a[[5,1]])+((Subscript[x, 5])[t]/.sol1000a[[5,2]])<=1&&b>1&&0<τ<0.2,{b,τ,(Subscript[x, 1])[t]}]
FindInstance[((Subscript[x, 4])[t]/.sol1000a[[6,1]])>=0&&((Subscript[x, 5])[t]/.sol1000a[[6,2]])>=0&&(Subscript[x, 1])[t]>=0&&(Subscript[x, 1])[t]+((Subscript[x, 4])[t]/.sol1000a[[6,1]])+((Subscript[x, 5])[t]/.sol1000a[[6,2]])<=1&&b>1&&0<τ<0.2,{b,τ,(Subscript[x, 1])[t]}]

XYCD (2, 7, 8, 14)

sol1010=Solve[((Π[2, t, b,c,η,η]-Π[8, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->1-(Subscript[x, 2])[t]-(Subscript[x, 7])[t]-(Subscript[x, 8])[t],(Subscript[x, 15])[t]->0})==0&&((Π[2, t, b,c,η,η]-Π[7, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->1-(Subscript[x, 2])[t]-(Subscript[x, 7])[t]-(Subscript[x, 8])[t],(Subscript[x, 15])[t]->0})==0,{(Subscript[x, 2])[t],(Subscript[x, 7])[t],(Subscript[x, 8])[t]}]//FullSimplify
FindInstance[((Subscript[x, 7])[t]/.sol1010[[1,1]])>=0&&((Subscript[x, 8])[t]/.sol1010[[1,2]])>0.01&&(Subscript[x, 2])[t]>=0&&(Subscript[x, 2])[t]+((Subscript[x, 7])[t]/.sol1010[[1,1]])+((Subscript[x, 8])[t]/.sol1010[[1,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 2])[t]}]
FindInstance[((Subscript[x, 7])[t]/.sol1010[[2,1]])>=0&&((Subscript[x, 8])[t]/.sol1010[[2,2]])>=0&&(Subscript[x, 2])[t]>=0&&(Subscript[x, 2])[t]+((Subscript[x, 7])[t]/.sol1010[[2,1]])+((Subscript[x, 8])[t]/.sol1010[[2,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 2])[t]}]
FindInstance[((Subscript[x, 7])[t]/.sol1010[[3,1]])>=0&&((Subscript[x, 8])[t]/.sol1010[[3,2]])>=0&&(Subscript[x, 2])[t]>=0&&(Subscript[x, 2])[t]+((Subscript[x, 7])[t]/.sol1010[[3,1]])+((Subscript[x, 8])[t]/.sol1010[[3,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 2])[t]}]
ex1010=FindInstance[((Subscript[x, 7])[t]/.sol1010[[4,1]])>=0&&((Subscript[x, 8])[t]/.sol1010[[4,2]])>=0&&(Subscript[x, 2])[t]>=0&&(Subscript[x, 2])[t]+((Subscript[x, 7])[t]/.sol1010[[4,1]])+((Subscript[x, 8])[t]/.sol1010[[4,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 2])[t]}]
"There exists a parameter constellation such that D3,D4 are different from zero";
(Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->((Subscript[x, 7])[t]/.sol1010[[4,1]]),(Subscript[x, 8])[t]->((Subscript[x, 8])[t]/.sol1010[[4,2]]),(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->1-(Subscript[x, 2])[t]-((Subscript[x, 7])[t]/.sol1010[[4,1]])-((Subscript[x, 8])[t]/.sol1010[[4,2]]),(Subscript[x, 15])[t]->0}/.ex1010[[1]]
(Π[1, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->((Subscript[x, 7])[t]/.sol1010[[4,1]]),(Subscript[x, 8])[t]->((Subscript[x, 8])[t]/.sol1010[[4,2]]),(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->1-(Subscript[x, 2])[t]-((Subscript[x, 7])[t]/.sol1010[[4,1]])-((Subscript[x, 8])[t]/.sol1010[[4,2]]),(Subscript[x, 15])[t]->0}/.ex1010[[1]]

XYDC (3, 9, 11, 15)

sol1020=Solve[((Π[3, t, b,c,η,η]-Π[9, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->1-(Subscript[x, 3])[t]-(Subscript[x, 9])[t]-(Subscript[x, 11])[t]})==0&&((Π[3, t, b,c,η,η]-Π[11, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->1-(Subscript[x, 3])[t]-(Subscript[x, 9])[t]-(Subscript[x, 11])[t]})==0,{(Subscript[x, 3])[t],(Subscript[x, 9])[t],(Subscript[x, 11])[t]}]//FullSimplify
FindInstance[((Subscript[x, 9])[t]/.sol1020[[1,1]])≥0&&((Subscript[x, 11])[t]/.sol1020[[1,2]])≥0&&(Subscript[x, 3])[t]≥0&&(Subscript[x, 3])[t]+((Subscript[x, 9])[t]/.sol1020[[1,1]])+((Subscript[x, 11])[t]/.sol1020[[1,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 3])[t]}]
FindInstance[((Subscript[x, 9])[t]/.sol1020[[2,1]])≥0&&((Subscript[x, 11])[t]/.sol1020[[2,2]])≥0&&(Subscript[x, 3])[t]≥0&&(Subscript[x, 3])[t]+((Subscript[x, 9])[t]/.sol1020[[2,1]])+((Subscript[x, 11])[t]/.sol1020[[2,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 3])[t]}]
FindInstance[((Subscript[x, 9])[t]/.sol1020[[3,1]])≥0&&((Subscript[x, 11])[t]/.sol1020[[3,2]])≥0&&(Subscript[x, 3])[t]≥0&&(Subscript[x, 3])[t]+((Subscript[x, 9])[t]/.sol1020[[3,1]])+((Subscript[x, 11])[t]/.sol1020[[3,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 3])[t]}]
ex1020=FindInstance[((Subscript[x, 9])[t]/.sol1020[[4,1]])≥0&&((Subscript[x, 11])[t]/.sol1020[[4,2]])≥0&&(Subscript[x, 3])[t]≥0&&(Subscript[x, 3])[t]+((Subscript[x, 9])[t]/.sol1020[[4,1]])+((Subscript[x, 11])[t]/.sol1020[[4,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 3])[t]}]
"There exists a parameter constellation such that D3,D4 are different from zero";
(Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->((Subscript[x, 9])[t]/.sol1020[[4,1]]),(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->((Subscript[x, 11])[t]/.sol1020[[4,2]]),(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->1-(Subscript[x, 3])[t]-((Subscript[x, 9])[t]/.sol1020[[4,1]])-((Subscript[x, 11])[t]/.sol1020[[4,2]])}/.ex1020[[1]]
(Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->((Subscript[x, 9])[t]/.sol1020[[4,1]]),(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->((Subscript[x, 11])[t]/.sol1020[[4,2]]),(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->1-(Subscript[x, 3])[t]-((Subscript[x, 9])[t]/.sol1020[[4,1]])-((Subscript[x, 11])[t]/.sol1020[[4,2]])}/.ex1020[[1]]

XYDD (6, 12, 13, 16)

sol1030=Solve[((Π[6, t, b,c,η,η]-Π[13, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0&&((Π[6, t, b,c,η,η]-Π[12, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,{(Subscript[x, 6])[t],(Subscript[x, 12])[t],(Subscript[x, 13])[t]}]//FullSimplify
FindInstance[((Subscript[x, 12])[t]/.sol1030[[1,1]])≥0&&((Subscript[x, 13])[t]/.sol1030[[1,2]])≥0&&(Subscript[x, 6])[t]≥0&&(Subscript[x, 6])[t]+((Subscript[x, 12])[t]/.sol1030[[1,1]])+((Subscript[x, 13])[t]/.sol1030[[1,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 6])[t]}]
FindInstance[((Subscript[x, 12])[t]/.sol1030[[2,1]])≥0&&((Subscript[x, 13])[t]/.sol1030[[2,2]])≥0&&(Subscript[x, 6])[t]>0&&(Subscript[x, 6])[t]+((Subscript[x, 12])[t]/.sol1030[[2,1]])+((Subscript[x, 13])[t]/.sol1030[[2,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 6])[t]}]
FindInstance[((Subscript[x, 12])[t]/.sol1030[[3,1]])≥0&&((Subscript[x, 13])[t]/.sol1030[[3,2]])≥0&&(Subscript[x, 6])[t]≥0&&(Subscript[x, 6])[t]+((Subscript[x, 12])[t]/.sol1030[[3,1]])+((Subscript[x, 13])[t]/.sol1030[[3,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 6])[t]}]
"NOTE: D3=D4=0!"
((Π[6, t, b,c,η,η]-Π[2, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->((Subscript[x, 12])[t]/.sol1030[[2,1]]),(Subscript[x, 13])[t]->((Subscript[x, 13])[t]/.sol1030[[2,2]]),(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})//FullSimplify
((Π[6, t, b,c,η,η]-Π[3, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->((Subscript[x, 12])[t]/.sol1030[[2,1]]),(Subscript[x, 13])[t]->((Subscript[x, 13])[t]/.sol1030[[2,2]]),(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})//FullSimplify

D1=D3=0 (solutions 1100+)

CCCC and DCDC -- 1, 3, 5, 9 (CCCC-DCCC=0 and CCCC-CCDC=0 : 1,5 and 1,3)

sol1100=Solve[((Π[1, t, b,c,η,η]-Π[5, t, b,c,η,η])/.{(Subscript[x, 2])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->1-(Subscript[x, 1])[t]-(Subscript[x, 3])[t]-(Subscript[x, 5])[t],(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0&&((Π[1, t, b,c,η,η]-Π[3, t, b,c,η,η])/.{(Subscript[x, 2])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->1-(Subscript[x, 1])[t]-(Subscript[x, 3])[t]-(Subscript[x, 5])[t],(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,{(Subscript[x, 1])[t],(Subscript[x, 3])[t],(Subscript[x, 5])[t]}]//FullSimplify
FindInstance[((Subscript[x, 1])[t]/.sol1100[[1,1]])≥0&&((Subscript[x, 5])[t]/.sol1100[[1,2]])≥0&&(Subscript[x, 3])[t]≥0&&(Subscript[x, 3])[t]+((Subscript[x, 1])[t]/.sol1100[[1,1]])+((Subscript[x, 5])[t]/.sol1100[[1,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 3])[t]}]

CCCD and DCDD -- 2, 6, 8, 13 (CCCD-DCCD=0 and CCCD-CCDD=0 : 2,8 and 2,6)

sol1110=Solve[((Π[2, t, b,c,η,η]-Π[8, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->1-(Subscript[x, 2])[t]-(Subscript[x, 6])[t]-(Subscript[x, 8])[t],(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0&&((Π[2, t, b,c,η,η]-Π[6, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->1-(Subscript[x, 2])[t]-(Subscript[x, 6])[t]-(Subscript[x, 8])[t],(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,{(Subscript[x, 2])[t],(Subscript[x, 6])[t],(Subscript[x, 8])[t]}]//FullSimplify
FindInstance[((Subscript[x, 6])[t]/.sol1110[[1,1]])≥0&&((Subscript[x, 8])[t]/.sol1110[[1,2]])≥0&&(Subscript[x, 2])[t]≥0&&(Subscript[x, 2])[t]+((Subscript[x, 6])[t]/.sol1110[[1,1]])+((Subscript[x, 8])[t]/.sol1110[[1,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 2])[t]}]
FindInstance[((Subscript[x, 6])[t]/.sol1110[[2,1]])≥0&&((Subscript[x, 8])[t]/.sol1110[[2,2]])≥0&&(Subscript[x, 2])[t]≥0&&(Subscript[x, 2])[t]+((Subscript[x, 6])[t]/.sol1110[[2,1]])+((Subscript[x, 8])[t]/.sol1110[[2,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 2])[t]}]

CDCC and DDDC -- 4, 10, 11, 15 (CDCC-DDCC=0 and CDCC-CDDC=0 : 4,10 and 4,11)

sol1120=Solve[((Π[4, t, b,c,η,η]-Π[10, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->1-(Subscript[x, 4])[t]-(Subscript[x, 10])[t]-(Subscript[x, 11])[t]})==0&&((Π[4, t, b,c,η,η]-Π[11, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->1-(Subscript[x, 4])[t]-(Subscript[x, 10])[t]-(Subscript[x, 11])[t]})==0,{(Subscript[x, 4])[t],(Subscript[x, 10])[t],(Subscript[x, 11])[t]}]//FullSimplify
FindInstance[((Subscript[x, 10])[t]/.sol1120[[1,1]])≥0&&((Subscript[x, 11])[t]/.sol1120[[1,2]])≥0&&(Subscript[x, 4])[t]≥0&&(Subscript[x, 4])[t]+((Subscript[x, 10])[t]/.sol1120[[1,1]])+((Subscript[x, 11])[t]/.sol1120[[1,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 4])[t]}]
FindInstance[((Subscript[x, 10])[t]/.sol1120[[2,1]])≥0&&((Subscript[x, 11])[t]/.sol1120[[2,2]])≥0&&(Subscript[x, 4])[t]≥0&&(Subscript[x, 4])[t]+((Subscript[x, 10])[t]/.sol1120[[2,1]])+((Subscript[x, 11])[t]/.sol1120[[2,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 4])[t]}]

CDCD and DDDD -- 7, 12, 14, 16 (CDCD-DDCD=0 and CDCD-CDDD=0 : 7,14 and 7,12)

sol1130=Solve[((Π[7, t, b,c,η,η]-Π[14, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 15])[t]->0})==0&&((Π[7, t, b,c,η,η]-Π[12, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 15])[t]->0})==0,{(Subscript[x, 7])[t],(Subscript[x, 12])[t],(Subscript[x, 14])[t]}]//FullSimplify
FindInstance[((Subscript[x, 12])[t]/.sol1130[[1,1]])≥0&&((Subscript[x, 14])[t]/.sol1130[[1,2]])≥0&&(Subscript[x, 7])[t]≥0&&(Subscript[x, 7])[t]+((Subscript[x, 12])[t]/.sol1130[[1,1]])+((Subscript[x, 14])[t]/.sol1130[[1,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 7])[t]}]

D1=D4=0 (solutions 1200+)

XCCY  (1, 2, 5, 8)

sol1200=Solve[((Π[1, t, b,c,η,η]-Π[5, t, b,c,η,η])/.{(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->1-(Subscript[x, 1])[t]-(Subscript[x, 2])[t]-(Subscript[x, 5])[t],(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0&&((Π[1, t, b,c,η,η]-Π[2, t, b,c,η,η])/.{(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->1-(Subscript[x, 1])[t]-(Subscript[x, 2])[t]-(Subscript[x, 5])[t],(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,{(Subscript[x, 1])[t],(Subscript[x, 2])[t],(Subscript[x, 5])[t]}]//FullSimplify
FindInstance[((Subscript[x, 2])[t]/.sol1200[[1,1]])≥0&&((Subscript[x, 5])[t]/.sol1200[[1,2]])≥0&&(Subscript[x, 1])[t]≥0&&(Subscript[x, 1])[t]+((Subscript[x, 2])[t]/.sol1200[[1,1]])+((Subscript[x, 5])[t]/.sol1200[[1,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 1])[t]}]
FindInstance[((Subscript[x, 2])[t]/.sol1200[[2,1]])≥0&&((Subscript[x, 5])[t]/.sol1200[[2,2]])≥0&&(Subscript[x, 1])[t]≥0&&(Subscript[x, 1])[t]+((Subscript[x, 2])[t]/.sol1200[[2,1]])+((Subscript[x, 5])[t]/.sol1200[[2,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 1])[t]}]
FindInstance[((Subscript[x, 2])[t]/.sol1200[[3,1]])≥0&&((Subscript[x, 5])[t]/.sol1200[[3,2]])≥0&&(Subscript[x, 1])[t]≥0&&(Subscript[x, 1])[t]+((Subscript[x, 2])[t]/.sol1200[[3,1]])+((Subscript[x, 5])[t]/.sol1200[[3,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 1])[t]}]
FindInstance[((Subscript[x, 2])[t]/.sol1200[[4,1]])≥0&&((Subscript[x, 5])[t]/.sol1200[[4,2]])≥0&&(Subscript[x, 1])[t]≥0&&(Subscript[x, 1])[t]+((Subscript[x, 2])[t]/.sol1200[[4,1]])+((Subscript[x, 5])[t]/.sol1200[[4,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 1])[t]}]

XCDY (3, 6, 9, 13)

sol1210=Solve[((Π[3, t, b,c,η,η]-Π[6, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->1-(Subscript[x, 3])[t]-(Subscript[x, 6])[t]-(Subscript[x, 9])[t],(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0&&((Π[3, t, b,c,η,η]-Π[9, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->1-(Subscript[x, 3])[t]-(Subscript[x, 6])[t]-(Subscript[x, 9])[t],(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,{(Subscript[x, 3])[t],(Subscript[x, 6])[t],(Subscript[x, 9])[t]}]//FullSimplify
FindInstance[((Subscript[x, 6])[t]/.sol1210[[1,1]])≥0&&((Subscript[x, 9])[t]/.sol1210[[1,2]])≥0&&(Subscript[x, 3])[t]≥0&&(Subscript[x, 3])[t]+((Subscript[x, 6])[t]/.sol1210[[1,1]])+((Subscript[x, 9])[t]/.sol1210[[1,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 3])[t]}]
FindInstance[((Subscript[x, 6])[t]/.sol1210[[2,1]])≥0&&((Subscript[x, 9])[t]/.sol1210[[2,2]])≥0&&(Subscript[x, 3])[t]>0&&(Subscript[x, 3])[t]+((Subscript[x, 6])[t]/.sol1210[[2,1]])+((Subscript[x, 9])[t]/.sol1210[[2,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 3])[t]}]
FindInstance[((Subscript[x, 6])[t]/.sol1210[[3,1]])≥0&&((Subscript[x, 9])[t]/.sol1210[[3,2]])≥0&&(Subscript[x, 3])[t]≥0&&(Subscript[x, 3])[t]+((Subscript[x, 6])[t]/.sol1210[[3,1]])+((Subscript[x, 9])[t]/.sol1210[[3,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 3])[t]}]
FindInstance[((Subscript[x, 6])[t]/.sol1210[[4,1]])≥0&&((Subscript[x, 9])[t]/.sol1210[[4,2]])≥0&&(Subscript[x, 3])[t]≥0&&(Subscript[x, 3])[t]+((Subscript[x, 6])[t]/.sol1210[[4,1]])+((Subscript[x, 9])[t]/.sol1210[[4,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 3])[t]}]
"NOTE: D2=D3=0!"
((Π[3, t, b,c,η,η]-Π[1, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->((Subscript[x, 6])[t]/.sol1210[[2,1]]),(Subscript[x, 7])[t]->0,(Subscript[x, 9])[t]->((Subscript[x, 9])[t]/.sol1210[[2,2]]),(Subscript[x, 8])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->1-(Subscript[x, 3])[t]-((Subscript[x, 6])[t]/.sol1210[[2,1]])-((Subscript[x, 9])[t]/.sol1210[[2,2]]),(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})//FullSimplify
((Π[1, t, b,c,η,η]-Π[4, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->((Subscript[x, 6])[t]/.sol1210[[2,1]]),(Subscript[x, 7])[t]->0,(Subscript[x, 9])[t]->((Subscript[x, 9])[t]/.sol1210[[2,2]]),(Subscript[x, 8])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->1-(Subscript[x, 3])[t]-((Subscript[x, 6])[t]/.sol1210[[2,1]])-((Subscript[x, 9])[t]/.sol1210[[2,2]]),(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})//FullSimplify

XDCY  (4, 7, 10, 14)

sol1220=Solve[((Π[4, t, b,c,η,η]-Π[7, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->1-(Subscript[x, 4])[t]-(Subscript[x, 7])[t]-(Subscript[x, 10])[t],(Subscript[x, 15])[t]->0})==0&&((Π[4, t, b,c,η,η]-Π[10, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->1-(Subscript[x, 4])[t]-(Subscript[x, 7])[t]-(Subscript[x, 10])[t],(Subscript[x, 15])[t]->0})==0,{(Subscript[x, 4])[t],(Subscript[x, 7])[t],(Subscript[x, 10])[t]}]//FullSimplify
FindInstance[((Subscript[x, 7])[t]/.sol1220[[1,1]])≥0&&((Subscript[x, 10])[t]/.sol1220[[1,2]])≥0&&(Subscript[x, 4])[t]≥0&&(Subscript[x, 4])[t]+((Subscript[x, 7])[t]/.sol1220[[1,1]])+((Subscript[x, 10])[t]/.sol1220[[1,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 4])[t]}]
FindInstance[((Subscript[x, 7])[t]/.sol1220[[2,1]])≥0&&((Subscript[x, 10])[t]/.sol1220[[2,2]])≥0&&(Subscript[x, 4])[t]≥0&&(Subscript[x, 4])[t]+((Subscript[x, 7])[t]/.sol1220[[2,1]])+((Subscript[x, 10])[t]/.sol1220[[2,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 4])[t]}]
FindInstance[((Subscript[x, 7])[t]/.sol1220[[3,1]])≥0&&((Subscript[x, 10])[t]/.sol1220[[3,2]])≥0&&(Subscript[x, 4])[t]≥0&&(Subscript[x, 4])[t]+((Subscript[x, 7])[t]/.sol1220[[3,1]])+((Subscript[x, 10])[t]/.sol1220[[3,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 4])[t]}]
FindInstance[((Subscript[x, 7])[t]/.sol1220[[4,1]])≥0&&((Subscript[x, 10])[t]/.sol1220[[4,2]])≥0&&(Subscript[x, 4])[t]≥0&&(Subscript[x, 4])[t]+((Subscript[x, 7])[t]/.sol1220[[4,1]])+((Subscript[x, 10])[t]/.sol1220[[4,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 4])[t]}]

XDDY  (11, 12, 15, 16)

sol1230=Solve[((Π[11, t, b,c,η,η]-Π[12, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0})==0&&((Π[11, t, b,c,η,η]-Π[15, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0})==0,{(Subscript[x, 11])[t],(Subscript[x, 12])[t],(Subscript[x, 15])[t]}]//FullSimplify
FindInstance[((Subscript[x, 11])[t]/.sol1230[[1,1]])≥0&&((Subscript[x, 15])[t]/.sol1230[[1,2]])≥0&&(Subscript[x, 12])[t]≥0&&(Subscript[x, 12])[t]+((Subscript[x, 11])[t]/.sol1230[[1,1]])+((Subscript[x, 15])[t]/.sol1230[[1,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 12])[t]}]
FindInstance[((Subscript[x, 11])[t]/.sol1230[[2,1]])≥0&&((Subscript[x, 15])[t]/.sol1230[[2,2]])≥0&&(Subscript[x, 12])[t]≥0&&(Subscript[x, 12])[t]+((Subscript[x, 11])[t]/.sol1230[[2,1]])+((Subscript[x, 15])[t]/.sol1230[[2,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 12])[t]}]
FindInstance[((Subscript[x, 11])[t]/.sol1230[[3,1]])≥0&&((Subscript[x, 15])[t]/.sol1230[[3,2]])≥0&&(Subscript[x, 12])[t]≥0&&(Subscript[x, 12])[t]+((Subscript[x, 11])[t]/.sol1230[[3,1]])+((Subscript[x, 15])[t]/.sol1230[[3,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 12])[t]}]
FindInstance[((Subscript[x, 11])[t]/.sol1230[[4,1]])≥0&&((Subscript[x, 15])[t]/.sol1230[[4,2]])≥0&&(Subscript[x, 12])[t]≥0&&(Subscript[x, 12])[t]+((Subscript[x, 11])[t]/.sol1230[[4,1]])+((Subscript[x, 15])[t]/.sol1230[[4,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 12])[t]}]

D2=D3=0 (solutions 1300+)

CXYC  (1, 3, 4, 1)

sol1300=Solve[((Π[1, t, b,c,η,η]-Π[3, t, b,c,η,η])/.{(Subscript[x, 2])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->1-(Subscript[x, 1])[t]-(Subscript[x, 3])[t]-(Subscript[x, 4])[t],(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0&&((Π[1, t, b,c,η,η]-Π[4, t, b,c,η,η])/.{(Subscript[x, 2])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->1-(Subscript[x, 1])[t]-(Subscript[x, 3])[t]-(Subscript[x, 4])[t],(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,{(Subscript[x, 1])[t],(Subscript[x, 3])[t],(Subscript[x, 4])[t]}]//FullSimplify
FindInstance[((Subscript[x, 3])[t]/.sol1300[[1,1]])≥0&&((Subscript[x, 4])[t]/.sol1300[[1,2]])≥0&&(Subscript[x, 1])[t]≥0&&(Subscript[x, 1])[t]+((Subscript[x, 3])[t]/.sol1300[[1,1]])+((Subscript[x, 4])[t]/.sol1300[[1,2]])≤1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 1])[t]}]
FindInstance[((Subscript[x, 3])[t]/.sol1300[[2,1]])≥0&&((Subscript[x, 4])[t]/.sol1300[[2,2]])≥0&&(Subscript[x, 1])[t]≥0&&(Subscript[x, 1])[t]+((Subscript[x, 3])[t]/.sol1300[[2,1]])+((Subscript[x, 4])[t]/.sol1300[[2,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 1])[t]}]
FindInstance[((Subscript[x, 3])[t]/.sol1300[[3,1]])≥0&&((Subscript[x, 4])[t]/.sol1300[[3,2]])≥0&&(Subscript[x, 1])[t]≥0&&(Subscript[x, 1])[t]+((Subscript[x, 3])[t]/.sol1300[[3,1]])+((Subscript[x, 4])[t]/.sol1300[[3,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 1])[t]}]
FindInstance[((Subscript[x, 3])[t]/.sol1300[[4,1]])≥0&&((Subscript[x, 4])[t]/.sol1300[[4,2]])≥0&&(Subscript[x, 1])[t]≥0&&(Subscript[x, 1])[t]+((Subscript[x, 3])[t]/.sol1300[[4,1]])+((Subscript[x, 4])[t]/.sol1300[[4,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 1])[t]}]

CCCD and CDDD -- 2, 6, 7, 12

sol1310=Solve[((Π[2, t, b,c,η,η]-Π[6, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1-(Subscript[x, 2])[t]-(Subscript[x, 6])[t]-(Subscript[x, 7])[t],(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0&&((Π[2, t, b,c,η,η]-Π[7, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1-(Subscript[x, 2])[t]-(Subscript[x, 6])[t]-(Subscript[x, 7])[t],(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,{(Subscript[x, 2])[t],(Subscript[x, 6])[t],(Subscript[x, 7])[t]}]//FullSimplify
FindInstance[((Subscript[x, 6])[t]/.sol1310[[1,1]])≥0&&((Subscript[x, 7])[t]/.sol1310[[1,2]])≥0&&(Subscript[x, 2])[t]≥0&&(Subscript[x, 2])[t]+((Subscript[x, 6])[t]/.sol1310[[1,1]])+((Subscript[x, 7])[t]/.sol1310[[1,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 2])[t]}]
FindInstance[((Subscript[x, 6])[t]/.sol1310[[2,1]])≥0&&((Subscript[x, 7])[t]/.sol1310[[2,2]])≥0&&(Subscript[x, 2])[t]≥0&&(Subscript[x, 2])[t]+((Subscript[x, 6])[t]/.sol1310[[2,1]])+((Subscript[x, 7])[t]/.sol1310[[2,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 2])[t]}]
FindInstance[((Subscript[x, 6])[t]/.sol1310[[3,1]])≥0&&((Subscript[x, 7])[t]/.sol1310[[3,2]])≥0&&(Subscript[x, 2])[t]≥0&&(Subscript[x, 2])[t]+((Subscript[x, 6])[t]/.sol1310[[3,1]])+((Subscript[x, 7])[t]/.sol1310[[3,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 2])[t]}]
FindInstance[((Subscript[x, 6])[t]/.sol1310[[4,1]])≥0&&((Subscript[x, 7])[t]/.sol1310[[4,2]])≥0&&(Subscript[x, 2])[t]≥0&&(Subscript[x, 2])[t]+((Subscript[x, 6])[t]/.sol1310[[4,1]])+((Subscript[x, 7])[t]/.sol1310[[4,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 2])[t]}]
"NOTE: D1=D4=0!"
((Π[1, t, b,c,η,η]-Π[2, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->((Subscript[x, 6])[t]/.sol1310[[2,1]]),(Subscript[x, 7])[t]->((Subscript[x, 7])[t]/.sol1310[[2,2]]),(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1-(Subscript[x, 2])[t]-((Subscript[x, 6])[t]/.sol1310[[2,1]])-((Subscript[x, 7])[t]/.sol1310[[2,2]]),(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})//FullSimplify
((Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->((Subscript[x, 6])[t]/.sol1310[[2,1]]),(Subscript[x, 7])[t]->((Subscript[x, 7])[t]/.sol1310[[2,2]]),(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1-(Subscript[x, 2])[t]-((Subscript[x, 6])[t]/.sol1310[[2,1]])-((Subscript[x, 7])[t]/.sol1310[[2,2]]),(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})//FullSimplify

DXYC  (5, 9, 10, 15)

sol1320=Solve[((Π[5, t, b,c,η,η]-Π[9, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->1-(Subscript[x, 5])[t]-(Subscript[x, 9])[t]-(Subscript[x, 10])[t]})==0&&((Π[5, t, b,c,η,η]-Π[10, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->1-(Subscript[x, 5])[t]-(Subscript[x, 9])[t]-(Subscript[x, 10])[t]})==0,{(Subscript[x, 5])[t],(Subscript[x, 9])[t],(Subscript[x, 10])[t]}]//FullSimplify
FindInstance[((Subscript[x, 9])[t]/.sol1320[[1,1]])≥0&&((Subscript[x, 10])[t]/.sol1320[[1,2]])≥0&&(Subscript[x, 5])[t]≥0&&(Subscript[x, 5])[t]+((Subscript[x, 9])[t]/.sol1320[[1,1]])+((Subscript[x, 10])[t]/.sol1320[[1,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 5])[t]}]
FindInstance[((Subscript[x, 9])[t]/.sol1320[[2,1]])≥0&&((Subscript[x, 10])[t]/.sol1320[[2,2]])≥0&&(Subscript[x, 5])[t]≥0&&(Subscript[x, 5])[t]+((Subscript[x, 9])[t]/.sol1320[[2,1]])+((Subscript[x, 10])[t]/.sol1320[[2,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 5])[t]}]
FindInstance[((Subscript[x, 9])[t]/.sol1320[[3,1]])≥0&&((Subscript[x, 10])[t]/.sol1320[[3,2]])≥0&&(Subscript[x, 5])[t]≥0&&(Subscript[x, 5])[t]+((Subscript[x, 9])[t]/.sol1320[[3,1]])+((Subscript[x, 10])[t]/.sol1320[[3,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 5])[t]}]
FindInstance[((Subscript[x, 9])[t]/.sol1320[[4,1]])≥0&&((Subscript[x, 10])[t]/.sol1320[[4,2]])≥0&&(Subscript[x, 5])[t]≥0&&(Subscript[x, 5])[t]+((Subscript[x, 9])[t]/.sol1320[[4,1]])+((Subscript[x, 10])[t]/.sol1320[[4,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 5])[t]}]

DXYD  (8, 13, 14, 16)

sol1330=Solve[((Π[8, t, b,c,η,η]-Π[13, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 15])[t]->0})==0&&((Π[8, t, b,c,η,η]-Π[14, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 15])[t]->0})==0,{(Subscript[x, 8])[t],(Subscript[x, 13])[t],(Subscript[x, 14])[t]}]//FullSimplify
FindInstance[((Subscript[x, 13])[t]/.sol1330[[1,1]])≥0&&((Subscript[x, 14])[t]/.sol1330[[1,2]])≥0&&(Subscript[x, 8])[t]≥0&&(Subscript[x, 8])[t]+((Subscript[x, 13])[t]/.sol1330[[1,1]])+((Subscript[x, 14])[t]/.sol1330[[1,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 8])[t]}]
FindInstance[((Subscript[x, 13])[t]/.sol1330[[2,1]])≥0&&((Subscript[x, 14])[t]/.sol1330[[2,2]])≥0&&(Subscript[x, 8])[t]≥0&&(Subscript[x, 8])[t]+((Subscript[x, 13])[t]/.sol1330[[2,1]])+((Subscript[x, 14])[t]/.sol1330[[2,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 8])[t]}]

D2=D4=0 (solutions 1400+)

CXCY  (1, 2, 4, 7)

sol1400=Solve[((Π[1, t, b,c,η,η]-Π[2, t, b,c,η,η])/.{(Subscript[x, 3])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->1-(Subscript[x, 1])[t]-(Subscript[x, 2])[t]-(Subscript[x, 4])[t],(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0&&((Π[1, t, b,c,η,η]-Π[4, t, b,c,η,η])/.{(Subscript[x, 3])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->1-(Subscript[x, 1])[t]-(Subscript[x, 2])[t]-(Subscript[x, 4])[t],(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,{(Subscript[x, 1])[t],(Subscript[x, 2])[t],(Subscript[x, 4])[t]}]//FullSimplify
FindInstance[((Subscript[x, 1])[t]/.sol1400[[1,1]])≥0&&((Subscript[x, 2])[t]/.sol1400[[1,2]])≥0&&(Subscript[x, 4])[t]≥0&&(Subscript[x, 4])[t]+((Subscript[x, 1])[t]/.sol1400[[1,1]])+((Subscript[x, 2])[t]/.sol1400[[1,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 4])[t]}]

CXDY  (3, 6, 11, 12)

sol1410=Solve[((Π[3, t, b,c,η,η]-Π[6, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 12])[t]->1-(Subscript[x, 3])[t]-(Subscript[x, 6])[t]-(Subscript[x, 11])[t],(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0&&((Π[3, t, b,c,η,η]-Π[11, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 12])[t]->1-(Subscript[x, 3])[t]-(Subscript[x, 6])[t]-(Subscript[x, 11])[t],(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,{(Subscript[x, 3])[t],(Subscript[x, 6])[t],(Subscript[x, 11])[t]}]//FullSimplify
FindInstance[((Subscript[x, 6])[t]/.sol1410[[1,1]])≥0&&((Subscript[x, 11])[t]/.sol1410[[1,2]])≥0&&(Subscript[x, 3])[t]≥0&&(Subscript[x, 3])[t]+((Subscript[x, 6])[t]/.sol1410[[1,1]])+((Subscript[x, 11])[t]/.sol1410[[1,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 3])[t]}]
FindInstance[((Subscript[x, 6])[t]/.sol1410[[2,1]])≥0&&((Subscript[x, 11])[t]/.sol1410[[2,2]])≥0&&(Subscript[x, 3])[t]≥0&&(Subscript[x, 3])[t]+((Subscript[x, 6])[t]/.sol1410[[2,1]])+((Subscript[x, 11])[t]/.sol1410[[2,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 3])[t]}]

DXCY  (5, 8, 10, 14)

sol1420=Solve[((Π[5, t, b,c,η,η]-Π[8, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->1-(Subscript[x, 5])[t]-(Subscript[x, 8])[t]-(Subscript[x, 10])[t],(Subscript[x, 15])[t]->0})==0&&((Π[5, t, b,c,η,η]-Π[10, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->1-(Subscript[x, 5])[t]-(Subscript[x, 8])[t]-(Subscript[x, 10])[t],(Subscript[x, 15])[t]->0})==0,{(Subscript[x, 5])[t],(Subscript[x, 8])[t],(Subscript[x, 10])[t]}]//FullSimplify
FindInstance[((Subscript[x, 8])[t]/.sol1420[[1,1]])≥0&&((Subscript[x, 10])[t]/.sol1420[[1,2]])≥0&&(Subscript[x, 5])[t]≥0&&(Subscript[x, 5])[t]+((Subscript[x, 8])[t]/.sol1420[[1,1]])+((Subscript[x, 10])[t]/.sol1420[[1,2]])<1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 5])[t]}]
FindInstance[((Subscript[x, 8])[t]/.sol1420[[2,1]])≥0&&((Subscript[x, 10])[t]/.sol1420[[2,2]])≥0&&(Subscript[x, 5])[t]≥0&&(Subscript[x, 5])[t]+((Subscript[x, 8])[t]/.sol1420[[2,1]])+((Subscript[x, 10])[t]/.sol1420[[2,2]])<1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 5])[t]}]

DXDY  (9, 13, 15, 16)

sol1430=Solve[((Π[9, t, b,c,η,η]-Π[13, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 14])[t]->0})==0&&((Π[9, t, b,c,η,η]-Π[15, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 14])[t]->0})==0,{(Subscript[x, 9])[t],(Subscript[x, 13])[t],(Subscript[x, 15])[t]}]//FullSimplify
FindInstance[((Subscript[x, 9])[t]/.sol1430[[1,1]])≥0&&((Subscript[x, 13])[t]/.sol1430[[1,2]])≥0&&(Subscript[x, 15])[t]≥0&&(Subscript[x, 15])[t]+((Subscript[x, 9])[t]/.sol1430[[1,1]])+((Subscript[x, 13])[t]/.sol1430[[1,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 15])[t]}]

D3=D4=0 (solutions 1500+)

CCXY -- 1, 2, 3, 6

var1=((Π[14, t, 1,c,η,η]-Π[16, t, 1,c,η,η])/.{(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->1-(Subscript[x, 1])[t]-(Subscript[x, 2])[t]-(Subscript[x, 3])[t],(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})//Simplify;
var2=((Π[15, t, 1,c,η,η]-Π[16, t, 1,c,η,η])/.{(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->1-(Subscript[x, 1])[t]-(Subscript[x, 2])[t]-(Subscript[x, 3])[t],(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})//Simplify;
Denominator[var1]-Denominator[var2]//Simplify
sol1500a=Solve[Numerator[var1]==0&&Numerator[var2]==0,{(Subscript[x, 1])[t],(Subscript[x, 2])[t],(Subscript[x, 3])[t]}]//FullSimplify
FindInstance[((Subscript[x, 2])[t]/.sol1500a[[1,1]])>0&&((Subscript[x, 3])[t]/.sol1500a[[1,2]])>0&&(Subscript[x, 1])[t]>0&&(Subscript[x, 1])[t]+((Subscript[x, 2])[t]/.sol1500a[[1,1]])+((Subscript[x, 3])[t]/.sol1500a[[1,2]])<1&&1>c>0&&0<η<1/5,{c,η,(Subscript[x, 1])[t]}]
FindInstance[((Subscript[x, 2])[t]/.sol1500a[[2,1]])>0&&((Subscript[x, 3])[t]/.sol1500a[[2,2]])>0&&(Subscript[x, 1])[t]>0&&(Subscript[x, 1])[t]+((Subscript[x, 2])[t]/.sol1500a[[2,1]])+((Subscript[x, 3])[t]/.sol1500a[[2,2]])<1&&1>c>0&&0<η<1/5,{c,η,(Subscript[x, 1])[t]}]
FindInstance[((Subscript[x, 2])[t]/.sol1500a[[3,1]])>0&&((Subscript[x, 3])[t]/.sol1500a[[3,2]])>0&&(Subscript[x, 1])[t]>0&&(Subscript[x, 1])[t]+((Subscript[x, 2])[t]/.sol1500a[[3,1]])+((Subscript[x, 3])[t]/.sol1500a[[3,2]])<1&&1>c>0&&0<η<1/5,{c,η,(Subscript[x, 1])[t]}]
FindInstance[((Subscript[x, 2])[t]/.sol1500a[[4,1]])>0&&((Subscript[x, 3])[t]/.sol1500a[[4,2]])>0&&(Subscript[x, 1])[t]>0&&(Subscript[x, 1])[t]+((Subscript[x, 2])[t]/.sol1500a[[4,1]])+((Subscript[x, 3])[t]/.sol1500a[[4,2]])<1&&1>c>0&&0<η<1/5,{c,η,(Subscript[x, 1])[t]}]
FindInstance[((Subscript[x, 2])[t]/.sol1500a[[5,1]])>0&&((Subscript[x, 3])[t]/.sol1500a[[5,2]])>0&&(Subscript[x, 1])[t]>0&&(Subscript[x, 1])[t]+((Subscript[x, 2])[t]/.sol1500a[[5,1]])+((Subscript[x, 3])[t]/.sol1500a[[5,2]])<1&&1>c>0&&0<η<1/5,{c,η,(Subscript[x, 1])[t]}]
FindInstance[((Subscript[x, 2])[t]/.sol1500a[[6,1]])>0&&((Subscript[x, 3])[t]/.sol1500a[[6,2]])>0&&(Subscript[x, 1])[t]>0&&(Subscript[x, 1])[t]+((Subscript[x, 2])[t]/.sol1500a[[6,1]])+((Subscript[x, 3])[t]/.sol1500a[[6,2]])<1&&1>c>0&&0<η<1/5,{c,η,(Subscript[x, 1])[t]}]

SOLUTION 4 versus SOLUTION 6: For solution 4 the basic differences D1 and D2 are zero, too. However, for solution 6 there are cases with D1=/=0 and D2=/=0

((Π[13, t, 1,c,η,η]-Π[16, t, 1,c,η,η])/.{(Subscript[x, 2])[t]->((Subscript[x, 2])[t]/.sol1500a[[4,1]]),(Subscript[x, 3])[t]->((Subscript[x, 3])[t]/.sol1500a[[4,2]]),(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->1-(Subscript[x, 1])[t]-((Subscript[x, 2])[t]/.sol1500a[[4,1]])-((Subscript[x, 3])[t]/.sol1500a[[4,2]]),(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})//Simplify
((Π[12, t, 1,c,η,η]-Π[16, t, 1,c,η,η])/.{(Subscript[x, 2])[t]->((Subscript[x, 2])[t]/.sol1500a[[4,1]]),(Subscript[x, 3])[t]->((Subscript[x, 3])[t]/.sol1500a[[4,2]]),(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->1-(Subscript[x, 1])[t]-((Subscript[x, 2])[t]/.sol1500a[[4,1]])-((Subscript[x, 3])[t]/.sol1500a[[4,2]]),(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})//Simplify
((Π[13, t, 1,c,η,η]-Π[16, t, 1,c,η,η])/.{(Subscript[x, 2])[t]->((Subscript[x, 2])[t]/.sol1500a[[6,1]]),(Subscript[x, 3])[t]->((Subscript[x, 3])[t]/.sol1500a[[6,2]]),(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->1-(Subscript[x, 1])[t]-((Subscript[x, 2])[t]/.sol1500a[[6,1]])-((Subscript[x, 3])[t]/.sol1500a[[6,2]]),(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})//Simplify
((Π[12, t, 1,c,η,η]-Π[16, t, 1,c,η,η])/.{(Subscript[x, 2])[t]->((Subscript[x, 2])[t]/.sol1500a[[6,1]]),(Subscript[x, 3])[t]->((Subscript[x, 3])[t]/.sol1500a[[6,2]]),(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->1-(Subscript[x, 1])[t]-((Subscript[x, 2])[t]/.sol1500a[[6,1]])-((Subscript[x, 3])[t]/.sol1500a[[6,2]]),(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})//Simplify

CDXY  (4, 7, 11, 12)

sol1510=Solve[((Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 12])[t]->1-(Subscript[x, 4])[t]-(Subscript[x, 7])[t]-(Subscript[x, 11])[t],(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0&&((Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 12])[t]->1-(Subscript[x, 4])[t]-(Subscript[x, 7])[t]-(Subscript[x, 11])[t],(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,{(Subscript[x, 4])[t],(Subscript[x, 7])[t],(Subscript[x, 11])[t]}]//Simplify
FindInstance[((Subscript[x, 7])[t]/.sol1510[[1,1]])≥0&&((Subscript[x, 11])[t]/.sol1510[[1,2]])≥0&&(Subscript[x, 4])[t]≥0&&(Subscript[x, 4])[t]+((Subscript[x, 7])[t]/.sol1510[[1,1]])+((Subscript[x, 11])[t]/.sol1510[[1,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 4])[t]}]
FindInstance[((Subscript[x, 7])[t]/.sol1510[[2,1]])≥0&&((Subscript[x, 11])[t]/.sol1510[[2,2]])≥0&&(Subscript[x, 4])[t]≥0&&(Subscript[x, 4])[t]+((Subscript[x, 7])[t]/.sol1510[[2,1]])+((Subscript[x, 11])[t]/.sol1510[[2,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 4])[t]}]
FindInstance[((Subscript[x, 7])[t]/.sol1510[[3,1]])≥0&&((Subscript[x, 11])[t]/.sol1510[[3,2]])≥0&&(Subscript[x, 4])[t]≥0&&(Subscript[x, 4])[t]+((Subscript[x, 7])[t]/.sol1510[[3,1]])+((Subscript[x, 11])[t]/.sol1510[[3,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 4])[t]}]
FindInstance[((Subscript[x, 7])[t]/.sol1510[[4,1]])≥0&&((Subscript[x, 11])[t]/.sol1510[[4,2]])≥0&&(Subscript[x, 4])[t]≥0&&(Subscript[x, 4])[t]+((Subscript[x, 7])[t]/.sol1510[[4,1]])+((Subscript[x, 11])[t]/.sol1510[[4,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 4])[t]}]

DCXY  (5, 8, 9, 13)

sol1520=Solve[((Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->1-(Subscript[x, 5])[t]-(Subscript[x, 8])[t]-(Subscript[x, 9])[t],(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0&&((Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->1-(Subscript[x, 5])[t]-(Subscript[x, 8])[t]-(Subscript[x, 9])[t],(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,{(Subscript[x, 5])[t],(Subscript[x, 8])[t],(Subscript[x, 9])[t]}]//Simplify
FindInstance[((Subscript[x, 8])[t]/.sol1520[[1,1]])≥0&&((Subscript[x, 9])[t]/.sol1520[[1,2]])≥0&&(Subscript[x, 5])[t]≥0&&(Subscript[x, 5])[t]+((Subscript[x, 8])[t]/.sol1520[[1,1]])+((Subscript[x, 9])[t]/.sol1520[[1,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 5])[t]}]
FindInstance[((Subscript[x, 8])[t]/.sol1520[[2,1]])≥0&&((Subscript[x, 9])[t]/.sol1520[[2,2]])≥0&&(Subscript[x, 5])[t]≥0&&(Subscript[x, 5])[t]+((Subscript[x, 8])[t]/.sol1520[[2,1]])+((Subscript[x, 9])[t]/.sol1520[[2,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 5])[t]}]
FindInstance[((Subscript[x, 8])[t]/.sol1520[[3,1]])≥0&&((Subscript[x, 9])[t]/.sol1520[[3,2]])≥0&&(Subscript[x, 5])[t]≥0&&(Subscript[x, 5])[t]+((Subscript[x, 8])[t]/.sol1520[[3,1]])+((Subscript[x, 9])[t]/.sol1520[[3,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 5])[t]}]
ex1520=FindInstance[((Subscript[x, 8])[t]/.sol1520[[4,1]])≥0&&((Subscript[x, 9])[t]/.sol1520[[4,2]])≥0&&(Subscript[x, 5])[t]≥0&&(Subscript[x, 5])[t]+((Subscript[x, 8])[t]/.sol1520[[4,1]])+((Subscript[x, 9])[t]/.sol1520[[4,2]])<=1&&b>c>0&&0<η<0.2,{b,c,η,(Subscript[x, 5])[t]}]
"There is  parameter constellation with D1,D2 different from zero"
((Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->((Subscript[x, 8])[t]/.sol1520[[4,1]]),(Subscript[x, 9])[t]->((Subscript[x, 9])[t]/.sol1520[[4,2]]),(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->1-(Subscript[x, 5])[t]-((Subscript[x, 8])[t]/.sol1520[[4,1]])-((Subscript[x, 9])[t]/.sol1520[[4,2]]),(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})/.ex1520[[1]]
((Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->((Subscript[x, 8])[t]/.sol1520[[4,1]]),(Subscript[x, 9])[t]->((Subscript[x, 9])[t]/.sol1520[[4,2]]),(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->1-(Subscript[x, 5])[t]-((Subscript[x, 8])[t]/.sol1520[[4,1]])-((Subscript[x, 9])[t]/.sol1520[[4,2]]),(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})/.ex1520[[1]]

DDXY  (10, 14, 15, 16)

var5=((Π[14, t, 1,c,η,η]-Π[16, t, 1,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0})//Simplify;
var6=((Π[15, t, 1,c,η,η]-Π[16, t, 1,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0})//Simplify;
Denominator[var5]-Denominator[var6]//Simplify
sol1530a=Solve[((Numerator[var5])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0})==0&&((Numerator[var6])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0})==0,{(Subscript[x, 10])[t],(Subscript[x, 14])[t],(Subscript[x, 15])[t]}]//Simplify
FindInstance[((Subscript[x, 14])[t]/.sol1530a[[1,1]])≥0&&((Subscript[x, 15])[t]/.sol1530a[[1,2]])≥0&&(Subscript[x, 10])[t]≥0&&(Subscript[x, 10])[t]+((Subscript[x, 14])[t]/.sol1530a[[1,1]])+((Subscript[x, 15])[t]/.sol1530a[[1,2]])<=1&&1>c>0&&0<η<1/5,{c,η,(Subscript[x, 10])[t]}]
FindInstance[((Subscript[x, 14])[t]/.sol1530a[[2,1]])≥0&&((Subscript[x, 15])[t]/.sol1530a[[2,2]])≥0&&(Subscript[x, 10])[t]≥0&&(Subscript[x, 10])[t]+((Subscript[x, 14])[t]/.sol1530a[[2,1]])+((Subscript[x, 15])[t]/.sol1530a[[2,2]])<=1&&1>c>0&&0<η<1/5,{c,η,(Subscript[x, 10])[t]}]
FindInstance[((Subscript[x, 14])[t]/.sol1530a[[3,1]])≥0&&((Subscript[x, 15])[t]/.sol1530a[[3,2]])≥0&&(Subscript[x, 10])[t]≥0&&(Subscript[x, 10])[t]+((Subscript[x, 14])[t]/.sol1530a[[3,1]])+((Subscript[x, 15])[t]/.sol1530a[[3,2]])<=1&&1>c>0&&0<η<1/5,{c,η,(Subscript[x, 10])[t]}]
FindInstance[((Subscript[x, 14])[t]/.sol1530a[[4,1]])≥0&&((Subscript[x, 15])[t]/.sol1530a[[4,2]])≥0&&(Subscript[x, 10])[t]≥0&&(Subscript[x, 10])[t]+((Subscript[x, 14])[t]/.sol1530a[[4,1]])+((Subscript[x, 15])[t]/.sol1530a[[4,2]])<=1&&1>c>0&&0<η<1/5,{c,η,(Subscript[x, 10])[t]}]
FindInstance[((Subscript[x, 14])[t]/.sol1530a[[5,1]])≥0&&((Subscript[x, 15])[t]/.sol1530a[[5,2]])≥0&&(Subscript[x, 10])[t]≥0&&(Subscript[x, 10])[t]+((Subscript[x, 14])[t]/.sol1530a[[5,1]])+((Subscript[x, 15])[t]/.sol1530a[[5,2]])<=1&&1>c>0&&0<η<1/5,{c,η,(Subscript[x, 10])[t]}]
FindInstance[((Subscript[x, 14])[t]/.sol1530a[[6,1]])≥0&&((Subscript[x, 15])[t]/.sol1530a[[6,2]])≥0&&(Subscript[x, 10])[t]≥0&&(Subscript[x, 10])[t]+((Subscript[x, 14])[t]/.sol1530a[[6,1]])+((Subscript[x, 15])[t]/.sol1530a[[6,2]])<=1&&1>c>0&&0<η<1/5,{c,η,(Subscript[x, 10])[t]}]

RESULT: Quadrupel (2,7,8,14) (3,9,11,15) (1,2,3,6) (5,8,9,13) could be stable

3.4 Equilibrium with 8 strategies (8=4x2 candidates, three basic payoff difference zero)

D1=D2=D3=0 (solutions 2000+)

XYZC (1, 3, 4, 5, 9, 10, 11, 15)

sol2000=Solve[((Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 2])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->1-((Subscript[x, 1])[t]+(Subscript[x, 3])[t]+(Subscript[x, 4])[t]+(Subscript[x, 5])[t]+(Subscript[x, 9])[t]+(Subscript[x, 10])[t]+(Subscript[x, 11])[t])})==0&&((Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 2])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->1-((Subscript[x, 1])[t]+(Subscript[x, 3])[t]+(Subscript[x, 4])[t]+(Subscript[x, 5])[t]+(Subscript[x, 9])[t]+(Subscript[x, 10])[t]+(Subscript[x, 11])[t])})==0&&((Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 2])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->1-((Subscript[x, 1])[t]+(Subscript[x, 3])[t]+(Subscript[x, 4])[t]+(Subscript[x, 5])[t]+(Subscript[x, 9])[t]+(Subscript[x, 10])[t]+(Subscript[x, 11])[t])})==0,{(Subscript[x, 1])[t],(Subscript[x, 3])[t],(Subscript[x, 4])[t],(Subscript[x, 5])[t],(Subscript[x, 9])[t],(Subscript[x, 10])[t],(Subscript[x, 11])[t]}]//FullSimplify
FindInstance[(Subscript[x, 1])[t]≥0&&(Subscript[x, 3])[t]≥0&&(Subscript[x, 4])[t]≥0&& (Subscript[x, 5])[t]≥0&&((Subscript[x, 9])[t]/.sol2000[[1,1]])≥0&& ((Subscript[x, 10])[t]/.sol2000[[1,2]])≥0&& (Subscript[x, 11])[t]≥0 &&  (Subscript[x, 1])[t]+(Subscript[x, 3])[t]+(Subscript[x, 4])[t]+(Subscript[x, 5])[t]+((Subscript[x, 9])[t]/.sol2000[[1,1]])+ ((Subscript[x, 10])[t]/.sol2000[[1,2]])+ (Subscript[x, 11])[t]≤1&&b>c>0&&0<η<1/5,{(Subscript[x, 1])[t],(Subscript[x, 3])[t],(Subscript[x, 4])[t],(Subscript[x, 5])[t],(Subscript[x, 11])[t],b,c,η}]
FindInstance[(Subscript[x, 1])[t]≥0&&(Subscript[x, 3])[t]≥0&&(Subscript[x, 4])[t]≥0&& (Subscript[x, 5])[t]≥0&&((Subscript[x, 9])[t]/.sol2000[[2,1]])≥0&& ((Subscript[x, 10])[t]/.sol2000[[2,2]])≥0&& (Subscript[x, 11])[t]≥0 &&  (Subscript[x, 1])[t]+(Subscript[x, 3])[t]+(Subscript[x, 4])[t]+(Subscript[x, 5])[t]+((Subscript[x, 9])[t]/.sol2000[[2,1]])+ ((Subscript[x, 10])[t]/.sol2000[[2,2]])+ (Subscript[x, 11])[t]≤1&&b>c>0&&0<η<1/5,{(Subscript[x, 1])[t],(Subscript[x, 3])[t],(Subscript[x, 4])[t],(Subscript[x, 5])[t],(Subscript[x, 11])[t],b,c,η}]
FindInstance[(Subscript[x, 1])[t]≥0&&(Subscript[x, 3])[t]≥0&&(Subscript[x, 4])[t]≥0&& (Subscript[x, 5])[t]≥0&&((Subscript[x, 9])[t]/.sol2000[[3,1]])≥0&& ((Subscript[x, 10])[t]/.sol2000[[3,2]])≥0&& (Subscript[x, 11])[t]≥0&&  (Subscript[x, 1])[t]+(Subscript[x, 3])[t]+(Subscript[x, 4])[t]+(Subscript[x, 5])[t]+((Subscript[x, 9])[t]/.sol2000[[3,1]])+ ((Subscript[x, 10])[t]/.sol2000[[3,2]])+ (Subscript[x, 11])[t]≤1&&b>c>0&&0<η<1/5,{(Subscript[x, 1])[t],(Subscript[x, 3])[t],(Subscript[x, 4])[t],(Subscript[x, 5])[t],(Subscript[x, 11])[t],b,c,η}]

XYZD (2, 6, 7, 8, 12, 13, 14, 16)

sol2005=Solve[((Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 15])[t]->0})==0&&((Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 15])[t]->0})==0&&((Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 15])[t]->0})==0,{(Subscript[x, 2])[t],(Subscript[x, 6])[t],(Subscript[x, 7])[t],(Subscript[x, 8])[t],(Subscript[x, 12])[t],(Subscript[x, 13])[t],(Subscript[x, 14])[t]}]//FullSimplify
FindInstance[(Subscript[x, 2])[t]≥0&&(Subscript[x, 6])[t]≥0&& ((Subscript[x, 7])[t]/.sol2005[[1,1]])≥0&&(Subscript[x, 8])[t]≥0&&(Subscript[x, 12])[t]≥0&& (Subscript[x, 13])[t]≥0&& ((Subscript[x, 14])[t]/.sol2005[[1,2]])≥0 && (Subscript[x, 2])[t]+(Subscript[x, 6])[t]+((Subscript[x, 7])[t]/.sol2005[[1,1]])+(Subscript[x, 8])[t]+(Subscript[x, 12])[t]+ (Subscript[x, 13])[t]+ ((Subscript[x, 14])[t]/.sol2005[[1,2]])≤1&&b>c>0&&0<η<1/5,{(Subscript[x, 2])[t],(Subscript[x, 6])[t],(Subscript[x, 13])[t],(Subscript[x, 8])[t],(Subscript[x, 12])[t],b,c,η}]
FindInstance[(Subscript[x, 2])[t]≥0&&(Subscript[x, 6])[t]≥0&& (Subscript[x, 7])[t]≥0&& (Subscript[x, 8])[t]≥0&&(Subscript[x, 12])[t]≥0&& ((Subscript[x, 13])[t]/.sol2005[[2,1]])≥0&&((Subscript[x, 14])[t]/.sol2005[[2,2]])≥0 && (Subscript[x, 2])[t]+(Subscript[x, 6])[t]+(Subscript[x, 7])[t]+(Subscript[x, 8])[t]+(Subscript[x, 12])[t]+((Subscript[x, 13])[t]/.sol2005[[2,1]])+ ((Subscript[x, 14])[t]/.sol2005[[2,2]])≤1&&b>c>0&&0<η<1/5,{(Subscript[x, 2])[t],(Subscript[x, 6])[t],(Subscript[x, 7])[t],(Subscript[x, 8])[t],(Subscript[x, 12])[t],b,c,η}]
FindInstance[(Subscript[x, 2])[t]≥0&&(Subscript[x, 6])[t]≥0&& (Subscript[x, 7])[t]≥0&& (Subscript[x, 8])[t]≥0&&(Subscript[x, 12])[t]≥0&& ((Subscript[x, 13])[t]/.sol2005[[3,1]])≥0&&((Subscript[x, 14])[t]/.sol2005[[3,2]])≥0 && (Subscript[x, 2])[t]+(Subscript[x, 6])[t]+(Subscript[x, 7])[t]+(Subscript[x, 8])[t]+(Subscript[x, 12])[t]+((Subscript[x, 13])[t]/.sol2005[[3,1]])+ ((Subscript[x, 14])[t]/.sol2005[[3,2]])≤1&&b>c>0&&0<η<1/5,{(Subscript[x, 2])[t],(Subscript[x, 6])[t],(Subscript[x, 7])[t],(Subscript[x, 8])[t],(Subscript[x, 12])[t],b,c,η}]
"NOTE: D4=0!"
((Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 13])[t]->((Subscript[x, 13])[t]/.sol2005[[3,1]]),(Subscript[x, 14])[t]->((Subscript[x, 14])[t]/.sol2005[[3,2]]),(Subscript[x, 15])[t]->0})//Simplify

D1=D2=D4=0 (solutions 2100+)

XYCZ (1, 2, 4, 5, 7, 8, 10, 14)

sol2100=Solve[((Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 3])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->1-((Subscript[x, 1])[t]+(Subscript[x, 2])[t]+(Subscript[x, 4])[t]+(Subscript[x, 5])[t]+(Subscript[x, 7])[t]+(Subscript[x, 8])[t]+(Subscript[x, 10])[t]),(Subscript[x, 15])[t]->0})==0&&((Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 3])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->1-((Subscript[x, 1])[t]+(Subscript[x, 2])[t]+(Subscript[x, 4])[t]+(Subscript[x, 5])[t]+(Subscript[x, 7])[t]+(Subscript[x, 8])[t]+(Subscript[x, 10])[t]),(Subscript[x, 15])[t]->0})==0&&((Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 3])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->1-((Subscript[x, 1])[t]+(Subscript[x, 2])[t]+(Subscript[x, 4])[t]+(Subscript[x, 5])[t]+(Subscript[x, 7])[t]+(Subscript[x, 8])[t]+(Subscript[x, 10])[t]),(Subscript[x, 15])[t]->0})==0,{(Subscript[x, 1])[t],(Subscript[x, 2])[t],(Subscript[x, 4])[t],(Subscript[x, 5])[t],(Subscript[x, 7])[t],(Subscript[x, 8])[t],(Subscript[x, 10])[t]}]//FullSimplify
FindInstance[(Subscript[x, 1])[t]≥0&&(Subscript[x, 2])[t]≥0&&(Subscript[x, 4])[t]≥0&&(Subscript[x, 5])[t]≥0&& ((Subscript[x, 7])[t]/.sol2100[[1,1]])≥0&& ((Subscript[x, 8])[t]/.sol2100[[1,2]])≥0 && (Subscript[x, 10])[t]≥0&& (Subscript[x, 1])[t]+(Subscript[x, 2])[t]+(Subscript[x, 4])[t]+(Subscript[x, 5])[t]+ ((Subscript[x, 7])[t]/.sol2100[[1,1]])+((Subscript[x, 8])[t]/.sol2100[[1,2]])+ (Subscript[x, 10])[t]≤1&&b>c>0&&0<η<1/5,{(Subscript[x, 1])[t],(Subscript[x, 2])[t],(Subscript[x, 4])[t],(Subscript[x, 5])[t],(Subscript[x, 10])[t],b,c,η}]
FindInstance[(Subscript[x, 1])[t]≥0&&(Subscript[x, 2])[t]≥0&&(Subscript[x, 4])[t]≥0&&(Subscript[x, 5])[t]≥0&& ((Subscript[x, 7])[t]/.sol2100[[2,1]])≥0&& ((Subscript[x, 8])[t]/.sol2100[[2,2]])≥0 && (Subscript[x, 10])[t]≥0&& (Subscript[x, 1])[t]+(Subscript[x, 2])[t]+(Subscript[x, 4])[t]+(Subscript[x, 5])[t]+ ((Subscript[x, 7])[t]/.sol2100[[2,1]])+((Subscript[x, 8])[t]/.sol2100[[2,2]])+ (Subscript[x, 10])[t]≤1&&b>c>0&&0<η<1/5,{(Subscript[x, 1])[t],(Subscript[x, 2])[t],(Subscript[x, 4])[t],(Subscript[x, 5])[t],(Subscript[x, 10])[t],b,c,η}]
FindInstance[(Subscript[x, 1])[t]≥0&&(Subscript[x, 2])[t]≥0&&(Subscript[x, 4])[t]≥0&&(Subscript[x, 5])[t]≥0&& (Subscript[x, 7])[t]≥0&& ((Subscript[x, 8])[t]/.sol2100[[3,1]])≥0&& ((Subscript[x, 10])[t]/.sol2100[[3,2]])≥0 && (Subscript[x, 1])[t]+(Subscript[x, 2])[t]+(Subscript[x, 4])[t]+(Subscript[x, 5])[t]+ (Subscript[x, 7])[t]+ ((Subscript[x, 8])[t]/.sol2100[[3,1]])+((Subscript[x, 10])[t]/.sol2100[[3,2]])≤1&&b>c>0&&0<η<1/5,{(Subscript[x, 1])[t],(Subscript[x, 2])[t],(Subscript[x, 4])[t],(Subscript[x, 5])[t],(Subscript[x, 7])[t],b,c,η}]

XYDZ (3, 6, 9, 11, 12, 13, 15, 16)

sol2105=Solve[((Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 14])[t]->0})==0&&((Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 14])[t]->0})==0&&((Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 14])[t]->0})==0,{(Subscript[x, 3])[t],(Subscript[x, 6])[t],(Subscript[x, 9])[t],(Subscript[x, 11])[t],(Subscript[x, 12])[t],(Subscript[x, 13])[t],(Subscript[x, 15])[t]}]//FullSimplify
FindInstance[(Subscript[x, 3])[t]≥0&&(Subscript[x, 6])[t]≥0&&(Subscript[x, 9])[t]≥0&&(Subscript[x, 11])[t]≥0&& ((Subscript[x, 12])[t]/.sol2105[[1,1]])≥0&& ((Subscript[x, 13])[t]/.sol2105[[1,2]])≥0 && (Subscript[x, 15])[t]≥0&& (Subscript[x, 3])[t]+(Subscript[x, 6])[t]+(Subscript[x, 9])[t]+(Subscript[x, 11])[t]+ ((Subscript[x, 12])[t]/.sol2105[[1,1]])+((Subscript[x, 13])[t]/.sol2105[[1,2]])+ (Subscript[x, 15])[t]≤1&&b>c>0&&0<η<1/5,{(Subscript[x, 3])[t],(Subscript[x, 6])[t],(Subscript[x, 9])[t],(Subscript[x, 11])[t],(Subscript[x, 15])[t],b,c,η}]
FindInstance[(Subscript[x, 3])[t]≥0&&(Subscript[x, 6])[t]≥0&&(Subscript[x, 9])[t]≥0&&(Subscript[x, 11])[t]≥0&& ((Subscript[x, 12])[t]/.sol2105[[2,1]])≥0&& ((Subscript[x, 13])[t]/.sol2105[[2,2]])≥0 && (Subscript[x, 15])[t]≥0&& (Subscript[x, 3])[t]+(Subscript[x, 6])[t]+(Subscript[x, 9])[t]+(Subscript[x, 11])[t]+ ((Subscript[x, 12])[t]/.sol2105[[2,1]])+((Subscript[x, 13])[t]/.sol2105[[2,2]])+ (Subscript[x, 15])[t]≤1&&b>c>0&&0<η<1/5,{(Subscript[x, 3])[t],(Subscript[x, 6])[t],(Subscript[x, 9])[t],(Subscript[x, 11])[t],(Subscript[x, 15])[t],b,c,η}]
FindInstance[(Subscript[x, 3])[t]≥0&&(Subscript[x, 6])[t]≥0&&(Subscript[x, 9])[t]≥0&&(Subscript[x, 11])[t]≥0&& (Subscript[x, 12])[t]≥0&& ((Subscript[x, 13])[t]/.sol2105[[3,1]])≥0&& ((Subscript[x, 15])[t]/.sol2105[[3,2]])≥0 && (Subscript[x, 3])[t]+(Subscript[x, 6])[t]+(Subscript[x, 9])[t]+(Subscript[x, 11])[t]+ (Subscript[x, 12])[t]+ ((Subscript[x, 13])[t]/.sol2105[[3,1]])+((Subscript[x, 15])[t]/.sol2105[[3,2]])≤1&&b>c>0&&0<η<1/5,{(Subscript[x, 3])[t],(Subscript[x, 6])[t],(Subscript[x, 9])[t],(Subscript[x, 11])[t],(Subscript[x, 12])[t],b,c,η}]
"NOTE: D3=0!"
((Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 12])[t]->((Subscript[x, 12])[t]/.sol2105[[1,1]]),(Subscript[x, 13])[t]->((Subscript[x, 13])[t]/.sol2105[[1,2]]),(Subscript[x, 14])[t]->0})//Simplify

D1=D3=D4=0 (solutions 2200+)

XCYZ  (1, 2, 3, 5, 6, 8, 9, 13)

sol2200=Solve[((Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 4])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->1-((Subscript[x, 1])[t]+(Subscript[x, 2])[t]+(Subscript[x, 3])[t]+(Subscript[x, 5])[t]+(Subscript[x, 6])[t]+(Subscript[x, 8])[t]+(Subscript[x, 9])[t]),(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0&&((Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 4])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->1-((Subscript[x, 1])[t]+(Subscript[x, 2])[t]+(Subscript[x, 3])[t]+(Subscript[x, 5])[t]+(Subscript[x, 6])[t]+(Subscript[x, 8])[t]+(Subscript[x, 9])[t]),(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0&&((Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 4])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->1-((Subscript[x, 1])[t]+(Subscript[x, 2])[t]+(Subscript[x, 3])[t]+(Subscript[x, 5])[t]+(Subscript[x, 6])[t]+(Subscript[x, 8])[t]+(Subscript[x, 9])[t]),(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,{(Subscript[x, 1])[t],(Subscript[x, 2])[t],(Subscript[x, 3])[t],(Subscript[x, 5])[t],(Subscript[x, 6])[t],(Subscript[x, 8])[t],(Subscript[x, 9])[t]}]//FullSimplify
FindInstance[(Subscript[x, 1])[t]≥0&&(Subscript[x, 2])[t]≥0&&(Subscript[x, 3])[t]≥0&&(Subscript[x, 5])[t]≥0&& ((Subscript[x, 6])[t]/.sol2200[[1,1]])≥0&& ((Subscript[x, 8])[t]/.sol2200[[1,2]])≥0 && (Subscript[x, 9])[t]≥0&& (Subscript[x, 1])[t]+(Subscript[x, 2])[t]+(Subscript[x, 3])[t]+(Subscript[x, 5])[t]+ ((Subscript[x, 6])[t]/.sol2200[[1,1]])+((Subscript[x, 8])[t]/.sol2200[[1,2]])+ (Subscript[x, 9])[t]≤1&&b>c>0&&0<η<1/5,{(Subscript[x, 1])[t],(Subscript[x, 2])[t],(Subscript[x, 3])[t],(Subscript[x, 5])[t],(Subscript[x, 9])[t],b,c,η}]
FindInstance[(Subscript[x, 1])[t]≥0&&(Subscript[x, 2])[t]≥0&&(Subscript[x, 3])[t]≥0&&(Subscript[x, 5])[t]≥0&& (Subscript[x, 6])[t]≥0&& ((Subscript[x, 8])[t]/.sol2200[[2,1]])≥0 && ((Subscript[x, 9])[t]/.sol2200[[2,2]])≥0&& (Subscript[x, 1])[t]+(Subscript[x, 2])[t]+(Subscript[x, 3])[t]+(Subscript[x, 5])[t]+  (Subscript[x, 6])[t]+((Subscript[x, 8])[t]/.sol2200[[2,1]])+ ((Subscript[x, 9])[t]/.sol2200[[2,2]])≤1&&b>c>0&&0<η<1/5,{(Subscript[x, 1])[t],(Subscript[x, 2])[t],(Subscript[x, 3])[t],(Subscript[x, 5])[t],(Subscript[x, 6])[t],b,c,η}]
FindInstance[(Subscript[x, 1])[t]≥0&&(Subscript[x, 2])[t]≥0&&(Subscript[x, 3])[t]≥0&&(Subscript[x, 5])[t]≥0&& (Subscript[x, 6])[t]≥0&& ((Subscript[x, 8])[t]/.sol2200[[3,1]])≥0 && ((Subscript[x, 9])[t]/.sol2200[[3,2]])≥0&& (Subscript[x, 1])[t]+(Subscript[x, 2])[t]+(Subscript[x, 3])[t]+(Subscript[x, 5])[t]+  (Subscript[x, 6])[t]+((Subscript[x, 8])[t]/.sol2200[[3,1]])+ ((Subscript[x, 9])[t]/.sol2200[[3,2]])≤1&&b>c>0&&0<η<1/5,{(Subscript[x, 1])[t],(Subscript[x, 2])[t],(Subscript[x, 3])[t],(Subscript[x, 5])[t],(Subscript[x, 6])[t],b,c,η}]
"NOTE: D2=0!"
((Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 4])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->((Subscript[x, 8])[t]/.sol2200[[3,1]]),(Subscript[x, 9])[t]->((Subscript[x, 9])[t]/.sol2200[[3,2]]),(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->1-((Subscript[x, 1])[t]+(Subscript[x, 2])[t]+(Subscript[x, 3])[t]+(Subscript[x, 5])[t]+(Subscript[x, 6])[t]+((Subscript[x, 8])[t]/.sol2200[[3,1]])+((Subscript[x, 9])[t]/.sol2200[[3,2]])),(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})//Simplify

XDYZ  (4, 7, 10, 11, 12, 14, 15, 16)

sol2205=Solve[((Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 13])[t]->0})==0&&((Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 13])[t]->0})==0&&((Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 13])[t]->0})==0,{(Subscript[x, 4])[t],(Subscript[x, 7])[t],(Subscript[x, 10])[t],(Subscript[x, 11])[t],(Subscript[x, 12])[t],(Subscript[x, 14])[t],(Subscript[x, 15])[t]}]//FullSimplify
FindInstance[(Subscript[x, 4])[t]≥0&&(Subscript[x, 7])[t]≥0&&(Subscript[x, 10])[t]≥0&&(Subscript[x, 11])[t]≥0&& ((Subscript[x, 12])[t]/.sol2205[[1,1]])≥0&& ((Subscript[x, 14])[t]/.sol2205[[1,2]])≥0 && (Subscript[x, 15])[t]≥0&& (Subscript[x, 4])[t]+(Subscript[x, 7])[t]+(Subscript[x, 10])[t]+(Subscript[x, 11])[t]+ ((Subscript[x, 12])[t]/.sol2205[[1,1]])+((Subscript[x, 14])[t]/.sol2205[[1,2]])+ (Subscript[x, 15])[t]≤1&&b>c>0&&0<η<1/5,{(Subscript[x, 4])[t],(Subscript[x, 7])[t],(Subscript[x, 10])[t],(Subscript[x, 11])[t],(Subscript[x, 15])[t],b,c,η}]
FindInstance[(Subscript[x, 4])[t]≥0&&(Subscript[x, 7])[t]≥0&&(Subscript[x, 10])[t]≥0&&(Subscript[x, 11])[t]≥0&& (Subscript[x, 12])[t]≥0&& ((Subscript[x, 14])[t]/.sol2205[[2,1]])≥0&& ((Subscript[x, 15])[t]/.sol2205[[2,2]])≥0 && (Subscript[x, 4])[t]+(Subscript[x, 7])[t]+(Subscript[x, 10])[t]+(Subscript[x, 11])[t]+ (Subscript[x, 12])[t]+((Subscript[x, 14])[t]/.sol2205[[2,1]])+((Subscript[x, 15])[t]/.sol2205[[2,2]])≤1&&b>c>0&&0<η<1/5,{(Subscript[x, 4])[t],(Subscript[x, 7])[t],(Subscript[x, 10])[t],(Subscript[x, 11])[t],(Subscript[x, 12])[t],b,c,η}]
FindInstance[(Subscript[x, 4])[t]≥0&&(Subscript[x, 7])[t]≥0&&(Subscript[x, 10])[t]≥0&&(Subscript[x, 11])[t]≥0&& (Subscript[x, 12])[t]≥0&& ((Subscript[x, 14])[t]/.sol2205[[3,1]])≥0&& ((Subscript[x, 15])[t]/.sol2205[[3,2]])≥0 && (Subscript[x, 4])[t]+(Subscript[x, 7])[t]+(Subscript[x, 10])[t]+(Subscript[x, 11])[t]+ (Subscript[x, 12])[t]+((Subscript[x, 14])[t]/.sol2205[[3,1]])+((Subscript[x, 15])[t]/.sol2205[[3,2]])≤1&&b>c>0&&0<η<1/5,{(Subscript[x, 4])[t],(Subscript[x, 7])[t],(Subscript[x, 10])[t],(Subscript[x, 11])[t],(Subscript[x, 12])[t],b,c,η}]

D2=D3=D4=0 (solutions 2300+)

CXYZ  (1, 2, 3, 4, 6, 7, 11, 12)

sol2300=Solve[((Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 5])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 12])[t]->1-((Subscript[x, 1])[t]+(Subscript[x, 2])[t]+(Subscript[x, 3])[t]+(Subscript[x, 4])[t]+(Subscript[x, 6])[t]+(Subscript[x, 7])[t]+(Subscript[x, 11])[t]),(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0&&((Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 5])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 12])[t]->1-((Subscript[x, 1])[t]+(Subscript[x, 2])[t]+(Subscript[x, 3])[t]+(Subscript[x, 4])[t]+(Subscript[x, 6])[t]+(Subscript[x, 7])[t]+(Subscript[x, 11])[t]),(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0&&((Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 5])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 12])[t]->1-((Subscript[x, 1])[t]+(Subscript[x, 2])[t]+(Subscript[x, 3])[t]+(Subscript[x, 4])[t]+(Subscript[x, 6])[t]+(Subscript[x, 7])[t]+(Subscript[x, 11])[t]),(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,{(Subscript[x, 1])[t],(Subscript[x, 2])[t],(Subscript[x, 3])[t],(Subscript[x, 4])[t],(Subscript[x, 6])[t],(Subscript[x, 7])[t],(Subscript[x, 11])[t]}]//FullSimplify
FindInstance[(Subscript[x, 1])[t]≥0&&(Subscript[x, 2])[t]≥0&&(Subscript[x, 3])[t]≥0&&(Subscript[x, 4])[t]≥0&& ((Subscript[x, 6])[t]/.sol2300[[1,1]])≥0&& ((Subscript[x, 7])[t]/.sol2300[[1,2]])≥0 && (Subscript[x, 11])[t]≥0&& (Subscript[x, 1])[t]+(Subscript[x, 2])[t]+(Subscript[x, 3])[t]+(Subscript[x, 4])[t]+ ((Subscript[x, 6])[t]/.sol2300[[1,1]])+((Subscript[x, 7])[t]/.sol2300[[1,2]])+ (Subscript[x, 11])[t]≤1&&b>c>0&&0<η<1/5,{(Subscript[x, 1])[t],(Subscript[x, 2])[t],(Subscript[x, 3])[t],(Subscript[x, 4])[t],(Subscript[x, 11])[t],b,c,η}]
FindInstance[(Subscript[x, 1])[t]≥0&&(Subscript[x, 2])[t]≥0&&(Subscript[x, 3])[t]≥0&&(Subscript[x, 4])[t]≥0&& ((Subscript[x, 6])[t]/.sol2300[[2,1]])≥0&& ((Subscript[x, 7])[t]/.sol2300[[2,2]])≥0 && (Subscript[x, 11])[t]≥0&& (Subscript[x, 1])[t]+(Subscript[x, 2])[t]+(Subscript[x, 3])[t]+(Subscript[x, 4])[t]+ ((Subscript[x, 6])[t]/.sol2300[[2,1]])+((Subscript[x, 7])[t]/.sol2300[[2,2]])+ (Subscript[x, 11])[t]≤1&&b>c>0&&0<η<1/5,{(Subscript[x, 1])[t],(Subscript[x, 2])[t],(Subscript[x, 3])[t],(Subscript[x, 4])[t],(Subscript[x, 11])[t],b,c,η}]
FindInstance[(Subscript[x, 1])[t]≥0&&(Subscript[x, 2])[t]≥0&&(Subscript[x, 3])[t]≥0&&(Subscript[x, 4])[t]≥0&& ((Subscript[x, 6])[t]/.sol2300[[3,1]])≥0&& ((Subscript[x, 7])[t]/.sol2300[[3,2]])≥0 && (Subscript[x, 11])[t]≥0&& (Subscript[x, 1])[t]+(Subscript[x, 2])[t]+(Subscript[x, 3])[t]+(Subscript[x, 4])[t]+ ((Subscript[x, 6])[t]/.sol2300[[3,1]])+((Subscript[x, 7])[t]/.sol2300[[3,2]])+ (Subscript[x, 11])[t]≤1&&b>c>0&&0<η<1/5,{(Subscript[x, 1])[t],(Subscript[x, 2])[t],(Subscript[x, 3])[t],(Subscript[x, 4])[t],(Subscript[x, 11])[t],b,c,η}]
"NOTE: D1=0!"
((Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->((Subscript[x, 6])[t]/.sol2300[[2,1]]),(Subscript[x, 7])[t]->((Subscript[x, 7])[t]/.sol2300[[2,2]]),(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 12])[t]->1-((Subscript[x, 1])[t]+(Subscript[x, 2])[t]+(Subscript[x, 3])[t]+(Subscript[x, 4])[t]+((Subscript[x, 6])[t]/.sol2300[[2,1]])+((Subscript[x, 7])[t]/.sol2300[[2,2]])+(Subscript[x, 11])[t]),(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})//Simplify

DXYZ  (5, 8, 9, 10, 13, 14, 15, 16)

sol2305=Solve[((Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0})==0&&((Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0})==0&&((Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0})==0,{(Subscript[x, 5])[t],(Subscript[x, 8])[t],(Subscript[x, 9])[t],(Subscript[x, 10])[t],(Subscript[x, 13])[t],(Subscript[x, 14])[t],(Subscript[x, 15])[t]}]//Simplify
FindInstance[(Subscript[x, 5])[t]≥0&&(Subscript[x, 8])[t]≥0&&(Subscript[x, 9])[t]≥0&&(Subscript[x, 10])[t]≥0&& ((Subscript[x, 13])[t]/.sol2305[[1,1]])≥0&& ((Subscript[x, 14])[t]/.sol2305[[1,2]])≥0 && (Subscript[x, 15])[t]≥0&& (Subscript[x, 5])[t]+(Subscript[x, 8])[t]+(Subscript[x, 9])[t]+(Subscript[x, 10])[t]+ ((Subscript[x, 13])[t]/.sol2305[[1,1]])+((Subscript[x, 14])[t]/.sol2305[[1,2]])+ (Subscript[x, 15])[t]≤1&&b>c>0&&0<η<1/5,{(Subscript[x, 5])[t],(Subscript[x, 8])[t],(Subscript[x, 9])[t],(Subscript[x, 10])[t],(Subscript[x, 15])[t],b,c,η}]
FindInstance[(Subscript[x, 5])[t]≥0&&(Subscript[x, 8])[t]≥0&&(Subscript[x, 9])[t]≥0&&(Subscript[x, 10])[t]≥0&& ((Subscript[x, 13])[t]/.sol2305[[2,1]])≥0&& ((Subscript[x, 14])[t]/.sol2305[[2,2]])≥0 && (Subscript[x, 15])[t]≥0&& (Subscript[x, 5])[t]+(Subscript[x, 8])[t]+(Subscript[x, 9])[t]+(Subscript[x, 10])[t]+ ((Subscript[x, 13])[t]/.sol2305[[2,1]])+((Subscript[x, 14])[t]/.sol2305[[2,2]])+ (Subscript[x, 15])[t]≤1&&b>c>0&&0<η<1/5,{(Subscript[x, 5])[t],(Subscript[x, 8])[t],(Subscript[x, 9])[t],(Subscript[x, 10])[t],(Subscript[x, 15])[t],b,c,η}]
FindInstance[(Subscript[x, 5])[t]≥0&&(Subscript[x, 8])[t]≥0&&(Subscript[x, 9])[t]≥0&&(Subscript[x, 10])[t]≥0&& ((Subscript[x, 13])[t]/.sol2305[[3,1]])≥0&& ((Subscript[x, 14])[t]/.sol2305[[3,2]])≥0 && (Subscript[x, 15])[t]≥0&& (Subscript[x, 5])[t]+(Subscript[x, 8])[t]+(Subscript[x, 9])[t]+(Subscript[x, 10])[t]+ ((Subscript[x, 13])[t]/.sol2305[[3,1]])+((Subscript[x, 14])[t]/.sol2305[[3,2]])+ (Subscript[x, 15])[t]≤1&&b>c>0&&0<η<1/5,{(Subscript[x, 5])[t],(Subscript[x, 8])[t],(Subscript[x, 9])[t],(Subscript[x, 10])[t],(Subscript[x, 15])[t],b,c,η}]

RESULT: There is no strict equilibrium based on three basic differences!

3.5 Equilibrium with 16 strategies (1 candidates, all basic payoff differences zero)

D1=D2=D3=D4=0 (solution 3000)

sol3000=Solve[(Π[1, t, 1,c,η,η]-Π[2, t, 1,c,η,η])==0&&(Π[1, t, 1,c,η,η]-Π[3, t, 1,c,η,η])==0&&(Π[1, t, 1,c,η,η]-Π[4, t, 1,c,η,η])==0&&(Π[1, t, 1,c,η,η]-Π[5, t, 1,c,η,η])==0,{(Subscript[x, 1])[t],(Subscript[x, 2])[t],(Subscript[x, 3])[t],(Subscript[x, 4])[t],(Subscript[x, 5])[t],(Subscript[x, 6])[t],(Subscript[x, 7])[t],(Subscript[x, 8])[t],(Subscript[x, 9])[t],(Subscript[x, 10])[t],(Subscript[x, 11])[t],(Subscript[x, 12])[t],(Subscript[x, 13])[t],(Subscript[x, 14])[t],(Subscript[x, 15])[t]}]//Simplify

FindInstance[((Subscript[x, 1])[t]/.sol3000[[1,1]])>=0&&((Subscript[x, 13])[t]/.sol3000[[1,2]])>=0&&(Subscript[x, 2])[t]>=0&&(Subscript[x, 3])[t]>=0&&(Subscript[x, 4])[t]>=0&&(Subscript[x, 5])[t]>=0&&(Subscript[x, 6])[t]>=0&&(Subscript[x, 7])[t]>=0&&(Subscript[x, 8])[t]>=0&&(Subscript[x, 9])[t]>=0&&(Subscript[x, 10])[t]>=0&&(Subscript[x, 11])[t]>=0&&(Subscript[x, 12])[t]>=0&&(Subscript[x, 14])[t]>=0&&(Subscript[x, 15])[t]>=0&&((Subscript[x, 1])[t]/.sol3000[[1,1]])+(Subscript[x, 2])[t]+(Subscript[x, 3])[t]+(Subscript[x, 4])[t]+(Subscript[x, 5])[t]+(Subscript[x, 6])[t]+(Subscript[x, 7])[t]+(Subscript[x, 8])[t]+(Subscript[x, 9])[t]+(Subscript[x, 10])[t]+(Subscript[x, 11])[t]+(Subscript[x, 12])[t]+((Subscript[x, 13])[t]/.sol3000[[1,2]])+(Subscript[x, 14])[t]+(Subscript[x, 15])[t]<=1&&1>c>0&&0<η<1/5,{(Subscript[x, 2])[t],(Subscript[x, 3])[t],(Subscript[x, 4])[t],(Subscript[x, 5])[t],(Subscript[x, 6])[t],(Subscript[x, 7])[t],(Subscript[x, 8])[t],(Subscript[x, 9])[t],(Subscript[x, 10])[t],(Subscript[x, 11])[t],(Subscript[x, 12])[t],(Subscript[x, 14])[t],(Subscript[x, 15])[t],c,η}]

FindInstance[((Subscript[x, 13])[t]/.sol3000[[2,1]])>=0&&((Subscript[x, 14])[t]/.sol3000[[2,2]])>=0&&(Subscript[x, 1])[t]>=0&&(Subscript[x, 2])[t]>=0&&(Subscript[x, 3])[t]>=0&&(Subscript[x, 4])[t]>=0&&(Subscript[x, 5])[t]>=0&&(Subscript[x, 6])[t]>=0&&(Subscript[x, 7])[t]>=0&&(Subscript[x, 8])[t]>=0&&(Subscript[x, 9])[t]>=0&&(Subscript[x, 10])[t]>=0&&(Subscript[x, 11])[t]>=0&&(Subscript[x, 12])[t]>=0&&(Subscript[x, 15])[t]>=0&&(Subscript[x, 1])[t]+(Subscript[x, 2])[t]+(Subscript[x, 3])[t]+(Subscript[x, 4])[t]+(Subscript[x, 5])[t]+(Subscript[x, 6])[t]+(Subscript[x, 7])[t]+(Subscript[x, 8])[t]+(Subscript[x, 9])[t]+(Subscript[x, 10])[t]+(Subscript[x, 11])[t]+(Subscript[x, 12])[t]+((Subscript[x, 13])[t]/.sol3000[[2,1]])+((Subscript[x, 14])[t]/.sol3000[[2,2]])+(Subscript[x, 15])[t]<=1&&1>c>0&&0<η<1/5,{(Subscript[x, 1])[t],(Subscript[x, 2])[t],(Subscript[x, 3])[t],(Subscript[x, 4])[t],(Subscript[x, 5])[t],(Subscript[x, 6])[t],(Subscript[x, 7])[t],(Subscript[x, 8])[t],(Subscript[x, 9])[t],(Subscript[x, 10])[t],(Subscript[x, 11])[t],(Subscript[x, 12])[t],(Subscript[x, 15])[t],c,η},Reals, WorkingPrecision->2]

FindInstance[((Subscript[x, 13])[t]/.sol3000[[2,1]])>0&&((Subscript[x, 14])[t]/.sol3000[[2,2]])>0&&(Subscript[x, 1])[t]>0&&(Subscript[x, 2])[t]>0&&(Subscript[x, 3])[t]>0&&(Subscript[x, 4])[t]>0&&(Subscript[x, 5])[t]>0&&(Subscript[x, 6])[t]>0&&(Subscript[x, 7])[t]>0&&(Subscript[x, 8])[t]>0&&(Subscript[x, 9])[t]>0&&(Subscript[x, 10])[t]>0&&(Subscript[x, 11])[t]>0&&(Subscript[x, 12])[t]>0&&(Subscript[x, 15])[t]>0&&(Subscript[x, 1])[t]+(Subscript[x, 2])[t]+(Subscript[x, 3])[t]+(Subscript[x, 4])[t]+(Subscript[x, 5])[t]+(Subscript[x, 6])[t]+(Subscript[x, 7])[t]+(Subscript[x, 8])[t]+(Subscript[x, 9])[t]+(Subscript[x, 10])[t]+(Subscript[x, 11])[t]+(Subscript[x, 12])[t]+((Subscript[x, 13])[t]/.sol3000[[2,1]])+((Subscript[x, 14])[t]/.sol3000[[2,2]])+(Subscript[x, 15])[t]<1&&1>c>0&&0<η<1/5,{(Subscript[x, 1])[t],(Subscript[x, 2])[t],(Subscript[x, 3])[t],(Subscript[x, 4])[t],(Subscript[x, 5])[t],(Subscript[x, 6])[t],(Subscript[x, 7])[t],(Subscript[x, 8])[t],(Subscript[x, 9])[t],(Subscript[x, 10])[t],(Subscript[x, 11])[t],(Subscript[x, 12])[t],(Subscript[x, 15])[t],c,η},Reals, WorkingPrecision->2]

FindInstance[((Subscript[x, 1])[t]/.sol3000[[3,1]])>=0&&((Subscript[x, 14])[t]/.sol3000[[3,2]])>=0&&(Subscript[x, 2])[t]>=0&&(Subscript[x, 3])[t]>=0&&(Subscript[x, 4])[t]>=0&&(Subscript[x, 5])[t]>=0&&(Subscript[x, 6])[t]>=0&&(Subscript[x, 7])[t]>=0&&(Subscript[x, 8])[t]>=0&&(Subscript[x, 9])[t]>=0&&(Subscript[x, 10])[t]>=0&&(Subscript[x, 11])[t]>=0&&(Subscript[x, 12])[t]>=0&&(Subscript[x, 13])[t]>=0&&(Subscript[x, 15])[t]>=0&&((Subscript[x, 1])[t]/.sol3000[[3,1]])+(Subscript[x, 2])[t]+(Subscript[x, 3])[t]+(Subscript[x, 4])[t]+(Subscript[x, 5])[t]+(Subscript[x, 6])[t]+(Subscript[x, 7])[t]+(Subscript[x, 8])[t]+(Subscript[x, 9])[t]+(Subscript[x, 10])[t]+(Subscript[x, 11])[t]+(Subscript[x, 12])[t]+(Subscript[x, 13])[t]+((Subscript[x, 14])[t]/.sol3000[[3,2]])+(Subscript[x, 15])[t]<=1&&1>c>0&&0<η<1/5,{(Subscript[x, 2])[t],(Subscript[x, 3])[t],(Subscript[x, 4])[t],(Subscript[x, 5])[t],(Subscript[x, 6])[t],(Subscript[x, 7])[t],(Subscript[x, 8])[t],(Subscript[x, 9])[t],(Subscript[x, 10])[t],(Subscript[x, 11])[t],(Subscript[x, 12])[t],(Subscript[x, 13])[t],(Subscript[x, 15])[t],c,η}]

RESULT: Fully mixed equilibrium does exist

4. Potential Stability of the 30 remaining candidates

4.1 Potentially stable equilibria with a single strategy (16 candidates)

INVATION BY DDDD?

"1-CCCC"
diff116test=(Π[1, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->1,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify
FindInstance[%>=0&&b>c>0&&0<η<1/5,{c,b,η}]
"2-CCCD"
diff216test=(Π[2, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->1,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify
FindInstance[%>=0&&b>c>0&&0<η<1/5,{c,b,η}]
"3-CCDC"
diff316test=(Π[3, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->1,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify
FindInstance[%>=0&&b>c>0&&0<η<1/5,{c,b,η}]
"4-CDCC"
diff416test=(Π[4, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->1,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify
FindInstance[%>=0&&b>c>0&&0<η<1/5,{c,b,η}]
"5-DCCC"
diff516test=(Π[5, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->1,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify
FindInstance[%>=0&&b>c>0&&0<η<1/5,{c,b,η}]
"6-CCDD"
diff616test=(Π[6, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->1,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify
FindInstance[%>=0&&b>c>0&&0<η<1/5,{c,b,η}]
"7-CDCD"
diff716test=(Π[7, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->1,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify
FindInstance[%>=0&&b>c>0&&0<η<1/5,{c,b,η}]
"8-DCCD"
diff816test=(Π[8, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->1,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify
FindInstance[%>=0&&b>c>0&&0<η<1/5,{c,b,η}]
"9-DCDC"
diff916test=(Π[9, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->1,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify
FindInstance[%>=0&&b>c>0&&0<η<1/5,{c,b,η}]
"10-DDCC"
diff1016test=(Π[10, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->1,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify
FindInstance[%>=0&&b>c>0&&0<η<1/5,{c,b,η}]
"11-CDDC"
diff1116test=(Π[11, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->1,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify
FindInstance[%>=0&&b>c>0&&0<η<1/5,{c,b,η}]
"12-CDDD"
diff1216test=(Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify
FindInstance[%>=0&&b>c>0&&0<η<1/5,{c,b,η}]
"13-DCDD"
diff1316test=(Π[13, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->1,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify
FindInstance[%>=0&&b>c>0&&0<η<1/5,{c,b,η}]
"14-DDCD"
diff1416test=(Π[14, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->1,(Subscript[x, 15])[t]->0}//Simplify
FindInstance[%>=0&&b>c>0&&0<η<1/5,{c,b,η}]
"15-DDDC"
diff1516test=(Π[15, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->1}//Simplify
FindInstance[%>=0&&b>c>0&&0<η<1/5,{c,b,η}]

Digging deeper for strategies 2, 3, 6, 8, 12, 13 which cannot be invaded by DDDD

"2 looses against 10"
diff210test=(Π[2, t, b,c,η,η]-Π[10, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->1,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify
FindInstance[%>=0&&b>c>0&&0<η<1/5,{c,b,η}]
"3 looses against 2"
diff32test=(Π[3, t, b,c,η,η]-Π[2, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->1,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify
FindInstance[%>=0&&b>c>0&&0<η<1/5,{c,b,η}]
"8 looses against 7"
diff87test=(Π[8, t, b,c,η,η]-Π[7, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->1,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify
FindInstance[%>=0&&b>c>0&&0<η<1/5,{c,b,η}]
"13 looses against 12"
diff1312test=(Π[13, t, b,c,η,η]-Π[12, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->1,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify
FindInstance[%>=0&&b>c>0&&0<η<1/5,{c,b,η}]

strategy 6 in detail: strategy 7 earns the same payoff if (Subscript[x, 7])[t]+(Subscript[x, 6])[t]=1. Hence, there is no force reestablishing (Subscript[x, 6])[t]=1.

diff67test=(Π[6, t, b,c,η,η]-Π[7, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 7])[t]->1-(Subscript[x, 6])[t],(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify

strategy 12 in detail: for any set of parameters in an x12=1 equilibrium there is always at least one strategy which earns strictly higher profits

diff121test=(Π[12, t, b,c,η,η]-Π[1, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff122test=(Π[12, t, b,c,η,η]-Π[2, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff123test=(Π[12, t, b,c,η,η]-Π[3, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff124test=(Π[12, t, b,c,η,η]-Π[4, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff125test=(Π[12, t, b,c,η,η]-Π[5, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff126test=(Π[12, t, b,c,η,η]-Π[6, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff127test=(Π[12, t, b,c,η,η]-Π[7, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff128test=(Π[12, t, b,c,η,η]-Π[8, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff129test=(Π[12, t, b,c,η,η]-Π[9, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff1210test=(Π[12, t, b,c,η,η]-Π[10, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff1211test=(Π[12, t, b,c,η,η]-Π[11, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff1213test=(Π[12, t, b,c,η,η]-Π[13, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff1214test=(Π[12, t, b,c,η,η]-Π[14, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff1215test=(Π[12, t, b,c,η,η]-Π[15, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;
diff1216test=(Π[12, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//Simplify;

FindInstance[diff121test>0&&diff122test>0&&diff123test>0&&diff124test>0&&diff125test>0&&diff127test>0&&diff128test>0&&diff129test>0&&diff1210test>0&&diff1211test>0&&diff126test>0&&diff1213test>0&&diff1214test>0&&diff1215test>0&&diff1216test>0&&b>c>0&&0<η<1/5,{b,c,η}]

strategy 16 in detail: strategy 16 earns the striclty highest payoffs in an all-keep equilibrium as long as η>0

Π[1, t, b,c,η,η]/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0}//FullSimplify;
%/.(Subscript[x, 15])[t]->0
Π[2, t, b,c,η,η]/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0}//FullSimplify;
%/.(Subscript[x, 15])[t]->0
Π[3, t, b,c,η,η]/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0}//FullSimplify;
%/.(Subscript[x, 15])[t]->0
Π[4, t, b,c,η,η]/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0}//FullSimplify;
%/.(Subscript[x, 15])[t]->0
Π[5, t, b,c,η,η]/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0}//FullSimplify;
%/.(Subscript[x, 15])[t]->0
Π[6, t, b,c,η,η]/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0}//FullSimplify;
%/.(Subscript[x, 15])[t]->0
Π[7, t, b,c,η,η]/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0}//FullSimplify;
%/.(Subscript[x, 15])[t]->0
Π[8, t, b,c,η,η]/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0}//FullSimplify;
%/.(Subscript[x, 15])[t]->0
Π[9, t, b,c,η,η]/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0}//FullSimplify;
%/.(Subscript[x, 15])[t]->0
Π[10, t, b,c,η,η]/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0}//FullSimplify;
%/.(Subscript[x, 15])[t]->0
Π[11, t, b,c,η,η]/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0}//FullSimplify;
%/.(Subscript[x, 15])[t]->0
Π[12, t, b,c,η,η]/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0}//FullSimplify;
%/.(Subscript[x, 15])[t]->0
Π[13, t, b,c,η,η]/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0}//FullSimplify;
%/.(Subscript[x, 15])[t]->0
Π[14, t, b,c,η,η]/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0}//FullSimplify;
%/.(Subscript[x, 15])[t]->0
Π[15, t, b,c,η,η]/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0}//FullSimplify;
%/.(Subscript[x, 15])[t]->0
Π[16, t, b,c,η,η]/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0}//FullSimplify;
%/.(Subscript[x, 15])[t]->0

RESULT: No single strategy except DDDD can be stable, DDDD is indeed stable

4.2 Potentially stable equilibria with two strategies (9 candidates)

CCDC and DCDC (3 and 9)

"In 3,9 eq strategy 2 could profitable invade"
Simplify[((Π[3, t, b,c,η,η]-Π[2, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->((Subscript[x, 3])[t]/.sol520[[2]]),(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->1-((Subscript[x, 3])[t]/.sol520[[2]]),(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}),0<η<1/5&&0<c<b]
FindInstance[1>(((Subscript[x, 3])[t]/.sol520[[2]])/.b->1)>0&&((Π[3, t, 1,c,η,η]-Π[2, t, 1,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->(((Subscript[x, 3])[t]/.sol520[[2]])/.b->1),(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->1-(((Subscript[x, 3])[t]/.sol520[[2]])/.b->1),(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})>=0&&1>c>0&&0<η<1/5,{c,η}]

CDDD and DDDD (12 and 16)

"In 12,16 eq, strategy  6 could profitably invade"
FullSimplify[((Π[12, t, b,c,η,η]-Π[6, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->((Subscript[x, 12])[t]/.sol570[[2]]),(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}),0<η<1/5&&0<c<b]
FindInstance[1>(((Subscript[x, 12])[t]/.sol570[[2]])/.b->1) >0&&((Π[12, t, 1,c,η,η]-Π[6, t, 1,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->(((Subscript[x, 12])[t]/.sol570[[2]])/.b->1),(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})>=0&&1>c>0&&0<η<1/5,{c,η}]

CCDC and CDDC (3 and 11)

"In 3,11  eq, strategy  2 could profitably  invade"
Simplify[((Π[3, t, b,c,η,η]-Π[2, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->((Subscript[x, 3])[t]/.sol620[[1]]),(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->1-((Subscript[x, 3])[t]/.sol620[[1]]),(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}),0<η<1/5&&0<c<b]
FindInstance[1>(((Subscript[x, 3])[t]/.sol620[[1]])/.b->1)>0&&((Π[3, t, 1,c,η,η]-Π[2, t, 1,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->(((Subscript[x, 3])[t]/.sol620[[1]])/.b->1),(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->1-(((Subscript[x, 3])[t]/.sol620[[1]])/.b->1),(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})>=0&&1>c>0&&0<η<1/5,{c,η}]

DCDD and DDDD (13 and 16)

"In 13, 16  eq , strategy 3  can profitably invade"
FullSimplify[((Π[13, t, b,c,η,η]-Π[3, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->((Subscript[x, 13])[t]/.sol670[[1]]),(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}),0<η<1/5&&0<c<b]
FindInstance[1>(((Subscript[x, 13])[t]/.sol670[[1]])/.b->1)>0&&((Π[13, t, 1,c,η,η]-Π[3, t, 1,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->(((Subscript[x, 13])[t]/.sol670[[1]])/.b->1),(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})>=0&&1>c>0&&0<η<1/5,{c,η}]

CCCD and CCDD (2 and 6)

"In a  2,6 eq,  strategy  16 can profitably invade"
Simplify[((Π[2, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->((Subscript[x, 2])[t]/.sol710[[2]]),(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->1-((Subscript[x, 2])[t]/.sol710[[2]]),(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}),0<η<1/5&&0<c<b]
FindInstance[1>(((Subscript[x, 2])[t]/.sol710[[2]])/.b->1)>0&&((Π[2, t, 1,c,η,η]-Π[16, t, 1,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->(((Subscript[x, 2])[t]/.sol710[[2]])/.b->1),(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->1-(((Subscript[x, 2])[t]/.sol710[[2]])/.b->1),(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})>=0&&1>c>0&&0<η<1/5,{c,η}]

CDCD and CDDD (7 and 12)

"For the  first solution, strategy  3 can profitably invade"
Simplify[((Π[7, t, b,c,η,η]-Π[3, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->((Subscript[x, 7])[t]/.sol740[[1]]),(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1-((Subscript[x, 7])[t]/.sol740[[1]]),(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}),0<η<1/5&&0<c<b]
FindInstance[1>(((Subscript[x, 7])[t]/.sol740[[1]])/.b->1)>0&&((Π[7, t, 1,c,η,η]-Π[3, t, 1,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->(((Subscript[x, 7])[t]/.sol740[[1]])/.b->1),(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->1-(((Subscript[x, 7])[t]/.sol740[[1]])/.b->1),(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})>=0&&1>c>0&&0<η<1/5,{c,η}]

DCCD and DCDD (8 and 13)

"In 8,13 eq, strategy  16 can profitably  invade"
Simplify[((Π[8, t,b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->((Subscript[x, 8])[t]/.sol760[[2]]),(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->1-((Subscript[x, 8])[t]/.sol760[[2]]),(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}),0<η<1/5&&0<c<b]
FindInstance[1>(((Subscript[x, 8])[t]/.sol760[[2]])/.b->1)>0&&((Π[8, t, 1,c,η,η]-Π[16, t, 1,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->(((Subscript[x, 8])[t]/.sol760[[2]])/.b->1),(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->1-(((Subscript[x, 8])[t]/.sol760[[2]])/.b->1),(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})>=0&&1>c>0&&0<η<1/5,{c,η}]

CCCC and CCDC (1 and 3)

"Inner stability";
D[(Π[1, t, b,c,η,η]-Π[3, t, b,c,η,η]),(Subscript[x, 1])[t]]/.{(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->1-(Subscript[x, 1])[t],(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}//FullSimplify
FindInstance[%<=0&&0<=(Subscript[x, 1])[t]<=1&&b>c>0&&0<τ<1/5,{b,c,η,(Subscript[x, 1])[t]}]

CCCC and CCCD (1 and 2)

" In a 1,2 eq, strategy 16  can profitably invade"
Simplify[((Π[1, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->((Subscript[x, 1])[t]/.sol800[[1]]),(Subscript[x, 2])[t]->1-((Subscript[x, 1])[t]/.sol800[[1]]),(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}),0<η<1&&0<c<b]
FindInstance[1>(((Subscript[x, 1])[t]/.sol800[[1]])/.b->1)>0&&((Π[1, t,1,c,η,η]-Π[16, t, 1,c,η,η])/.{(Subscript[x, 1])[t]->(((Subscript[x, 1])[t]/.sol800[[1]])/.b->1),(Subscript[x, 2])[t]->1-(((Subscript[x, 1])[t]/.sol800[[1]])/.b->1),(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})>=0&&1>c>0&&0<η<1/5,{c,η}]

RESULT: Only (1,3) can be a stable

4.3 Potentially stable equilibria with 4 strategies (4 candidates)

CCCD and DDCD -- 2, 7, 8, 14 (CCCD - DCCD = 0 and CCCD - CDCD = 0 : 2, 8 and 2, 7)

"strategy 3 could profitably invade"
FindInstance[((Subscript[x, 7])[t]/.sol1010[[4,1]])>0&&((Subscript[x, 8])[t]/.sol1010[[4,2]])>0&&(Subscript[x, 2])[t]>0&&(Subscript[x, 2])[t]+((Subscript[x, 7])[t]/.sol1010[[4,1]])+((Subscript[x, 8])[t]/.sol1010[[4,2]])<1&&b>c>0&&0<η<1/5&&((Π[2, t, b,c,η,η]-Π[3, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->((Subscript[x, 7])[t]/.sol1010[[4,1]]),(Subscript[x, 8])[t]->((Subscript[x, 8])[t]/.sol1010[[4,2]]),(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->1-(Subscript[x, 2])[t]-((Subscript[x, 7])[t]/.sol1010[[4,1]])-((Subscript[x, 8])[t]/.sol1010[[4,2]]),(Subscript[x, 15])[t]->0})>=0,{b,c,η,(Subscript[x, 2])[t]}]
Reduce[((Subscript[x, 7])[t]/.sol1010[[4,1]])>0&&((Subscript[x, 8])[t]/.sol1010[[4,2]])>0&&(Subscript[x, 2])[t]>0&&(Subscript[x, 2])[t]+((Subscript[x, 7])[t]/.sol1010[[4,1]])+((Subscript[x, 8])[t]/.sol1010[[4,2]])<1&&b>c>0&&0<η<1/5&&((Π[2, t,b,c,η,η]-Π[3, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->((Subscript[x, 7])[t]/.sol1010[[4,1]]),(Subscript[x, 8])[t]->((Subscript[x, 8])[t]/.sol1010[[4,2]]),(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->1-(Subscript[x, 2])[t]-((Subscript[x, 7])[t]/.sol1010[[4,1]])-((Subscript[x, 8])[t]/.sol1010[[4,2]]),(Subscript[x, 15])[t]->0})>=0]

CCDC and DDDC -- 3, 9, 11, 15 (CCDC - DCDC = 0 and CCDC - CDDC = 0 : 3, 9 and 3, 11)

"strategy 16 could profitably invade"
FindInstance[((Subscript[x, 9])[t]/.sol1020[[4,1]])>0&&((Subscript[x, 11])[t]/.sol1020[[4,2]])>0&&(Subscript[x, 3])[t]>0&&(Subscript[x, 3])[t]+((Subscript[x, 9])[t]/.sol1020[[4,1]])+((Subscript[x, 11])[t]/.sol1020[[4,2]])<1&&b>c>0&&0<η<1/5&&((Π[3, t,  b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->((Subscript[x, 9])[t]/.sol1020[[4,1]]),(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->((Subscript[x, 11])[t]/.sol1020[[4,2]]),(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->1-(Subscript[x, 3])[t]-((Subscript[x, 9])[t]/.sol1020[[4,1]])-((Subscript[x, 11])[t]/.sol1020[[4,2]])})>=0,{b,c,η,(Subscript[x, 3])[t]}]
Reduce[((Subscript[x, 9])[t]/.sol1020[[4,1]])>0&&((Subscript[x, 11])[t]/.sol1020[[4,2]])>0&&(Subscript[x, 3])[t]>0&&(Subscript[x, 3])[t]+((Subscript[x, 9])[t]/.sol1020[[4,1]])+((Subscript[x, 11])[t]/.sol1020[[4,2]])<1&&b>c>0&&0<η<1/5&&((Π[3, t,  b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->((Subscript[x, 9])[t]/.sol1020[[4,1]]),(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->((Subscript[x, 11])[t]/.sol1020[[4,2]]),(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->1-(Subscript[x, 3])[t]-((Subscript[x, 9])[t]/.sol1020[[4,1]])-((Subscript[x, 11])[t]/.sol1020[[4,2]])})>=0]

DCCC and DCDD -- 5, 8, 9, 13

"strategy 16 could profitably invade"
FindInstance[((Subscript[x, 8])[t]/.sol1520[[4,1]])>0&&((Subscript[x, 9])[t]/.sol1520[[4,2]])>0&&(Subscript[x, 5])[t]>0&&(Subscript[x, 5])[t]+((Subscript[x, 8])[t]/.sol1520[[4,1]])+((Subscript[x, 9])[t]/.sol1520[[4,2]])<1&&b>c>0&&0<η<1/5&&((Π[8, t,b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->((Subscript[x, 8])[t]/.sol1520[[4,1]]),(Subscript[x, 9])[t]->((Subscript[x, 9])[t]/.sol1520[[4,2]]),(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->1-(Subscript[x, 5])[t]-((Subscript[x, 8])[t]/.sol1520[[4,1]])-((Subscript[x, 9])[t]/.sol1520[[4,2]]),(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})>=0,{b,c,η,(Subscript[x, 5])[t]}]
Reduce[((Subscript[x, 8])[t]/.sol1520[[4,1]])>0&&((Subscript[x, 9])[t]/.sol1520[[4,2]])>0&&(Subscript[x, 5])[t]>0&&(Subscript[x, 5])[t]+((Subscript[x, 8])[t]/.sol1520[[4,1]])+((Subscript[x, 9])[t]/.sol1520[[4,2]])<1&&b>c>0&&0<η<1/5&&((Π[8, t, b,c,η,η]-Π[16, t, b,c,η,η])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->((Subscript[x, 8])[t]/.sol1520[[4,1]]),(Subscript[x, 9])[t]->((Subscript[x, 9])[t]/.sol1520[[4,2]]),(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->1-(Subscript[x, 5])[t]-((Subscript[x, 8])[t]/.sol1520[[4,1]])-((Subscript[x, 9])[t]/.sol1520[[4,2]]),(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})>=0]

RESULT: Only (1, 2, 3, 6) can be stable

4.4 Equilibrium with 8 strategies (no candidate):

RESULT: No candidate remaining

4.5 Equilibrium with 16 strategies (1 candidate: (Subscript[x, 6])[t]=((3 c)/(3-7 η+4 (η^2))), (Subscript[x, 16])[t]=1-((3 c)/(3-7 η+4 (η^2))) is solution to D1=D2=D3=D4=0)

((Subscript[x, 14])[t]/.sol3000[[2,1]])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 15])[t]->0}
((Subscript[x, 13])[t]/.sol3000[[2,1]])/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 15])[t]->0}
testfull=(Subscript[x, 6])[t]/.Solve[%==0,(Subscript[x, 6])[t]][[1]]

eqn[i_,b_,c_,ϵ_,γ_]=D[(Subscript[x, i])[t],t]==(Subscript[x, i])[t]*(Π[i,t,b,c,ϵ,γ]-Ave[t,b,c,ϵ,γ]);
L1=(Subscript[x, 1])'[t]/.Solve[eqn[1,1,c,η,η], (Subscript[x, 1])'[t]][[1]];
L2=(Subscript[x, 2])'[t]/.Solve[eqn[2,1,c,η,η], (Subscript[x, 2])'[t]][[1]];
L3=(Subscript[x, 3])'[t]/.Solve[eqn[3,1,c,η,η], (Subscript[x, 3])'[t]][[1]];
L4=(Subscript[x, 4])'[t]/.Solve[eqn[4,1,c,η,η], (Subscript[x, 4])'[t]][[1]];
L5=(Subscript[x, 5])'[t]/.Solve[eqn[5,1,c,η,η], (Subscript[x, 5])'[t]][[1]];
L6=(Subscript[x, 6])'[t]/.Solve[eqn[6,1,c,η,η], (Subscript[x, 6])'[t]][[1]];
L7=(Subscript[x, 7])'[t]/.Solve[eqn[7,1,c,η,η], (Subscript[x, 7])'[t]][[1]];
L8=(Subscript[x, 8])'[t]/.Solve[eqn[8,1,c,η,η], (Subscript[x, 8])'[t]][[1]];
L9=(Subscript[x, 9])'[t]/.Solve[eqn[9,1,c,η,η], (Subscript[x, 9])'[t]][[1]];
L10=(Subscript[x, 10])'[t]/.Solve[eqn[10,1,c,η,η], (Subscript[x, 10])'[t]][[1]];
L11=(Subscript[x, 11])'[t]/.Solve[eqn[11,1,c,η,η], (Subscript[x, 11])'[t]][[1]];
L12=(Subscript[x, 12])'[t]/.Solve[eqn[12,1,c,η,η], (Subscript[x, 12])'[t]][[1]];
L13=(Subscript[x, 13])'[t]/.Solve[eqn[13,1,c,η,η], (Subscript[x, 13])'[t]][[1]];
L14=(Subscript[x, 14])'[t]/.Solve[eqn[14,1,c,η,η], (Subscript[x, 14])'[t]][[1]];
L15=(Subscript[x, 15])'[t]/.Solve[eqn[15,1,c,η,η], (Subscript[x, 15])'[t]][[1]];
Mfull={{D[L1,(Subscript[x, 1])[t]],D[L1,(Subscript[x, 2])[t]],D[L1,(Subscript[x, 3])[t]],D[L1,(Subscript[x, 4])[t]],D[L1,(Subscript[x, 5])[t]],D[L1,(Subscript[x, 6])[t]],D[L1,(Subscript[x, 7])[t]],D[L1,(Subscript[x, 8])[t]],D[L1,(Subscript[x, 9])[t]],D[L1,(Subscript[x, 10])[t]],D[L1,(Subscript[x, 11])[t]],D[L1,(Subscript[x, 12])[t]],D[L1,(Subscript[x, 13])[t]],D[L1,(Subscript[x, 14])[t]],D[L1,(Subscript[x, 15])[t]]},{D[L2,(Subscript[x, 1])[t]],D[L2,(Subscript[x, 2])[t]],D[L2,(Subscript[x, 3])[t]],D[L2,(Subscript[x, 4])[t]],D[L2,(Subscript[x, 5])[t]],D[L2,(Subscript[x, 6])[t]],D[L2,(Subscript[x, 7])[t]],D[L2,(Subscript[x, 8])[t]],D[L2,(Subscript[x, 9])[t]],D[L2,(Subscript[x, 10])[t]],D[L2,(Subscript[x, 11])[t]],D[L2,(Subscript[x, 12])[t]],D[L2,(Subscript[x, 13])[t]],D[L2,(Subscript[x, 14])[t]],D[L2,(Subscript[x, 15])[t]]},{D[L3,(Subscript[x, 1])[t]],D[L3,(Subscript[x, 2])[t]],D[L3,(Subscript[x, 3])[t]],D[L3,(Subscript[x, 4])[t]],D[L3,(Subscript[x, 5])[t]],D[L3,(Subscript[x, 6])[t]],D[L3,(Subscript[x, 7])[t]],D[L3,(Subscript[x, 8])[t]],D[L3,(Subscript[x, 9])[t]],D[L3,(Subscript[x, 10])[t]],D[L3,(Subscript[x, 11])[t]],D[L3,(Subscript[x, 12])[t]],D[L3,(Subscript[x, 13])[t]],D[L3,(Subscript[x, 14])[t]],D[L3,(Subscript[x, 15])[t]]},{D[L4,(Subscript[x, 1])[t]],D[L4,(Subscript[x, 2])[t]],D[L4,(Subscript[x, 3])[t]],D[L4,(Subscript[x, 4])[t]],D[L4,(Subscript[x, 5])[t]],D[L4,(Subscript[x, 6])[t]],D[L4,(Subscript[x, 7])[t]],D[L4,(Subscript[x, 8])[t]],D[L4,(Subscript[x, 9])[t]],D[L4,(Subscript[x, 10])[t]],D[L4,(Subscript[x, 11])[t]],D[L4,(Subscript[x, 12])[t]],D[L4,(Subscript[x, 13])[t]],D[L4,(Subscript[x, 14])[t]],D[L4,(Subscript[x, 15])[t]]},{D[L5,(Subscript[x, 1])[t]],D[L5,(Subscript[x, 2])[t]],D[L5,(Subscript[x, 3])[t]],D[L5,(Subscript[x, 4])[t]],D[L5,(Subscript[x, 5])[t]],D[L5,(Subscript[x, 6])[t]],D[L5,(Subscript[x, 7])[t]],D[L5,(Subscript[x, 8])[t]],D[L5,(Subscript[x, 9])[t]],D[L5,(Subscript[x, 10])[t]],D[L5,(Subscript[x, 11])[t]],D[L5,(Subscript[x, 12])[t]],D[L5,(Subscript[x, 13])[t]],D[L5,(Subscript[x, 14])[t]],D[L5,(Subscript[x, 15])[t]]},{D[L6,(Subscript[x, 1])[t]],D[L6,(Subscript[x, 2])[t]],D[L6,(Subscript[x, 3])[t]],D[L6,(Subscript[x, 4])[t]],D[L6,(Subscript[x, 5])[t]],D[L6,(Subscript[x, 6])[t]],D[L6,(Subscript[x, 7])[t]],D[L6,(Subscript[x, 8])[t]],D[L6,(Subscript[x, 9])[t]],D[L6,(Subscript[x, 10])[t]],D[L6,(Subscript[x, 11])[t]],D[L6,(Subscript[x, 12])[t]],D[L6,(Subscript[x, 13])[t]],D[L6,(Subscript[x, 14])[t]],D[L6,(Subscript[x, 15])[t]]},{D[L7,(Subscript[x, 1])[t]],D[L7,(Subscript[x, 2])[t]],D[L7,(Subscript[x, 3])[t]],D[L7,(Subscript[x, 4])[t]],D[L7,(Subscript[x, 5])[t]],D[L7,(Subscript[x, 6])[t]],D[L7,(Subscript[x, 7])[t]],D[L7,(Subscript[x, 8])[t]],D[L7,(Subscript[x, 9])[t]],D[L7,(Subscript[x, 10])[t]],D[L7,(Subscript[x, 11])[t]],D[L7,(Subscript[x, 12])[t]],D[L7,(Subscript[x, 13])[t]],D[L7,(Subscript[x, 14])[t]],D[L7,(Subscript[x, 15])[t]]},{D[L8,(Subscript[x, 1])[t]],D[L8,(Subscript[x, 2])[t]],D[L8,(Subscript[x, 3])[t]],D[L8,(Subscript[x, 4])[t]],D[L8,(Subscript[x, 5])[t]],D[L8,(Subscript[x, 6])[t]],D[L8,(Subscript[x, 7])[t]],D[L8,(Subscript[x, 8])[t]],D[L8,(Subscript[x, 9])[t]],D[L8,(Subscript[x, 10])[t]],D[L8,(Subscript[x, 11])[t]],D[L8,(Subscript[x, 12])[t]],D[L8,(Subscript[x, 13])[t]],D[L8,(Subscript[x, 14])[t]],D[L8,(Subscript[x, 15])[t]]},{D[L9,(Subscript[x, 1])[t]],D[L9,(Subscript[x, 2])[t]],D[L9,(Subscript[x, 3])[t]],D[L9,(Subscript[x, 4])[t]],D[L9,(Subscript[x, 5])[t]],D[L9,(Subscript[x, 6])[t]],D[L9,(Subscript[x, 7])[t]],D[L9,(Subscript[x, 8])[t]],D[L9,(Subscript[x, 9])[t]],D[L9,(Subscript[x, 10])[t]],D[L9,(Subscript[x, 11])[t]],D[L9,(Subscript[x, 12])[t]],D[L9,(Subscript[x, 13])[t]],D[L9,(Subscript[x, 14])[t]],D[L9,(Subscript[x, 15])[t]]},{D[L10,(Subscript[x, 1])[t]],D[L10,(Subscript[x, 2])[t]],D[L10,(Subscript[x, 3])[t]],D[L10,(Subscript[x, 4])[t]],D[L10,(Subscript[x, 5])[t]],D[L10,(Subscript[x, 6])[t]],D[L10,(Subscript[x, 7])[t]],D[L10,(Subscript[x, 8])[t]],D[L10,(Subscript[x, 9])[t]],D[L10,(Subscript[x, 10])[t]],D[L10,(Subscript[x, 11])[t]],D[L10,(Subscript[x, 12])[t]],D[L10,(Subscript[x, 13])[t]],D[L10,(Subscript[x, 14])[t]],D[L10,(Subscript[x, 15])[t]]},{D[L11,(Subscript[x, 1])[t]],D[L11,(Subscript[x, 2])[t]],D[L11,(Subscript[x, 3])[t]],D[L11,(Subscript[x, 4])[t]],D[L11,(Subscript[x, 5])[t]],D[L11,(Subscript[x, 6])[t]],D[L11,(Subscript[x, 7])[t]],D[L11,(Subscript[x, 8])[t]],D[L11,(Subscript[x, 9])[t]],D[L11,(Subscript[x, 10])[t]],D[L11,(Subscript[x, 11])[t]],D[L11,(Subscript[x, 12])[t]],D[L11,(Subscript[x, 13])[t]],D[L11,(Subscript[x, 14])[t]],D[L11,(Subscript[x, 15])[t]]},{D[L12,(Subscript[x, 1])[t]],D[L12,(Subscript[x, 2])[t]],D[L12,(Subscript[x, 3])[t]],D[L12,(Subscript[x, 4])[t]],D[L12,(Subscript[x, 5])[t]],D[L12,(Subscript[x, 6])[t]],D[L12,(Subscript[x, 7])[t]],D[L12,(Subscript[x, 8])[t]],D[L12,(Subscript[x, 9])[t]],D[L12,(Subscript[x, 10])[t]],D[L12,(Subscript[x, 11])[t]],D[L12,(Subscript[x, 12])[t]],D[L12,(Subscript[x, 13])[t]],D[L12,(Subscript[x, 14])[t]],D[L12,(Subscript[x, 15])[t]]},{D[L13,(Subscript[x, 1])[t]],D[L13,(Subscript[x, 2])[t]],D[L13,(Subscript[x, 3])[t]],D[L13,(Subscript[x, 4])[t]],D[L13,(Subscript[x, 5])[t]],D[L13,(Subscript[x, 6])[t]],D[L13,(Subscript[x, 7])[t]],D[L13,(Subscript[x, 8])[t]],D[L13,(Subscript[x, 9])[t]],D[L13,(Subscript[x, 10])[t]],D[L13,(Subscript[x, 11])[t]],D[L13,(Subscript[x, 12])[t]],D[L13,(Subscript[x, 13])[t]],D[L13,(Subscript[x, 14])[t]],D[L13,(Subscript[x, 15])[t]]},{D[L14,(Subscript[x, 1])[t]],D[L14,(Subscript[x, 2])[t]],D[L14,(Subscript[x, 3])[t]],D[L14,(Subscript[x, 4])[t]],D[L14,(Subscript[x, 5])[t]],D[L14,(Subscript[x, 6])[t]],D[L14,(Subscript[x, 7])[t]],D[L14,(Subscript[x, 8])[t]],D[L14,(Subscript[x, 9])[t]],D[L14,(Subscript[x, 10])[t]],D[L14,(Subscript[x, 11])[t]],D[L14,(Subscript[x, 12])[t]],D[L14,(Subscript[x, 13])[t]],D[L14,(Subscript[x, 14])[t]],D[L14,(Subscript[x, 15])[t]]},{D[L15,(Subscript[x, 1])[t]],D[L15,(Subscript[x, 2])[t]],D[L15,(Subscript[x, 3])[t]],D[L15,(Subscript[x, 4])[t]],D[L15,(Subscript[x, 5])[t]],D[L15,(Subscript[x, 6])[t]],D[L15,(Subscript[x, 7])[t]],D[L15,(Subscript[x, 8])[t]],D[L15,(Subscript[x, 9])[t]],D[L15,(Subscript[x, 10])[t]],D[L15,(Subscript[x, 11])[t]],D[L15,(Subscript[x, 12])[t]],D[L15,(Subscript[x, 13])[t]],D[L15,(Subscript[x, 14])[t]],D[L15,(Subscript[x, 15])[t]]}}/.{(Subscript[x, 1])[t]->0,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->testfull,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0};

Efull=Eigenvalues[Mfull]//Simplify

5. Stability of 13-Equilibrium

5.1 Relevant Solutions (there is indeed only one solution in the S1-Simplex)

sol700=FullSimplify[Solve[((Π[1, t, 1,c,η,η]-Π[3, t, 1,c,η,η])/.{(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->1-(Subscript[x, 1])[t],(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})==0,(Subscript[x, 1])[t]],0<c<1&&0<η<1/5]
FindInstance[1>=((Subscript[x, 1])[t]/.sol700[[1]])>=0&&0<c<1&&0<η<1/5,{c,η}]
FindInstance[1>=((Subscript[x, 1])[t]/.sol700[[2]])>=0&&0<c<1&&0<η<1/5,{c,η}]
Reduce[1>=((Subscript[x, 1])[t]/.sol700[[1]])>=0&&0<c<1&&0<η<1/5,{c,η}]
Reduce[1>=((Subscript[x, 1])[t]/.sol700[[2]])>=0&&0<c<1&&0<η<1/5,{c,η}]

5.2 Equilibrium distribution of labels

PCD/.{(Subscript[x, 1])[t]->((Subscript[x, 1])[t]/.sol700[[2]]),(Subscript[x, 3])[t]->1-((Subscript[x, 1])[t]/.sol700[[2]]),(Subscript[x, 2])[t]->0,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0,ϵ->η,γ->η }//Simplify

5.3 1,3 Equilibrium is internally stable

derdiff13=D[((Π[1, t, 1,c,η,η]-Π[3, t, 1,c,η,η])/.{(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->1-(Subscript[x, 1])[t],(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0}),(Subscript[x, 1])[t]]//FullSimplify
FindInstance[(derdiff13/.(Subscript[x, 1])[t]->((Subscript[x, 1])[t]/.sol700[[2]]))<0&&0≤((Subscript[x, 1])[t]/.sol700[[2]])≤ 1&&0<c<1&&0<η<1/5,{c,η}]
Reduce[(derdiff13/.(Subscript[x, 1])[t]->((Subscript[x, 1])[t]/.sol700[[2]]))>=0&&0≤((Subscript[x, 1])[t]/.sol700[[2]])≤ 1&&0<c<1&&0<η<1/5,{c,η}]

5.4 1,3 Equilibrium w.r.t. non-equilibium strategies (run 5.1 first)

conditions for existence and stability (necessary condition is D1>0,D2>0,D4>0, see Lemma 2)

paramexistence13=Reduce[0<=((Subscript[x, 1])[t]/.sol700[[2]])<=1&&0<c<1&&0<η<1/5,{η,c},Reals]
diff121613=((Π[12, t,  1,c,η,η]-Π[16, t, 1,c,η,η])/.{(Subscript[x, 1])[t]->((Subscript[x, 1])[t]/.sol700[[2]]),(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->1-((Subscript[x, 1])[t]/.sol700[[2]]),(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})//Simplify;
diff131613=((Π[13, t,  1,c,η,η]-Π[16, t,  1,c,η,η])/.{(Subscript[x, 1])[t]->((Subscript[x, 1])[t]/.sol700[[2]]),(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->1-((Subscript[x, 1])[t]/.sol700[[2]]),(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})//Simplify;
diff151613=((Π[15, t,  1,c,η,η]-Π[16, t,  1,c,η,η])/.{(Subscript[x, 1])[t]->((Subscript[x, 1])[t]/.sol700[[2]]),(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->1-((Subscript[x, 1])[t]/.sol700[[2]]),(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})//Simplify;
"Note that at c=\!\(\*FractionBox[\(3 - 10\\ τ + 8\\ \*SuperscriptBox[\(τ\), \(2\)]\), \(15 - 22\\ τ + 8\\ \*SuperscriptBox[\(τ\), \(2\)]\)]\) we still have diff121613>0&&diff131613>0 but diff151613=0";
paramstability13=Reduce[0<=((Subscript[x, 1])[t]/.sol700[[2]])<=1&&diff121613>0&&diff131613>0&&diff151613>0&&0<c<1&&0<η<1/5,{η,c},Reals]

Analysis of Eigenvalues for the full linearized system (since the equilibrium point is internally stable, stability reduces to approriate signs for the non - equilibrium basic differences)

eqn[i_,b_,c_,η_,η_]=D[(Subscript[x, i])[t],t]==(Subscript[x, i])[t]*(Π[i,t,b,c,η,η]-Ave[t,b,c,η,η]);
L1=(Subscript[x, 1])'[t]/.Solve[eqn[1,1,c,η,η], (Subscript[x, 1])'[t]][[1]];
L2=(Subscript[x, 2])'[t]/.Solve[eqn[2,1,c,η,η], (Subscript[x, 2])'[t]][[1]];
L3=(Subscript[x, 3])'[t]/.Solve[eqn[3,1,c,η,η], (Subscript[x, 3])'[t]][[1]];
L4=(Subscript[x, 4])'[t]/.Solve[eqn[4,1,c,η,η], (Subscript[x, 4])'[t]][[1]];
L5=(Subscript[x, 5])'[t]/.Solve[eqn[5,1,c,η,η], (Subscript[x, 5])'[t]][[1]];
L6=(Subscript[x, 6])'[t]/.Solve[eqn[6,1,c,η,η], (Subscript[x, 6])'[t]][[1]];
L7=(Subscript[x, 7])'[t]/.Solve[eqn[7,1,c,η,η], (Subscript[x, 7])'[t]][[1]];
L8=(Subscript[x, 8])'[t]/.Solve[eqn[8,1,c,η,η], (Subscript[x, 8])'[t]][[1]];
L9=(Subscript[x, 9])'[t]/.Solve[eqn[9,1,c,η,η], (Subscript[x, 9])'[t]][[1]];
L10=(Subscript[x, 10])'[t]/.Solve[eqn[10,1,c,η,η], (Subscript[x, 10])'[t]][[1]];
L11=(Subscript[x, 11])'[t]/.Solve[eqn[11,1,c,η,η], (Subscript[x, 11])'[t]][[1]];
L12=(Subscript[x, 12])'[t]/.Solve[eqn[12,1,c,η,η], (Subscript[x, 12])'[t]][[1]];
L13=(Subscript[x, 13])'[t]/.Solve[eqn[13,1,c,η,η], (Subscript[x, 13])'[t]][[1]];
L14=(Subscript[x, 14])'[t]/.Solve[eqn[14,1,c,η,η], (Subscript[x, 14])'[t]][[1]];
L15=(Subscript[x, 15])'[t]/.Solve[eqn[15,1,c,η,η], (Subscript[x, 15])'[t]][[1]];

"simplify expression for x1, ϕ=\!\(\*SqrtBox[\(1 + \*FractionBox[\(1\), SuperscriptBox[\(c\), \(2\)]] + \*FractionBox[\(2  τ \((2 + τ \((3 - 4  τ)\))\) - 6\), \(c \*SuperscriptBox[\((1 - τ)\), \(2\)]\\ \((3 - 4\\ τ)\)\)]\)]\)";
x1s=1-((3(1-c))/(2 η))+((3c)/(2 η))ϕ;
M13full={{D[L1,(Subscript[x, 1])[t]],D[L1,(Subscript[x, 2])[t]],D[L1,(Subscript[x, 3])[t]],D[L1,(Subscript[x, 4])[t]],D[L1,(Subscript[x, 5])[t]],D[L1,(Subscript[x, 6])[t]],D[L1,(Subscript[x, 7])[t]],D[L1,(Subscript[x, 8])[t]],D[L1,(Subscript[x, 9])[t]],D[L1,(Subscript[x, 10])[t]],D[L1,(Subscript[x, 11])[t]],D[L1,(Subscript[x, 12])[t]],D[L1,(Subscript[x, 13])[t]],D[L1,(Subscript[x, 14])[t]],D[L1,(Subscript[x, 15])[t]]},{D[L2,(Subscript[x, 1])[t]],D[L2,(Subscript[x, 2])[t]],D[L2,(Subscript[x, 3])[t]],D[L2,(Subscript[x, 4])[t]],D[L2,(Subscript[x, 5])[t]],D[L2,(Subscript[x, 6])[t]],D[L2,(Subscript[x, 7])[t]],D[L2,(Subscript[x, 8])[t]],D[L2,(Subscript[x, 9])[t]],D[L2,(Subscript[x, 10])[t]],D[L2,(Subscript[x, 11])[t]],D[L2,(Subscript[x, 12])[t]],D[L2,(Subscript[x, 13])[t]],D[L2,(Subscript[x, 14])[t]],D[L2,(Subscript[x, 15])[t]]},{D[L3,(Subscript[x, 1])[t]],D[L3,(Subscript[x, 2])[t]],D[L3,(Subscript[x, 3])[t]],D[L3,(Subscript[x, 4])[t]],D[L3,(Subscript[x, 5])[t]],D[L3,(Subscript[x, 6])[t]],D[L3,(Subscript[x, 7])[t]],D[L3,(Subscript[x, 8])[t]],D[L3,(Subscript[x, 9])[t]],D[L3,(Subscript[x, 10])[t]],D[L3,(Subscript[x, 11])[t]],D[L3,(Subscript[x, 12])[t]],D[L3,(Subscript[x, 13])[t]],D[L3,(Subscript[x, 14])[t]],D[L3,(Subscript[x, 15])[t]]},{D[L4,(Subscript[x, 1])[t]],D[L4,(Subscript[x, 2])[t]],D[L4,(Subscript[x, 3])[t]],D[L4,(Subscript[x, 4])[t]],D[L4,(Subscript[x, 5])[t]],D[L4,(Subscript[x, 6])[t]],D[L4,(Subscript[x, 7])[t]],D[L4,(Subscript[x, 8])[t]],D[L4,(Subscript[x, 9])[t]],D[L4,(Subscript[x, 10])[t]],D[L4,(Subscript[x, 11])[t]],D[L4,(Subscript[x, 12])[t]],D[L4,(Subscript[x, 13])[t]],D[L4,(Subscript[x, 14])[t]],D[L4,(Subscript[x, 15])[t]]},{D[L5,(Subscript[x, 1])[t]],D[L5,(Subscript[x, 2])[t]],D[L5,(Subscript[x, 3])[t]],D[L5,(Subscript[x, 4])[t]],D[L5,(Subscript[x, 5])[t]],D[L5,(Subscript[x, 6])[t]],D[L5,(Subscript[x, 7])[t]],D[L5,(Subscript[x, 8])[t]],D[L5,(Subscript[x, 9])[t]],D[L5,(Subscript[x, 10])[t]],D[L5,(Subscript[x, 11])[t]],D[L5,(Subscript[x, 12])[t]],D[L5,(Subscript[x, 13])[t]],D[L5,(Subscript[x, 14])[t]],D[L5,(Subscript[x, 15])[t]]},{D[L6,(Subscript[x, 1])[t]],D[L6,(Subscript[x, 2])[t]],D[L6,(Subscript[x, 3])[t]],D[L6,(Subscript[x, 4])[t]],D[L6,(Subscript[x, 5])[t]],D[L6,(Subscript[x, 6])[t]],D[L6,(Subscript[x, 7])[t]],D[L6,(Subscript[x, 8])[t]],D[L6,(Subscript[x, 9])[t]],D[L6,(Subscript[x, 10])[t]],D[L6,(Subscript[x, 11])[t]],D[L6,(Subscript[x, 12])[t]],D[L6,(Subscript[x, 13])[t]],D[L6,(Subscript[x, 14])[t]],D[L6,(Subscript[x, 15])[t]]},{D[L7,(Subscript[x, 1])[t]],D[L7,(Subscript[x, 2])[t]],D[L7,(Subscript[x, 3])[t]],D[L7,(Subscript[x, 4])[t]],D[L7,(Subscript[x, 5])[t]],D[L7,(Subscript[x, 6])[t]],D[L7,(Subscript[x, 7])[t]],D[L7,(Subscript[x, 8])[t]],D[L7,(Subscript[x, 9])[t]],D[L7,(Subscript[x, 10])[t]],D[L7,(Subscript[x, 11])[t]],D[L7,(Subscript[x, 12])[t]],D[L7,(Subscript[x, 13])[t]],D[L7,(Subscript[x, 14])[t]],D[L7,(Subscript[x, 15])[t]]},{D[L8,(Subscript[x, 1])[t]],D[L8,(Subscript[x, 2])[t]],D[L8,(Subscript[x, 3])[t]],D[L8,(Subscript[x, 4])[t]],D[L8,(Subscript[x, 5])[t]],D[L8,(Subscript[x, 6])[t]],D[L8,(Subscript[x, 7])[t]],D[L8,(Subscript[x, 8])[t]],D[L8,(Subscript[x, 9])[t]],D[L8,(Subscript[x, 10])[t]],D[L8,(Subscript[x, 11])[t]],D[L8,(Subscript[x, 12])[t]],D[L8,(Subscript[x, 13])[t]],D[L8,(Subscript[x, 14])[t]],D[L8,(Subscript[x, 15])[t]]},{D[L9,(Subscript[x, 1])[t]],D[L9,(Subscript[x, 2])[t]],D[L9,(Subscript[x, 3])[t]],D[L9,(Subscript[x, 4])[t]],D[L9,(Subscript[x, 5])[t]],D[L9,(Subscript[x, 6])[t]],D[L9,(Subscript[x, 7])[t]],D[L9,(Subscript[x, 8])[t]],D[L9,(Subscript[x, 9])[t]],D[L9,(Subscript[x, 10])[t]],D[L9,(Subscript[x, 11])[t]],D[L9,(Subscript[x, 12])[t]],D[L9,(Subscript[x, 13])[t]],D[L9,(Subscript[x, 14])[t]],D[L9,(Subscript[x, 15])[t]]},{D[L10,(Subscript[x, 1])[t]],D[L10,(Subscript[x, 2])[t]],D[L10,(Subscript[x, 3])[t]],D[L10,(Subscript[x, 4])[t]],D[L10,(Subscript[x, 5])[t]],D[L10,(Subscript[x, 6])[t]],D[L10,(Subscript[x, 7])[t]],D[L10,(Subscript[x, 8])[t]],D[L10,(Subscript[x, 9])[t]],D[L10,(Subscript[x, 10])[t]],D[L10,(Subscript[x, 11])[t]],D[L10,(Subscript[x, 12])[t]],D[L10,(Subscript[x, 13])[t]],D[L10,(Subscript[x, 14])[t]],D[L10,(Subscript[x, 15])[t]]},{D[L11,(Subscript[x, 1])[t]],D[L11,(Subscript[x, 2])[t]],D[L11,(Subscript[x, 3])[t]],D[L11,(Subscript[x, 4])[t]],D[L11,(Subscript[x, 5])[t]],D[L11,(Subscript[x, 6])[t]],D[L11,(Subscript[x, 7])[t]],D[L11,(Subscript[x, 8])[t]],D[L11,(Subscript[x, 9])[t]],D[L11,(Subscript[x, 10])[t]],D[L11,(Subscript[x, 11])[t]],D[L11,(Subscript[x, 12])[t]],D[L11,(Subscript[x, 13])[t]],D[L11,(Subscript[x, 14])[t]],D[L11,(Subscript[x, 15])[t]]},{D[L12,(Subscript[x, 1])[t]],D[L12,(Subscript[x, 2])[t]],D[L12,(Subscript[x, 3])[t]],D[L12,(Subscript[x, 4])[t]],D[L12,(Subscript[x, 5])[t]],D[L12,(Subscript[x, 6])[t]],D[L12,(Subscript[x, 7])[t]],D[L12,(Subscript[x, 8])[t]],D[L12,(Subscript[x, 9])[t]],D[L12,(Subscript[x, 10])[t]],D[L12,(Subscript[x, 11])[t]],D[L12,(Subscript[x, 12])[t]],D[L12,(Subscript[x, 13])[t]],D[L12,(Subscript[x, 14])[t]],D[L12,(Subscript[x, 15])[t]]},{D[L13,(Subscript[x, 1])[t]],D[L13,(Subscript[x, 2])[t]],D[L13,(Subscript[x, 3])[t]],D[L13,(Subscript[x, 4])[t]],D[L13,(Subscript[x, 5])[t]],D[L13,(Subscript[x, 6])[t]],D[L13,(Subscript[x, 7])[t]],D[L13,(Subscript[x, 8])[t]],D[L13,(Subscript[x, 9])[t]],D[L13,(Subscript[x, 10])[t]],D[L13,(Subscript[x, 11])[t]],D[L13,(Subscript[x, 12])[t]],D[L13,(Subscript[x, 13])[t]],D[L13,(Subscript[x, 14])[t]],D[L13,(Subscript[x, 15])[t]]},{D[L14,(Subscript[x, 1])[t]],D[L14,(Subscript[x, 2])[t]],D[L14,(Subscript[x, 3])[t]],D[L14,(Subscript[x, 4])[t]],D[L14,(Subscript[x, 5])[t]],D[L14,(Subscript[x, 6])[t]],D[L14,(Subscript[x, 7])[t]],D[L14,(Subscript[x, 8])[t]],D[L14,(Subscript[x, 9])[t]],D[L14,(Subscript[x, 10])[t]],D[L14,(Subscript[x, 11])[t]],D[L14,(Subscript[x, 12])[t]],D[L14,(Subscript[x, 13])[t]],D[L14,(Subscript[x, 14])[t]],D[L14,(Subscript[x, 15])[t]]},{D[L15,(Subscript[x, 1])[t]],D[L15,(Subscript[x, 2])[t]],D[L15,(Subscript[x, 3])[t]],D[L15,(Subscript[x, 4])[t]],D[L15,(Subscript[x, 5])[t]],D[L15,(Subscript[x, 6])[t]],D[L15,(Subscript[x, 7])[t]],D[L15,(Subscript[x, 8])[t]],D[L15,(Subscript[x, 9])[t]],D[L15,(Subscript[x, 10])[t]],D[L15,(Subscript[x, 11])[t]],D[L15,(Subscript[x, 12])[t]],D[L15,(Subscript[x, 13])[t]],D[L15,(Subscript[x, 14])[t]],D[L15,(Subscript[x, 15])[t]]}}/.{(Subscript[x, 1])[t]->x1s,(Subscript[x, 2])[t]->0,(Subscript[x, 3])[t]->1-x1s,(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->0,(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0};

M13fulls[c_,η_]=Simplify[M13full,0<c<1&&0<η<1/5&&ϕ>0]

E13=Eigenvalues[M13fulls[c,η]];

E131=Simplify[E13[[1]],0<c<1&&0<η<1/5];
E132=Simplify[E13[[2]],0<c<1&&0<η<1/5];
E133=Simplify[E13[[3]],0<c<1&&0<η<1/5];
E134=Simplify[E13[[4]],0<c<1&&0<η<1/5];
E135=Simplify[E13[[5]],0<c<1&&0<η<1/5];
E136=Simplify[E13[[6]],0<c<1&&0<η<1/5];
E137=Simplify[E13[[7]],0<c<1&&0<η<1/5];
E138=Simplify[E13[[8]],0<c<1&&0<η<1/5];
E139=Simplify[E13[[9]],0<c<1&&0<η<1/5];
E1310=Simplify[E13[[10]],0<c<1&&0<η<1/5];
E1311=Simplify[E13[[11]],0<c<1&&0<η<1/5];
E1312=Simplify[E13[[12]],0<c<1&&0<η<1/5];
E1313=Simplify[E13[[13]],0<c<1&&0<η<1/5];
E1314=Simplify[E13[[14]],0<c<1&&0<η<1/5];
E1315=Simplify[E13[[15]],0<c<1&&0<η<1/5];

Reduce[(E131/.ϕ->(Sqrt[1+(1/(c^2))+((2 η (2+η (3-4 η))-6)/(c(1-η)^2(3-4η)))]))<0&&0<c<((3-10 η+8 (η^2))/(15-22 η+8 (η^2)))&&0<η<1/5,{η,c}]
Reduce[(E132/.ϕ->(Sqrt[1+(1/(c^2))+((2 η (2+η (3-4 η))-6)/(c(1-η)^2(3-4η)))]))<0&&0<c<((3-10 η+8 (η^2))/(15-22 η+8 (η^2)))&&0<η<1/5,{η,c}]
Reduce[(E133/.ϕ->(Sqrt[1+(1/(c^2))+((2 η (2+η (3-4 η))-6)/(c(1-η)^2(3-4η)))]))<0&&0<c<((3-10 η+8 (η^2))/(15-22 η+8 (η^2)))&&0<η<1/5,{η,c}]
Reduce[(E134/.ϕ->(Sqrt[1+(1/(c^2))+((2 η (2+η (3-4 η))-6)/(c(1-η)^2(3-4η)))]))<0&&0<c<((3-10 η+8 (η^2))/(15-22 η+8 (η^2)))&&0<η<1/5,{η,c}]
Reduce[(E135/.ϕ->(Sqrt[1+(1/(c^2))+((2 η (2+η (3-4 η))-6)/(c(1-η)^2(3-4η)))]))<0&&0<c<((3-10 η+8 (η^2))/(15-22 η+8 (η^2)))&&0<η<1/5,{η,c}]
Reduce[(E136/.ϕ->(Sqrt[1+(1/(c^2))+((2 η (2+η (3-4 η))-6)/(c(1-η)^2(3-4η)))]))<0&&0<c<((3-10 η+8 (η^2))/(15-22 η+8 (η^2)))&&0<η<1/5,{η,c}]
Reduce[(E137/.ϕ->(Sqrt[1+(1/(c^2))+((2 η (2+η (3-4 η))-6)/(c(1-η)^2(3-4η)))]))<0&&0<c<((3-10 η+8 (η^2))/(15-22 η+8 (η^2)))&&0<η<1/5,{η,c}]
Reduce[(E138/.ϕ->(Sqrt[1+(1/(c^2))+((2 η (2+η (3-4 η))-6)/(c(1-η)^2(3-4η)))]))<0&&0<c<((3-10 η+8 (η^2))/(15-22 η+8 (η^2)))&&0<η<1/5,{η,c}]
Reduce[(E139/.ϕ->(Sqrt[1+(1/(c^2))+((2 η (2+η (3-4 η))-6)/(c(1-η)^2(3-4η)))]))<0&&0<c<((3-10 η+8 (η^2))/(15-22 η+8 (η^2)))&&0<η<1/5,{η,c}]
Reduce[(E1310/.ϕ->(Sqrt[1+(1/(c^2))+((2 η (2+η (3-4 η))-6)/(c(1-η)^2(3-4η)))]))<0&&0<c<((3-10 η+8 (η^2))/(15-22 η+8 (η^2)))&&0<η<1/5,{η,c}]
Reduce[(E1311/.ϕ->(Sqrt[1+(1/(c^2))+((2 η (2+η (3-4 η))-6)/(c(1-η)^2(3-4η)))]))<0&&0<c<((3-10 η+8 (η^2))/(15-22 η+8 (η^2)))&&0<η<1/5,{η,c}]
Reduce[(E1312/.ϕ->(Sqrt[1+(1/(c^2))+((2 η (2+η (3-4 η))-6)/(c(1-η)^2(3-4η)))]))<0&&0<c<((3-10 η+8 (η^2))/(15-22 η+8 (η^2)))&&0<η<1/5,{η,c}]
Reduce[(E1313/.ϕ->(Sqrt[1+(1/(c^2))+((2 η (2+η (3-4 η))-6)/(c(1-η)^2(3-4η)))]))<0&&0<c<((3-10 η+8 (η^2))/(15-22 η+8 (η^2)))&&0<η<1/5,{η,c}]
Reduce[(E1314/.ϕ->(Sqrt[1+(1/(c^2))+((2 η (2+η (3-4 η))-6)/(c(1-η)^2(3-4η)))]))<0&&0<c<((3-10 η+8 (η^2))/(15-22 η+8 (η^2)))&&0<η<1/5,{η,c}]
Reduce[(E1315/.ϕ->(Sqrt[1+(1/(c^2))+((2 η (2+η (3-4 η))-6)/(c(1-η)^2(3-4η)))]))<0&&0<c<((3-10 η+8 (η^2))/(15-22 η+8 (η^2)))&&0<η<1/5,{η,c}]

RESULT: Under the conditions 0<τ<(1/5)&&0<c<((3-10 τ+8 (τ^2))/(15-22 τ+8 (τ^2)))  all eigenvalues are negative which establishes sufficiency of the condition.

6. Stability of 1236-Equilibrium

6.1 Equilibrium Distribution of Labels; note it is independent of the equilibrium composition!

PCC/.{(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->1-(Subscript[x, 1])[t]-(Subscript[x, 2])[t]-(Subscript[x, 3])[t],(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0,ϵ->η,γ->η}//FullSimplify

PCC/.{(Subscript[x, 2])[t]->((Subscript[x, 2])[t]/.sol1500a[[6,1]]),(Subscript[x, 3])[t]->((Subscript[x, 3])[t]/.sol1500a[[6,2]]),(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->1-(Subscript[x, 1])[t]-((Subscript[x, 2])[t]/.sol1500a[[6,1]])-((Subscript[x, 3])[t]/.sol1500a[[6,2]]),(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0,ϵ->η,γ->η}//FullSimplify
N[%/.η->1/10]
PCD/.{(Subscript[x, 2])[t]->((Subscript[x, 2])[t]/.sol1500a[[6,1]]),(Subscript[x, 3])[t]->((Subscript[x, 3])[t]/.sol1500a[[6,2]]),(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->1-(Subscript[x, 1])[t]-((Subscript[x, 2])[t]/.sol1500a[[6,1]])-((Subscript[x, 3])[t]/.sol1500a[[6,2]]),(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0,ϵ->η,γ->η}//FullSimplify
N[%/.η->1/10]
PDD/.{(Subscript[x, 2])[t]->((Subscript[x, 2])[t]/.sol1500a[[6,1]]),(Subscript[x, 3])[t]->((Subscript[x, 3])[t]/.sol1500a[[6,2]]),(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->1-(Subscript[x, 1])[t]-((Subscript[x, 2])[t]/.sol1500a[[6,1]])-((Subscript[x, 3])[t]/.sol1500a[[6,2]]),(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0,ϵ->η,γ->η}//FullSimplify
N[%/.η->1/10]

6.2 Non-equilibrium differences (only solution six allows for non-zero differences for non-equilibrium diffs)

((Π[12, t, 1, c, η,η]-Π[16, t, 1, c, η,η])/.{(Subscript[x, 2])[t]->((Subscript[x, 2])[t]/.sol1500a[[4,1]]),(Subscript[x, 3])[t]->((Subscript[x, 3])[t]/.sol1500a[[4,2]]),(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->1-(Subscript[x, 1])[t]-((Subscript[x, 2])[t]/.sol1500a[[4,1]])-((Subscript[x, 3])[t]/.sol1500a[[4,2]]),(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})//FullSimplify
((Π[13, t, 1, c, η,η]-Π[16, t, 1, c, η,η])/.{(Subscript[x, 2])[t]->((Subscript[x, 2])[t]/.sol1500a[[4,1]]),(Subscript[x, 3])[t]->((Subscript[x, 3])[t]/.sol1500a[[4,2]]),(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->1-(Subscript[x, 1])[t]-((Subscript[x, 2])[t]/.sol1500a[[4,1]])-((Subscript[x, 3])[t]/.sol1500a[[4,2]]),(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})//FullSimplify
((Π[12, t, 1, c, η,η]-Π[16, t, 1, c, η,η])/.{(Subscript[x, 2])[t]->((Subscript[x, 2])[t]/.sol1500a[[6,1]]),(Subscript[x, 3])[t]->((Subscript[x, 3])[t]/.sol1500a[[6,2]]),(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->1-(Subscript[x, 1])[t]-((Subscript[x, 2])[t]/.sol1500a[[6,1]])-((Subscript[x, 3])[t]/.sol1500a[[6,2]]),(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})//FullSimplify
((Π[13, t, 1,c, η,η]-Π[16, t, 1, c, η,η])/.{(Subscript[x, 2])[t]->((Subscript[x, 2])[t]/.sol1500a[[6,1]]),(Subscript[x, 3])[t]->((Subscript[x, 3])[t]/.sol1500a[[6,2]]),(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->1-(Subscript[x, 1])[t]-((Subscript[x, 2])[t]/.sol1500a[[6,1]])-((Subscript[x, 3])[t]/.sol1500a[[6,2]]),(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})//FullSimplify

Stability - analytically

6.3 Conditions for existence and stability

PAREMETER REGION FOR EXISTENCE

paramexistence1236full=Reduce[((Subscript[x, 2])[t]/.sol1500a[[6,1]])>0&&((Subscript[x, 3])[t]/.sol1500a[[6,2]])>0&&(Subscript[x, 1])[t]>0&&(Subscript[x, 1])[t]+((Subscript[x, 2])[t]/.sol1500a[[6,1]])+((Subscript[x, 3])[t]/.sol1500a[[6,2]])<1&&0<c<1&&0<η<1/5,{η,c,(Subscript[x, 1])[t]},Reals]
paramexistence1236int=Reduce[((Subscript[x, 2])[t]/.sol1500a[[6,1]])≥ 0&&((Subscript[x, 3])[t]/.sol1500a[[6,2]])≥ 0&&(Subscript[x, 1])[t]≥ 0&&(Subscript[x, 1])[t]+((Subscript[x, 2])[t]/.sol1500a[[6,1]])+((Subscript[x, 3])[t]/.sol1500a[[6,2]])≤ 1&&0<c<1&&0<η<1/5,{η,c,(Subscript[x, 1])[t]},Reals]
paramexistence1236=0<η<(1/5)&&((((3-10 η+8 (η^2))/(15-22 η+8 (η^2)))<c≤((-3+10 η-8 (η^2))/(-6+4 η)))||(((-3+10 η-8 (η^2))/(-6+4 η))<c<((12-52 η+72 (η^2)-32 (η^3))/(15-22 η+8 (η^2)))));

BASIC PAYOFF DIFFERENCES D1 and D2

diff12161236=((Π[12, t, 1, c, η,η]-Π[16, t, 1, c, η,η])/.{(Subscript[x, 2])[t]->((Subscript[x, 2])[t]/.sol1500a[[6,1]]),(Subscript[x, 3])[t]->((Subscript[x, 3])[t]/.sol1500a[[6,2]]),(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->1-(Subscript[x, 1])[t]-((Subscript[x, 2])[t]/.sol1500a[[6,1]])-((Subscript[x, 3])[t]/.sol1500a[[6,2]]),(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})//FullSimplify;
diff13161236=((Π[13, t,  1, c, η,η]-Π[16, t, 1, c, η,η])/.{(Subscript[x, 2])[t]->((Subscript[x, 2])[t]/.sol1500a[[6,1]]),(Subscript[x, 3])[t]->((Subscript[x, 3])[t]/.sol1500a[[6,2]]),(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->1-(Subscript[x, 1])[t]-((Subscript[x, 2])[t]/.sol1500a[[6,1]])-((Subscript[x, 3])[t]/.sol1500a[[6,2]]),(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0})//FullSimplify;

NECESSARY CONDITIONS FOR STABILITY INCLUDING BASIC PAYOFF DIFFERENCES D1 and D2 BEING POSITIVE (see Lemma2)

paramstability1236full=Reduce[((Subscript[x, 2])[t]/.sol1500a[[6,1]])>0&&((Subscript[x, 3])[t]/.sol1500a[[6,2]])>0&&(Subscript[x, 1])[t]>0&&(Subscript[x, 1])[t]+((Subscript[x, 2])[t]/.sol1500a[[6,1]])+((Subscript[x, 3])[t]/.sol1500a[[6,2]])<1&&diff12161236>0&&diff13161236>0&&0<c<1&&0<η<1/5,{η,c,(Subscript[x, 1])[t]},Reals]
paramstability1236fullint=Reduce[((Subscript[x, 2])[t]/.sol1500a[[6,1]])≥0&&((Subscript[x, 3])[t]/.sol1500a[[6,2]])≥0&&(Subscript[x, 1])[t]≥0&&(Subscript[x, 1])[t]+((Subscript[x, 2])[t]/.sol1500a[[6,1]])+((Subscript[x, 3])[t]/.sol1500a[[6,2]])≤1&&diff12161236>0&&diff13161236>0&&0<c<1&&0<η<1/5,{η,c,(Subscript[x, 1])[t]},Reals]
paramstability1236fullweak=Reduce[((Subscript[x, 2])[t]/.sol1500a[[6,1]])≥0&&((Subscript[x, 3])[t]/.sol1500a[[6,2]])≥0&&(Subscript[x, 1])[t]≥0&&(Subscript[x, 1])[t]+((Subscript[x, 2])[t]/.sol1500a[[6,1]])+((Subscript[x, 3])[t]/.sol1500a[[6,2]])≤1&&diff12161236≥0&&diff13161236≥0&&0<c<1&&0<η<1/5,{η,c,(Subscript[x, 1])[t]},Reals]

"strict condition!, neglect condition on x1!, define x1-coordinate of the extreme points";
paramstability1236=0<η<(1/5)&&((3-10 η+8 (η^2))/(15-22 η+8 (η^2)))<c<((-3+10 η-8 (η^2))/(-6+4 η));
paramstability1236weak=0<η<(1/5)&&((3-10 η+8 (η^2))/(15-22 η+8 (η^2)))≤c≤((-3+10 η-8 (η^2))/(-6+4 η));

x1min=((η+2 (η^2))/(3-5 η+2 (η^2)));
x1max=((-9+45 c+39 η-66 c η-30 (η^2)+24 c (η^2)-32 (η^3)+32 (η^4))/(27-117 η+186 (η^2)-128 (η^3)+32 (η^4)));

6.4 Analysis of Eigenvalues

eqn[i_,b_,c_,ϵ_,γ_]=D[(Subscript[x, i])[t],t]==(Subscript[x, i])[t]*(Π[i,t,b,c,ϵ,γ]-Ave[t,b,c,ϵ,γ]);
L1=(Subscript[x, 1])'[t]/.Solve[eqn[1,1,c,η,η], (Subscript[x, 1])'[t]][[1]];
L2=(Subscript[x, 2])'[t]/.Solve[eqn[2,1,c,η,η], (Subscript[x, 2])'[t]][[1]];
L3=(Subscript[x, 3])'[t]/.Solve[eqn[3,1,c,η,η], (Subscript[x, 3])'[t]][[1]];
L4=(Subscript[x, 4])'[t]/.Solve[eqn[4,1,c,η,η], (Subscript[x, 4])'[t]][[1]];
L5=(Subscript[x, 5])'[t]/.Solve[eqn[5,1,c,η,η], (Subscript[x, 5])'[t]][[1]];
L6=(Subscript[x, 6])'[t]/.Solve[eqn[6,1,c,η,η], (Subscript[x, 6])'[t]][[1]];
L7=(Subscript[x, 7])'[t]/.Solve[eqn[7,1,c,η,η], (Subscript[x, 7])'[t]][[1]];
L8=(Subscript[x, 8])'[t]/.Solve[eqn[8,1,c,η,η], (Subscript[x, 8])'[t]][[1]];
L9=(Subscript[x, 9])'[t]/.Solve[eqn[9,1,c,η,η], (Subscript[x, 9])'[t]][[1]];
L10=(Subscript[x, 10])'[t]/.Solve[eqn[10,1,c,η,η], (Subscript[x, 10])'[t]][[1]];
L11=(Subscript[x, 11])'[t]/.Solve[eqn[11,1,c,η,η], (Subscript[x, 11])'[t]][[1]];
L12=(Subscript[x, 12])'[t]/.Solve[eqn[12,1,c,η,η], (Subscript[x, 12])'[t]][[1]];
L13=(Subscript[x, 13])'[t]/.Solve[eqn[13,1,c,η,η], (Subscript[x, 13])'[t]][[1]];
L14=(Subscript[x, 14])'[t]/.Solve[eqn[14,1,c,η,η], (Subscript[x, 14])'[t]][[1]];
L15=(Subscript[x, 15])'[t]/.Solve[eqn[15,1,c,η,η], (Subscript[x, 15])'[t]][[1]];
M1236full={{D[L1,(Subscript[x, 1])[t]],D[L1,(Subscript[x, 2])[t]],D[L1,(Subscript[x, 3])[t]],D[L1,(Subscript[x, 4])[t]],D[L1,(Subscript[x, 5])[t]],D[L1,(Subscript[x, 6])[t]],D[L1,(Subscript[x, 7])[t]],D[L1,(Subscript[x, 8])[t]],D[L1,(Subscript[x, 9])[t]],D[L1,(Subscript[x, 10])[t]],D[L1,(Subscript[x, 11])[t]],D[L1,(Subscript[x, 12])[t]],D[L1,(Subscript[x, 13])[t]],D[L1,(Subscript[x, 14])[t]],D[L1,(Subscript[x, 15])[t]]},{D[L2,(Subscript[x, 1])[t]],D[L2,(Subscript[x, 2])[t]],D[L2,(Subscript[x, 3])[t]],D[L2,(Subscript[x, 4])[t]],D[L2,(Subscript[x, 5])[t]],D[L2,(Subscript[x, 6])[t]],D[L2,(Subscript[x, 7])[t]],D[L2,(Subscript[x, 8])[t]],D[L2,(Subscript[x, 9])[t]],D[L2,(Subscript[x, 10])[t]],D[L2,(Subscript[x, 11])[t]],D[L2,(Subscript[x, 12])[t]],D[L2,(Subscript[x, 13])[t]],D[L2,(Subscript[x, 14])[t]],D[L2,(Subscript[x, 15])[t]]},{D[L3,(Subscript[x, 1])[t]],D[L3,(Subscript[x, 2])[t]],D[L3,(Subscript[x, 3])[t]],D[L3,(Subscript[x, 4])[t]],D[L3,(Subscript[x, 5])[t]],D[L3,(Subscript[x, 6])[t]],D[L3,(Subscript[x, 7])[t]],D[L3,(Subscript[x, 8])[t]],D[L3,(Subscript[x, 9])[t]],D[L3,(Subscript[x, 10])[t]],D[L3,(Subscript[x, 11])[t]],D[L3,(Subscript[x, 12])[t]],D[L3,(Subscript[x, 13])[t]],D[L3,(Subscript[x, 14])[t]],D[L3,(Subscript[x, 15])[t]]},{D[L4,(Subscript[x, 1])[t]],D[L4,(Subscript[x, 2])[t]],D[L4,(Subscript[x, 3])[t]],D[L4,(Subscript[x, 4])[t]],D[L4,(Subscript[x, 5])[t]],D[L4,(Subscript[x, 6])[t]],D[L4,(Subscript[x, 7])[t]],D[L4,(Subscript[x, 8])[t]],D[L4,(Subscript[x, 9])[t]],D[L4,(Subscript[x, 10])[t]],D[L4,(Subscript[x, 11])[t]],D[L4,(Subscript[x, 12])[t]],D[L4,(Subscript[x, 13])[t]],D[L4,(Subscript[x, 14])[t]],D[L4,(Subscript[x, 15])[t]]},{D[L5,(Subscript[x, 1])[t]],D[L5,(Subscript[x, 2])[t]],D[L5,(Subscript[x, 3])[t]],D[L5,(Subscript[x, 4])[t]],D[L5,(Subscript[x, 5])[t]],D[L5,(Subscript[x, 6])[t]],D[L5,(Subscript[x, 7])[t]],D[L5,(Subscript[x, 8])[t]],D[L5,(Subscript[x, 9])[t]],D[L5,(Subscript[x, 10])[t]],D[L5,(Subscript[x, 11])[t]],D[L5,(Subscript[x, 12])[t]],D[L5,(Subscript[x, 13])[t]],D[L5,(Subscript[x, 14])[t]],D[L5,(Subscript[x, 15])[t]]},{D[L6,(Subscript[x, 1])[t]],D[L6,(Subscript[x, 2])[t]],D[L6,(Subscript[x, 3])[t]],D[L6,(Subscript[x, 4])[t]],D[L6,(Subscript[x, 5])[t]],D[L6,(Subscript[x, 6])[t]],D[L6,(Subscript[x, 7])[t]],D[L6,(Subscript[x, 8])[t]],D[L6,(Subscript[x, 9])[t]],D[L6,(Subscript[x, 10])[t]],D[L6,(Subscript[x, 11])[t]],D[L6,(Subscript[x, 12])[t]],D[L6,(Subscript[x, 13])[t]],D[L6,(Subscript[x, 14])[t]],D[L6,(Subscript[x, 15])[t]]},{D[L7,(Subscript[x, 1])[t]],D[L7,(Subscript[x, 2])[t]],D[L7,(Subscript[x, 3])[t]],D[L7,(Subscript[x, 4])[t]],D[L7,(Subscript[x, 5])[t]],D[L7,(Subscript[x, 6])[t]],D[L7,(Subscript[x, 7])[t]],D[L7,(Subscript[x, 8])[t]],D[L7,(Subscript[x, 9])[t]],D[L7,(Subscript[x, 10])[t]],D[L7,(Subscript[x, 11])[t]],D[L7,(Subscript[x, 12])[t]],D[L7,(Subscript[x, 13])[t]],D[L7,(Subscript[x, 14])[t]],D[L7,(Subscript[x, 15])[t]]},{D[L8,(Subscript[x, 1])[t]],D[L8,(Subscript[x, 2])[t]],D[L8,(Subscript[x, 3])[t]],D[L8,(Subscript[x, 4])[t]],D[L8,(Subscript[x, 5])[t]],D[L8,(Subscript[x, 6])[t]],D[L8,(Subscript[x, 7])[t]],D[L8,(Subscript[x, 8])[t]],D[L8,(Subscript[x, 9])[t]],D[L8,(Subscript[x, 10])[t]],D[L8,(Subscript[x, 11])[t]],D[L8,(Subscript[x, 12])[t]],D[L8,(Subscript[x, 13])[t]],D[L8,(Subscript[x, 14])[t]],D[L8,(Subscript[x, 15])[t]]},{D[L9,(Subscript[x, 1])[t]],D[L9,(Subscript[x, 2])[t]],D[L9,(Subscript[x, 3])[t]],D[L9,(Subscript[x, 4])[t]],D[L9,(Subscript[x, 5])[t]],D[L9,(Subscript[x, 6])[t]],D[L9,(Subscript[x, 7])[t]],D[L9,(Subscript[x, 8])[t]],D[L9,(Subscript[x, 9])[t]],D[L9,(Subscript[x, 10])[t]],D[L9,(Subscript[x, 11])[t]],D[L9,(Subscript[x, 12])[t]],D[L9,(Subscript[x, 13])[t]],D[L9,(Subscript[x, 14])[t]],D[L9,(Subscript[x, 15])[t]]},{D[L10,(Subscript[x, 1])[t]],D[L10,(Subscript[x, 2])[t]],D[L10,(Subscript[x, 3])[t]],D[L10,(Subscript[x, 4])[t]],D[L10,(Subscript[x, 5])[t]],D[L10,(Subscript[x, 6])[t]],D[L10,(Subscript[x, 7])[t]],D[L10,(Subscript[x, 8])[t]],D[L10,(Subscript[x, 9])[t]],D[L10,(Subscript[x, 10])[t]],D[L10,(Subscript[x, 11])[t]],D[L10,(Subscript[x, 12])[t]],D[L10,(Subscript[x, 13])[t]],D[L10,(Subscript[x, 14])[t]],D[L10,(Subscript[x, 15])[t]]},{D[L11,(Subscript[x, 1])[t]],D[L11,(Subscript[x, 2])[t]],D[L11,(Subscript[x, 3])[t]],D[L11,(Subscript[x, 4])[t]],D[L11,(Subscript[x, 5])[t]],D[L11,(Subscript[x, 6])[t]],D[L11,(Subscript[x, 7])[t]],D[L11,(Subscript[x, 8])[t]],D[L11,(Subscript[x, 9])[t]],D[L11,(Subscript[x, 10])[t]],D[L11,(Subscript[x, 11])[t]],D[L11,(Subscript[x, 12])[t]],D[L11,(Subscript[x, 13])[t]],D[L11,(Subscript[x, 14])[t]],D[L11,(Subscript[x, 15])[t]]},{D[L12,(Subscript[x, 1])[t]],D[L12,(Subscript[x, 2])[t]],D[L12,(Subscript[x, 3])[t]],D[L12,(Subscript[x, 4])[t]],D[L12,(Subscript[x, 5])[t]],D[L12,(Subscript[x, 6])[t]],D[L12,(Subscript[x, 7])[t]],D[L12,(Subscript[x, 8])[t]],D[L12,(Subscript[x, 9])[t]],D[L12,(Subscript[x, 10])[t]],D[L12,(Subscript[x, 11])[t]],D[L12,(Subscript[x, 12])[t]],D[L12,(Subscript[x, 13])[t]],D[L12,(Subscript[x, 14])[t]],D[L12,(Subscript[x, 15])[t]]},{D[L13,(Subscript[x, 1])[t]],D[L13,(Subscript[x, 2])[t]],D[L13,(Subscript[x, 3])[t]],D[L13,(Subscript[x, 4])[t]],D[L13,(Subscript[x, 5])[t]],D[L13,(Subscript[x, 6])[t]],D[L13,(Subscript[x, 7])[t]],D[L13,(Subscript[x, 8])[t]],D[L13,(Subscript[x, 9])[t]],D[L13,(Subscript[x, 10])[t]],D[L13,(Subscript[x, 11])[t]],D[L13,(Subscript[x, 12])[t]],D[L13,(Subscript[x, 13])[t]],D[L13,(Subscript[x, 14])[t]],D[L13,(Subscript[x, 15])[t]]},{D[L14,(Subscript[x, 1])[t]],D[L14,(Subscript[x, 2])[t]],D[L14,(Subscript[x, 3])[t]],D[L14,(Subscript[x, 4])[t]],D[L14,(Subscript[x, 5])[t]],D[L14,(Subscript[x, 6])[t]],D[L14,(Subscript[x, 7])[t]],D[L14,(Subscript[x, 8])[t]],D[L14,(Subscript[x, 9])[t]],D[L14,(Subscript[x, 10])[t]],D[L14,(Subscript[x, 11])[t]],D[L14,(Subscript[x, 12])[t]],D[L14,(Subscript[x, 13])[t]],D[L14,(Subscript[x, 14])[t]],D[L14,(Subscript[x, 15])[t]]},{D[L15,(Subscript[x, 1])[t]],D[L15,(Subscript[x, 2])[t]],D[L15,(Subscript[x, 3])[t]],D[L15,(Subscript[x, 4])[t]],D[L15,(Subscript[x, 5])[t]],D[L15,(Subscript[x, 6])[t]],D[L15,(Subscript[x, 7])[t]],D[L15,(Subscript[x, 8])[t]],D[L15,(Subscript[x, 9])[t]],D[L15,(Subscript[x, 10])[t]],D[L15,(Subscript[x, 11])[t]],D[L15,(Subscript[x, 12])[t]],D[L15,(Subscript[x, 13])[t]],D[L15,(Subscript[x, 14])[t]],D[L15,(Subscript[x, 15])[t]]}}/.{(Subscript[x, 2])[t]->((Subscript[x, 2])[t]/.sol1500a[[6,1]]),(Subscript[x, 3])[t]->((Subscript[x, 3])[t]/.sol1500a[[6,2]]),(Subscript[x, 4])[t]->0,(Subscript[x, 5])[t]->0,(Subscript[x, 6])[t]->1-(Subscript[x, 1])[t]-((Subscript[x, 2])[t]/.sol1500a[[6,1]])-((Subscript[x, 3])[t]/.sol1500a[[6,2]]),(Subscript[x, 7])[t]->0,(Subscript[x, 8])[t]->0,(Subscript[x, 9])[t]->0,(Subscript[x, 10])[t]->0,(Subscript[x, 11])[t]->0,(Subscript[x, 12])[t]->0,(Subscript[x, 13])[t]->0,(Subscript[x, 14])[t]->0,(Subscript[x, 15])[t]->0};
M1236fulls[c_,η_,x1_]=M1236full/.(Subscript[x, 1])[t]->x1//Simplify

"The vector that spans the equilibrium set is the eigenvector associated with the eigenvalue 0";
M1236fulls[c,η,x1].{1,-1,-1,0,0,1,0,0,0,0,0,0,0,0,0}//Simplify

"Note one ev is zero, three other ev of dimension 4, 2 ev of dim 1";
E1236=Eigenvalues[M1236fulls[c,η,x1]];
e12361=E1236[[1]]
e12362=E1236[[2]]
e12363=E1236[[3]]
e12364=E1236[[4]]
e12365=E1236[[5]]
e12366=E1236[[6]]
e12367=E1236[[7]]
e12368=E1236[[8]]
e12369=E1236[[9]]
e123610=E1236[[10]]
e123611=E1236[[11]]
e123612=E1236[[12]]
e123613=E1236[[13]]
e123614=E1236[[14]]//Simplify
e123615=E1236[[15]]//Simplify

Sign of eigenvalues under the necessary conditions for stability

Reduce[e12362≥0&&(paramstability1236full/.(Subscript[x, 1])[t]->x1)]
Reduce[e12363≥0&&(paramstability1236full/.(Subscript[x, 1])[t]->x1)]
Reduce[e12364≥0&&(paramstability1236full/.(Subscript[x, 1])[t]->x1)]
Reduce[e12365≥0&&(paramstability1236full/.(Subscript[x, 1])[t]->x1)]
Reduce[e12366≥0&&(paramstability1236full/.(Subscript[x, 1])[t]->x1)]
Reduce[e12367≥0&&(paramstability1236full/.(Subscript[x, 1])[t]->x1)]
Reduce[e12368≥0&&(paramstability1236full/.(Subscript[x, 1])[t]->x1)]
Reduce[e12369≥0&&(paramstability1236full/.(Subscript[x, 1])[t]->x1)]
Reduce[e123610≥0&&(paramstability1236full/.(Subscript[x, 1])[t]->x1)]
Reduce[e123611≥0&&(paramstability1236full/.(Subscript[x, 1])[t]->x1)]
Reduce[e123612≥0&&(paramstability1236full/.(Subscript[x, 1])[t]->x1)]
Reduce[e123613≥0&&(paramstability1236full/.(Subscript[x, 1])[t]->x1)]

Reduce[e12362≥0&&(paramstability1236fullint/.(Subscript[x, 1])[t]->x1)]
Reduce[e12363≥0&&(paramstability1236fullint/.(Subscript[x, 1])[t]->x1)]
Reduce[e12364≥0&&(paramstability1236fullint/.(Subscript[x, 1])[t]->x1)]
Reduce[e12365≥0&&(paramstability1236fullint/.(Subscript[x, 1])[t]->x1)]
Reduce[e12366≥0&&(paramstability1236fullint/.(Subscript[x, 1])[t]->x1)]
Reduce[e12367≥0&&(paramstability1236fullint/.(Subscript[x, 1])[t]->x1)]
Reduce[e12368≥0&&(paramstability1236fullint/.(Subscript[x, 1])[t]->x1)]
Reduce[e12369≥0&&(paramstability1236fullint/.(Subscript[x, 1])[t]->x1)]
Reduce[e123610≥0&&(paramstability1236fullint/.(Subscript[x, 1])[t]->x1)]
Reduce[e123611≥0&&(paramstability1236fullint/.(Subscript[x, 1])[t]->x1)]
Reduce[e123612≥0&&(paramstability1236fullint/.(Subscript[x, 1])[t]->x1)]
Reduce[e123613≥0&&(paramstability1236fullint/.(Subscript[x, 1])[t]->x1)]

Reduce[e123614≥0&&(paramstability1236full/.(Subscript[x, 1])[t]->x1),{η,c,x1},Reals]
Reduce[e123615≥0&&(paramstability1236full/.(Subscript[x, 1])[t]->x1),{η,c,x1},Reals]

Reduce[e123614≥0&&(paramstability1236fullint/.(Subscript[x, 1])[t]->x1),{η,c,x1},Reals]
Reduce[e123615≥0&&(paramstability1236fullint/.(Subscript[x, 1])[t]->x1),{η,c,x1},Reals]
Reduce[e123615==0&&(paramstability1236fullint/.(Subscript[x, 1])[t]->x1),{η,c,x1},Reals]

RESULT: Under the necessary condition for stability all non-zero eigenvalues are negative which makes the condition sufficient

6.5 Comparative Statics

dηmin=D[x1min,η]//FullSimplify
"derivates of x1-min w.r.t. c is zero and positive for η"
Reduce[dηmin<=0&&paramstability1236,{c,η}]
FindInstance[dηmin>0&&paramstability1236&&(Subscript[x, 1])[t]==x1min,{c,η,(Subscript[x, 1])[t]}]

"derivates of x1-max w.r.t. c and η is positive"
dbmax=D[x1max,c]//FullSimplify
dηmax=D[x1max,η]//FullSimplify
FindInstance[dηmax>0&&paramstability1236&&(Subscript[x, 1])[t]==x1max,{c,η,(Subscript[x, 1])[t]}]
Reduce[dηmax<=0&&paramstability1236&&(Subscript[x, 1])[t]==x1max,{c,η,(Subscript[x, 1])[t]}]

6.6 Graphs

RegionPlot[{paramexistence1236,paramstability1236},{c,0,1},{η,0,1/5},PlotLegends->{"Existence Equilibrium (1,2,3,6)","Stability Equilibrium (1,2,3,6)"},PlotStyle->{GrayLevel[0.4],{GrayLevel[0.6]}},BoundaryStyle->{GrayLevel[0.4],GrayLevel[0.6]},ImageSize->600,MaxRecursion->5]