#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%)+'');

}

#define W(x) write(x),putchar(' ')

#define Wl(x) write(x),putchar('\n')

const int N=;

int n,m,up,cost;

int a[N],b[N],dp[N][N];

int main()

{

    freopen("codeforces425C_data.in","r",stdin);

    int i,j;

    R(n); R(m); R(up); R(cost);

    for(i=;i<=n;i++) R(a[i]);

    for(i=;i<=m;i++) R(b[i]);

    for(i=;i<=n;i++)

    {

        for(j=;j<=m;j++)

        {

            dp[i][j]=;

            if(i==j&&i==) continue;

            if(i) dp[i][j]=dp[i-][j];

            if(j) dp[i][j]=max(dp[i][j],dp[i][j-]);

            if(a[i]==b[j])

            {

                dp[i][j]=max(dp[i][j],dp[i-][j-]+);

            }

        }

    }

    int ans=;

    for(i=;i<=n;i++) for(j=;j<=m;j++) if(dp[i][j]*cost+i+j<=up) ans=max(ans,dp[i][j]);

    Wl(ans);

    return ;

}

/*

题意：两数列a[],b[],进行若干轮操作，每次操作花费e，

将a的一个前缀和b的一个前缀（两前缀的最后一个数字必须相同）删除，并得到虚拟1元，

最后的一次操作是将剩下的a[],b[]全部清空，花费是之前把a[],b[]删除的总数字个数，使得虚拟ans元变为真实ans元。

*/

#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%)+'');

}

#define W(x) write(x),putchar(' ')

#define Wl(x) write(x),putchar('\n')

const int N=,inf=0x3f3f3f3f;

int n,m,up,cost;

int a[N],b[N];

int dp[][N];//dp[i,j]表示长度为i的公共子序列,a串匹配到j时b的最小位置

vector<int>Pos[N];

#define PB push_back

int main()

{

    freopen("codeforces425C_data.in","r",stdin);

    int i,j,ans=;

    R(n); R(m); R(up); R(cost);

    for(i=;i<=n;i++) R(a[i]);

    for(i=;i<=m;i++)

    {

        R(b[i]); Pos[b[i]].PB(i);

    }

    for(i=;i<=n;i++) Pos[a[i]].PB(inf);

    for(i=;i<=up/cost;i++)

    {

        dp[i][]=inf;

        for(j=;j<=n;j++)

        {

            dp[i][j]=min(inf,dp[i][j-]);

            int oo=lower_bound(Pos[a[j]].begin(),Pos[a[j]].end(),min(dp[i-][j-]+,inf))-Pos[a[j]].begin();

            if(oo>m) continue;

            dp[i][j]=min(dp[i][j],Pos[a[j]][oo]);

            if(i*cost+dp[i][j]+j<=up) ans=i;

        }

    }

    Wl(ans);

    return ;

}