puts "========"
puts "OCC26041"
puts "========"
puts ""
################################################
# GeomAPI_ExtremaCurveSurface have inexact API
################################################

polyline l 0 -10 -10 0 10 -10 0 10 10 0 -10 10 0 -10 -10
mkplane pl l
mksurface surf pl

vinit
vdisplay pl
vertex v1 10 -5 0
vertex v2 10 5 0
edge e v1 v2
mkcurve curv e
vdisplay e
vfit

set bug_info [extrema surf curv]
if {$bug_info != "No solutions!\n"} {
  puts "ERROR: OCC25063 is reproduced."
}

set only_screen 1
