1function MAP=map_mmpp2(MEAN,SCV,SKEW,ACF1)
2% MAP=map_mmpp2(MEAN,SCV,SKEW,ACF1) - Fit a MMPP(2) as a MAP
5% MEAN: mean inter-arrival time of the process
6% SCV: squared coefficient of variation of inter-arrival times
7% SKEW: skewness of inter-arrival times (-1 => automatic minimization,
8% applies only to SCV>1)
9% ACF1: lag-1 autocorrelation coefficient (-1 => maximum feasible
13% MAP: a MAP in the form of {D0,D1}
16% - MAP=map_mmpp2(1,2,-1,0.2) MMPP(2) process with minimal skewness
17% - MAP=map_mmpp2(1,2,-1,-1) MMPP(2) process with minimal skewness and
18% maximal autocorrelation
23E3=-(2*E1^3-3*E1*E2-SKEW*(E2-E1^2)^(3/2));
25 G2=1-10*10^(-map_feastol); % autocorrelation decay rate
27 G2=ACF1/(1-1/SCV)/0.5; % autocorrelation decay rate
29if SKEW==-1 && SCV>1 % determine MAP with nearly minimum third moment
30 E3=(3/2+0.001)*E2^2/E1;
34 mu00=2*(6*E1^3*SCV-E3)/E1/(6*E1^3*SCV+3*E1^3*SCV^2+3*E1^3-2*E3);
36 q01= 9*E1^5*(SCV-1)*(SCV^2-2*SCV+1)/(6*E1^3*SCV-E3)/(6*E1^3*SCV+3*E1^3*SCV^2+3*E1^3-2*E3);
37 q10=-3*(SCV-1)*E1^2/(6*E1^3*SCV-E3);
39 mu00=G2*(-4*E3*G2+4*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*E3*G2-18*E1^3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2-18*E1^3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2*SCV^2-12*E1^3*G2^2-12*E1^3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2^2*SCV+12*E1^3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2*SCV+12*E1^3*G2*SCV^2-9*E1^3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*SCV+3*E1^3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)+12*E1^3*G2^2*SCV+9*E1^3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*SCV^2+12*E1^3*G2+12*E1^3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2^2-3*E1^3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*SCV^3)/(12*E1^3*G2^3*SCV+3*E1^3*SCV^3*G2-12*E1^3*G2^3+18*E1^3*G2^2*SCV^2-3*E1^3*G2+27*E1^3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2*SCV^2-9*E1^3*G2*SCV^2+18*E1^3*G2^2-12*E1^3*G2^2*SCV+9*E1^3*G2*SCV-12*E1^3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2^3*SCV-9*E1^3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*SCV^3*G2-24*E1^3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2^2*SCV^2-(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*E3*SCV^2+4*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*E3*G2^2+12*E1^3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2^3-(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*E3+2*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*E3*SCV+9*E1^3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2+24*E1^3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2^2*SCV-27*E1^3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2*SCV+6*E1^3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*SCV-12*E1^3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*SCV^2-24*E1^3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2^2+6*E1^3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*SCV^3-4*E3*G2^2)/E1;
40 mu11=(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/E1/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3);
41 q01=-3*E1^2*(-6*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))*E1^2/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*SCV+12*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))*E1^2/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2*SCV-6*G2*SCV*E1^2-3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))*E1^2/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2+(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/E1/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*E3+3*E1^2*G2+6*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))*E1^2/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*SCV^2-9*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))*E1^2/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*SCV^2*G2+3*E1^2*G2*SCV^2-E3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/E1/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*SCV-6*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))*E1^2/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2^2*SCV+6*E1^2*G2^2*SCV+3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))*E1^2/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2^2-G2*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/E1/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*E3-3*E1^2*G2^2+3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))*E1^2/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*SCV^2*G2^2-3*E1^2*SCV^2*G2^2+G2*SCV*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/E1/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*E3)/(-45*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))*E1^5/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2*SCV^2+18*G2^2*E1^5*SCV+18*E1^5*G2^3-27*E1^5*G2^2*SCV^2+6*E1^2*G2^2*E3-27*E1^5*G2^2-18*E1^5*G2^3*SCV-18*E1^5*G2*SCV+18*E1^5*G2*SCV^2+3*E1^2*G2*E3-3*E1^2*G2*E3*SCV+(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/E1/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*E3^2+3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))*E1^2/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2*SCV*E3-36*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))*E1^5/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2^2*SCV+36*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))*E1^5/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2^2+36*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))*E1^5/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*SCV^2+45*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))*E1^5/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2*SCV-12*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))*E1^2/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*SCV*E3-3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))*E1^2/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2*E3+9*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))*E1^5/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2*SCV^3+36*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))*E1^5/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2^2*SCV^2-6*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))*E1^2/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2^2*E3+18*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))*E1^5/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2^3*SCV-18*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))*E1^5/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2^3-9*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))*E1^5/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2);
42 q10=3*(-3*E1^3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*SCV^3-3*E1^3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2*SCV^2+6*E1^3*SCV^2+3*E1^3*G2*SCV^2+3*E1^3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*SCV^2+6*E1^3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2*SCV-E3*SCV-6*E1^3*SCV+(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*E3*SCV-6*E1^3*G2*SCV-3*E1^3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*SCV-(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*E3+3*E1^3*G2-3*E1^3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)*G2+3*E1^3*(-3*E1^3*G2+3*E1^3*G2*SCV-6*E1^3*SCV+E3+(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2)^(1/2))/(-3*E1^3*SCV^2-6*E1^3*SCV-3*E1^3+2*E3)+E3)*E1^2*(-1+G2)/(E3^2-12*E1^3*SCV*E3+6*E1^3*G2*E3-6*G2*SCV*E1^3*E3+18*G2*SCV^3*E1^6-18*E1^6*G2*SCV^2+9*E1^6*G2^2+36*E1^6*SCV^2+18*E1^6*G2*SCV-18*E1^6*SCV*G2^2+9*E1^6*SCV^2*G2^2-18*E1^6*G2);