Solution

// 爆搜 + 记忆化
#pragma GCC target("avx,sse2,sse3,sse4,popcnt")
#pragma GCC optimize("O2,O3,Ofast,inline,unroll-all-loops,-ffast-math")
#include <bits/stdc++.h>
using namespace std;
#define js ios::sync_with_stdio(false);cin.tie(0); cout.tie(0)
#define all(__vv__) (__vv__).begin(), (__vv__).end()
#define endl "\n"
#define pai pair<int, int>
#define mk(__x__,__y__) make_pair(__x__,__y__)
#define ms(__x__,__val__) memset(__x__, __val__, sizeof(__x__))
typedef long long ll; typedef unsigned long long ull; typedef long double ld;
inline ll read() { ll s = 0, w = 1; char ch = getchar(); for (; !isdigit(ch); ch = getchar()) if (ch == '-') w = -1; for (; isdigit(ch); ch = getchar())    s = (s << 1) + (s << 3) + (ch ^ 48); return s * w; }
inline void print(ll x) { if (!x) { putchar('0'); return; } char F[40]; ll tmp = x > 0 ? x : -x; if (x < 0)putchar('-');    int cnt = 0;    while (tmp > 0) { F[cnt++] = tmp % 10 + '0';        tmp /= 10; }    while (cnt > 0)putchar(F[--cnt]); }
inline ll gcd(ll x, ll y) { return y ? gcd(y, x % y) : x; }
ll qpow(ll a, ll b) { ll ans = 1;    while (b) { if (b & 1)    ans *= a;        b >>= 1;        a *= a; }    return ans; }    ll qpow(ll a, ll b, ll mod) { ll ans = 1; while (b) { if (b & 1)(ans *= a) %= mod; b >>= 1; (a *= a) %= mod; }return ans % mod; }
inline int lowbit(int x) { return x & (-x); }
const int dir[][2] = { {0,1},{1,0},{0,-1},{-1,0},{1,1},{1,-1},{-1,1},{-1,-1} };
const int MOD = 1e9 + 7;
const int INF = 0x3f3f3f3f;

const int N = 125;
int dp[N][N][N][N];
int mp[355], n, m, cnt[5];

int dfs(int p, int a, int b, int c, int d) {
    if (p >= n)    return mp[n];
    if (dp[a][b][c][d])    return dp[a][b][c][d];
    int res = 0;
    if (a < cnt[1])    res = max(res, dfs(p + 1, a + 1, b, c, d));
    if (b < cnt[2])    res = max(res, dfs(p + 2, a, b + 1, c, d));
    if (c < cnt[3])    res = max(res, dfs(p + 3, a, b, c + 1, d));
    if (d < cnt[4])    res = max(res, dfs(p + 4, a, b, c, d + 1));
    return dp[a][b][c][d] = res + mp[p];
}

int main() {
    n = read(), m = read();
    for (int i = 1; i <= n; ++i)    mp[i] = read();
    for (int i = 1; i <= m; ++i) {
        int x = read();
        ++cnt[x];
    }
    print(dfs(1, 0, 0, 0, 0));
    return 0;
}