tests/bugs/modalg_7/bug21414

   1 puts "TODO OCC21414 ALL: ERROR: OCC21414 is reproduced."
   2
   3 puts "========"
   4 puts "OCC21414"
   5 puts "========"
   6 puts ""
   7 ########################################################################################
   8 # GeomAPI_IntCS fails to find all intersections between line and surface of revolution
   9 ########################################################################################
  10
  11 restore [locate_data_file bug21414_wave.brep] a
  12
  13 mksurface s a
  14 line l 0 2.5 0 1 0 0
  15
  16 set theResList [intersect res l s]
  17
  18 if {[llength $theResList] != 100} {
  19   puts "ERROR: OCC21414 is reproduced. Total number of intersections is [llength $theResList] but should be 100."
  20 }
  21
  22 smallview
  23 fit
  24 checkview -screenshot -2d -path ${imagedir}/${test_image}.png