dxdt[0]=-((a + del)*x[0]) + 3*b*x[3];
dxdt[1]=N0*sig + a*x[1] - (3*b + kappa)*x[1] + 2*a*(x[0] + x[2] + x[3]) + 2*a*(x[4] + x[5] + x[6] + x[7]);
dxdt[2]=3*b*x[1] + (-a - 3*b - kappa)*x[2];
dxdt[3]=3*b*x[2] + (-a - 3*b - kappa)*x[3];
dxdt[4]=(-a - 3*b - kappa)*x[4];
dxdt[5]=3*b*x[4] + (-a - 3*b - kappa)*x[5];
dxdt[6]=3*b*x[5] + (-a - 3*b - kappa)*x[6];
dxdt[7]=3*b*x[6] - (a + del)*x[7];