纪念——代码首次达到近50K(更新：78.8K 2019行)

#include<bits/stdc++.h>
#define re register
#define F(A) for(re int (A)=1;(A)<=8;++(A))
using namespace std;
int n,mi[10],sp[10],sa[10],kn[10],MI,SP,SA,KN;
double f[110][10][10][10][10],g[10][20];
double ANS,mig[10],spe[10],san[10],kno[10];
char s[100],s1[100],s2[100],s3[100],s4[100];
double pre[10][20],suf[10][20];
void addmi(int id,int val,double p){
    F(i) F(j) F(k) F(l){
        if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void addsp(int id,int val,double p){
    F(i) F(j) F(k) F(l){
        if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void addsa(int id,int val,double p){
    F(i) F(j) F(k) F(l){
        if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
    }
}
void addkn(int id,int val,double p){
    F(i) F(j) F(k) F(l){
        if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
    }
}
void mimixd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[mi[i]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void mispxd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[mi[i]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void misaxd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[mi[i]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
    }
}
void miknxd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[mi[i]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
    }
}
void spmixd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[sp[j]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void spspxd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[sp[j]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void spsaxd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[sp[j]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
    }
}
void spknxd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[sp[j]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
    }
}
void samixd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[sa[k]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void saspxd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[sa[k]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void sasaxd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[sa[k]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
    }
}
void saknxd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[sa[k]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
    }
}
void knmixd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[kn[l]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void knspxd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[kn[l]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void knsaxd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[kn[l]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
    }
}
void knknxd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[kn[l]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
    }
}
void mimix(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[mi[i]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void mispx(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[mi[i]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void misax(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[mi[i]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
    }
}
void miknx(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[mi[i]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
    }
}
void spmix(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[sp[j]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void spspx(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[sp[j]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void spsax(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[sp[j]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
    }
}
void spknx(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[sp[j]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
    }
}
void samix(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[sa[k]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void saspx(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[sa[k]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void sasax(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[sa[k]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
    }
}
void saknx(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[sa[k]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
    }
}
void knmix(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[kn[l]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void knspx(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[kn[l]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void knsax(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[kn[l]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
    }
}
void knknx(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=pre[kn[l]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
    }
}
void mimidd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[mi[i]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void mispdd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[mi[i]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void misadd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[mi[i]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
    }
}
void mikndd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[mi[i]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
    }
}
void spmidd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[sp[j]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void spspdd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[sp[j]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void spsadd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[sp[j]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
    }
}
void spkndd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[sp[j]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
    }
}
void samidd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[sa[k]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void saspdd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[sa[k]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void sasadd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[sa[k]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
    }
}
void sakndd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[sa[k]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
    }
}
void knmidd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[kn[l]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void knspdd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[kn[l]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void knsadd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[kn[l]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
    }
}
void knkndd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[kn[l]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
    }
}

void mimid(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[mi[i]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void mispd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[mi[i]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void misad(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[mi[i]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
    }
}
void miknd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[mi[i]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
    }
}
void spmid(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[sp[j]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void spspd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[sp[j]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void spsad(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[sp[j]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
    }
}
void spknd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[sp[j]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
    }
}
void samid(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[sa[k]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void saspd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[sa[k]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void sasad(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[sa[k]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
    }
}
void saknd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[sa[k]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
    }
}
void knmid(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[kn[l]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void knspd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[kn[l]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
    }
}
void knsad(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[kn[l]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
    }
}
void knknd(int id,int lim,int val){
    F(i) F(j) F(k) F(l){
        re double p=suf[kn[l]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
        else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
    }
}
void mimixdw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[mi[i]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void mispxdw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[mi[i]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void misaxdw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[mi[i]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void miknxdw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[mi[i]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void spmixdw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[sp[j]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void spspxdw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[sp[j]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void spsaxdw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[sp[j]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void spknxdw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[sp[j]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void samixdw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[sa[k]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void saspxdw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[sa[k]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void sasaxdw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[sa[k]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void saknxdw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[sa[k]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void knmixdw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[kn[l]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void knspxdw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[kn[l]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void knsaxdw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[kn[l]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void knknxdw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[kn[l]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void mimixw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[mi[i]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void mispxw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[mi[i]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void misaxw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[mi[i]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void miknxw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[mi[i]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void spmixw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[sp[j]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void spspxw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[sp[j]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void spsaxw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[sp[j]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void spknxw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[sp[j]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void samixw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[sa[k]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void saspxw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[sa[k]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void sasaxw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[sa[k]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void saknxw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[sa[k]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void knmixw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[kn[l]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void knspxw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[kn[l]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void knsaxw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[kn[l]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void knknxw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=pre[kn[l]][lim-1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void mimiddw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[mi[i]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void mispddw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[mi[i]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void misaddw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[mi[i]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void miknddw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[mi[i]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void spmiddw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[sp[j]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void spspddw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[sp[j]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void spsaddw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[sp[j]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void spknddw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[sp[j]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void samiddw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[sa[k]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void saspddw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[sa[k]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void sasaddw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[sa[k]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void saknddw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[sa[k]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void knmiddw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[kn[l]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void knspddw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[kn[l]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void knsaddw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[kn[l]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void knknddw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[kn[l]][lim];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void mimidw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[mi[i]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void mispdw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[mi[i]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void misadw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[mi[i]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void mikndw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[mi[i]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void spmidw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[sp[j]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void spspdw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[sp[j]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void spsadw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[sp[j]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void spkndw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[sp[j]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void samidw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[sa[k]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void saspdw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[sa[k]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void sasadw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[sa[k]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void sakndw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[sa[k]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void knmidw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[kn[l]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void knspdw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[kn[l]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void knsadw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[kn[l]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
void knkndw(int id,int lim,int val){
    re int flag=(val<0)?-1:1;
    F(i) F(j) F(k) F(l){
        re double p=suf[kn[l]][lim+1];
        f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
        for(re int q=0;q<=16;++q){
            re double gl=g[abs(val)][q];
            if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
            else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
        }
    }
}
signed main(){
    scanf("%s%d",s+1,&MI);F(i) mi[i]=s[i]-'0';
    scanf("%s%d",s+1,&SP);F(i) sp[i]=s[i]-'0';
    scanf("%s%d",s+1,&SA);F(i) sa[i]=s[i]-'0';
    scanf("%s%d",s+1,&KN);F(i) kn[i]=s[i]-'0';
    f[0][MI][SP][SA][KN]=1.0; 
    scanf("%d",&n);  g[0][0]=1.0;
    for(re int i=0;i<8;++i)
        for(re int j=0;j<=16;++j){
            g[i+1][j+0]+=g[i][j]*1.0/3.0;
            g[i+1][j+1]+=g[i][j]*1.0/3.0;
            g[i+1][j+2]+=g[i][j]*1.0/3.0;
        }
    for(re int i=1;i<=8;++i){
        pre[i][0]=g[i][0];
        for(re int j=1;j<=16;++j)
            pre[i][j]=g[i][j]+pre[i][j-1];
    }
    for(re int i=8;i>=1;--i){
        suf[i][17]=g[i][17];
        for(re int j=16;j>=0;--j)
            suf[i][j]=g[i][j]+suf[i][j+1];
    }
    for(re int id=1;id<=n;++id){
        scanf("%s%s",s1+1,s2+1);
        if(s2[1]=='+'||s2[1]=='-'){
            re int val=s2[2]-'0';
            if(s2[1]=='-') val=-val;
            if(s2[3]=='?'){
                re int dat=abs(val); 
                re int flag=(s2[1]=='-')?-1:1;
                for(re int i=0;i<=16;++i){
                    if(s1[2]=='i') addmi(id,i*flag,g[dat][i]);
                    if(s1[2]=='p') addsp(id,i*flag,g[dat][i]);
                    if(s1[2]=='a') addsa(id,i*flag,g[dat][i]);
                    if(s1[2]=='n') addkn(id,i*flag,g[dat][i]);
                }
            }
            else{
                if(s1[2]=='i') addmi(id,val,1);
                if(s1[2]=='p') addsp(id,val,1);
                if(s1[2]=='a') addsa(id,val,1);
                if(s1[2]=='n') addkn(id,val,1);
            }
            continue;
        }
        else if(s2[1]=='>'||s2[1]=='<'){
            re int dat;
            scanf("%d%s%s",&dat,s3+1,s4+1);
            re int val=s4[2]-'0';
            re int flag=(s4[1]=='-')?-1:1;
            if(s4[3]=='?'){
                if(s2[1]=='>'&&s2[2]=='='){
                    if(s1[2]=='i'){
                        if(s3[2]=='i') mimiddw(id,dat,val*flag);
                        if(s3[2]=='p') mispddw(id,dat,val*flag);
                        if(s3[2]=='a') misaddw(id,dat,val*flag);
                        if(s3[2]=='n') miknddw(id,dat,val*flag);    
                        continue;
                    }
                    if(s1[2]=='p'){
                        if(s3[2]=='i') spmiddw(id,dat,val*flag);
                        if(s3[2]=='p') spspddw(id,dat,val*flag);
                        if(s3[2]=='a') spsaddw(id,dat,val*flag);
                        if(s3[2]=='n') spknddw(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='a'){
                        if(s3[2]=='i') samiddw(id,dat,val*flag);
                        if(s3[2]=='p') saspddw(id,dat,val*flag);
                        if(s3[2]=='a') sasaddw(id,dat,val*flag);
                        if(s3[2]=='n') saknddw(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='n'){
                        if(s3[2]=='i') knmiddw(id,dat,val*flag);
                        if(s3[2]=='p') knspddw(id,dat,val*flag);
                        if(s3[2]=='a') knsaddw(id,dat,val*flag);
                        if(s3[2]=='n') knknddw(id,dat,val*flag);
                        continue;
                    }
                }
                else if(s2[1]=='<'&&s2[2]=='='){
                    if(s1[2]=='i'){
                        if(s3[2]=='i') mimixdw(id,dat,val*flag);
                        if(s3[2]=='p') mispxdw(id,dat,val*flag);
                        if(s3[2]=='a') misaxdw(id,dat,val*flag);
                        if(s3[2]=='n') miknxdw(id,dat,val*flag);
                        continue;    
                    }
                    if(s1[2]=='p'){
                        if(s3[2]=='i') spmixdw(id,dat,val*flag);
                        if(s3[2]=='p') spspxdw(id,dat,val*flag);
                        if(s3[2]=='a') spsaxdw(id,dat,val*flag);
                        if(s3[2]=='n') spknxdw(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='a'){
                        if(s3[2]=='i') samixdw(id,dat,val*flag);
                        if(s3[2]=='p') saspxdw(id,dat,val*flag);
                        if(s3[2]=='a') sasaxdw(id,dat,val*flag);
                        if(s3[2]=='n') saknxdw(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='n'){
                        if(s3[2]=='i') knmixdw(id,dat,val*flag);
                        if(s3[2]=='p') knspxdw(id,dat,val*flag);
                        if(s3[2]=='a') knsaxdw(id,dat,val*flag);
                        if(s3[2]=='n') knknxdw(id,dat,val*flag);
                        continue;
                    }
                }
                else if(s2[1]=='>'){
                    if(s1[2]=='i'){
                        if(s3[2]=='i') mimidw(id,dat,val*flag);
                        if(s3[2]=='p') mispdw(id,dat,val*flag);
                        if(s3[2]=='a') misadw(id,dat,val*flag);
                        if(s3[2]=='n') mikndw(id,dat,val*flag);    
                        continue;
                    }
                    if(s1[2]=='p'){
                        if(s3[2]=='i') spmidw(id,dat,val*flag);
                        if(s3[2]=='p') spspdw(id,dat,val*flag);
                        if(s3[2]=='a') spsadw(id,dat,val*flag);
                        if(s3[2]=='n') spkndw(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='a'){
                        if(s3[2]=='i') samidw(id,dat,val*flag);
                        if(s3[2]=='p') saspdw(id,dat,val*flag);
                        if(s3[2]=='a') sasadw(id,dat,val*flag);
                        if(s3[2]=='n') sakndw(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='n'){
                        if(s3[2]=='i') knmidw(id,dat,val*flag);
                        if(s3[2]=='p') knspdw(id,dat,val*flag);
                        if(s3[2]=='a') knsadw(id,dat,val*flag);
                        if(s3[2]=='n') knkndw(id,dat,val*flag);
                        continue;
                    }
                }
                else if(s2[1]=='<'){
                    if(s1[2]=='i'){
                        if(s3[2]=='i') mimixw(id,dat,val*flag);
                        if(s3[2]=='p') mispxw(id,dat,val*flag);
                        if(s3[2]=='a') misaxw(id,dat,val*flag);
                        if(s3[2]=='n') miknxw(id,dat,val*flag);    
                        continue;
                    }
                    if(s1[2]=='p'){
                        if(s3[2]=='i') spmixw(id,dat,val*flag);
                        if(s3[2]=='p') spspxw(id,dat,val*flag);
                        if(s3[2]=='a') spsaxw(id,dat,val*flag);
                        if(s3[2]=='n') spknxw(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='a'){
                        if(s3[2]=='i') samixw(id,dat,val*flag);
                        if(s3[2]=='p') saspxw(id,dat,val*flag);
                        if(s3[2]=='a') sasaxw(id,dat,val*flag);
                        if(s3[2]=='n') saknxw(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='n'){
                        if(s3[2]=='i') knmixw(id,dat,val*flag);
                        if(s3[2]=='p') knspxw(id,dat,val*flag);
                        if(s3[2]=='a') knsaxw(id,dat,val*flag);
                        if(s3[2]=='n') knknxw(id,dat,val*flag);
                        continue;
                    }
                }
            }
            else{
                if(s2[1]=='>'&&s2[2]=='='){
                    if(s1[2]=='i'){
                        if(s3[2]=='i') mimidd(id,dat,val*flag);
                        if(s3[2]=='p') mispdd(id,dat,val*flag);
                        if(s3[2]=='a') misadd(id,dat,val*flag);
                        if(s3[2]=='n') mikndd(id,dat,val*flag);    
                        continue;
                    }
                    if(s1[2]=='p'){
                        if(s3[2]=='i') spmidd(id,dat,val*flag);
                        if(s3[2]=='p') spspdd(id,dat,val*flag);
                        if(s3[2]=='a') spsadd(id,dat,val*flag);
                        if(s3[2]=='n') spkndd(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='a'){
                        if(s3[2]=='i') samidd(id,dat,val*flag);
                        if(s3[2]=='p') saspdd(id,dat,val*flag);
                        if(s3[2]=='a') sasadd(id,dat,val*flag);
                        if(s3[2]=='n') sakndd(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='n'){
                        if(s3[2]=='i') knmidd(id,dat,val*flag);
                        if(s3[2]=='p') knspdd(id,dat,val*flag);
                        if(s3[2]=='a') knsadd(id,dat,val*flag);
                        if(s3[2]=='n') knkndd(id,dat,val*flag);
                        continue;
                    }
                }
                else if(s2[1]=='<'&&s2[2]=='='){
                    if(s1[2]=='i'){
                        if(s3[2]=='i') mimixd(id,dat,val*flag);
                        if(s3[2]=='p') mispxd(id,dat,val*flag);
                        if(s3[2]=='a') misaxd(id,dat,val*flag);
                        if(s3[2]=='n') miknxd(id,dat,val*flag);    
                        continue;
                    }
                    if(s1[2]=='p'){
                        if(s3[2]=='i') spmixd(id,dat,val*flag);
                        if(s3[2]=='p') spspxd(id,dat,val*flag);
                        if(s3[2]=='a') spsaxd(id,dat,val*flag);
                        if(s3[2]=='n') spknxd(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='a'){
                        if(s3[2]=='i') samixd(id,dat,val*flag);
                        if(s3[2]=='p') saspxd(id,dat,val*flag);
                        if(s3[2]=='a') sasaxd(id,dat,val*flag);
                        if(s3[2]=='n') saknxd(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='n'){
                        if(s3[2]=='i') knmixd(id,dat,val*flag);
                        if(s3[2]=='p') knspxd(id,dat,val*flag);
                        if(s3[2]=='a') knsaxd(id,dat,val*flag);
                        if(s3[2]=='n') knknxd(id,dat,val*flag);
                        continue;
                    }
                }
                else if(s2[1]=='>'){
                    if(s1[2]=='i'){
                        if(s3[2]=='i') mimid(id,dat,val*flag);
                        if(s3[2]=='p') mispd(id,dat,val*flag);
                        if(s3[2]=='a') misad(id,dat,val*flag);
                        if(s3[2]=='n') miknd(id,dat,val*flag);    
                        continue;
                    }
                    if(s1[2]=='p'){
                        if(s3[2]=='i') spmid(id,dat,val*flag);
                        if(s3[2]=='p') spspd(id,dat,val*flag);
                        if(s3[2]=='a') spsad(id,dat,val*flag);
                        if(s3[2]=='n') spknd(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='a'){
                        if(s3[2]=='i') samid(id,dat,val*flag);
                        if(s3[2]=='p') saspd(id,dat,val*flag);
                        if(s3[2]=='a') sasad(id,dat,val*flag);
                        if(s3[2]=='n') saknd(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='n'){
                        if(s3[2]=='i') knmid(id,dat,val*flag);
                        if(s3[2]=='p') knspd(id,dat,val*flag);
                        if(s3[2]=='a') knsad(id,dat,val*flag);
                        if(s3[2]=='n') knknd(id,dat,val*flag);
                        continue;
                    }
                }
                else if(s2[1]=='<'){
                    if(s1[2]=='i'){
                        if(s3[2]=='i') mimix(id,dat,val*flag);
                        if(s3[2]=='p') mispx(id,dat,val*flag);
                        if(s3[2]=='a') misax(id,dat,val*flag);
                        if(s3[2]=='n') miknx(id,dat,val*flag);    
                        continue;
                    }
                    if(s1[2]=='p'){
                        if(s3[2]=='i') spmix(id,dat,val*flag);
                        if(s3[2]=='p') spspx(id,dat,val*flag);
                        if(s3[2]=='a') spsax(id,dat,val*flag);
                        if(s3[2]=='n') spknx(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='a'){
                        if(s3[2]=='i') samix(id,dat,val*flag);
                        if(s3[2]=='p') saspx(id,dat,val*flag);
                        if(s3[2]=='a') sasax(id,dat,val*flag);
                        if(s3[2]=='n') saknx(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='n'){
                        if(s3[2]=='i') knmix(id,dat,val*flag);
                        if(s3[2]=='p') knspx(id,dat,val*flag);
                        if(s3[2]=='a') knsax(id,dat,val*flag);
                        if(s3[2]=='n') knknx(id,dat,val*flag);
                        continue;
                    }
                }
            }
        }
    }
    printf("%.2lf
",ANS*100.0);
    F(i) F(j) F(k) F(l){
        mig[mi[i]]+=f[n][i][j][k][l];
        spe[sp[j]]+=f[n][i][j][k][l];
        san[sa[k]]+=f[n][i][j][k][l];
        kno[kn[l]]+=f[n][i][j][k][l];
    }
    F(i) printf("%.2lf ",mig[i]*100.0);puts("");
    F(i) printf("%.2lf ",spe[i]*100.0);puts("");
    F(i) printf("%.2lf ",san[i]*100.0);puts("");
    F(i) printf("%.2lf ",kno[i]*100.0);puts("");
}

#include<bits/stdc++.h>
using namespace std;
int n,mi[10],sp[10],sa[10],kn[10],MI,SP,SA,KN;
double f[110][10][10][10][10],g[10][20];
double ANS,mig[10],spe[10],san[10],kno[10];
char s[100],s1[100],s2[100],s3[100],s4[100];
double pre[10][20],suf[10][20];
inline void addmi(register int id,register int val,register double p){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void addsp(register int id,register int val,register double p){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void addsa(register int id,register int val,register double p){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void addkn(register int id,register int val,register double p){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
        }
}
inline void mimixd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[mi[i]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void mispxd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[mi[i]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void misaxd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[mi[i]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void miknxd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[mi[i]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
        }
}
inline void spmixd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sp[j]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void spspxd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sp[j]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void spsaxd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sp[j]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void spknxd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sp[j]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
        }
}
inline void samixd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sa[k]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void saspxd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sa[k]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void sasaxd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sa[k]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void saknxd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sa[k]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
        }
}
inline void knmixd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[kn[l]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void knspxd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[kn[l]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void knsaxd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[kn[l]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void knknxd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[kn[l]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
        }
}
inline void mimix(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[mi[i]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void mispx(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[mi[i]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void misax(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[mi[i]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void miknx(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[mi[i]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
        }
}
inline void spmix(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sp[j]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void spspx(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sp[j]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void spsax(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sp[j]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void spknx(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sp[j]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
        }
}
inline void samix(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sa[k]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void saspx(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sa[k]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void sasax(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sa[k]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void saknx(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sa[k]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
        }
}
inline void knmix(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[kn[l]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void knspx(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[kn[l]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void knsax(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[kn[l]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void knknx(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[kn[l]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
        }
}
inline void mimidd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[mi[i]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void mispdd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[mi[i]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void misadd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[mi[i]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void mikndd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[mi[i]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
        }
}
inline void spmidd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sp[j]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void spspdd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sp[j]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void spsadd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sp[j]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void spkndd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sp[j]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
        }
}
inline void samidd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sa[k]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void saspdd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sa[k]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void sasadd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sa[k]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void sakndd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sa[k]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
        }
}
inline void knmidd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[kn[l]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void knspdd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[kn[l]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void knsadd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[kn[l]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void knkndd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[kn[l]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
        }
}
inline void mimid(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[mi[i]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void mispd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[mi[i]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void misad(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[mi[i]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void miknd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[mi[i]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
        }
}
inline void spmid(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sp[j]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void spspd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sp[j]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void spsad(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sp[j]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void spknd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sp[j]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
        }
}
inline void samid(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sa[k]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void saspd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sa[k]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void sasad(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sa[k]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void saknd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sa[k]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
        }
}
inline void knmid(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[kn[l]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(i+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][min(8,i+val)][j][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void knspd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[kn[l]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(j+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][min(8,j+val)][k][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void knsad(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[kn[l]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(k+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][min(8,k+val)][l]+=f[id-1][i][j][k][l]*p;
        }
}
inline void knknd(register int id,register int lim,register int val){
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[kn[l]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            if(l+val<=0) ANS+=f[id-1][i][j][k][l]*p;
            else f[id][i][j][k][min(8,l+val)]+=f[id-1][i][j][k][l]*p;
        }
}
inline void mimixdw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[mi[i]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}    
inline void mispxdw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[mi[i]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void misaxdw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[mi[i]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void miknxdw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[mi[i]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void spmixdw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sp[j]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void spspxdw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sp[j]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void spsaxdw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sp[j]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void spknxdw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sp[j]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void samixdw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sa[k]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void saspxdw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sa[k]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void sasaxdw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sa[k]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void saknxdw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sa[k]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void knmixdw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[kn[l]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void knspxdw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[kn[l]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void knsaxdw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[kn[l]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void knknxdw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[kn[l]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void mimixw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[mi[i]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void mispxw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[mi[i]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void misaxw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[mi[i]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void miknxw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[mi[i]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void spmixw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sp[j]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void spspxw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sp[j]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void spsaxw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sp[j]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void spknxw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sp[j]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void samixw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sa[k]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void saspxw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sa[k]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void sasaxw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sa[k]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void saknxw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[sa[k]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void knmixw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[kn[l]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void knspxw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[kn[l]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void knsaxw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[kn[l]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void knknxw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=pre[kn[l]][lim-1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void mimiddw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[mi[i]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void mispddw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[mi[i]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void misaddw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[mi[i]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void miknddw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[mi[i]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void spmiddw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sp[j]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void spspddw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sp[j]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void spsaddw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sp[j]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void spknddw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sp[j]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void samiddw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sa[k]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void saspddw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sa[k]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void sasaddw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sa[k]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void saknddw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sa[k]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void knmiddw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[kn[l]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void knspddw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[kn[l]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void knsaddw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[kn[l]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void knknddw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[kn[l]][lim];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void mimidw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[mi[i]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void mispdw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[mi[i]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void misadw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[mi[i]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void mikndw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[mi[i]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void spmidw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sp[j]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void spspdw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sp[j]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void spsadw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sp[j]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void spkndw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
   for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sp[j]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void samidw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sa[k]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void saspdw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sa[k]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void sasadw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sa[k]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void sakndw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[sa[k]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void knmidw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[kn[l]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(i+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][min(8,i+q*flag)][j][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void knspdw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[kn[l]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(j+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][min(8,j+q*flag)][k][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void knsadw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[kn[l]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(k+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][min(8,k+q*flag)][l]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
inline void knkndw(register int id,register int lim,register int val){
    register int flag=(val<0)?-1:1;
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            register double p=suf[kn[l]][lim+1];
            f[id][i][j][k][l]+=f[id-1][i][j][k][l]*(1-p);
            for(register int q=0;q<=16;++q){
                register double gl=g[abs(val)][q];
                if(l+q*flag<=0) ANS+=f[id-1][i][j][k][l]*p*gl;
                else f[id][i][j][k][min(8,l+q*flag)]+=f[id-1][i][j][k][l]*p*gl;
            }
        }
}
signed main(){
    scanf("%s%d",s+1,&MI);for(register int i=1;i<=8;++i) mi[i]=s[i]-'0';
    scanf("%s%d",s+1,&SP);for(register int i=1;i<=8;++i) sp[i]=s[i]-'0';
    scanf("%s%d",s+1,&SA);for(register int i=1;i<=8;++i) sa[i]=s[i]-'0';
    scanf("%s%d",s+1,&KN);for(register int i=1;i<=8;++i) kn[i]=s[i]-'0';
    f[0][MI][SP][SA][KN]=1.0; 
    scanf("%d",&n);  g[0][0]=1.0;
    for(register int i=0;i<8;++i)
        for(register int j=0;j<=16;++j){
            g[i+1][j+0]+=g[i][j]*1.0/3.0;
            g[i+1][j+1]+=g[i][j]*1.0/3.0;
            g[i+1][j+2]+=g[i][j]*1.0/3.0;
        }
    for(register int i=1;i<=8;++i){
        pre[i][0]=g[i][0];
        for(register int j=1;j<=16;++j)
            pre[i][j]=g[i][j]+pre[i][j-1];
    }
    for(register int i=8;i>=1;--i){
        suf[i][17]=g[i][17];
        for(register int j=16;j>=0;--j)
            suf[i][j]=g[i][j]+suf[i][j+1];
    }
    for(register int id=1;id<=n;++id){
        scanf("%s%s",s1+1,s2+1);
        if(s2[1]=='+'||s2[1]=='-'){
            register int val=s2[2]-'0';
            if(s2[1]=='-') val=-val;
            if(s2[3]=='?'){
                register int dat=abs(val); 
                register int flag=(s2[1]=='-')?-1:1;
                for(register int i=0;i<=16;++i){
                    if(s1[2]=='i') addmi(id,i*flag,g[dat][i]);
                    if(s1[2]=='p') addsp(id,i*flag,g[dat][i]);
                    if(s1[2]=='a') addsa(id,i*flag,g[dat][i]);
                    if(s1[2]=='n') addkn(id,i*flag,g[dat][i]);
                }
            }
            else{
                if(s1[2]=='i') addmi(id,val,1);
                if(s1[2]=='p') addsp(id,val,1);
                if(s1[2]=='a') addsa(id,val,1);
                if(s1[2]=='n') addkn(id,val,1);
            }
            continue;
        }
        else if(s2[1]=='>'||s2[1]=='<'){
            register int dat;
            scanf("%d%s%s",&dat,s3+1,s4+1);
            register int val=s4[2]-'0';
            register int flag=(s4[1]=='-')?-1:1;
            if(s4[3]=='?'){
                if(s2[1]=='>'&&s2[2]=='='){
                    if(s1[2]=='i'){
                        if(s3[2]=='i') mimiddw(id,dat,val*flag);
                        if(s3[2]=='p') mispddw(id,dat,val*flag);
                        if(s3[2]=='a') misaddw(id,dat,val*flag);
                        if(s3[2]=='n') miknddw(id,dat,val*flag);    
                        continue;
                    }
                    if(s1[2]=='p'){
                        if(s3[2]=='i') spmiddw(id,dat,val*flag);
                        if(s3[2]=='p') spspddw(id,dat,val*flag);
                        if(s3[2]=='a') spsaddw(id,dat,val*flag);
                        if(s3[2]=='n') spknddw(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='a'){
                        if(s3[2]=='i') samiddw(id,dat,val*flag);
                        if(s3[2]=='p') saspddw(id,dat,val*flag);
                        if(s3[2]=='a') sasaddw(id,dat,val*flag);
                        if(s3[2]=='n') saknddw(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='n'){
                        if(s3[2]=='i') knmiddw(id,dat,val*flag);
                        if(s3[2]=='p') knspddw(id,dat,val*flag);
                        if(s3[2]=='a') knsaddw(id,dat,val*flag);
                        if(s3[2]=='n') knknddw(id,dat,val*flag);
                        continue;
                    }
                }
                else if(s2[1]=='<'&&s2[2]=='='){
                    if(s1[2]=='i'){
                        if(s3[2]=='i') mimixdw(id,dat,val*flag);
                        if(s3[2]=='p') mispxdw(id,dat,val*flag);
                        if(s3[2]=='a') misaxdw(id,dat,val*flag);
                        if(s3[2]=='n') miknxdw(id,dat,val*flag);
                        continue;    
                    }
                    if(s1[2]=='p'){
                        if(s3[2]=='i') spmixdw(id,dat,val*flag);
                        if(s3[2]=='p') spspxdw(id,dat,val*flag);
                        if(s3[2]=='a') spsaxdw(id,dat,val*flag);
                        if(s3[2]=='n') spknxdw(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='a'){
                        if(s3[2]=='i') samixdw(id,dat,val*flag);
                        if(s3[2]=='p') saspxdw(id,dat,val*flag);
                        if(s3[2]=='a') sasaxdw(id,dat,val*flag);
                        if(s3[2]=='n') saknxdw(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='n'){
                        if(s3[2]=='i') knmixdw(id,dat,val*flag);
                        if(s3[2]=='p') knspxdw(id,dat,val*flag);
                        if(s3[2]=='a') knsaxdw(id,dat,val*flag);
                        if(s3[2]=='n') knknxdw(id,dat,val*flag);
                        continue;
                    }
                }
                else if(s2[1]=='>'){
                    if(s1[2]=='i'){
                        if(s3[2]=='i') mimidw(id,dat,val*flag);
                        if(s3[2]=='p') mispdw(id,dat,val*flag);
                        if(s3[2]=='a') misadw(id,dat,val*flag);
                        if(s3[2]=='n') mikndw(id,dat,val*flag);    
                        continue;
                    }
                    if(s1[2]=='p'){
                        if(s3[2]=='i') spmidw(id,dat,val*flag);
                        if(s3[2]=='p') spspdw(id,dat,val*flag);
                        if(s3[2]=='a') spsadw(id,dat,val*flag);
                        if(s3[2]=='n') spkndw(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='a'){
                        if(s3[2]=='i') samidw(id,dat,val*flag);
                        if(s3[2]=='p') saspdw(id,dat,val*flag);
                        if(s3[2]=='a') sasadw(id,dat,val*flag);
                        if(s3[2]=='n') sakndw(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='n'){
                        if(s3[2]=='i') knmidw(id,dat,val*flag);
                        if(s3[2]=='p') knspdw(id,dat,val*flag);
                        if(s3[2]=='a') knsadw(id,dat,val*flag);
                        if(s3[2]=='n') knkndw(id,dat,val*flag);
                        continue;
                    }
                }
                else if(s2[1]=='<'){
                    if(s1[2]=='i'){
                        if(s3[2]=='i') mimixw(id,dat,val*flag);
                        if(s3[2]=='p') mispxw(id,dat,val*flag);
                        if(s3[2]=='a') misaxw(id,dat,val*flag);
                        if(s3[2]=='n') miknxw(id,dat,val*flag);    
                        continue;
                    }
                    if(s1[2]=='p'){
                        if(s3[2]=='i') spmixw(id,dat,val*flag);
                        if(s3[2]=='p') spspxw(id,dat,val*flag);
                        if(s3[2]=='a') spsaxw(id,dat,val*flag);
                        if(s3[2]=='n') spknxw(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='a'){
                        if(s3[2]=='i') samixw(id,dat,val*flag);
                        if(s3[2]=='p') saspxw(id,dat,val*flag);
                        if(s3[2]=='a') sasaxw(id,dat,val*flag);
                        if(s3[2]=='n') saknxw(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='n'){
                        if(s3[2]=='i') knmixw(id,dat,val*flag);
                        if(s3[2]=='p') knspxw(id,dat,val*flag);
                        if(s3[2]=='a') knsaxw(id,dat,val*flag);
                        if(s3[2]=='n') knknxw(id,dat,val*flag);
                        continue;
                    }
                }
            }
            else{
                if(s2[1]=='>'&&s2[2]=='='){
                    if(s1[2]=='i'){
                        if(s3[2]=='i') mimidd(id,dat,val*flag);
                        if(s3[2]=='p') mispdd(id,dat,val*flag);
                        if(s3[2]=='a') misadd(id,dat,val*flag);
                        if(s3[2]=='n') mikndd(id,dat,val*flag);    
                        continue;
                    }
                    if(s1[2]=='p'){
                        if(s3[2]=='i') spmidd(id,dat,val*flag);
                        if(s3[2]=='p') spspdd(id,dat,val*flag);
                        if(s3[2]=='a') spsadd(id,dat,val*flag);
                        if(s3[2]=='n') spkndd(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='a'){
                        if(s3[2]=='i') samidd(id,dat,val*flag);
                        if(s3[2]=='p') saspdd(id,dat,val*flag);
                        if(s3[2]=='a') sasadd(id,dat,val*flag);
                        if(s3[2]=='n') sakndd(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='n'){
                        if(s3[2]=='i') knmidd(id,dat,val*flag);
                        if(s3[2]=='p') knspdd(id,dat,val*flag);
                        if(s3[2]=='a') knsadd(id,dat,val*flag);
                        if(s3[2]=='n') knkndd(id,dat,val*flag);
                        continue;
                    }
                }
                else if(s2[1]=='<'&&s2[2]=='='){
                    if(s1[2]=='i'){
                        if(s3[2]=='i') mimixd(id,dat,val*flag);
                        if(s3[2]=='p') mispxd(id,dat,val*flag);
                        if(s3[2]=='a') misaxd(id,dat,val*flag);
                        if(s3[2]=='n') miknxd(id,dat,val*flag);    
                        continue;
                    }
                    if(s1[2]=='p'){
                        if(s3[2]=='i') spmixd(id,dat,val*flag);
                        if(s3[2]=='p') spspxd(id,dat,val*flag);
                        if(s3[2]=='a') spsaxd(id,dat,val*flag);
                        if(s3[2]=='n') spknxd(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='a'){
                        if(s3[2]=='i') samixd(id,dat,val*flag);
                        if(s3[2]=='p') saspxd(id,dat,val*flag);
                        if(s3[2]=='a') sasaxd(id,dat,val*flag);
                        if(s3[2]=='n') saknxd(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='n'){
                        if(s3[2]=='i') knmixd(id,dat,val*flag);
                        if(s3[2]=='p') knspxd(id,dat,val*flag);
                        if(s3[2]=='a') knsaxd(id,dat,val*flag);
                        if(s3[2]=='n') knknxd(id,dat,val*flag);
                        continue;
                    }
                }
                else if(s2[1]=='>'){
                    if(s1[2]=='i'){
                        if(s3[2]=='i') mimid(id,dat,val*flag);
                        if(s3[2]=='p') mispd(id,dat,val*flag);
                        if(s3[2]=='a') misad(id,dat,val*flag);
                        if(s3[2]=='n') miknd(id,dat,val*flag);    
                        continue;
                    }
                    if(s1[2]=='p'){
                        if(s3[2]=='i') spmid(id,dat,val*flag);
                        if(s3[2]=='p') spspd(id,dat,val*flag);
                        if(s3[2]=='a') spsad(id,dat,val*flag);
                        if(s3[2]=='n') spknd(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='a'){
                        if(s3[2]=='i') samid(id,dat,val*flag);
                        if(s3[2]=='p') saspd(id,dat,val*flag);
                        if(s3[2]=='a') sasad(id,dat,val*flag);
                        if(s3[2]=='n') saknd(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='n'){
                        if(s3[2]=='i') knmid(id,dat,val*flag);
                        if(s3[2]=='p') knspd(id,dat,val*flag);
                        if(s3[2]=='a') knsad(id,dat,val*flag);
                        if(s3[2]=='n') knknd(id,dat,val*flag);
                        continue;
                    }
                }
                else if(s2[1]=='<'){
                    if(s1[2]=='i'){
                        if(s3[2]=='i') mimix(id,dat,val*flag);
                        if(s3[2]=='p') mispx(id,dat,val*flag);
                        if(s3[2]=='a') misax(id,dat,val*flag);
                        if(s3[2]=='n') miknx(id,dat,val*flag);    
                        continue;
                    }
                    if(s1[2]=='p'){
                        if(s3[2]=='i') spmix(id,dat,val*flag);
                        if(s3[2]=='p') spspx(id,dat,val*flag);
                        if(s3[2]=='a') spsax(id,dat,val*flag);
                        if(s3[2]=='n') spknx(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='a'){
                        if(s3[2]=='i') samix(id,dat,val*flag);
                        if(s3[2]=='p') saspx(id,dat,val*flag);
                        if(s3[2]=='a') sasax(id,dat,val*flag);
                        if(s3[2]=='n') saknx(id,dat,val*flag);
                        continue;
                    }
                    if(s1[2]=='n'){
                        if(s3[2]=='i') knmix(id,dat,val*flag);
                        if(s3[2]=='p') knspx(id,dat,val*flag);
                        if(s3[2]=='a') knsax(id,dat,val*flag);
                        if(s3[2]=='n') knknx(id,dat,val*flag);
                        continue;
                    }
                }
            }
        }
    }
    printf("%.2lf
",ANS*100.0);
    for(register int i=1;i<=8;++i)
    for(register int j=1;j<=8;++j)
        for(register int k=1;k<=8;++k)
        for(register int l=1;l<=8;++l){
            mig[mi[i]]+=f[n][i][j][k][l];
            spe[sp[j]]+=f[n][i][j][k][l];
            san[sa[k]]+=f[n][i][j][k][l];
            kno[kn[l]]+=f[n][i][j][k][l];
        }
    for(register int i=1;i<=8;++i) printf("%.2lf ",mig[i]*100.0); puts("");
    for(register int i=1;i<=8;++i) printf("%.2lf ",spe[i]*100.0); puts("");
    for(register int i=1;i<=8;++i) printf("%.2lf ",san[i]*100.0); puts("");
    for(register int i=1;i<=8;++i) printf("%.2lf ",kno[i]*100.0); puts("");
}