#include // created [2019/12/12] 23:52:05 #pragma GCC diagnostic ignored "-Wsign-compare" #pragma GCC diagnostic ignored "-Wsign-conversion" using i32 = int32_t; using i64 = int64_t; using u32 = uint32_t; using u64 = uint64_t; using uint = unsigned int; using usize = std::size_t; using ll = long long; using ull = unsigned long long; using ld = long double; template using arr = T (&)[n]; template using c_arr = const T (&)[n]; template constexpr T popcount(const T u) { return u ? static_cast(__builtin_popcountll(static_cast(u))) : static_cast(0); } template constexpr T log2p1(const T u) { return u ? static_cast(64 - __builtin_clzll(static_cast(u))) : static_cast(0); } template constexpr T msbp1(const T u) { return log2p1(u); } template constexpr T lsbp1(const T u) { return __builtin_ffsll(u); } template constexpr T clog(const T u) { return u ? log2p1(u - 1) : static_cast(u); } template constexpr bool ispow2(const T u) { return u and (static_cast(u) & static_cast(u - 1)) == 0; } template constexpr T ceil2(const T u) { return static_cast(1) << clog(u); } template constexpr T floor2(const T u) { return u == 0 ? static_cast(0) : static_cast(1) << (log2p1(u) - 1); } template constexpr bool btest(const T mask, const usize ind) { return static_cast((static_cast(mask) >> ind) & static_cast(1)); } template void bset(T& mask, const usize ind) { mask |= (static_cast(1) << ind); } template void breset(T& mask, const usize ind) { mask &= ~(static_cast(1) << ind); } template void bflip(T& mask, const usize ind) { mask ^= (static_cast(1) << ind); } template void bset(T& mask, const usize ind, const bool b) { (b ? bset(mask, ind) : breset(mask, ind)); } template constexpr T bcut(const T mask, const usize ind) { return ind == 0 ? static_cast(0) : static_cast((static_cast(mask) << (64 - ind)) >> (64 - ind)); } template bool chmin(T& a, const T& b) { return (a > b ? a = b, true : false); } template bool chmax(T& a, const T& b) { return (a < b ? a = b, true : false); } constexpr unsigned int mod = 1000000007; template constexpr T inf_v = std::numeric_limits::max() / 4; template constexpr Real pi_v = Real{3.141592653589793238462643383279502884}; template T in() { T v; return std::cin >> v, v; } template T in_v(typename std::enable_if<(i == n), c_arr>::type) { return in(); } template auto in_v(typename std::enable_if<(i < n), c_arr>::type& szs) { const usize s = (usize)szs[i]; std::vector(szs))> ans(s); for (usize j = 0; j < s; j++) { ans[j] = in_v(szs); } return ans; } template auto in_v(c_arr szs) { return in_v(szs); } template auto in_t() { return std::tuple...>{in()...}; } struct io_init { io_init() { std::cin.tie(nullptr), std::ios::sync_with_stdio(false); std::cout << std::fixed << std::setprecision(20); } } hogechan; template void out(const T& v) { std::cout << v << '\n'; } // Reactiveではstd::flushを忘れない template void out(const T& v, const Args... args) { std::cout << v << ' ', out(args...); } # define SHOW(...) static_cast(0) constexpr ull TEN(const usize n) { return n == 0 ? 1ULL : TEN(n - 1) * 10ULL; } template auto make_v(typename std::enable_if<(i == n), c_arr>::type, const T& v = T{}) { return v; } template auto make_v(typename std::enable_if<(i < n), c_arr>::type szs, const T& v = T{}) { const usize s = (usize)szs[i]; return std::vector(szs, v))>(s, make_v(szs, v)); } template auto make_v(c_arr szs, const T& t = T{}) { return make_v(szs, t); } template T gcd(const T& a, const T& b) { return a < 0 ? gcd(-a, b) : b < 0 ? gcd(a, -b) : (a > b ? gcd(b, a) : a == 0 ? b : gcd(b % a, a)); } template T lcm(const T& a, const T& b) { return a / gcd(a, b) * b; } template constexpr std::pair extgcd(const T a, const T b) { if (b == 0) { return std::pair{1, 0}; } const auto g = gcd(a, b), da = std::abs(b) / g; const auto p = extgcd(b, a % b); const auto x = (da + p.second % da) % da, y = (g - a * x) / b; return {x, y}; } template constexpr T inverse(const T a, const T mod) { return extgcd(a, mod).first; } template class modint_base { public: template static std::enable_if_t mod() { return mod_ref(); } template static constexpr std::enable_if_t mod() { return mod_value; } template static void set_mod(const std::enable_if_t mod) { mod_ref() = mod, inv_ref() = {1, 1}; } modint_base() : v{0} {} modint_base(const ll val) : v{norm(static_cast(val % static_cast(mod()) + static_cast(mod())))} {} modint_base(const modint_base& n) : v{n()} {} explicit operator bool() const { return v != 0; } bool operator!() const { return not static_cast(*this); } modint_base& operator=(const modint_base& m) { return v = m(), (*this); } modint_base& operator=(const ll val) { return v = norm(uint(val % static_cast(mod()) + static_cast(mod()))), (*this); } friend modint_base operator+(const modint_base& m) { return m; } friend modint_base operator-(const modint_base& m) { return make(norm(mod() - m.v)); } friend modint_base operator+(const modint_base& m1, const modint_base& m2) { return make(norm(m1.v + m2.v)); } friend modint_base operator-(const modint_base& m1, const modint_base& m2) { return make(norm(m1.v + mod() - m2.v)); } friend modint_base operator*(const modint_base& m1, const modint_base& m2) { return make(static_cast(static_cast(m1.v) * static_cast(m2.v) % static_cast(mod()))); } friend modint_base operator/(const modint_base& m1, const modint_base& m2) { return m1 * inv(m2.v); } friend modint_base operator+(const modint_base& m, const ll val) { return modint_base{static_cast(m.v) + val}; } friend modint_base operator-(const modint_base& m, const ll val) { return modint_base{static_cast(m.v) - val}; } friend modint_base operator*(const modint_base& m, const ll val) { return modint_base{static_cast(m.v) * (val % static_cast(mod()))}; } friend modint_base operator/(const modint_base& m, const ll val) { return modint_base{static_cast(m.v) * inv(val)}; } friend modint_base operator+(const ll val, const modint_base& m) { return modint_base{static_cast(m.v) + val}; } friend modint_base operator-(const ll val, const modint_base& m) { return modint_base{-static_cast(m.v) + val}; } friend modint_base operator*(const ll val, const modint_base& m) { return modint_base{static_cast(m.v) * (val % static_cast(mod()))}; } friend modint_base operator/(const ll val, const modint_base& m) { return modint_base{val * inv(static_cast(m.v))}; } friend modint_base& operator+=(modint_base& m1, const modint_base& m2) { return m1 = m1 + m2; } friend modint_base& operator-=(modint_base& m1, const modint_base& m2) { return m1 = m1 - m2; } friend modint_base& operator*=(modint_base& m1, const modint_base& m2) { return m1 = m1 * m2; } friend modint_base& operator/=(modint_base& m1, const modint_base& m2) { return m1 = m1 / m2; } friend modint_base& operator+=(modint_base& m, const ll val) { return m = m + val; } friend modint_base& operator-=(modint_base& m, const ll val) { return m = m - val; } friend modint_base& operator*=(modint_base& m, const ll val) { return m = m * val; } friend modint_base& operator/=(modint_base& m, const ll val) { return m = m / val; } friend modint_base operator^(const modint_base& m, const ll n) { return power(m.v, n); } friend modint_base& operator^=(modint_base& m, const ll n) { return m = m ^ n; } friend bool operator==(const modint_base& m1, const modint_base& m2) { return m1.v == m2.v; } friend bool operator!=(const modint_base& m1, const modint_base& m2) { return not(m1 == m2); } friend bool operator==(const modint_base& m, const ll val) { return m.v == norm(static_cast(static_cast(mod()) + val % static_cast(mod()))); } friend bool operator!=(const modint_base& m, const ll val) { return not(m == val); } friend bool operator==(const ll val, const modint_base& m) { return m.v == norm(static_cast(static_cast(mod()) + val % static_cast(mod()))); } friend bool operator!=(const ll val, const modint_base& m) { return not(m == val); } friend std::istream& operator>>(std::istream& is, modint_base& m) { ll v; return is >> v, m = v, is; } friend std::ostream& operator<<(std::ostream& os, const modint_base& m) { return os << m(); } uint operator()() const { return v; } static modint_base small_inv(const usize n) { auto& in = inv_ref(); if (n < in.size()) { return in[n]; } for (usize i = in.size(); i <= n; i++) { in.push_back(-in[modint_base::mod() % i] * (modint_base::mod() / i)); } return in.back(); } private: template static std::enable_if_t mod_ref() { static UInt mod = 0; return mod; } static uint norm(const uint x) { return x < mod() ? x : x - mod(); } static modint_base make(const uint x) { modint_base m; return m.v = x, m; } static modint_base power(modint_base x, ull n) { modint_base ans = 1; for (; n; n >>= 1, x *= x) { if (n & 1) { ans *= x; } } return ans; } static modint_base inv(const ll v) { return v < 1000000 ? small_inv(static_cast(v)) : modint_base{inverse(v, static_cast(mod()))}; } static std::vector& inv_ref() { static std::vector in{1, 1}; return in; } uint v; }; template using modint = modint_base; template using dynamic_modint = modint_base; template std::vector divisors(const T n) { std::vector head, tail; for (T i = 1; i * i <= n; i++) { if (n % i == 0) { head.push_back(i); if (i * i != n) { tail.push_back(n / i); } } } for (auto it = tail.rbegin(); it != tail.rend(); it++) { head.push_back(*it); } return head; } template std::vector> prime_factors(T n) { std::vector> ans; for (T i = 2; i * i <= n; i++) { usize cnt = 0; for (; n % i == 0; n /= i, cnt++) {} if (cnt > 0) { ans.push_back({i, cnt}); } } if (n > 1) { ans.push_back({n, 1}); } return ans; } template std::pair crt(const InIt first, const InIt last) { using P = std::pair; return std::accumulate(first, last, P{0, 1}, [](const P& a1, const P& a2) -> P { T r1 = a1.first, m1 = a1.second, r2 = a2.first, m2 = a2.second; const T g = gcd(m1, m2); if (r1 % g != r2 % g) { return P{0, 0}; } const T m = m1 * m2 / g; if (r1 == r2) { return {r1, m}; } const auto k1 = extgcd(m1, m2).first * ((r2 - r1) / g) % m; return P{(m + m1 * k1 % m + r1) % m, m}; }); } using mint = dynamic_modint<0>; using mint2 = dynamic_modint<1>; mint g; bool operator<(const mint& m1, const mint& m2) { return m1() < m2(); } bool operator<(const mint2& m1, const mint2& m2) { return m1() < m2(); } template struct mat { mat() { table[0][0] = T{0}; table[0][1] = T{0}; table[1][0] = T{0}; table[1][1] = T{0}; } mat(const T& a00, const T& a01, const T& a10, const T& a11) { table[0][0] = a00; table[0][1] = a01; table[1][0] = a10; table[1][1] = a11; } std::array& operator[](const int i) { return table[i]; } const std::array& operator[](const int i) const { return table[i]; } friend bool operator==(const mat& m1, const mat& m2) { for (int i = 0; i < 2; i++) { for (int j = 0; j < 2; j++) { if (m1[i][j] != m2[i][j]) { return false; } } } return true; } friend mat operator+(const mat& m1, const mat& m2) { mat ans; for (int i = 0; i < 2; i++) { for (int j = 0; j < 2; j++) { ans[i][j] = m1[i][j] + m2[i][j]; } } return ans; } friend mat operator-(const mat& m1, const mat& m2) { mat ans; for (int i = 0; i < 2; i++) { for (int j = 0; j < 2; j++) { ans[i][j] = m1[i][j] - m2[i][j]; } } return ans; } friend mat operator*(const mat& m1, const mat& m2) { mat ans; for (int i = 0; i < 2; i++) { for (int j = 0; j < 2; j++) { for (int k = 0; k < 2; k++) { ans[i][j] = ans[i][j] + m1[i][k] * m2[k][j]; } } } return ans; } friend mat operator*(const mat& m, const T& v) { mat ans; for (int i = 0; i < 2; i++) { for (int j = 0; j < 2; j++) { ans[i][j] = m[i][j] * v; } } return ans; } friend mat operator/(const mat& m, const T& v) { mat ans; for (int i = 0; i < 2; i++) { for (int j = 0; j < 2; j++) { ans[i][j] = m[i][j] / v; } } return ans; } friend mat operator^(const mat& m, const ll k) { return k == 0 ? I() : k % 2 == 0 ? (m * m) ^ (k / 2) : (m ^ (k - 1)) * m; } friend std::ostream& operator<<(std::ostream& os, const mat& m) { os << "["; for (int i = 0; i < 2; i++) { os << "["; for (int j = 0; j < 2; j++) { os << m[i][j] << ","; } os << "]\n"; } return os << "]\n"; } static mat I() { mat ans; ans[0][0] = 1, ans[1][1] = 1; return ans; } static T tr(const mat& m) { return m[0][0] + m[1][1]; } static T det(const mat& m) { return m[0][0] * m[1][1] - m[0][1] * m[1][0]; } static mat inv(const mat& m) { const T d = det(m); mat ans; ans[0][0] = m[1][1] / d; ans[0][1] = -m[0][1] / d; ans[1][0] = -m[1][0] / d; ans[1][1] = m[0][0] / d; return ans; } std::array, 2> table; }; struct C { C() : x{0}, y{0} {} C(const mint& x) : x{x}, y{0} {} C(const mint& x, const mint& y) : x{x}, y{y} {} friend bool operator==(const C& c1, const C& c2) { return c1.x == c2.x and c1.y == c2.y; } friend bool operator!=(const C& c1, const C& c2) { return not(c1 == c2); } friend bool operator<(const C& c1, const C& c2) { return c1.x != c2.x ? c1.x < c2.x : c1.y < c2.y; } friend C operator-(const C& c) { return C{-c.x, -c.y}; } friend C operator+(const C& c1, const C& c2) { return C{c1.x + c2.x, c1.y + c2.y}; } friend C operator-(const C& c1, const C& c2) { return C{c1.x - c2.x, c1.y - c2.y}; } friend C operator*(const C& c1, const C& c2) { return C{c1.x * c2.x + g * c1.y * c2.y, c1.x * c2.y + c1.y * c2.x}; } friend C operator/(const C& c1, const C& c2) { return c1 * conj(c2); } friend C operator*(const C& c, const mint& v) { return C{c.x * v, c.y * v}; } friend C operator/(const C& c, const mint& v) { return C{c.x / v, c.y / v}; } static mint norm(const C& c) { return c.x * c.x + g * c.y * c.y; } static C conj(const C& c) { return C{c.x, -c.y} / norm(c); } friend std::ostream& operator<<(std::ostream& os, const C& c) { return os << c.x << "+" << c.y << "\\sqrt(g)"; } mint x, y; // x+y\sqrt{g} }; int main() { const uint p = in(); mint::set_mod(p); mint2::set_mod(p - 1); const auto as = in_v({4}); const auto bs = in_v({4}); mat A(as[0], as[1], as[2], as[3]); mat B(bs[0], bs[1], bs[2], bs[3]); if (A == B) { return std::cout << 1 << std::endl, 0; } for (ll i = 1; i <= 10000; i++) { if ((A ^ i) == B) { return std::cout << i << std::endl, 0; } } if (p == 2) { return std::cout << -1 << std ::endl, 0; } const auto fs = prime_factors(p - 1); for (g = 2;; g += 1) { bool ok = true; for (const auto& q : fs) { const ll per = (p - 1) / q.first; if ((g ^ per) == 1) { ok = false; } } if (ok) { break; } } const mint ginv = mint(1) / g; SHOW(g, ginv); auto lg = [&](auto x) { static std::map giant; constexpr ll B = 50000; if (giant.empty()) { for (ll i = 0; i * B < (p - 1); i++) { giant[g ^ (i * B)] = i * B; } } for (ll i = 0; i < B; i++) { if (giant.count(x)) { return giant[x] + i; } x *= ginv; } assert(false); return inf_v; }; auto sqrt = [&](const mint x) -> C { if (x == 0) { return {0, 0}; } const ll y = lg(x); if (y % 2 == 0) { return {g ^ (y / 2), 0}; } else { return {0, g ^ ((y - 1) / 2)}; } }; auto eigens = [&](const mat& A) -> std::array { const auto s = mat::tr(A); const auto t = mat::det(A); const auto d = s * s - 4 * t; const auto sq = sqrt(d); return {(C{s, 0} + sq) / 2, (C{s, 0} - sq) / 2}; }; using V = std::array; auto eigen_vecs = [&](const auto& A) -> mat { if (A[0][1] == 0 and A[1][0] == 0) { return mat(C{1}, C{0}, C{0}, C{1}); } const auto es = eigens(A); SHOW(es); std::array ans; if (es[0] == es[1]) { const mint l = es[0].x; const auto N = A - mat::I() * l; if (N[0][1] != 0 or N[1][1] != 0) { return mat(C{N[0][1]}, C{0}, C{N[1][1]}, C{1}); } else { return mat(C{N[0][0]}, C{1}, C{N[1][0]}, C{0}); } } else { for (int i = 0; i < 2; i++) { const V v1{{C{A[0][0], 0} - es[i], C{A[0][1], 0}}}; ans[i] = V{{{-A[0][1], 0}, v1[0]}}; } return mat(ans[0][0], ans[1][0], ans[0][1], ans[1][1]); } }; const auto aes = eigens(A); const auto bes = eigens(B); SHOW(aes); SHOW(bes); const auto AS = eigen_vecs(A); SHOW(AS); mat CA(C{A[0][0]}, C{A[0][1]}, C{A[1][0]}, C{A[1][1]}); mat CB(C{B[0][0]}, C{B[0][1]}, C{B[1][0]}, C{B[1][1]}); CA = mat::inv(AS) * CA * AS; CB = mat::inv(AS) * CB * AS; SHOW(CA, CB); if (CB[1][0] != C{0}) { return std::cout << -1 << std::endl, 0; } if (CB[0][1] != C{0} and (CB[0][0] != CB[1][1] or CB[0][0].y != 0)) { return std::cout << -1 << std::endl, 0; } if ((CA[0][1] == C{0}) != (CB[0][1] == C{0})) { return std::cout << -1 << std::endl, 0; } if (CA[0][1] == C{0}) { // 対角 const mint2 a0 = 2LL * lg(CA[0][0].x) + (CA[0][0].y == 0 ? 0LL : 2LL * lg(CA[0][0].y) + 1); const mint2 a1 = 2LL * lg(CA[1][1].x) + (CA[1][1].y == 0 ? 0LL : 2LL * lg(CA[1][1].y) + 1); const mint2 b0 = 2LL * lg(CB[0][0].x) + (CB[0][0].y == 0 ? 0LL : 2LL * lg(CB[0][0].y) + 1); const mint2 b1 = 2LL * lg(CB[1][1].x) + (CB[1][1].y == 0 ? 0LL : 2LL * lg(CB[1][1].y) + 1); SHOW(a0, a1, b0, b1); const mint2 n = b0 / a0; const mint2 m = b1 / a1; if (n != m) { return std::cout << -1 << std::endl, 0; } std::cout << ((A ^ n()) == B ? (ll)n() : -1LL) << std::endl; } else { // 非対角 const mint l = CA[0][0].x; const mint n = CB[0][1].x / (CB[0][0].x / l); const mint2 a0 = 2LL * lg(CA[0][0].x) + (CA[0][0].y == 0 ? 0LL : 2LL * lg(CA[0][0].y) + 1); const mint2 b0 = 2LL * lg(CB[0][0].x) + (CB[0][0].y == 0 ? 0LL : 2LL * lg(CB[0][0].y) + 1); const mint2 m = b0 / a0; std::vector> v{{(ll)n(), (ll)p}, {(ll)m(), (ll)p - 1}}; const auto q = crt(v.begin(), v.end()); std::cout << ((A ^ q.first) == B ? (ll)q.first : -1LL) << std::endl; } return 0; }