// straight line segment evaluation
#macro Len_Spline(Espl begin_at stop_at num)
   #local c = 1/num;
   #local V1 = Espl(begin_at);
   #while (c <= 1)
      #local V2 = Espl( c*(stop_at - begin_at) + begin_at);
      vlength(V2-V1)+
      #local V1 = V2;
      #local c = c + 1/num;
   #end
   0
#end

#declare sample = Len_Spline(ABC_spl, 0, 0.5, 10000);

Post a reply to this message