题意
考虑一个(O(n^2))暴力：
从每个(B)类串向以它为前缀的(A)类串连边，从每个(A)类串向它支配的(B)类串连边，每个(A)类串的点权为(A)串的长度，(B)类串的点权为(0)。
之后先判断这是不是个(DAG)，如果不是就输出(-1)，不然就找最长链即可。
之后考虑怎么优化建图：
我们先设上面说的边是(i->j->k)，再整理下((i,j,k))这个三元组的关系：(i)支配(j)，(j)是(k)的前缀。
显然(i->j)这种边只会有(m)条，我们只需考虑怎么优化(j->k)这种边。
前缀不好处理，我们将串(s)翻转，设为(t)。这样前缀就变为后缀，即在反串(t)中(j)是(k)的后缀。
我们对(t)建一个(SAM)，那么对于一个节点(k)，满足条件的(j)有两种情况：1.(k)的祖先。2.与(k)在同一节点，且长度小于(k)的串。
对于第一类我们直接父亲向儿子连边就好了，现在考虑怎么处理第二类。
我们不妨对每个结点开一个(vector)存这个节点代表的所有(A,B)串，之后对于每个结点，我们将它(vector)中的串按照长度为第一关键字，是否为(B)串为第二关键字从小到大排序排序。
对于同一个(vector)中的串，从每个(B)串向第一个比它长的(B)串（设为(S)）连边，再从这个(B)串向每个比(S)小比它长的(A)串连边。
于是图就建完了，我们跑拓扑排序即可。
code:
#include<bits/stdc++.h>
using namespace std;
typedef long long ll;
const int maxn=8e5+10;
int T,n,n1,n2,m,cnt_edge,tot;
int pos[maxn],posa[maxn],posb[maxn],a[maxn],head[maxn],in[maxn];
int f[maxn][20];
ll ans;
ll dis[maxn];
char s[maxn];
struct edge{int to,nxt;}e[maxn];
struct Str{int op,len;}str[maxn];
vector<int>ve[maxn];
struct SAM
{
int tot,last;
int fa[maxn],len[maxn];
int ch[maxn][26];
inline void clear()
{
for(int i=1;i<=tot;i++)fa[i]=len[i]=0;
for(int i=1;i<=tot;i++)
for(int j=0;j<26;j++)
ch[i][j]=0;
tot=last=1;
}
inline void add(int c)
{
int now=++tot;len[now]=len[last]+1;
int p=last;last=now;
while(p&&!ch[p][c])ch[p][c]=now,p=fa[p];
if(!p){fa[now]=1;return;}
int q=ch[p][c];
if(len[q]==len[p]+1)fa[now]=q;
else
{
int nowq=++tot;len[nowq]=len[p]+1;
memcpy(ch[nowq],ch[q],sizeof(ch[nowq]));
fa[nowq]=fa[q];fa[q]=fa[now]=nowq;
while(p&&ch[p][c]==q)ch[p][c]=nowq,p=fa[p];
}
}
}sam;
inline int read()
{
char c=getchar();int res=0,f=1;
while(c<'0'||c>'9'){if(c=='-')f=-1;c=getchar();}
while(c>='0'&&c<='9')res=res*10+c-'0',c=getchar();
return res*f;
}
inline bool cmp(int x,int y){return (str[x].len==str[y].len)?(str[x].op>str[y].op):(str[x].len<str[y].len);}
inline void add_edge(int u,int v)
{
e[++cnt_edge].nxt=head[u];
head[u]=cnt_edge;
e[cnt_edge].to=v;
in[v]++;
}
inline void init()
{
sam.clear();
for(int i=1;i<=tot;i++)
{
ve[i].clear();
str[i]=(Str){0,0};
head[i]=in[i]=dis[i]=0;
}
ans=cnt_edge=tot=0;
}
int find(int l,int r)
{
int now=pos[l];
for(int i=18;~i;i--)if(sam.len[f[now][i]]>=(r-l+1))now=f[now][i];
return now;
}
inline void topsort()
{
queue<int>q;
for(int i=1;i<=tot;i++)if(!in[i])q.push(i);
while(!q.empty())
{
int x=q.front();q.pop();
ans=max(ans,dis[x]+((str[x].op==1)?str[x].len:0));
for(int i=head[x];i;i=e[i].nxt)
{
int y=e[i].to;in[y]--;
dis[y]=max(dis[y],dis[x]+((str[x].op==1)?str[x].len:0));
if(!in[y])q.push(y);
}
}
for(int i=1;i<=tot;i++)if(in[i])ans=-1;
}
inline void solve()
{
init();
scanf("%s",s+1);n=strlen(s+1);
for(int i=n;i;i--)sam.add(s[i]-'a'),pos[i]=sam.last;
for(int i=1;i<=sam.tot;i++)f[i][0]=sam.fa[i];
for(int j=1;j<=18;j++)
for(int i=1;i<=sam.tot;i++)
f[i][j]=f[f[i][j-1]][j-1];
n1=read();
tot=sam.tot;
for(int i=1;i<=n1;i++)
{
int l=read(),r=read();
int now=find(l,r);
str[++tot]=(Str){1,r-l+1};
ve[now].push_back(tot);
posa[i]=tot;
}
n2=read();
for(int i=1;i<=n2;i++)
{
int l=read(),r=read();
int now=find(l,r);
str[++tot]=(Str){2,r-l+1};
ve[now].push_back(tot);
posb[i]=tot;
}
for(int i=1;i<=sam.tot;i++)sort(ve[i].begin(),ve[i].end(),cmp);
for(int i=1;i<=sam.tot;i++)
{
int now=i;
for(unsigned j=0;j<ve[i].size();j++)
{
add_edge(now,ve[i][j]);
if(str[ve[i][j]].op==2)now=ve[i][j];
}
a[i]=now;
}
m=read();
for(int i=1;i<=m;i++)
{
int x=read(),y=read();
add_edge(posa[x],posb[y]);
}
for(int i=2;i<=sam.tot;i++)add_edge(a[sam.fa[i]],i);//注意这里是a[sam.fa[i]]。
topsort();
printf("%lld
",ans);
}
int main()
{
scanf("%d",&T);
while(T--)solve();
return 0;
}