- finald = sqrt((ix-kx[l])*(double)(ix-kx[l]) +\r
- (iy-ky[l])*(double)(iy-ky[l]));\r
- kavgd[l] = 0.5 * (finald+kdist[l]);\r
- kdist[l] = finald;\r
+ finald = sqrt((ix-frozen.kx[l])*(double)(ix-frozen.kx[l]) +\r
+ (iy-frozen.ky[l])*(double)(iy-frozen.ky[l]));\r
+ frozen.kavgd[l] = 0.5 * (finald+frozen.kdist[l]);\r
+ frozen.kdist[l] = finald;\r