| # | Line 48 | Line 48 | RAY *r; | |
|---|---|---|
| 48 | int nv; | |
| 49 | FVECT dval, disp; | |
| 50 | double pt[MAXDIM]; | |
| 51 | + | double d; |
| 52 | DATARRAY *dp; | |
| 53 | register XFORM *mxf; | |
| 54 | register char **sa; | |
| # | Line 105 | Line 106 | RAY *r; | |
| 106 | ||
| 107 | multv3(disp, disp, mxf->fore.xfm); | |
| 108 | multv3(disp, disp, r->rofx); | |
| 109 | + | d = 1.0 / (mxf->fore.sca * r->rofs); |
| 110 | for (i = 0; i < 3; i++) | |
| 111 | < | r->pert[i] += disp[i] / (mxf->fore.sca * r->rofs); |
| 111 | > | r->pert[i] += disp[i] * d; |
| 112 | return; | |
| 113 | dimerr: | |
| 114 | objerror(m, USER, "dimension error"); | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines (old) |
| > | Changed lines (new) |