+++ /dev/null
-puts "========================"
-puts "OCC20524"
-puts "========================"
-puts ""
-#######################################################################
-# Wrong intersection
-#######################################################################
-
-set BugNumber OCC20524
-
-restore [locate_data_file OCC20524-surf1.draw] surf1
-restore [locate_data_file OCC20524-surf2.draw] surf2
-
-intersect result surf1 surf2
-
-set che [whatis result]
-if { ![regexp {3d curve} $che] } {
- puts "Faulty ${BugNumber}: command INTERSECT works wrongly"
-} else {
- puts "${BugNumber} OK : command INTERSECT works properly"
-}
-