#include using namespace std; using ll = long long; using uint = unsigned int; using ull = unsigned long long; #define rep(i,n) for(int i=0;i=0;i--) #define per1(i,n) for(int i=int(n);i>0;i--) #define all(c) c.begin(),c.end() #define si(x) int(x.size()) #define pb push_back #define eb emplace_back #define fs first #define sc second template using V = vector; template using VV = vector>; template bool chmax(T& x, U y){ if(x bool chmin(T& x, U y){ if(y void mkuni(V& v){sort(all(v));v.erase(unique(all(v)),v.end());} template int lwb(const V& v, const T& a){return lower_bound(all(v),a) - v.begin();} template V Vec(size_t a) { return V(a); } template auto Vec(size_t a, Ts... ts) { return V(ts...))>(a, Vec(ts...)); } template ostream& operator<<(ostream& o,const pair &p){ return o<<"("< ostream& operator<<(ostream& o,const vector &vc){ o<<"{"; for(const T& v:vc) o< D divFloor(D a, D b){ return a / b - (((a ^ b) < 0 && a % b != 0) ? 1 : 0); } template D divCeil(D a, D b) { return a / b + (((a ^ b) > 0 && a % b != 0) ? 1 : 0); } template struct ModInt{ using uint = unsigned int; using ll = long long; using ull = unsigned long long; constexpr static uint mod = mod_; uint v; ModInt():v(0){} ModInt(ll _v):v(normS(_v%mod+mod)){} explicit operator bool() const {return v!=0;} static uint normS(const uint &x){return (x [0 , mod-1] static ModInt make(const uint &x){ModInt m; m.v=x; return m;} ModInt operator+(const ModInt& b) const { return make(normS(v+b.v));} ModInt operator-(const ModInt& b) const { return make(normS(v+mod-b.v));} ModInt operator-() const { return make(normS(mod-v)); } ModInt operator*(const ModInt& b) const { return make((ull)v*b.v%mod);} ModInt operator/(const ModInt& b) const { return *this*b.inv();} ModInt& operator+=(const ModInt& b){ return *this=*this+b;} ModInt& operator-=(const ModInt& b){ return *this=*this-b;} ModInt& operator*=(const ModInt& b){ return *this=*this*b;} ModInt& operator/=(const ModInt& b){ return *this=*this/b;} ModInt& operator++(int){ return *this=*this+1;} ModInt& operator--(int){ return *this=*this-1;} template friend ModInt operator+(T a, const ModInt& b){ return (ModInt(a) += b);} template friend ModInt operator-(T a, const ModInt& b){ return (ModInt(a) -= b);} template friend ModInt operator*(T a, const ModInt& b){ return (ModInt(a) *= b);} template friend ModInt operator/(T a, const ModInt& b){ return (ModInt(a) /= b);} ModInt pow(ll p) const { if(p<0) return inv().pow(-p); ModInt a = 1; ModInt x = *this; while(p){ if(p&1) a *= x; x *= x; p >>= 1; } return a; } ModInt inv() const { // should be prime return pow(mod-2); } // ll extgcd(ll a,ll b,ll &x,ll &y) const{ // ll p[]={a,1,0},q[]={b,0,1}; // while(*q){ // ll t=*p/ *q; // rep(i,3) swap(p[i]-=t*q[i],q[i]); // } // if(p[0]<0) rep(i,3) p[i]=-p[i]; // x=p[1],y=p[2]; // return p[0]; // } // ModInt inv() const { // ll x,y; // extgcd(v,mod,x,y); // return make(normS(x+mod)); // } bool operator==(const ModInt& b) const { return v==b.v;} bool operator!=(const ModInt& b) const { return v!=b.v;} bool operator<(const ModInt& b) const { return v>(istream &o,ModInt& x){ ll tmp; o>>tmp; x=ModInt(tmp); return o; } friend ostream& operator<<(ostream &o,const ModInt& x){ return o<; //using mint = ModInt<1000000007>; V fact,ifact,invs; mint Choose(int a,int b){ if(b<0 || a=0;i--) ifact[i] = ifact[i+1] * (i+1); rep1(i,N-1) invs[i] = fact[i-1] * ifact[i]; } struct UnionFind{ vector par,sz; UnionFind(int N){ par.assign(N,0); sz.assign(N,1); rep(i,N) par[i]=i; } int find(int x){ if(par[x]==x) return x; return par[x]=find(par[x]); } bool same(int x,int y){ return find(x)==find(y); } void unite(int x,int y){ x=find(x),y=find(y); if(x==y) return; par[y]=x; sz[x] += sz[y]; } }; int sgn(V o){ int N = si(o); UnionFind UF(N); rep(i,N) UF.unite(i,o[i]); int s = 1; rep(i,N) if(UF.find(i) == i){ if(UF.sz[i]%2 == 0) s = -s; } return s; } mint brute(V A){ int N = si(A); V o(N); iota(all(o),0); mint res = 0; do{ mint tmp = sgn(o); rep(i,N){ int v = A[i] - o[i]; if(v < 0) tmp = 0; else tmp *= ifact[v]; } res += tmp; }while(next_permutation(all(o))); return res; } // decreasing -> decreasing V ConjugateYoung(V a){ if(a.empty()) return a; int w = a[0]; V b(w); int h = si(a); rep(j,w){ while(h>0 && a[h-1] <= j) h--; b[j] = h; } return b; } // hook length formula mint Hook(V a){ int n = accumulate(all(a),0); auto b = ConjugateYoung(a); mint res = fact[n]; rep(i,si(a)){ rep(j,a[i]){ res *= invs[a[i]+b[j]-i-j-1]; } } return res; } mint solve(V A){ // res = det ( 1 / (A_i-j)! )_{i,j} // f^λ = N! det ( 1 / (λ_i-i+j)! )_{i,j} int N = si(A); // mint god = brute(A); V lam(N); rep(i,N) lam[i] = A[i]-i; reverse(all(lam)); int S = accumulate(all(lam),0); mint res = Hook(lam) * ifact[S]; show("---------------"); show(A); show(res); // show(god); show(lam); return res; } int main(){ cin.tie(0); ios::sync_with_stdio(false); //DON'T USE scanf/printf/puts !! cout << fixed << setprecision(20); InitFact(TEN(6)*3); /* res = (-1)^縦の個数 χ^λ(2^m) χ^λ(2^m) = [x^(λ+δ)] p_{2^m}a_δ = [x^(λ+δ)] (x1^2+..+xn^2)^m * det (x1^{n-1} x1 1) (x2^{n-1} x2 2) : */ int N; cin >> N; V A(N); rep(i,N) cin >> A[i]; int m = accumulate(all(A),0); if(m&1){ cout << 0 << endl; return 0; } m /= 2; rep(i,N) A[i] += i; mint ans = 1; { V B; rep(i,N) if(A[i]%2 == 0){ B.pb(A[i]/2); } if(si(B) != (N+1)/2){ cout << 0 << endl; return 0; } ans *= solve(B); } { V B; rep(i,N) if(A[i]%2 == 1){ B.pb(A[i]/2); } ans *= solve(B); } cout << ans * fact[m] << endl; }