Cod sursa(job #153043)

Utilizator MariusMarius Stroe Marius Data 10 martie 2008 02:03:11
Problema Pedefe Scor 75
Compilator cpp Status done
Runda Arhiva de probleme Marime 2.13 kb
#include <fstream>
#include <algorithm>

using namespace std;

const char iname[] = "pedefe.in";
const char oname[] = "pedefe.out";

#define FOR(i, a, b)  for (int i = (a); i <= (b); ++ i)
#define FORR(i, b, a) for (int i = (b); i >= (a); -- i)
#define lastbit(x) ((x) ^ ((x) & ((x) - 1)))

#define MAXN	  512
#define MAXVALUE  512

#define modulo 666013

int A[MAXN], B[MAXN], C[MAXN];

int Sum[2][MAXN][MAXN], SumV[2][MAXVALUE][MAXN];


inline void update(int &var, int val) {
	if (val < 0)
		val += modulo;
	if ((var += val) >= modulo)
		var -= modulo;
}

int query(int M[][MAXN], int i, int j) 
{
	int ret = 0;
	for (; i > 0; i -= lastbit(i))
		if ((ret += M[i][j]) >= modulo)
			ret -= modulo;
	return ret;
}

void update(int M[][MAXN], int i, int j, int val) 
{
	for (; i < MAXVALUE; i += lastbit(i))
		if ((M[i][j] += val) >= modulo)
			M[i][j] -= modulo;
}

int main(void)
{
	int n, m, p;

	ifstream fin(iname);

	fin >> n >> m >> p;
	FOR (i, 1, n) 
		fin >> A[i];
	FOR (i, 1, m) 
		fin >> B[i];
	FOR (i, 1, p) 
		fin >> C[i];

	fin.close();

	int r = 0, ret = 0, tsum, cnt;
	
	FOR (i, 1, n)
	{
		FOR (j, 1, m)
			Sum[r][i][j] = query(SumV[r], A[i], j);

		tsum = 0;
		FORR (j, m, 1) 
		{
			cnt = 0;
			if (A[i] == B[j]) {
				cnt = 1,
				update(cnt, Sum[r][i][1] - Sum[r][i][j]);
			}
			if ((tsum += cnt) >= modulo)
				tsum -= modulo;
			update(SumV[r], A[i], j, tsum);
		}
	}

	FOR (k, 1, p) 
	{
		r ^= 1;
		memset(SumV[r], 0, sizeof(SumV[r]));
		
		FOR (i, 1, n)
		{
			FOR (j, 1, m)
				Sum[r][i][j] = query(SumV[r], A[i], j);

			tsum = 0;
			FORR (j, m, 1) 
			{
				cnt = 0;
				if (A[i] == B[j]) 
				{
					if (A[i] == C[k])
					{
						if (k == 1)
							cnt = 1;
						update(cnt, Sum[r ^ 1][i][1] - Sum[r ^ 1][i][j]);
					} 
					else
						update(cnt, Sum[r][i][1] - Sum[r][i][j]);
					if (k == p)
						if ((ret += cnt) >= modulo)
							ret -= modulo;
				}
				if ((tsum += cnt) >= modulo)
					tsum -= modulo;
				update(SumV[r], A[i], j, tsum);
			}
		}
	}

	ofstream fout(oname);	fout << ret <<'\n';  fout.close();

	return 0;
}