215 |
|
for (miga[0] = rbf->ejl; miga[0] != NULL; |
216 |
|
miga[0] = nextedge(rbf,miga[0])) |
217 |
|
if (opp_rbf(rbf,miga[0]) == rbf->next) { |
218 |
< |
double nf = 1. - rbf->invec[2]*rbf->invec[2]; |
218 |
> |
double nf = 1. - |
219 |
> |
rbf->next->invec[2]*rbf->next->invec[2]; |
220 |
|
if (nf > FTINY) { /* rotate to match */ |
221 |
|
nf = sqrt((1.-invec[2]*invec[2])/nf); |
222 |
< |
invec[0] = nf*rbf->invec[0]; |
223 |
< |
invec[1] = nf*rbf->invec[1]; |
222 |
> |
invec[0] = nf*rbf->next->invec[0]; |
223 |
> |
invec[1] = nf*rbf->next->invec[1]; |
224 |
|
} |
225 |
< |
return(0); |
225 |
> |
return(0); /* rotational symmetry */ |
226 |
|
} |
227 |
|
break; |
228 |
|
} |