a[20],I,J;f(x,i,j,k){for(i=0;a[i];i++)for(j=i;a[++j];)for(k=j;a[++k];)if(x>>i&x>>j&x>>k&(a[i]-a[j])*(a[k]-a[j])>0&&!f(x^1<