// Mozaic.v 画像モザイク化

#define B_SIZE 8

module Mozaic(in:input,out:output)
int in on box[B_SIZE][B_SIZE];
int out on box[B_SIZE][B_SIZE];
{
    parallel{
	int sum = 0;
	int i,j;
	// ブロック内の画素値の合計をとります
	for(i = 0; i < B_SIZE; i++){
	    for(j = 0; j < B_SIZE; j++){
		sum += in[j][i];
	    }
	}
	// 画素値の平均を出力画像のブロック内の
	// 画素値とします
	sum /= (B_SIZE*B_SIZE);
	
	for(i = 0; i < B_SIZE; i++){
	    for(j = 0; j < B_SIZE; j++){
		out[j][i] = sum;
	    }
	}
    }
}