#include <bits/stdc++.h>
using namespace std;
const long long MOD = 1000000007;
long long modpow(long long a, long long b){
	long long ans = 1;
	while (b > 0){
		if (b % 2 == 1){
			ans *= a;
			ans %= MOD;
		}
		a *= a;
		a %= MOD;
		b /= 2;
	}
	return ans;
}
long long modinv(long long a){
	return modpow(a, MOD - 2);
}
vector<long long> mf = {1};
vector<long long> mfi = {1};
long long modfact(int n){
	if (mf.size() > n){
		return mf[n];
	} else {
		for (int i = mf.size(); i <= n; i++){
			long long next = mf.back() * i % MOD;
			mf.push_back(next);
			mfi.push_back(modinv(next));
		}
		return mf[n];
	}
}
long long modfactinv(int n){
	if (mfi.size() > n){
		return mfi[n];
	} else {
		return modinv(modfact(n));
	}
}
int main(){
  int N;
  cin >> N;
  vector<int> P(N);
  for (int i = 0; i < N; i++){
    cin >> P[i];
    P[i]--;
  }
  vector<int> sz;
  vector<bool> used(N, false);
  for (int i = 0; i < N; i++){
    if (!used[i]){
      int c = i;
      used[i] = true;
      sz.push_back(1);
      while (!used[P[c]]){
        c = P[c];
        used[c] = true;
        sz.back()++;
      }
    }
  }
  sort(sz.begin(), sz.end());
  int M = sz.size();
  vector<int> cnt(N + 1, 0);
  for (int i = 0; i < M; i++){
    cnt[sz[i]]++;
  }
  int sum = 0;
  long long ans = modfact(N);
  for (int i = 0; i < M; i++){
    ans *= modinv(sz[i]);
    ans %= MOD;
  }
  for (int i = 1; i <= N; i++){
    ans *= modfactinv(cnt[i]);
    ans %= MOD;
  }
  if (N % 2 == 1 && N >= 3){
    if (sz.size() == 1){
      ans *= modinv(2);
      ans %= MOD;
    }
  }
  if (N % 2 == 0 && N >= 4){
    if (sz.size() == 2){
      if (sz[0] == 1){
        ans *= modinv(2);
        ans %= MOD;
      }
    }
  }
  cout << ans << endl;
}