9 _printf_(
"EXPTOLEVELSET - determien levelset distance between a contour and a cloud of points\n");
12 _printf_(
" distance=ExpToLevelSet(x,y,contourname)\n");
15 _printf_(
" contourname: name of .exp file containing the contours.\n");
16 _printf_(
" distance: distance vector representing a levelset where the 0 level is one the contour segments', \n");
19 _printf_(
" distance=ExpToLevelSet(md.mesh.x,md.mesh.y,'Contour.exp')\n");
31 char *interptype = NULL;
36 double *distance = NULL;
58 if (flags[i]==0) flags[i]=-1;
59 else if (flags[i]==2) flags[i]=0;
63 for(i=0;i<nods;i++)distance[i]*=flags[i];
71 xDelete<char>(interptype);
73 xDelete<double>(distance);
74 xDelete<double>(flags);