#include #include #include #include #include #include #include #include #include #include #include #include #define SZ(X) ((int)(X).size()) #define ALL(X) (X).begin(), (X).end() #define REP(I, N) for (int I = 0; I < (N); ++I) #define REPP(I, A, B) for (int I = (A); I < (B); ++I) #define RI(X) scanf("%d", &(X)) #define RII(X, Y) scanf("%d%d", &(X), &(Y)) #define RIII(X, Y, Z) scanf("%d%d%d", &(X), &(Y), &(Z)) #define DRI(X) int (X); scanf("%d", &X) #define DRII(X, Y) int X, Y; scanf("%d%d", &X, &Y) #define DRIII(X, Y, Z) int X, Y, Z; scanf("%d%d%d", &X, &Y, &Z) #define RS(X) scanf("%s", (X)) #define CASET int ___T, case_n = 1; scanf("%d ", &___T); while (___T-- > 0) #define MP make_pair #define PB push_back #define MS0(X) memset((X), 0, sizeof((X))) #define MS1(X) memset((X), -1, sizeof((X))) #define LEN(X) strlen(X) #define PII pair #define VI vector #define VPII vector > #define PLL pair #define VPLL vector > #define F first #define S second typedef long long LL; using namespace std; const int MOD = 1e9+7; const int SIZE = 1e6+10; char s[SIZE]; LL fac[SIZE],inv[SIZE]; LL mypow(LL x,LL y){ LL res=1; while(y){ if(y&1)res=res*x%MOD; y>>=1; x=x*x%MOD; } return res; } LL C(int x,int y){ if(y<0||y>x)return 0; return fac[x]*inv[y]%MOD*inv[x-y]%MOD; } void build(){ // assert(MOD>=SIZE); fac[0]=1; REPP(i,1,SIZE)fac[i]=fac[i-1]*i%MOD; inv[SIZE-1]=mypow(fac[SIZE-1],MOD-2); for(int i=SIZE-2;i>=0;i--)inv[i]=inv[i+1]*(i+1)%MOD; } int main(){ build(); CASET{ RS(s); int n=LEN(s); int d[26]={}; REP(i,n)d[s[i]-'a']++; int odd=0; REP(i,26){ if(d[i]%2==1)odd++; } if(odd>1)puts("0"); else{ LL an=fac[n/2]; REP(i,26)an=an*inv[d[i]/2]%MOD; cout<