using System;
using System.Collections.Generic;
using System.IO;
using System.Linq;

public class YukiCoder
{
    public static void Solve()
    {
        var S = MyConsole.String();
        var M = MyConsole.Int();
        
        string[] MM = new string[M];
        for (int i = 0 ; i < M ; i++) MM[i] = MyConsole.String();

        var dic = new Dictionary<string, int>();
        
        int sLength = S.Length;
        for (int ｓLen = 0 ; ｓLen < sLength ; ｓLen++)
        {
            string s = "";

            // 検索の文字列１から１０桁で一文字ずつズラしながら
            // 文字列をくり抜いてディクショナリに格納する
            for (int mLen = 1 ; mLen < 11 ; mLen++)
            {
                // 現在位置から後ろの文字を結合させながらディクショナリに追加する
                int j = ｓLen - mLen + 1;

                if (j < 0) break;

                s = S[j] + s;

                // ディクショナリに対して、重複した文字列は登場回数をインクリメント、新規は追加
                if (dic.ContainsKey( s )) dic[s]++; else dic.Add( s, 1 );
            }
        }
        
        int ANS = 0;
        // 与えられた検索対象の文字列をキーに登場回数を取得して加算を行う
        for (int i = 0 ; i < M ; i++) if (dic.ContainsKey( MM[i] )) ANS += dic[MM[i]];

        MyConsole.wLine( ANS.ToString() );
    }

    public static void Main()
    {
        MyConsole.Read(); Solve(); MyConsole.Finish();
    }
}

public static class MyConsole
{
    private static List<string> ReadedLine = new List<string>();
    private static char[] buf = new char[1024];
    private static int i;

    public static void Read()
    {
        string sr = Console.In.ReadToEnd();

        ReadedLine = sr.Split( new[] { '\r', '\n' }, StringSplitOptions.RemoveEmptyEntries ).ToList();

        Console.SetOut( new StreamWriter( Console.OpenStandardOutput() ) { AutoFlush = false } );
    }

    public static string String() { return ReadedLine[i++]; }
    public static string[] StringSplit() { return ReadedLine[i++].Split( new[] { ' ' } ); }

    public static int Int() { return int.Parse( ReadedLine[i++] ); }
    public static int[] IntSplit()
    {
        string[] strs = StringSplit();
        int[] ret = new int[strs.Length];
        for (int i = 0 ; i < strs.Length ; i++)
        {
            ret[i] = int.Parse( strs[i] );
        }

        return ret;
    }
    public static long Long() { return long.Parse( ReadedLine[i++] ); }
    public static double Double() { return double.Parse( ReadedLine[i++] ); }

    public static void wLine( string output = null )
    {
        Console.WriteLine( output );
    }

    public static void Finish()
    {
        Console.Out.Flush();
    }
}