Lines Matching defs:sum1
1022 double sum1;
1037 sum1 = sum2 = 0.;
1039 sum1 += (double)p1[i][0] * p1[i][0];
1042 sum1 = sqrt ( sum1/len );
1047 if ( abs (p1[i][0]) >= sum1 && abs (p2[i][0]) >= sum2 )
1058 sum1 = sum2 = 0.;
1067 sum1 += tmp1*tmp1;
1105 tmp = 100./MAX/sqrt(sum1*sum2);
1127 double sum1 = 0;
1134 sum1 += p[i][0];
1137 if ( fabs(sum1) < len && fabs(sum2) < len )
1140 diff1 = round ( sum1 / len );