cf 500c 脑洞

//一开始忘了考虑并不是所有的书都要看的情况（他可能m天只看一本书）
//这道题貌似还要写一个详尽的题解和分析。。。表示cf果然是个好东西呀。
//题目大意：一个人要读n本书每本书有个重量wi，要读m天，每天读1本，他每天把要看的书抽出来（把上面的搬开，拿出要读的书再把上面的书放回去），
//看完以后放到一摞书的最上面，问根据他的阅读顺序怎样初始化书的排列顺序能使他搬书的重量最小，求出这个最小重量
//
//题目分析：yy出奇迹，就拿每本书第一次出现的序列作为最终的序列然后按顺序模拟一下，后来仔细思考了一下理解了这样做的正确性，其实也挺好理解的，
//先看一个序列1 1 1 1 1 1 1 2，对于这个序列，我们很明显的策略是按1 2来排，因为看过以后放在最上面，所以每次读1都不用搬书，对于一个阅读序列的子序列a b，
//我们有两种排法，按a b排代价是w[b]，按b a排代价是w[a] + w[b]，而且要明确的一点是确定了顺序，代价也就随之确定了，我们再将这个性质推广到一般得出贪心结论：
//拿每本书第一次出现的顺序作为初始序列，比如1 1 3 1 1 3 2 1 1
//按此策略得到的初始序列为1 3 2，不管初始序列是什么样的，读完 1 1 3以后的书的顺序肯定都是确定的都为3 1 2，但是只有初始序列为1 3 2时得到3 1 2的代价最小，


#include<iostream>
#include<cstring>
#include<string>
#include<cstdio>
#include<cstdlib>
#define maxn 10000
#include<algorithm>
#include<queue>
using namespace std;

int b[maxn];
int pos[maxn];
bool vis[maxn];
int n,m;
int a[maxn];
queue<int >q;

int main()
{
    while(scanf("%d%d",&n,&m)!=EOF)
    {
        for(int i=1;i<=n;i++)
            scanf("%d",&a[i]);
        int num=0;
        memset(vis,false,sizeof(vis));
        for(int i=1;i<=m;i++)
        {
            scanf("%d",&b[i]);
            if(!vis[b[i]])
                pos[++num]=b[i],vis[b[i]]=true;
        }
        int all=0;int tmp;
        for(int i=1;i<=num;i++)
        {
            all+=a[pos[i]]*(num-i);
        }
        //cout<<all<<endl;
        for(int i=1;i<=n;i++)
        {
            while(!q.empty()) q.pop();
            bool flag=false;
            for(int j=1;j<=m;j++)
            {
            if(b[j]==i&&flag)
            {
                memset(vis,false,sizeof(vis));
                while(!q.empty())
                {
                    //cout<<i<<endl;
                    int tmp=q.front();
                    q.pop();
                    if(!vis[tmp])
                        all+=a[tmp],vis[tmp]=true;
                }
                continue;
            }
            if(flag) {q.push(b[j]);}
            if(b[j]==i) flag=true;
            }
        }
        cout<<all<<endl;
    }
}