puts "========"
puts "0030199: Extrema Point<->Curve gives inaccurate result"
puts "========"
puts ""
2dbsplinecurve c2d 1 8 0 2 147.948545311472 1 227.205037349287 1 282.782457537237 1 341.526569446034 1 412.981618615062 1 493.370506013535 1 820.162497637298  2 70.4310501764176 -125.064069601289 1 202.351851590745 -192.039245703947  1 281.504332439341 -187.980144121968  1 310.594560443526 -140.62395898876  1 274.062646205713 -94.6208077364441  1 341.714339238701 -71.6192321052281  1 397.188727525752  -129.799688113598  1 70.4310501764176  -125.064069601289 1
to3d c3d c2d
mkedge e c3d
vertex v 360 -127 0
distmini dd e v
set dist [dval dd_val]
checkreal dist $dist 2.26048366458175 1.e-7 0

vertex v1 199.49416090801449 -197.77438365880749 0
distmini dd1 e v1
set dist1 [dval dd1_val]
checkreal dist1 $dist1 6.4076675475126184 1.e-7 0
