codeforces498C

Array and Operations

CodeForces - 498C

You have written on a piece of paper an array of n positive integers a[1], a[2], ..., a[n] and m good pairs of integers (i₁, j₁), (i₂, j₂), ..., (i_m, j_m). Each good pair (i_k, j_k) meets the following conditions: i_k + j_k is an odd number and 1 ≤ i_k < j_k ≤ n.

In one operation you can perform a sequence of actions:

• take one of the good pairs (i_k, j_k) and some integer v (v > 1), which divides both numbers a[i_k] and a[j_k];
• divide both numbers by v, i. e. perform the assignments:  and .

Determine the maximum number of operations you can sequentially perform on the given array. Note that one pair may be used several times in the described operations.

Input

The first line contains two space-separated integers n, m (2 ≤ n ≤ 100, 1 ≤ m ≤ 100).

The second line contains n space-separated integers a[1], a[2], ..., a[n] (1 ≤ a[i] ≤ 10⁹) — the description of the array.

The following m lines contain the description of good pairs. The k-th line contains two space-separated integers i_k, j_k (1 ≤ i_k < j_k ≤ n, i_k + j_k is an odd number).

It is guaranteed that all the good pairs are distinct.

Output

Output the answer for the problem.

Examples

Input

3 2
8 3 8
1 2
2 3

Output

0

Input

3 2
8 12 8
1 2
2 3

Output

2

sol：看到两个坐标相加一定是奇数，而且这个数据范围100,100，容易联想到网络流，而且分组就是下标奇偶分成两组。
建图就呼之欲出了，对于每个质因数建一张图，源点S向每个奇数下标连上那个数字中那个质因数个数，同理偶数下标向汇点T连边，对于奇偶之间就连上他们质因数个数的较小值

#include <bits/stdc++.h>
using namespace std;
typedef int ll;
inline ll read()
{
    ll s=;
    bool f=;
    char ch=' ';
    while(!isdigit(ch))
    {
        f|=(ch=='-'); ch=getchar();
    }
    while(isdigit(ch))
    {
        s=(s<<)+(s<<)+(ch^); ch=getchar();
    }
    return (f)?(-s):(s);
}
#define R(x) x=read()
inline void write(ll x)
{
    if(x<)
    {
        putchar('-'); x=-x;
    }
    if(x<)
    {
        putchar(x+'');    return;
    }
    write(x/);
    putchar((x%)+'');
    return;
}
#define W(x) write(x),putchar(' ')
#define Wl(x) write(x),putchar('\n')
const int N=,M=,inf=0x3f3f3f3f;
int n,m,a[N],Ges[N];
int S,T;
struct Edge
{
    int U,V;
}E[N];
int Prim[];
bool Bo[];
inline void Shai(int Up)
{
    int i,j;
    Bo[]=Bo[]=;
    for(i=;i<=Up;i++)
    {
        if(!Bo[i]) Prim[++*Prim]=i;
        for(j=;j<=*Prim&&i*Prim[j]<=Up;j++)
        {
            Bo[i*Prim[j]]=; if(i%Prim[j]==) break;
        }
    }
}
namespace Picture
{
    int tot=,Next[M],to[M],Val[M],head[N];

    inline void Init();
    inline void add(int x,int y,int z);
    inline bool bfs(int S);
    inline int dfs(int S,int T,int Dist);
    inline int Max_Flow();

    inline void Init()
    {
        tot=;
        memset(head,,sizeof head);
    }
    inline void add(int x,int y,int z)
    {
        Next[++tot]=head[x];
        to[tot]=y;
        Val[tot]=z;
        head[x]=tot;

        Next[++tot]=head[y];
        to[tot]=x;
        Val[tot]=;
        head[y]=tot;
    }
    int Depth[N];
    inline bool bfs(int S)
    {
        memset(Depth,,sizeof Depth);
        int i;
        queue<int>Queue;
        while(!Queue.empty()) Queue.pop();
        Depth[S]=;
        Queue.push(S);
        while(!Queue.empty())
        {
            int x=Queue.front(); Queue.pop();
            for(i=head[x];i;i=Next[i]) if(Val[i]>&&Depth[to[i]]==)
            {
                Depth[to[i]]=Depth[x]+;
                Queue.push(to[i]);
            }
        }
        return (Depth[T]==)?:;
    }
    inline int dfs(int x,int Dist)
    {
        if(x==T) return Dist;
        int i;
        for(i=head[x];i;i=Next[i])
        {
            if(Depth[to[i]]==Depth[x]+&&Val[i]>)
            {
                int oo=dfs(to[i],min(Dist,Val[i]));
                if(oo>)
                {
                    Val[i]-=oo;
                    (i&)?Val[i+]+=oo:Val[i-]+=oo;
                    return oo;
                }
            }
        }
        return ;
    }
    inline int Max_Flow()
    {
        int ans=;
        while(bfs(S))
        {
            ans+=dfs(S,inf);
        }
        return ans;
    }
}
#define Pic Picture
int main()
{
    int i,j,ans=;
    R(n); R(m);
    S=; T=n+;
    for(i=;i<=n;i++) R(a[i]);
    for(i=;i<=m;i++)
    {
        R(E[i].U); R(E[i].V);
        if(E[i].U%==) swap(E[i].U,E[i].V);
    }
    Shai();
    for(i=;i<=*Prim;i++)
    {
        memset(Ges,,sizeof Ges);
        Pic::Init();
        for(j=;j<=n;j++)
        {
            while(a[j]%Prim[i]==)
            {
                a[j]/=Prim[i]; Ges[j]++;
            }
        }
        for(j=;j<=n;j++)
        {
            if(j&) Pic::add(S,j,Ges[j]);
            else Pic::add(j,T,Ges[j]);
        }
        for(j=;j<=m;j++)
        {
            Pic::add(E[j].U,E[j].V,min(Ges[E[j].U],Ges[E[j].V]));
        }
        ans+=Pic::Max_Flow();
    }
    Pic::Init();
    for(i=;i<=n;i++) if(a[i]!=)
    {
        if(i&) Pic::add(S,i,);
        else Pic::add(i,T,);
    }
    for(i=;i<=m;i++) if(a[E[i].U]==a[E[i].V]&&a[E[i].U]!=)
    {
        Pic::add(E[i].U,E[i].V,);
    }
    ans+=Pic::Max_Flow();
    Wl(ans);
    return ;
}
/*
Input
3 2
8 3 8
1 2
2 3
Output
0

Input
3 2
8 12 8
1 2
2 3
Output
2
*/