/**************************************************************************
*
* ROUTINE
*               cor0_255
*
* FUNCTION
*               calculate correlation term for stochastic codebook search
*               (first 0 --- 255 of total 0 --- 511) 
*
* SYNOPSIS
*               subroutine cor0_255(cor)
****************************************************************************/


#include <math.h>
#include "ccsub.h"
extern float e0[MAXLP];
extern float x[MAXCODE];
float
cor0_255(cor)
float cor[];
{
  register float tmp;

  tmp = e0[2]; tmp += e0[5]; tmp -= e0[7]; tmp -= e0[8]; tmp += e0[9]; tmp += e0[13]; tmp += e0[15]; tmp += e0[17]; tmp -= e0[20]; tmp -= e0[29]; tmp -= e0[31]; tmp -= e0[35]; tmp -= e0[38]; tmp += e0[40]; tmp += e0[41]; tmp -= e0[55]; tmp -= e0[56];
  cor[255] = tmp; 

  tmp = e0[0]; tmp += e0[3]; tmp -= e0[5]; tmp -= e0[6]; tmp += e0[7]; tmp += e0[11]; tmp += e0[13]; tmp += e0[15]; tmp -= e0[18]; tmp -= e0[27]; tmp -= e0[29]; tmp -= e0[33]; tmp -= e0[36]; tmp += e0[38]; tmp += e0[39]; tmp -= e0[53]; tmp -= e0[54]; tmp += e0[59];
  cor[254] = tmp; 

  tmp = e0[1]; tmp -= e0[3]; tmp -= e0[4]; tmp += e0[5]; tmp += e0[9]; tmp += e0[11]; tmp += e0[13]; tmp -= e0[16]; tmp -= e0[25]; tmp -= e0[27]; tmp -= e0[31]; tmp -= e0[34]; tmp += e0[36]; tmp += e0[37]; tmp -= e0[51]; tmp -= e0[52]; tmp += e0[57];
  cor[253] = tmp; 

  tmp = -e0[1]; tmp -= e0[2]; tmp += e0[3]; tmp += e0[7]; tmp += e0[9]; tmp += e0[11]; tmp -= e0[14]; tmp -= e0[23]; tmp -= e0[25]; tmp -= e0[29]; tmp -= e0[32]; tmp += e0[34]; tmp += e0[35]; tmp -= e0[49]; tmp -= e0[50]; tmp += e0[55];
  cor[252] = tmp; 

  tmp = -e0[0]; tmp += e0[1]; tmp += e0[5]; tmp += e0[7]; tmp += e0[9]; tmp -= e0[12]; tmp -= e0[21]; tmp -= e0[23]; tmp -= e0[27]; tmp -= e0[30]; tmp += e0[32]; tmp += e0[33]; tmp -= e0[47]; tmp -= e0[48]; tmp += e0[53];
  cor[251] = tmp; 

  tmp = e0[3]; tmp += e0[5]; tmp += e0[7]; tmp -= e0[10]; tmp -= e0[19]; tmp -= e0[21]; tmp -= e0[25]; tmp -= e0[28]; tmp += e0[30]; tmp += e0[31]; tmp -= e0[45]; tmp -= e0[46]; tmp += e0[51]; tmp -= e0[58];
  cor[250] = tmp; 

  tmp = e0[1]; tmp += e0[3]; tmp += e0[5]; tmp -= e0[8]; tmp -= e0[17]; tmp -= e0[19]; tmp -= e0[23]; tmp -= e0[26]; tmp += e0[28]; tmp += e0[29]; tmp -= e0[43]; tmp -= e0[44]; tmp += e0[49]; tmp -= e0[56]; tmp -= e0[58]; tmp -= e0[59];
  cor[249] = tmp; 

  tmp = e0[1]; tmp += e0[3]; tmp -= e0[6]; tmp -= e0[15]; tmp -= e0[17]; tmp -= e0[21]; tmp -= e0[24]; tmp += e0[26]; tmp += e0[27]; tmp -= e0[41]; tmp -= e0[42]; tmp += e0[47]; tmp -= e0[54]; tmp -= e0[56]; tmp -= e0[57];
  cor[248] = tmp; 

  tmp = e0[1]; tmp -= e0[4]; tmp -= e0[13]; tmp -= e0[15]; tmp -= e0[19]; tmp -= e0[22]; tmp += e0[24]; tmp += e0[25]; tmp -= e0[39]; tmp -= e0[40]; tmp += e0[45]; tmp -= e0[52]; tmp -= e0[54]; tmp -= e0[55]; tmp -= e0[58];
  cor[247] = tmp; 

  tmp = -e0[2]; tmp -= e0[11]; tmp -= e0[13]; tmp -= e0[17]; tmp -= e0[20]; tmp += e0[22]; tmp += e0[23]; tmp -= e0[37]; tmp -= e0[38]; tmp += e0[43]; tmp -= e0[50]; tmp -= e0[52]; tmp -= e0[53]; tmp -= e0[56]; tmp -= e0[58];
  cor[246] = tmp; 

  tmp = -e0[0]; tmp -= e0[9]; tmp -= e0[11]; tmp -= e0[15]; tmp -= e0[18]; tmp += e0[20]; tmp += e0[21]; tmp -= e0[35]; tmp -= e0[36]; tmp += e0[41]; tmp -= e0[48]; tmp -= e0[50]; tmp -= e0[51]; tmp -= e0[54]; tmp -= e0[56];
  cor[245] = tmp; 

  tmp = -e0[7]; tmp -= e0[9]; tmp -= e0[13]; tmp -= e0[16]; tmp += e0[18]; tmp += e0[19]; tmp -= e0[33]; tmp -= e0[34]; tmp += e0[39]; tmp -= e0[46]; tmp -= e0[48]; tmp -= e0[49]; tmp -= e0[52]; tmp -= e0[54];
  cor[244] = tmp; 

  tmp = -e0[5]; tmp -= e0[7]; tmp -= e0[11]; tmp -= e0[14]; tmp += e0[16]; tmp += e0[17]; tmp -= e0[31]; tmp -= e0[32]; tmp += e0[37]; tmp -= e0[44]; tmp -= e0[46]; tmp -= e0[47]; tmp -= e0[50]; tmp -= e0[52]; tmp += e0[58];
  cor[243] = tmp; 

  tmp = -e0[3]; tmp -= e0[5]; tmp -= e0[9]; tmp -= e0[12]; tmp += e0[14]; tmp += e0[15]; tmp -= e0[29]; tmp -= e0[30]; tmp += e0[35]; tmp -= e0[42]; tmp -= e0[44]; tmp -= e0[45]; tmp -= e0[48]; tmp -= e0[50]; tmp += e0[56]; tmp += e0[58];
  cor[242] = tmp; 

  tmp = -e0[1]; tmp -= e0[3]; tmp -= e0[7]; tmp -= e0[10]; tmp += e0[12]; tmp += e0[13]; tmp -= e0[27]; tmp -= e0[28]; tmp += e0[33]; tmp -= e0[40]; tmp -= e0[42]; tmp -= e0[43]; tmp -= e0[46]; tmp -= e0[48]; tmp += e0[54]; tmp += e0[56];
  cor[241] = tmp; 

  tmp = -e0[1]; tmp -= e0[5]; tmp -= e0[8]; tmp += e0[10]; tmp += e0[11]; tmp -= e0[25]; tmp -= e0[26]; tmp += e0[31]; tmp -= e0[38]; tmp -= e0[40]; tmp -= e0[41]; tmp -= e0[44]; tmp -= e0[46]; tmp += e0[52]; tmp += e0[54];
  cor[240] = tmp; 

  tmp = -e0[3]; tmp -= e0[6]; tmp += e0[8]; tmp += e0[9]; tmp -= e0[23]; tmp -= e0[24]; tmp += e0[29]; tmp -= e0[36]; tmp -= e0[38]; tmp -= e0[39]; tmp -= e0[42]; tmp -= e0[44]; tmp += e0[50]; tmp += e0[52]; tmp += e0[59];
  cor[239] = tmp; 

  tmp = -e0[1]; tmp -= e0[4]; tmp += e0[6]; tmp += e0[7]; tmp -= e0[21]; tmp -= e0[22]; tmp += e0[27]; tmp -= e0[34]; tmp -= e0[36]; tmp -= e0[37]; tmp -= e0[40]; tmp -= e0[42]; tmp += e0[48]; tmp += e0[50]; tmp += e0[57]; tmp -= e0[58];
  cor[238] = tmp; 

  tmp = -e0[2]; tmp += e0[4]; tmp += e0[5]; tmp -= e0[19]; tmp -= e0[20]; tmp += e0[25]; tmp -= e0[32]; tmp -= e0[34]; tmp -= e0[35]; tmp -= e0[38]; tmp -= e0[40]; tmp += e0[46]; tmp += e0[48]; tmp += e0[55]; tmp -= e0[56]; tmp += e0[58];
  cor[237] = tmp; 

  tmp = -e0[0]; tmp += e0[2]; tmp += e0[3]; tmp -= e0[17]; tmp -= e0[18]; tmp += e0[23]; tmp -= e0[30]; tmp -= e0[32]; tmp -= e0[33]; tmp -= e0[36]; tmp -= e0[38]; tmp += e0[44]; tmp += e0[46]; tmp += e0[53]; tmp -= e0[54]; tmp += e0[56];
  cor[236] = tmp; 

  tmp = e0[0]; tmp += e0[1]; tmp -= e0[15]; tmp -= e0[16]; tmp += e0[21]; tmp -= e0[28]; tmp -= e0[30]; tmp -= e0[31]; tmp -= e0[34]; tmp -= e0[36]; tmp += e0[42]; tmp += e0[44]; tmp += e0[51]; tmp -= e0[52]; tmp += e0[54]; tmp -= e0[59];
  cor[235] = tmp; 

  tmp = -e0[13]; tmp -= e0[14]; tmp += e0[19]; tmp -= e0[26]; tmp -= e0[28]; tmp -= e0[29]; tmp -= e0[32]; tmp -= e0[34]; tmp += e0[40]; tmp += e0[42]; tmp += e0[49]; tmp -= e0[50]; tmp += e0[52]; tmp -= e0[57];
  cor[234] = tmp; 

  tmp = -e0[11]; tmp -= e0[12]; tmp += e0[17]; tmp -= e0[24]; tmp -= e0[26]; tmp -= e0[27]; tmp -= e0[30]; tmp -= e0[32]; tmp += e0[38]; tmp += e0[40]; tmp += e0[47]; tmp -= e0[48]; tmp += e0[50]; tmp -= e0[55];
  cor[233] = tmp; 

  tmp = -e0[9]; tmp -= e0[10]; tmp += e0[15]; tmp -= e0[22]; tmp -= e0[24]; tmp -= e0[25]; tmp -= e0[28]; tmp -= e0[30]; tmp += e0[36]; tmp += e0[38]; tmp += e0[45]; tmp -= e0[46]; tmp += e0[48]; tmp -= e0[53];
  cor[232] = tmp; 

  tmp = -e0[7]; tmp -= e0[8]; tmp += e0[13]; tmp -= e0[20]; tmp -= e0[22]; tmp -= e0[23]; tmp -= e0[26]; tmp -= e0[28]; tmp += e0[34]; tmp += e0[36]; tmp += e0[43]; tmp -= e0[44]; tmp += e0[46]; tmp -= e0[51]; tmp += e0[58];
  cor[231] = tmp; 

  tmp = -e0[5]; tmp -= e0[6]; tmp += e0[11]; tmp -= e0[18]; tmp -= e0[20]; tmp -= e0[21]; tmp -= e0[24]; tmp -= e0[26]; tmp += e0[32]; tmp += e0[34]; tmp += e0[41]; tmp -= e0[42]; tmp += e0[44]; tmp -= e0[49]; tmp += e0[56]; tmp -= e0[59];
  cor[230] = tmp; 

  tmp = -e0[3]; tmp -= e0[4]; tmp += e0[9]; tmp -= e0[16]; tmp -= e0[18]; tmp -= e0[19]; tmp -= e0[22]; tmp -= e0[24]; tmp += e0[30]; tmp += e0[32]; tmp += e0[39]; tmp -= e0[40]; tmp += e0[42]; tmp -= e0[47]; tmp += e0[54]; tmp -= e0[57]; tmp -= e0[58];
  cor[229] = tmp; 

  tmp = -e0[1]; tmp -= e0[2]; tmp += e0[7]; tmp -= e0[14]; tmp -= e0[16]; tmp -= e0[17]; tmp -= e0[20]; tmp -= e0[22]; tmp += e0[28]; tmp += e0[30]; tmp += e0[37]; tmp -= e0[38]; tmp += e0[40]; tmp -= e0[45]; tmp += e0[52]; tmp -= e0[55]; tmp -= e0[56];
  cor[228] = tmp; 

  tmp = -e0[0]; tmp += e0[5]; tmp -= e0[12]; tmp -= e0[14]; tmp -= e0[15]; tmp -= e0[18]; tmp -= e0[20]; tmp += e0[26]; tmp += e0[28]; tmp += e0[35]; tmp -= e0[36]; tmp += e0[38]; tmp -= e0[43]; tmp += e0[50]; tmp -= e0[53]; tmp -= e0[54];
  cor[227] = tmp; 

  tmp = e0[3]; tmp -= e0[10]; tmp -= e0[12]; tmp -= e0[13]; tmp -= e0[16]; tmp -= e0[18]; tmp += e0[24]; tmp += e0[26]; tmp += e0[33]; tmp -= e0[34]; tmp += e0[36]; tmp -= e0[41]; tmp += e0[48]; tmp -= e0[51]; tmp -= e0[52]; tmp += e0[59];
  cor[226] = tmp; 

  tmp = e0[1]; tmp -= e0[8]; tmp -= e0[10]; tmp -= e0[11]; tmp -= e0[14]; tmp -= e0[16]; tmp += e0[22]; tmp += e0[24]; tmp += e0[31]; tmp -= e0[32]; tmp += e0[34]; tmp -= e0[39]; tmp += e0[46]; tmp -= e0[49]; tmp -= e0[50]; tmp += e0[57];
  cor[225] = tmp; 

  tmp = -e0[6]; tmp -= e0[8]; tmp -= e0[9]; tmp -= e0[12]; tmp -= e0[14]; tmp += e0[20]; tmp += e0[22]; tmp += e0[29]; tmp -= e0[30]; tmp += e0[32]; tmp -= e0[37]; tmp += e0[44]; tmp -= e0[47]; tmp -= e0[48]; tmp += e0[55];
  cor[224] = tmp; 

  tmp = -e0[4]; tmp -= e0[6]; tmp -= e0[7]; tmp -= e0[10]; tmp -= e0[12]; tmp += e0[18]; tmp += e0[20]; tmp += e0[27]; tmp -= e0[28]; tmp += e0[30]; tmp -= e0[35]; tmp += e0[42]; tmp -= e0[45]; tmp -= e0[46]; tmp += e0[53]; tmp += e0[58]; tmp -= e0[59];
  cor[223] = tmp; 

  tmp = -e0[2]; tmp -= e0[4]; tmp -= e0[5]; tmp -= e0[8]; tmp -= e0[10]; tmp += e0[16]; tmp += e0[18]; tmp += e0[25]; tmp -= e0[26]; tmp += e0[28]; tmp -= e0[33]; tmp += e0[40]; tmp -= e0[43]; tmp -= e0[44]; tmp += e0[51]; tmp += e0[56]; tmp -= e0[57]; tmp += e0[59];
  cor[222] = tmp; 

  tmp = -e0[0]; tmp -= e0[2]; tmp -= e0[3]; tmp -= e0[6]; tmp -= e0[8]; tmp += e0[14]; tmp += e0[16]; tmp += e0[23]; tmp -= e0[24]; tmp += e0[26]; tmp -= e0[31]; tmp += e0[38]; tmp -= e0[41]; tmp -= e0[42]; tmp += e0[49]; tmp += e0[54]; tmp -= e0[55]; tmp += e0[57]; tmp += e0[59];
  cor[221] = tmp; 

  tmp = -e0[0]; tmp -= e0[1]; tmp -= e0[4]; tmp -= e0[6]; tmp += e0[12]; tmp += e0[14]; tmp += e0[21]; tmp -= e0[22]; tmp += e0[24]; tmp -= e0[29]; tmp += e0[36]; tmp -= e0[39]; tmp -= e0[40]; tmp += e0[47]; tmp += e0[52]; tmp -= e0[53]; tmp += e0[55]; tmp += e0[57]; tmp += e0[59];
  cor[220] = tmp; 

  tmp = -e0[2]; tmp -= e0[4]; tmp += e0[10]; tmp += e0[12]; tmp += e0[19]; tmp -= e0[20]; tmp += e0[22]; tmp -= e0[27]; tmp += e0[34]; tmp -= e0[37]; tmp -= e0[38]; tmp += e0[45]; tmp += e0[50]; tmp -= e0[51]; tmp += e0[53]; tmp += e0[55]; tmp += e0[57];
  cor[219] = tmp; 

  tmp = -e0[0]; tmp -= e0[2]; tmp += e0[8]; tmp += e0[10]; tmp += e0[17]; tmp -= e0[18]; tmp += e0[20]; tmp -= e0[25]; tmp += e0[32]; tmp -= e0[35]; tmp -= e0[36]; tmp += e0[43]; tmp += e0[48]; tmp -= e0[49]; tmp += e0[51]; tmp += e0[53]; tmp += e0[55]; tmp += e0[59];
  cor[218] = tmp; 

  tmp = -e0[0]; tmp += e0[6]; tmp += e0[8]; tmp += e0[15]; tmp -= e0[16]; tmp += e0[18]; tmp -= e0[23]; tmp += e0[30]; tmp -= e0[33]; tmp -= e0[34]; tmp += e0[41]; tmp += e0[46]; tmp -= e0[47]; tmp += e0[49]; tmp += e0[51]; tmp += e0[53]; tmp += e0[57];
  cor[217] = tmp; 

  tmp = e0[4]; tmp += e0[6]; tmp += e0[13]; tmp -= e0[14]; tmp += e0[16]; tmp -= e0[21]; tmp += e0[28]; tmp -= e0[31]; tmp -= e0[32]; tmp += e0[39]; tmp += e0[44]; tmp -= e0[45]; tmp += e0[47]; tmp += e0[49]; tmp += e0[51]; tmp += e0[55];
  cor[216] = tmp; 

  tmp = e0[2]; tmp += e0[4]; tmp += e0[11]; tmp -= e0[12]; tmp += e0[14]; tmp -= e0[19]; tmp += e0[26]; tmp -= e0[29]; tmp -= e0[30]; tmp += e0[37]; tmp += e0[42]; tmp -= e0[43]; tmp += e0[45]; tmp += e0[47]; tmp += e0[49]; tmp += e0[53]; tmp -= e0[58];
  cor[215] = tmp; 

  tmp = e0[0]; tmp += e0[2]; tmp += e0[9]; tmp -= e0[10]; tmp += e0[12]; tmp -= e0[17]; tmp += e0[24]; tmp -= e0[27]; tmp -= e0[28]; tmp += e0[35]; tmp += e0[40]; tmp -= e0[41]; tmp += e0[43]; tmp += e0[45]; tmp += e0[47]; tmp += e0[51]; tmp -= e0[56];
  cor[214] = tmp; 

  tmp = e0[0]; tmp += e0[7]; tmp -= e0[8]; tmp += e0[10]; tmp -= e0[15]; tmp += e0[22]; tmp -= e0[25]; tmp -= e0[26]; tmp += e0[33]; tmp += e0[38]; tmp -= e0[39]; tmp += e0[41]; tmp += e0[43]; tmp += e0[45]; tmp += e0[49]; tmp -= e0[54]; tmp -= e0[58];
  cor[213] = tmp; 

  tmp = e0[5]; tmp -= e0[6]; tmp += e0[8]; tmp -= e0[13]; tmp += e0[20]; tmp -= e0[23]; tmp -= e0[24]; tmp += e0[31]; tmp += e0[36]; tmp -= e0[37]; tmp += e0[39]; tmp += e0[41]; tmp += e0[43]; tmp += e0[47]; tmp -= e0[52]; tmp -= e0[56];
  cor[212] = tmp; 

  tmp = e0[3]; tmp -= e0[4]; tmp += e0[6]; tmp -= e0[11]; tmp += e0[18]; tmp -= e0[21]; tmp -= e0[22]; tmp += e0[29]; tmp += e0[34]; tmp -= e0[35]; tmp += e0[37]; tmp += e0[39]; tmp += e0[41]; tmp += e0[45]; tmp -= e0[50]; tmp -= e0[54];
  cor[211] = tmp; 

  tmp = e0[1]; tmp -= e0[2]; tmp += e0[4]; tmp -= e0[9]; tmp += e0[16]; tmp -= e0[19]; tmp -= e0[20]; tmp += e0[27]; tmp += e0[32]; tmp -= e0[33]; tmp += e0[35]; tmp += e0[37]; tmp += e0[39]; tmp += e0[43]; tmp -= e0[48]; tmp -= e0[52];
  cor[210] = tmp; 

  tmp = -e0[0]; tmp += e0[2]; tmp -= e0[7]; tmp += e0[14]; tmp -= e0[17]; tmp -= e0[18]; tmp += e0[25]; tmp += e0[30]; tmp -= e0[31]; tmp += e0[33]; tmp += e0[35]; tmp += e0[37]; tmp += e0[41]; tmp -= e0[46]; tmp -= e0[50];
  cor[209] = tmp; 

  tmp = e0[0]; tmp -= e0[5]; tmp += e0[12]; tmp -= e0[15]; tmp -= e0[16]; tmp += e0[23]; tmp += e0[28]; tmp -= e0[29]; tmp += e0[31]; tmp += e0[33]; tmp += e0[35]; tmp += e0[39]; tmp -= e0[44]; tmp -= e0[48];
  cor[208] = tmp; 

  tmp = -e0[3]; tmp += e0[10]; tmp -= e0[13]; tmp -= e0[14]; tmp += e0[21]; tmp += e0[26]; tmp -= e0[27]; tmp += e0[29]; tmp += e0[31]; tmp += e0[33]; tmp += e0[37]; tmp -= e0[42]; tmp -= e0[46];
  cor[207] = tmp; 

  tmp = -e0[1]; tmp += e0[8]; tmp -= e0[11]; tmp -= e0[12]; tmp += e0[19]; tmp += e0[24]; tmp -= e0[25]; tmp += e0[27]; tmp += e0[29]; tmp += e0[31]; tmp += e0[35]; tmp -= e0[40]; tmp -= e0[44];
  cor[206] = tmp; 

  tmp = e0[6]; tmp -= e0[9]; tmp -= e0[10]; tmp += e0[17]; tmp += e0[22]; tmp -= e0[23]; tmp += e0[25]; tmp += e0[27]; tmp += e0[29]; tmp += e0[33]; tmp -= e0[38]; tmp -= e0[42];
  cor[205] = tmp; 

  tmp = e0[4]; tmp -= e0[7]; tmp -= e0[8]; tmp += e0[15]; tmp += e0[20]; tmp -= e0[21]; tmp += e0[23]; tmp += e0[25]; tmp += e0[27]; tmp += e0[31]; tmp -= e0[36]; tmp -= e0[40];
  cor[204] = tmp; 

  tmp = e0[2]; tmp -= e0[5]; tmp -= e0[6]; tmp += e0[13]; tmp += e0[18]; tmp -= e0[19]; tmp += e0[21]; tmp += e0[23]; tmp += e0[25]; tmp += e0[29]; tmp -= e0[34]; tmp -= e0[38];
  cor[203] = tmp; 

  tmp = e0[0]; tmp -= e0[3]; tmp -= e0[4]; tmp += e0[11]; tmp += e0[16]; tmp -= e0[17]; tmp += e0[19]; tmp += e0[21]; tmp += e0[23]; tmp += e0[27]; tmp -= e0[32]; tmp -= e0[36]; tmp -= e0[59];
  cor[202] = tmp; 

  tmp = -e0[1]; tmp -= e0[2]; tmp += e0[9]; tmp += e0[14]; tmp -= e0[15]; tmp += e0[17]; tmp += e0[19]; tmp += e0[21]; tmp += e0[25]; tmp -= e0[30]; tmp -= e0[34]; tmp -= e0[57];
  cor[201] = tmp; 

  tmp = -e0[0]; tmp += e0[7]; tmp += e0[12]; tmp -= e0[13]; tmp += e0[15]; tmp += e0[17]; tmp += e0[19]; tmp += e0[23]; tmp -= e0[28]; tmp -= e0[32]; tmp -= e0[55];
  cor[200] = tmp; 

   tmp = e0[5]; tmp += e0[10]; tmp -= e0[11]; tmp += e0[13]; tmp += e0[15]; tmp += e0[17]; tmp += e0[21]; tmp -= e0[26]; tmp -= e0[30]; tmp -= e0[53];
 cor[199] = tmp; 
 
 tmp = e0[3]; tmp += e0[8]; tmp -= e0[9]; tmp += e0[11]; tmp += e0[13]; tmp += e0[15]; tmp += e0[19]; tmp -= e0[24]; tmp -= e0[28]; tmp -= e0[51];
 cor[198] = tmp; 
 
 tmp = e0[1]; tmp += e0[6]; tmp -= e0[7]; tmp += e0[9]; tmp += e0[11]; tmp += e0[13]; tmp += e0[17]; tmp -= e0[22]; tmp -= e0[26]; tmp -= e0[49]; tmp += e0[58];