Searched refs:tdum2 (Results 1 – 8 of 8) sorted by relevance
/dports/math/sisl/SISL-SISL-4.6.0-44-g9114631/src/ |
H A D | s1787.c | 142 double tdum2; /* Max knot value used in DEQUAL comparing. */ local 277 tdum2 = (double)2.0*max(fabs(sval2[0]),fabs(sval2[1])); 280 DEQUAL(spar1[1]+tdum2,sval2[0]+tdum2) || DEQUAL(spar1[1]+tdum2,sval2[1]+tdum2) ) 286 DEQUAL(spar2[1]+tdum2,sval2[0]+tdum2) || DEQUAL(spar2[1]+tdum2,sval2[1]+tdum2) ) 297 if (DEQUAL(epar[0]+tdum1,spar1[0]+tdum1) && DEQUAL(epar[1]+tdum2,spar1[1]+tdum2) ) 303 if (DEQUAL(epar[0]+tdum1,spar2[0]+tdum1) && DEQUAL(epar[1]+tdum2,spar2[1]+tdum2) )
|
H A D | s9boundit.c | 155 double tdum2; /* Dummy variables */ local 276 tdum2 = ta11*ta22 - ta12*ta21; 280 if (DNEQUAL(tdum2,DZERO)) 282 gpar2[0] += (tb1*ta22-tb2*ta12)/tdum2; 283 gpar2[1] += (ta11*tb2-ta21*tb1)/tdum2; 394 tdum2 = ta11*ta22 - ta12*ta21; 399 if (DNEQUAL(tdum2,DZERO)) 401 gpar1[0] += (tb1*ta22-tb2*ta12)/tdum2; 402 gpar1[1] += (ta11*tb2-ta21*tb1)/tdum2; 435 if (DEQUAL(tdum2,DZERO)) goto war02; [all …]
|
H A D | s9iterate.c | 151 double tdum1,tdum2; /* Dummy variables */ local 265 tdum2 = ta11*ta22 - ta12*ta21; 267 tdum2 = ta11*ta22 - ta12*ta21; 272 if (DEQUAL((tdum+tdum2),tdum)) tdum2 =DZERO; 277 if (DNEQUAL(tdum2,DZERO)) 279 gpar2[0] += (tb1*ta22-tb2*ta12)/tdum2; 280 gpar2[1] += (ta11*tb2-ta21*tb1)/tdum2; 315 if (DEQUAL(tdum1,DZERO) || DEQUAL(tdum2,DZERO)) goto war02; 333 if (DEQUAL(tdum1,DZERO) || DEQUAL(tdum2,DZERO))
|
H A D | sh1467.c | 324 tnom2 += (double)2.0*tdum*tdum2; 408 tdum2 = sd2bar[kk] + sd2bar[kj]; 414 sd22x1[ki] = (double)2.0*(ebar[kj]*tdum2*tdum2/tdum 415 - sd2bar[kj]*tdum2)/(tdum*tdum); 421 tdum2 = sd2bar[kk] + sd2bar[kj]; 427 sd22x2[ki] = (double)2.0*(ebar[kj]*tdum2*tdum2/tdum 428 - sd2bar[kj]*tdum2)/(tdum*tdum); 451 tnom12 += (double)2.0*(tdum1*tdum2 + tdum*tdum12); 452 tnom22 += (double)2.0*(tdum2*tdum2 + tdum*tdum22); 477 sd22alpha[ki] = (double)2.0*(tdum2*tdum2 + tdum*tdum22)/tdenom [all …]
|
H A D | s6rotmat.c | 90 double tdum, tdum1, tdum2, tdum3; local 123 tdum2 = sqrt (tdum); 124 if (tdum2 < teps) 136 ematrix[4 * kp + 1] = syaxis[kp] / tdum2;
|
H A D | s1306.c | 230 double tdum1,tdum2,tafss,tafst,taftt; local 243 tdum2 = MAX(tafss,taftt); 244 tdum2 = MAX(tafst,tdum2); 249 if (DEQUAL(tdum2+tdum1,tdum2) &&
|
H A D | s9conmarch.c | 141 double tdum2; /* Max knot value used in DEQUAL comparing. */ local 155 tdum2 = (double)2.0*max(fabs(tstart2),fabs(tend2)); 198 DEQUAL(sq[1]+tdum2,scand2[1]+tdum2))
|
H A D | s9surmarch.c | 141 double tdum2; /* Max knot value used in DEQUAL comparing. */ local 157 tdum2 = (double)2.0*max(fabs(tstart2),fabs(tend2)); 215 DEQUAL(sq[1]+tdum2,scand2[1]+tdum2) &&
|