#include <iostream>
#include <vector>
#include <unordered_map>
#include <algorithm>
#define For(i,a,b) for(int i=(a); i<(b); i++)
using namespace std;
const int mx=5000; typedef long long ll; const ll mod=998244353;
int n, a[3][mx], h[mx+1], p[mx+1];
unordered_map<ll,vector<int>> m, m2;
void ins(ll x, int i)
{
    if(m.find(x)==m.end()) m[x]={};
    m[x].push_back(i);
}
int main()
{
    string s[3]; For(t,0,3) cin>>s[t]; n=s[0].size();
    For(t,0,3) For(i,0,n) a[t][i]=s[t][i]-'A';
    p[0]=1; For(i,0,n) h[i+1]=(h[i]*3+a[2][i])%mod, p[i+1]=(p[i]*3)%mod;
    For(i,0,n) ins((h[n]*p[i]+h[i]*(1-p[n]))%mod,i);
    int ans=2*mx;
    For(i,0,n)
    {
        ll t=0; bool bad=0;
        For(j,0,n)
        {
            if(a[0][j]==a[1][(i+j)%n]) {bad=1; break;}
            t=(t*3+3-a[0][j]-a[1][(i+j)%n])%mod;
        }
        if(!bad) m2[t].push_back(i);
    }
    For(i,0,n)
    {
        ll H=(h[n]*p[i]+h[i]*(1-p[n]))%mod;
        if(m.find(H)==m.end()||m2.find(H)==m2.end()) continue;
        vector<int> v1=m[H], v2=m2[H];
        sort(v1.begin(),v1.end()), sort(v2.begin(),v2.end());
        ans=min(ans,v1[0]+n-v2.back());
        ans=min(ans,v2[0]+n-v1.back());
        for(int t:v1) if(t>=v2[0]) {ans=min(ans,t); break;}
        for(int t:v2) if(t>=v1[0]) {ans=min(ans,t); break;}
        reverse(v1.begin(),v1.end()), reverse(v2.begin(),v2.end());
        for(int t:v1) if(t<=v2[0]) {ans=min(ans,n-t); break;}
        for(int t:v2) if(t<=v1[0]) {ans=min(ans,n-t); break;}
    }
    cout<<(ans==2*mx?-1:ans)<<'\n';
}