Adding of testing cases from subgroups 937 940 and 941 of CHL group

[occt.git] / tests / bugs / modalg / bug165_6

diff --git a/tests/bugs/modalg/bug165_6 b/tests/bugs/modalg/bug165_6
deleted file mode 100644 (file)
index aeb8121..0000000
--- a/tests/bugs/modalg/bug165_6
+++ /dev/null
@@ -1,83 +0,0 @@
-puts "TODO ?OCC11111 ALL: An exception was caught"
-puts "TODO ?OCC11111 ALL: Exception"
-puts "TODO ?OCC11111 ALL: Faulty OCC165"
-puts "TODO ?OCC11111 ALL: Error : The length of result shape is"
-
-cpulimit 600
-
-puts "========"
-puts "OCC165"
-puts "========"
-puts "Bug regression in BRepOffsetAPI_MakeOffset class (offsetting in OY direction)"
-
-
-dchrono h reset
-dchrono h start
-
-restore [locate_data_file offset_wire_019.brep] a 
-checkshape a
-
-mkplane f a
-checkshape f
-
-set start_stepoffset 0.2
-set incr_stepoffset 0.1
-set finish_stepoffset 4.9
-
-set interval_numb [expr int ( ($finish_stepoffset - $start_stepoffset) / $incr_stepoffset ) + 1]
-
-set IsMade 0
-set IsBeginMade 0
-set IsGood 1
-set i 0
-set resume_string ""
-for {set stepoffset $start_stepoffset} {$stepoffset <= $finish_stepoffset} {set stepoffset [expr $stepoffset + $incr_stepoffset]} {
-    incr i
-    puts "i = $i"
-    if { [catch {mkoffset result f 1 $stepoffset } catch_result] } {
-        puts "Faulty OCC165 (stepoffset = $stepoffset) : function MKOFFSET works wrongly"
-        set IsGood 0
-        set IsMade 0
-    } else {
-        puts "OK OCC165 (stepoffset = $stepoffset)"
-        set IsMade 1
-    }
-    if {$IsBeginMade == 0 && $IsMade == 1} {
-        set IsBeginMade 1
-        set BeginStepOffset $stepoffset
-    }
-    if {$IsMade == 1} {
-        set FinishStepOffset $stepoffset
-    }
-
-    dchrono h show
-
-    if {$IsBeginMade == 1 && ($IsMade == 0 || $i == $interval_numb) } {
-        set IsBeginMade 0
-        set resume_tmp "from [format "%0.2f" $BeginStepOffset] till [format "%0.2f" $FinishStepOffset]\n"
-        set resume_string "${resume_string}${resume_tmp}"
-    }
-}
-
-puts ""
-if {[string length $resume_string] == 0} {
-    puts "Offset is created wrongly on initial shape in following borders"
-    puts "from [format "%0.2f" $start_stepoffset] till [format "%0.2f" $finish_stepoffset]"
-} else {
-    puts "Offset is created correctly on initial shape in following borders"
-    puts "$resume_string"
-}
-
-if {$IsGood == 1} {
-    puts "OCC165 OK"
-} else {
-    puts "Faulty OCC165"
-}
-
-renamevar result_1 result
-
-set length 1112.83
-set 2dviewer 0
-
-dchrono h stop
-dchrono h show