// 行列減算を行ないます
module sa(in1,in2:input,out:output)
int in1 on pixel;
int in2 on pixel;
int out on pixel;
{
    parallel{
	int dt;
	// 2つの画像の差をローカル変数に保持
	dt = in1[][] - in2[][];
	// 差の絶対値をとります。単純減算の場合
	// 必要ありません
	if(dt < 0) dt = -dt;
	out[][] = dt;
    }
}