puts "========"
puts "OCC28030"
puts "========"
puts ""
########################################################################################################
# Algorith GeomLib_CheckCurveOnSurface takes too much time for Bspline curves with big number of knots
########################################################################################################

beziercurve c 4 0 0 0 1 1 0 2 1 0 3 0 0

convert c1 c
set i 1
repeat 98 {insertknot c1 0.01*$i 1; incr i 1}
mkedge e1 c1
prism p1 e1 0 0 1
explode p1 e
dchrono cpu restart
xdistef p1_3 p1
dchrono cpu stop counter xdistef_1

convert c2 c
set i 1
repeat 1000 {insertknot c2 0.00098*$i 1; incr i 1}
mkedge e2 c2
prism p2 e2 0 0 1
explode p2 e
dchrono cpu restart
xdistef p2_3 p2
dchrono cpu stop counter xdistef_2