From: ski Date: Fri, 8 Feb 2013 11:16:15 +0000 (+0400) Subject: Adding of testing cases from subgroups 937 940 and 941 of CHL group X-Git-Tag: V6_6_0_beta~84 X-Git-Url: http://git.dev.opencascade.org/gitweb/?a=commitdiff_plain;h=a8676008f76eba6c84344e41f2ca7901abeb1ca9;p=occt-copy.git Adding of testing cases from subgroups 937 940 and 941 of CHL group Splitting of subgroups bugs/modalg and bugs/moddata to optimise time of testing Correction of end file in group v3d Small correction of test case --- diff --git a/tests/bugs/fclasses/bug13963_1 b/tests/bugs/fclasses/bug13963_1 new file mode 100755 index 0000000000..361df1aad2 --- /dev/null +++ b/tests/bugs/fclasses/bug13963_1 @@ -0,0 +1,57 @@ +pload QAcommands + +puts "============" +puts "OCC13963" +puts "============" +puts "" +####################################################################### +# Some improvements in Bnd and gp classes +####################################################################### + +set BugNumber OCC13963 + +set Result [OCC13963 1 0 0 1] + +regexp {\([ \t]*([-0-9.+eE]+)[ \t]*([-0-9.+eE]+)[ \t]*([-0-9.+eE]+)[ \t]*\)[ \t]*=>[ \t]*\([ \t]*([-0-9.+eE]+)[ \t]*([-0-9.+eE]+)[ \t]*([-0-9.+eE]+)[ \t]*\)} $Result full OriginX OriginY OriginZ ResultX ResultY ResultZ + +if { ${OriginX} == 1.000 } { + set Status 0 +} else { + set Status 1 +} +if { ${OriginY} == 0.000 } { + set Status 0 +} else { + set Status 2 +} +if { ${OriginZ} == 0.000 } { + set Status 0 +} else { + set Status 3 +} + +if { ${ResultX} == 1.000 } { + set Status 0 +} else { + set Status 4 +} +if { ${ResultY} == 0.000 } { + set Status 0 +} else { + set Status 5 +} +if { ${ResultZ} == 0.000 } { + set Status 0 +} else { + set Status 6 +} + +puts "Status = ${Status}" +# Resume +puts "" +if { ${Status} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + diff --git a/tests/bugs/fclasses/bug13963_2 b/tests/bugs/fclasses/bug13963_2 new file mode 100755 index 0000000000..7a4a34175a --- /dev/null +++ b/tests/bugs/fclasses/bug13963_2 @@ -0,0 +1,57 @@ +pload QAcommands + +puts "============" +puts "OCC13963" +puts "============" +puts "" +####################################################################### +# Some improvements in Bnd and gp classes +####################################################################### + +set BugNumber OCC13963 + +set Result [OCC13963 1 0 0 2] + +regexp {\([ \t]*([-0-9.+eE]+)[ \t]*([-0-9.+eE]+)[ \t]*([-0-9.+eE]+)[ \t]*\)[ \t]*=>[ \t]*\([ \t]*([-0-9.+eE]+)[ \t]*([-0-9.+eE]+)[ \t]*([-0-9.+eE]+)[ \t]*\)} $Result full OriginX OriginY OriginZ ResultX ResultY ResultZ + +if { ${OriginX} == 1.000 } { + set Status 0 +} else { + set Status 1 +} +if { ${OriginY} == 0.000 } { + set Status 0 +} else { + set Status 2 +} +if { ${OriginZ} == 0.000 } { + set Status 0 +} else { + set Status 3 +} + +if { ${ResultX} == 1.500 } { + set Status 0 +} else { + set Status 4 +} +if { ${ResultY} == -0.500 } { + set Status 0 +} else { + set Status 5 +} +if { ${ResultZ} == 0.000 } { + set Status 0 +} else { + set Status 6 +} + +puts "Status = ${Status}" +# Resume +puts "" +if { ${Status} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + diff --git a/tests/bugs/fclasses/bug309 b/tests/bugs/fclasses/bug309 index 6ea96bebe5..31a4dbe056 100644 --- a/tests/bugs/fclasses/bug309 +++ b/tests/bugs/fclasses/bug309 @@ -1,4 +1,4 @@ -puts "TODO ?OCC12345 ALL: OCC309: ERROR 2" +puts "TODO ?OCC12345 ALL: OCC309: Error 2" puts "================" puts "OCC309" @@ -13,7 +13,7 @@ set ll [llength ${result}] if { ${ll} != 2 } { puts "result = ${result}" puts "length = ${ll}" - puts "OCC309: ERROR 0" + puts "OCC309: Error 0" } else { set result1 [lindex ${result} 0] set result2 [lindex ${result} 1] @@ -23,12 +23,8 @@ if { ${ll} != 2 } { set res1 [ string range $result1 1 [expr [string length $result1] -3 ] ] set res2 [ string range $result2 1 [expr [string length $result2] -3 ] ] } else { - set info [pwd] - set CurrentDirectory [string range $info 2 end] - set info2 [file dirname ${CurrentDirectory}] - set UpTrek [file dirname ${CurrentDirectory}] - set res1 [ string range $result1 3 [expr [string length $result1] -2 ] ] - set res2 [ string range $result2 3 [expr [string length $result2] -2 ] ] + set res1 [ string range $result1 1 [expr [string length $result1] -2 ] ] + set res2 [ string range $result2 1 [expr [string length $result2] -2 ] ] } if {[string compare ${res1} "${CurrentDirectory}"] == 0} { puts "OCC309: OK 1" @@ -36,7 +32,7 @@ if { ${ll} != 2 } { puts "result1 = ${result1}" puts "res1 = ${res1}" puts "CurrentDirectory = ${CurrentDirectory}" - puts "OCC309: ERROR 1" + puts "OCC309: Error 1" } if {[string compare ${res2} "${UpTrek}"] == 0} { puts "OCC309: OK 2" @@ -44,7 +40,7 @@ if { ${ll} != 2 } { puts "result2 = ${result2}" puts "res2 = ${res2}" puts "UpTrek = ${UpTrek}" - puts "OCC309: ERROR 2" + puts "OCC309: Error 2" } } diff --git a/tests/bugs/grids.list b/tests/bugs/grids.list index d766be78d2..450347c676 100755 --- a/tests/bugs/grids.list +++ b/tests/bugs/grids.list @@ -3,10 +3,14 @@ 003 iges 004 vis 005 xde -006 modalg -007 moddata -008 step -009 caf -010 mesh -011 heal +006 modalg_1 +007 modalg_2 +008 modalg_3 +009 modalg_4 +010 moddata_1 +011 moddata_2 +012 step +013 caf +014 mesh +015 heal diff --git a/tests/bugs/heal/bug24 b/tests/bugs/heal/bug24 new file mode 100644 index 0000000000..90b4f7206e --- /dev/null +++ b/tests/bugs/heal/bug24 @@ -0,0 +1,25 @@ +pload QAcommands + +puts "=======" +puts "OCC24" +puts "=======" +puts "" +########################################################################### +## Recorded modifications are lost when converting from ShapeBuild_ReShape into ShapeProcess_ShapeContext +## and back +########################################################################### + +restore [locate_data_file OCC24.brep] s +checkshape s + +explode s f + +compound s_1 c +if [catch { OCC24 result s c OCC24 Seq } ] { + puts "OCC24 ERROR" +} else { + puts "OCC24 OK" +} + +set square 37.6991 +set 2dviewer 2 diff --git a/tests/bugs/modalg/begin b/tests/bugs/modalg/begin deleted file mode 100755 index f40c35f0a3..0000000000 --- a/tests/bugs/modalg/begin +++ /dev/null @@ -1,20 +0,0 @@ -set subgroup modalg - -set calcul "p" -set type "i" - -proc OFFSETSHAPE {distance faces calcul type} { - uplevel #0 explode s f - uplevel #0 offsetparameter 1e-7 $calcul $type - uplevel #0 offsetload s $distance $faces - uplevel #0 offsetperform result -} - - - - - - - - - diff --git a/tests/bugs/modalg/buc60409_1 b/tests/bugs/modalg/buc60409_1 deleted file mode 100755 index 1aceec9594..0000000000 --- a/tests/bugs/modalg/buc60409_1 +++ /dev/null @@ -1,28 +0,0 @@ - -puts "==============" -puts " BUC60409 " -puts " FUSE " -puts "==============" - -restore [locate_data_file buc60409a.brep] c -restore [locate_data_file buc60409b.brep] s - -set che [checkshape c] -if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty BUC60409 (shape 1): Source shape is invalid. It was detected by Checkshape command" - puts "Body of the script was NOT executed" - renamevar c result -} else { - puts "BUC60409 OK (shape 1): Source shape is valid" - set che [checkshape s] - if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty BUC60409 (shape 2): Source shape is invalid. It was detected by Checkshape command" - puts "Body of the script was NOT executed" - renamevar s result - } else { - puts "BUC60409 OK (shape 2): Source shape is valid" - bfuse result c s - } -} -set square 39.0894 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60409_2 b/tests/bugs/modalg/buc60409_2 deleted file mode 100755 index 3ebd2a1c27..0000000000 --- a/tests/bugs/modalg/buc60409_2 +++ /dev/null @@ -1,28 +0,0 @@ - -puts "=============" -puts " BUC60409 " -puts " CUT " -puts "=============" - -restore [locate_data_file buc60409a.brep] c -restore [locate_data_file buc60409b.brep] s - -set che [checkshape c] -if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty BUC60409 (shape 1): Source shape is invalid. It was detected by Checkshape command" - puts "Body of the script was NOT executed" - renamevar c result -} else { - puts "BUC60409 OK (shape 1): Source shape is valid" - set che [checkshape s] - if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty BUC60409 (shape 2): Source shape is invalid. It was detected by Checkshape command" - puts "Body of the script was NOT executed" - renamevar s result - } else { - puts "BUC60409 OK (shape 2): Source shape is valid" - bcut result c s - } -} -set square 31.8476 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60409_3 b/tests/bugs/modalg/buc60409_3 deleted file mode 100755 index 824156f38d..0000000000 --- a/tests/bugs/modalg/buc60409_3 +++ /dev/null @@ -1,29 +0,0 @@ - -puts "=================" -puts " BUC60409 " -puts " COMMON " -puts "=================" - -restore [locate_data_file buc60409a.brep] c -restore [locate_data_file buc60409b.brep] s - -set che [checkshape c] -if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty BUC60409 (shape 1): Source shape is invalid. It was detected by Checkshape command" - puts "Body of the script was NOT executed" - renamevar c result -} else { - puts "BUC60409 OK (shape 1): Source shape is valid" - - set che [checkshape s] - if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty BUC60409 (shape 2): Source shape is invalid. It was detected by Checkshape command" - puts "Body of the script was NOT executed" - renamevar s result - } else { - puts "BUC60409 OK (shape 2): Source shape is valid" - bcommon result c s - } -} -set square 4.89279 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60462_1 b/tests/bugs/modalg/buc60462_1 deleted file mode 100755 index bb20c30538..0000000000 --- a/tests/bugs/modalg/buc60462_1 +++ /dev/null @@ -1,23 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty : Section is incorrect" -puts "TODO OCC12345 ALL: Error : The length of result shape is" - -puts "=============" -puts "BUC60462" -puts "=============" -puts "Section" -puts "" - -restore [locate_data_file buc60462a.brep] a -checkshape a -restore [locate_data_file buc60462b.brep] b -checkshape b -bsection result a b - -regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection result] full cs - -if { $cs != 0 } { - puts "Faulty : Section is incorrect" -} - -set length 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60462_2 b/tests/bugs/modalg/buc60462_2 deleted file mode 100755 index 32b9d90abb..0000000000 --- a/tests/bugs/modalg/buc60462_2 +++ /dev/null @@ -1,26 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_17" -puts "TODO OCC12345 ALL: Faulty : mistakes are found in checked shape by checkshape command" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - - -puts "==========" -puts "BUC60462" -puts "==========" - -restore [locate_data_file buc60462c.brep] a -checkshape a -restore [locate_data_file buc60462d.brep] b -checkshape b -puts "Fuse begin" -bfuse result a b -puts "Fuse end" - -set che [checkshape result r] -if { [regexp {OK} $che] != 1 } { - puts "Faulty : mistakes are found in checked shape by checkshape command" -} else { - puts "Checking by checkshape - OK" -} - -set square 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60463 b/tests/bugs/modalg/buc60463 deleted file mode 100755 index 3980770778..0000000000 --- a/tests/bugs/modalg/buc60463 +++ /dev/null @@ -1,22 +0,0 @@ -puts "TODO OCC12345 ALL: Error : The length of result shape is" -puts "TODO OCC12345 ALL: Faulty : Section is incorrect" - -puts "=============" -puts "BUC60463" -puts "=============" -puts "Section" -puts "" -cpulimit 1400 -restore [locate_data_file buc60463a.brep] a -checkshape a -restore [locate_data_file buc60463b.brep] b -checkshape b -bsection result a b - -regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection result] full cs -if { $cs != 0 } { - puts "Faulty : Section is incorrect" -} -set length 0 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/buc60523 b/tests/bugs/modalg/buc60523 deleted file mode 100755 index a1d1cb238b..0000000000 --- a/tests/bugs/modalg/buc60523 +++ /dev/null @@ -1,12 +0,0 @@ - -puts "========================" -puts "BUC60523" -puts "========================" - -restore [locate_data_file buc60523a.brep] a -checkshape a -sewing result 1.e-7 a -set square 156.919 -set 2dviewer 0 - - diff --git a/tests/bugs/modalg/buc60531_1 b/tests/bugs/modalg/buc60531_1 deleted file mode 100755 index 6bc69bb76a..0000000000 --- a/tests/bugs/modalg/buc60531_1 +++ /dev/null @@ -1,15 +0,0 @@ - -puts "========================" -puts "BUC60531" -puts "========================" - -restore [locate_data_file buc60531a.brep] r1 -checkshape r1 -restore [locate_data_file buc60531b.brep] pl1 -checkshape pl1 - -bcut result r1 pl1 - -set square 115935 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/buc60531_2 b/tests/bugs/modalg/buc60531_2 deleted file mode 100755 index c4e9dc329f..0000000000 --- a/tests/bugs/modalg/buc60531_2 +++ /dev/null @@ -1,21 +0,0 @@ - -puts "========================" -puts "BUC60531" -puts "========================" - -restore [locate_data_file buc60531a.brep] r1 -checkshape r1 - -restore [locate_data_file buc60531b.brep] pl1 -checkshape pl1 - -bcut r2 r1 pl1 -checkshape r2 - -restore [locate_data_file buc60531c.brep] pl2 -checkshape pl2 - -bcut result r2 pl2 - -set square 115935 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60532 b/tests/bugs/modalg/buc60532 deleted file mode 100755 index 936a35bbc6..0000000000 --- a/tests/bugs/modalg/buc60532 +++ /dev/null @@ -1,22 +0,0 @@ -puts "===========" -puts "BUC60532" -puts "===========" - -restore [locate_data_file buc60532a.brep] p -checkshape p - -restore [locate_data_file buc60532b.brep] t1 -checkshape t1 - -restore [locate_data_file buc60532c.brep] t2 -checkshape t2 - -# create halfspace -halfspace h1 t1 20 20 0 -halfspace h2 t2 20 20 0 - -# first cut -bcut result p h1 - -set square 81.8172 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60532_1 b/tests/bugs/modalg/buc60532_1 deleted file mode 100755 index be2eeff4fb..0000000000 --- a/tests/bugs/modalg/buc60532_1 +++ /dev/null @@ -1,23 +0,0 @@ -puts "===========" -puts "BUC60532" -puts "===========" - -restore [locate_data_file buc60532a.brep] p -checkshape p - -restore [locate_data_file buc60532b.brep] t1 -checkshape t1 - -restore [locate_data_file buc60532c.brep] t2 -checkshape t2 - -# create halfspace -halfspace h1 t1 20 20 0 -halfspace h2 t2 20 20 0 - -# first cut -bcut result p h1 - -set square 81.8172 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/buc60532_2 b/tests/bugs/modalg/buc60532_2 deleted file mode 100755 index 9d2b3735ae..0000000000 --- a/tests/bugs/modalg/buc60532_2 +++ /dev/null @@ -1,52 +0,0 @@ -puts "==========" -puts "BUC60532" -puts "==========" - -restore [locate_data_file buc60532a.brep] p -checkshape p - -restore [locate_data_file buc60532b.brep] t1 -checkshape t1 - -restore [locate_data_file buc60532c.brep] t2 -checkshape t2 - -# create halfspace -#vertex v 20 20 0 -halfspace h1 t1 20 20 0 -halfspace h2 t2 20 20 0 - -# first cut -bcut res1 p h1 - -explode res1 e -mkcurve cu11 res1_1 -mkcurve cu12 res1_2 -mkcurve cu13 res1_3 -mkcurve cu14 res1_4 -mkcurve cu15 res1_5 - -checkshape res1 -puts [computetolerance res1] - -# second cut -bcut res2 res1 h2 -tcopy res2 res -checkshape res2 - -explode res2 e -mkcurve cu21 res2_1 -mkcurve cu22 res2_2 -mkcurve cu23 res2_3 -mkcurve cu24 res2_4 -mkcurve cu25 res2_5 - -explode res2 face - -puts [computetolerance res2] - -renamevar res2 result - -set square 78.8705 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/buc60533 b/tests/bugs/modalg/buc60533 deleted file mode 100755 index 8af03576d1..0000000000 --- a/tests/bugs/modalg/buc60533 +++ /dev/null @@ -1,69 +0,0 @@ -puts "==========" -puts "BUC60533" -puts "==========" - -restore [locate_data_file buc60533a.brep] part -checkshape part -#puts "Tolerance part" -#computetolerance part - -restore [locate_data_file buc60533b.brep] trTool -checkshape trTool -#puts "Tolerance trTool" -#computetolerance trTool - -# create halfspace -vertex v 10000 15000 -15000 -halfspace hs trTool 10000 15000 -15000 -#puts "Tolerance hs" -#computetolerance hs - -#************************************************* -if [catch {bcut result part hs} catch_result] { - puts "Faulty BUC60533: function CUT works wrongly" -} else { - puts " BUC60533 OK: function CUT works properly" -} -#************************************************* - -#set che [checkshape res r] -#set err [lindex $che [expr [llength $che] - 1]] -#if { $err != "OK"} { -# puts "Faulty : mistakes are found in checked shape by checkshape command" -#} else { -# puts "Checking by checkshape - OK" - -#explode res e -#mkcurve cu1 res_1 -#mkcurve cu2 res_2 -#mkcurve cu3 res_3 -#mkcurve cu4 res_4 -#mkcurve cu5 res_5 - -#checkshape res - -#set tolerance [ maxtolerance res ] -#set MaxFaceTolerance [ lindex $tolerance 14 ] -#set MaxEdgeTolerance [ lindex $tolerance 20 ] -#set MaxVertexTolerance [ lindex $tolerance 26 ] -#if { $MaxFaceTolerance > 1 || $MaxEdgeTolerance > 1 || $MaxVertexTolerance > 1 } { -#puts "Faulty :Tolerance of shape is more then 1.0" -#} else { -#puts "Tolerance of shape is less then 1.0" -#} -#} - -# Objectif : Couper part par trTool -# -# part est construite a partir d'un semi de point et de telle facon que u=x et v=y. -# On obtient une Geom_BSplineSurface. On cree alors la topologie a partir de cette -# surface via BRepAPI::MakeFace(surface) -# Dans notre code, a aucun moment, nous -# n'initialisons la tolerance. -# -# Le cut n'est pas effectue car une exception est levee : -# An exception was caught Standard_ConstructionError: -# ** Exception ** Standard_ConstructionError: - -set square 1.63191e+07 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60555_1 b/tests/bugs/modalg/buc60555_1 deleted file mode 100755 index 0f0ba0ff45..0000000000 --- a/tests/bugs/modalg/buc60555_1 +++ /dev/null @@ -1,37 +0,0 @@ -puts "===========" -puts "BUC60555" -puts "CUT Case 1" -puts "===========" -#cpulim add aki 070704 -cpulimit 1600 -restore [locate_data_file buc60555a.brep] part -checkshape part -restore [locate_data_file buc60555b.brep] trTool1 -checkshape trTool1 -halfspace hs1 trTool1 20000 10000 0 -bcut cut1 part hs1 - -checkshape cut1 - -tcopy cut1 result - -explode cut1 e -mkcurve cu1 cut1_1 -mkcurve cu2 cut1_2 -mkcurve cu3 cut1_3 -mkcurve cu4 cut1_4 - -set tolerance [ maxtolerance cut1 ] - -regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxFaceTolerance -regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxEdgeTolerance -regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxVertexTolerance - -if { $MaxFaceTolerance > 1 || $MaxEdgeTolerance > 1 || $MaxVertexTolerance > 1 } { - puts "Faulty :Tolerance of shape is more then 1.0" -} else { - puts "Tolerance of shape is less then 1.0" -} - -set square 4.60842e+07 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60555_2 b/tests/bugs/modalg/buc60555_2 deleted file mode 100755 index 7e55c72f3f..0000000000 --- a/tests/bugs/modalg/buc60555_2 +++ /dev/null @@ -1,54 +0,0 @@ -puts "=============" -puts "BUC60555" -puts "CUT Case2" -puts "=============" -cpulimit 1400 -restore [locate_data_file buc60555a.brep] part -checkshape part -restore [locate_data_file buc60555b.brep] trTool1 -checkshape trTool1 - -halfspace hs1 trTool1 20000 10000 0 -bcut cut1 part hs1 -checkshape cut1 - -set che [checkshape cut1 r] -if { [regexp {OK} $che] != 1 } { - puts "Faulty : mistakes are found in checked shape by checkshape command" -} else { - puts "Checking by checkshape - OK" -} - -puts [maxtolerance cut1] - -restore [locate_data_file buc60555c.brep] trTool2 -halfspace hs2 trTool2 10000 10000 0 -bcut cut2 cut1 hs2 - -tcopy cut2 result - -explode cut2 e -mkcurve cu1 cut2_1 -mkcurve cu2 cut2_2 -mkcurve cu3 cut2_3 -mkcurve cu4 cut2_4 - -set che [checkshape cut2 r] -if { [regexp {OK} $che] != 1 } { - puts "Faulty : mistakes are found in checked shape by checkshape command" -} else { - puts "Checking by checkshape - OK" -} - -checkshape cut2 -set tolerance [ maxtolerance cut2 ] -regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxFaceTolerance -regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxEdgeTolerance -regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxVertexTolerance -if { $MaxFaceTolerance > 1 || $MaxEdgeTolerance > 1 || $MaxVertexTolerance > 1 } { - puts "Faulty : Tolerance of shape is more then 1.0" -} else { - puts "Tolerance of shape is less then 1.0" -} -set square 4.52817e+07 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60555_3 b/tests/bugs/modalg/buc60555_3 deleted file mode 100755 index eee1c97b3f..0000000000 --- a/tests/bugs/modalg/buc60555_3 +++ /dev/null @@ -1,70 +0,0 @@ -puts "==============" -puts "BUC60555" -puts "CUT Case 3" -puts "==============" -cpulimit 5000 -restore [locate_data_file buc60555a.brep] part -checkshape part -restore [locate_data_file buc60555b.brep] trTool1 -checkshape trTool1 - -halfspace hs1 trTool1 20000 10000 0 -bcut cut1 part hs1 -checkshape cut1 - -set che [checkshape cut1 r] -if { [regexp {OK} $che] != 1 } { - puts "Faulty : mistakes are found in checked shape by checkshape command" -} else { - puts "Checking by checkshape - OK" -} - -maxtolerance cut1 - -restore [locate_data_file buc60555c.brep] trTool2 -halfspace hs2 trTool2 10000 10000 0 -bcut cut2 cut1 hs2 -checkshape cut2 - -set che [checkshape cut2 r] -if { [regexp {OK} $che] != 1 } { - puts "Faulty : mistakes are found in checked shape by checkshape command" -} else { - puts "Checking by checkshape - OK" -} - -maxtolerance cut2 - -restore [locate_data_file buc60555d.brep] trTool3 -halfspace hs3 trTool3 20000 1000 0 -bcut cut3 cut2 hs3 - -tcopy cut3 result - -explode cut3 e -mkcurve cu1 cut3_1 -mkcurve cu2 cut3_2 -mkcurve cu3 cut3_3 -mkcurve cu4 cut3_4 - -set che [checkshape cut3 r] -if { [regexp {OK} $che] != 1 } { - puts "Faulty : mistakes are found in checked shape by checkshape command" -} else { - puts "Checking by checkshape - OK" -} - -checkshape cut3 - -set tolerance [ maxtolerance cut3 ] -regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxFaceTolerance -regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxEdgeTolerance -regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxVertexTolerance - -if { $MaxFaceTolerance > 1 || $MaxEdgeTolerance > 1 || $MaxVertexTolerance > 1 } { - puts "Faulty : Tolerance of shape is more then 1.0" -} else { - puts "Tolerance of shape is less then 1.0" -} -set square 2.22138e+07 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60585_1 b/tests/bugs/modalg/buc60585_1 deleted file mode 100755 index 76fbd9590a..0000000000 --- a/tests/bugs/modalg/buc60585_1 +++ /dev/null @@ -1,18 +0,0 @@ - -puts "========================" -puts "BUC60585" -puts "========================" - -restore [locate_data_file buc60585a.brep] s -checkshape s -plane ps 2036.25 -97.5 -1460.499755859375 0.0 -0.75103523489975432 -0.66026212668838646 1.0 0.0 0.0 - -psection result s ps - -set length 117.81 -set 2dviewer 0 - -## set num [lindex [checksection res] 4] -# if { $num != 0 } { -# puts " Faulty : Result shape is Unclosed !!! " -# } diff --git a/tests/bugs/modalg/buc60585_2 b/tests/bugs/modalg/buc60585_2 deleted file mode 100755 index d37af3dee1..0000000000 --- a/tests/bugs/modalg/buc60585_2 +++ /dev/null @@ -1,15 +0,0 @@ - -puts "========================" -puts "BUC60585" -puts "========================" - -restore [locate_data_file buc60585b.brep] t -checkshape t -plane pt 2036.25 -97.5 -1460.499755859375 0.0 -1.0 0.0 1.0 0.0 0.0 - -psection result t pt - -set length 22.0446 -set 2dviewer 0 - -# checksection res diff --git a/tests/bugs/modalg/buc60623_1 b/tests/bugs/modalg/buc60623_1 deleted file mode 100755 index 35906ca1d4..0000000000 --- a/tests/bugs/modalg/buc60623_1 +++ /dev/null @@ -1,15 +0,0 @@ - -puts "========================" -puts "BUC60623" -puts "========================" - -restore [locate_data_file buc60623a.brep] a -checkshape a -restore [locate_data_file buc60623b.brep] b -checkshape b - -bsection result a b - -set length 1475.98 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/buc60623_2 b/tests/bugs/modalg/buc60623_2 deleted file mode 100755 index 25d0b279e6..0000000000 --- a/tests/bugs/modalg/buc60623_2 +++ /dev/null @@ -1,15 +0,0 @@ - -puts "========================" -puts "BUC60623" -puts "========================" - -restore [locate_data_file buc60623a.brep] a -checkshape a -restore [locate_data_file buc60623b.brep] b -checkshape b - -bsection result b a -# checksection res - -set length 1475.98 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60635 b/tests/bugs/modalg/buc60635 deleted file mode 100755 index c477cdba39..0000000000 --- a/tests/bugs/modalg/buc60635 +++ /dev/null @@ -1,13 +0,0 @@ - -puts "=============" -puts "BUC60635" -puts "=============" - -restore [locate_data_file buc60635a.brep] a -checkshape a - -mkplane result a - -set square 2035.58 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/buc60649 b/tests/bugs/modalg/buc60649 deleted file mode 100755 index 313cc938cf..0000000000 --- a/tests/bugs/modalg/buc60649 +++ /dev/null @@ -1,20 +0,0 @@ -puts "==========" -puts "BUC60649" -puts "BUC60657" -puts "==========" -puts "" - -restore [locate_data_file buc60649a.brep] a -checkshape a - -set che [checkshape a rr] -if { [regexp {OK} $che] != 1 } { - puts "Faulty : mistakes are found in SOURCE shape by checkshape command" - puts "Body of the script was not executed" -} else { - puts "Checking of SOURCE shape by checkshape - OK" - mkoffset result a 1 1 - renamevar result_1 result -} -set length 271.473 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60663_1 b/tests/bugs/modalg/buc60663_1 deleted file mode 100755 index 2cf7b73aac..0000000000 --- a/tests/bugs/modalg/buc60663_1 +++ /dev/null @@ -1,26 +0,0 @@ - -puts "=====================================" -puts "BUC60663" -puts "=====================================" -puts "" -puts "It takes visual check for this BUG. See V2 point" -puts "=====================================" -puts "" - -restore [locate_data_file buc60663a.brep] a -checkshape a -restore [locate_data_file buc60663b.brep] b -checkshape b - -bsection result a b - -regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection result] full num -if { $num != 2 } { - puts " Faulty : Result shape is INcorrect !!! " -} - - -#fsameparameter res - -set length 26.2001 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60663_2 b/tests/bugs/modalg/buc60663_2 deleted file mode 100755 index 3bf367be9f..0000000000 --- a/tests/bugs/modalg/buc60663_2 +++ /dev/null @@ -1,33 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty : the distanse is" -puts "TODO OCC12345 ALL: Error : The length of result shape is" - -puts "=====================================" -puts "BUC60663" -puts "=====================================" -puts "" -puts "It takes visual check for this BUG." -puts "=====================================" -puts "" - -restore [locate_data_file buc60663a.brep] a -checkshape a -restore [locate_data_file buc60663b.brep] b -checkshape b - -bsection result a b - -set expl [explode result v] -set len [llength $expl] -set ver [lindex $expl [expr $len - 1]] -explode b e -explode b_4 v -distmini d $ver b_5 - -regexp {([-0-9.+eE]+)$} [dump d_val] full dist -regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} [maxtolerance $ver] full toler - -if {$dist > $toler} { - puts "Faulty : the distanse is $dist. It is more $toler." -} -set length 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60668 b/tests/bugs/modalg/buc60668 deleted file mode 100755 index 0aef85e0b9..0000000000 --- a/tests/bugs/modalg/buc60668 +++ /dev/null @@ -1,27 +0,0 @@ - -puts "====================" -puts "BUC60668" -puts "Three boxes must appear on picture" -puts "====================" - -box b 100 0 0 10 10 10 -box b1 10 10 10 -box b2 50 50 50 10 10 10 -box a -10 -10 -10 200 200 200 - -compound b b1 b2 c - -regexp {Mass +: +([-0-9.+eE]+)} [vprops c] full vcomp - -#compound b b1 c -bcommon result c a - -regexp {Mass +: +([-0-9.+eE]+)} [vprops result] full vcomm - -if { $vcomp != $vcomm } { - puts " Faulty : Common is incorrect" -} else { - puts " BUC60668 OK : Common was made properly" -} -set square 1800 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60669 b/tests/bugs/modalg/buc60669 deleted file mode 100755 index ef4feb62a5..0000000000 --- a/tests/bugs/modalg/buc60669 +++ /dev/null @@ -1,21 +0,0 @@ -pload QAcommands - -puts "==================" -puts "BUC60669" -puts "==================" -puts "" -############################################################# -## An exception was caught OSD_SIGBUS: SIGBUS 'bus error' detected.** -## Exception ** OSD_SIGBUS: SIGBUS 'bus error' detected. -############################################################# - -restore [locate_data_file buc60669a.brep] shell1 -checkshape shell1 -restore [locate_data_file buc60669b.brep] shell2 -checkshape shell2 - -ksection result shell1 shell2 1000 0.0001 0.00001 0 - -#checksection res -set length 104.754 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60682 b/tests/bugs/modalg/buc60682 deleted file mode 100755 index 95f9416e67..0000000000 --- a/tests/bugs/modalg/buc60682 +++ /dev/null @@ -1,32 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty BUC60682" -puts "TODO OCC12345 ALL: Error : The square of result shape is" -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" - -pload QAcommands - -puts "==================" -puts "BUC60682" -puts "==================" - -restore [locate_data_file buc60682a.brep] shell1 -restore [locate_data_file buc60682b.brep] shell2 - -set che [checkshape shell1] -if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty BUC60682 (shell 1): Source shape is invalid. It was detected by Checkshape command" - puts "Body of the script was NOT executed" - renamevar shell1 result -} else { - puts "BUC60682 OK (shell 1): Source shape is valid" - set che [checkshape shell2] - if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty BUC60682 (shell 2): Source shape is invalid. It was detected by Checkshape command" - puts "Body of the script was NOT executed" - renamevar shell2 result - } else { - puts "BUC60682 OK (shell 2): Source shape is valid" - ksection result shell1 shell2 1000 0.0001 0.00001 0 - } -} -set square 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60684 b/tests/bugs/modalg/buc60684 deleted file mode 100755 index 487dc7748d..0000000000 --- a/tests/bugs/modalg/buc60684 +++ /dev/null @@ -1,12 +0,0 @@ - -puts "=============" -puts "BUC60684" -puts "=============" - -restore [locate_data_file buc60684a.brep] w -checkshape w - -prism result w 0 0 10 - -set square 148.875 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60690 b/tests/bugs/modalg/buc60690 deleted file mode 100755 index 66b214437e..0000000000 --- a/tests/bugs/modalg/buc60690 +++ /dev/null @@ -1,48 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty : The distance between" -puts "TODO OCC12345 ALL: Error : The length of result shape is" - -puts "========================" -puts "BUC60690" -puts "========================" -puts "" - -restore [locate_data_file buc60690a.brep] a -restore [locate_data_file buc60690b.brep] b - -set che [checkshape a] -if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty BUC60690 (shape 1): Source shape is invalid. It was detected by Checkshape command" - puts "Body of the script was NOT executed" - renamevar a result -} else { - puts "BUC60690 OK (shape 1): Source shape is valid" - set che [checkshape b] - if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty BUC60690 (shape 2): Source shape is invalid. It was detected by Checkshape command" - puts "Body of the script was NOT executed" - renamevar b result - } else { - puts "BUC60690 OK (shape 2): Source shape is valid" - - bsection result a b - - set le [explode result v] - distmini d1 result_1 b - distmini d2 [lindex $le [expr [llength $le] - 1]] b - - regexp {([-0-9.+eE]+)$} [dump d1_val] full du1 - - if { [expr $du1 > 1e-7] } { - puts "Faulty : The distance between first vertex and shellB is $du1. It is more then 1e-7." - } - - regexp {([-0-9.+eE]+)$} [dump d2_val] full du2 - if { [expr $du2 > 1e-7] } { - puts "Faulty : The distance between last vertex and shellB is $du2. It is more then 1e-7." - } - } -} -set length 0 -set 2dviewer 0 - - diff --git a/tests/bugs/modalg/buc60703_1 b/tests/bugs/modalg/buc60703_1 deleted file mode 100755 index 46b25d82eb..0000000000 --- a/tests/bugs/modalg/buc60703_1 +++ /dev/null @@ -1,37 +0,0 @@ -#puts "TODO OCC12345 ALL: An exception was caught" -#puts "TODO OCC12345 ALL: Exception" -#puts "TODO OCC12345 ALL: Faulty BUC60703: here is problem with FUSE operation" - -puts "========================" -puts "BUC60703" -puts "=================================" -puts "Action with models with VERY BIG tolerance" -puts "=================================" -########################################## -## Crash during a fuse whilst two plans are tangent. -## ( Case has LIMITATION status currently ) -########################################## - -#cpulimit 9000 - -restore [locate_data_file buc60703a.brep] a -# maxtolerance a -checkshape a -restore [locate_data_file buc60703b.brep] b -# maxtolerance b -checkshape b - -if [catch {bfuse result a b } catch_result] { - puts "Faulty BUC60703: here is problem with FUSE operation" -} else { - puts "OK OCC348: function FUSE works ok" - if [catch {checkshape result } catch_result] { - puts "Faulty BUC60703 : here is checking problem." - } else { - puts "BUC60703 OK" - } - # maxtolerance res - set square 237.333 - set 2dviewer 0 -} - diff --git a/tests/bugs/modalg/buc60703_2 b/tests/bugs/modalg/buc60703_2 deleted file mode 100755 index a8a4b772e2..0000000000 --- a/tests/bugs/modalg/buc60703_2 +++ /dev/null @@ -1,31 +0,0 @@ - -puts "========================" -puts "BUC60703" -puts "=================================" -puts "Action with models with CORRECT tolerance" -puts "=================================" -puts "" -############################################ -## Crash during a fuse whilst two plans are tangent. -############################################ - -restore [locate_data_file buc60703c.brep] a -checkshape a - -restore [locate_data_file buc60703e.brep] b -checkshape b - - -if [catch {bfuse result a b } catch_result] { - puts "Faulty BUC60703: here is problem with FUSE operation" -} else { - puts "OK BUC60703: function FUSE works ok" - if [catch {checkshape result } catch_result] { - puts "WARNING BUC60703 : Function checkshape gives bad result" - puts " See also OCC438: 919 D3 and D4" - } else { - puts "BUC60703 OK in checkshape" - } -} -set square 236.72 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60703_3 b/tests/bugs/modalg/buc60703_3 deleted file mode 100755 index fc773b64cc..0000000000 --- a/tests/bugs/modalg/buc60703_3 +++ /dev/null @@ -1,24 +0,0 @@ - -puts "========================" -puts "BUC60703" -puts "========================" - -restore [locate_data_file buc60703e.brep] a -#maxtolerance a -checkshape a -restore [locate_data_file buc60703d.brep] b -#maxtolerance b -checkshape b - -if [catch {bfuse result a b } catch_result] { - puts "Faulty BUC60703: here is problem with FUSE operation" -} else { - puts "OK OCC348: function FUSE works ok" - if [catch {checkshape result} catch_result] { - puts "Faulty BUC60703 : here is checking problem. See also OCC438: 919 D3 and D4" - } else { - puts "BUC60703 : here is NOT checking problem" - } -} -set square 371.259 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60703_4 b/tests/bugs/modalg/buc60703_4 deleted file mode 100755 index 32f006487f..0000000000 --- a/tests/bugs/modalg/buc60703_4 +++ /dev/null @@ -1,35 +0,0 @@ - -puts "========================" -puts "BUC60703" -puts "========================" -puts "" -#################################### -## Crash during a fuse whilst two plans are tangent. -#################################### - -restore [locate_data_file buc60703d.brep] a -#maxtolerance a -checkshape a -restore [locate_data_file buc60703f.brep] b -#maxtolerance b -checkshape b - -if [catch {bfuse result a b } catch_result] { - puts "Faulty BUC60703: here is problem with FUSE operation" -} else { - puts "OK OCC348: function FUSE works ok" - if [catch {checkshape result} catch_result] { - set mistake 1 - } else { - set mistake 0 - } - - if { $mistake != 0} { - puts "Faulty BUC60703 : here is checking problem. See also OCC438: 919 D3 and D4" - } else { - puts "BUC60703 : here is NOT checking problem" - } -} -set square 505.797 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/buc60704 b/tests/bugs/modalg/buc60704 deleted file mode 100755 index 85a5fed6d0..0000000000 --- a/tests/bugs/modalg/buc60704 +++ /dev/null @@ -1,15 +0,0 @@ - -puts "========================" -puts "BUC60704" -puts "BUC60709" -puts "========================" - -restore [locate_data_file buc60704a.brep] p -checkshape p -restore [locate_data_file buc60704b.brep] s -checkshape s - -bfuse result p s - -set square 39.0889 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60708 b/tests/bugs/modalg/buc60708 deleted file mode 100755 index 906f393778..0000000000 --- a/tests/bugs/modalg/buc60708 +++ /dev/null @@ -1,24 +0,0 @@ - -puts "===========" -puts "BUC60708" -puts "===========" - -restore [locate_data_file buc60708a.brep] a -checkshape a -restore [locate_data_file buc60708b.brep] b -checkshape b - -bcommon result a b - -set faces [explode result f] -set n [llength $faces] - -set end [lindex $faces [expr $n-1]] - -if { $end != "result_4" } { - puts " Faulty :Common operation was made wrongly" -} else { - puts " Common operation was made successfully" -} -set square 13.4871 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60712 b/tests/bugs/modalg/buc60712 deleted file mode 100755 index dfe87f1ddb..0000000000 --- a/tests/bugs/modalg/buc60712 +++ /dev/null @@ -1,50 +0,0 @@ -puts "==========" -puts "BUC60712" -puts "==========" -puts "" -puts "==================================" -puts "It takes visual check for this BUG" -puts "==================================" - -# -# OCC22070: Grid Tests: CHL set, detected problems -# Problems: -# The shape buc60712a.brep is self-interferred. -# thus it can not be used as the argument for Boolean Operation Algorithm. -# -# Proposals: -# The Case chl/902/F3 should be removed or rewritten: - -restore [locate_data_file buc60712a.brep] a -checkshape a - -restore [locate_data_file buc60712b.brep] b -checkshape b - -# Recompute "a" shape -explode a f - -bop a_1 a_2 -bopfuse r12 - -bop a_3 a_4 -bopfuse r34 - -bop r12 r34 - -bopfuse r - -# Start boolean operation -bop r b -bopsection result - -# Check result -regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection result] full num -# Resume -if { $num != 0 } { - puts " Faulty BUC60712: Result shape is INcorrect !!! " -} else { - puts "BUC60712 OK: Result shape is correct " -} -set length 1.88145 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60714 b/tests/bugs/modalg/buc60714 deleted file mode 100755 index b0d5e443e4..0000000000 --- a/tests/bugs/modalg/buc60714 +++ /dev/null @@ -1,23 +0,0 @@ - -puts "========================" -puts "BUC60714" -puts "========================" - -profile f x 30 y 20 x -30 -explode f w -vertex v1 0 0 0 -vertex v2 0 -10 -10 -edge e v1 v2 - -wire w e -mksweep f_1 -setsweep -FR -addsweep w - -######## -#does'nt work -buildsweep result -C -S - -set square 1979.9 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/buc60728 b/tests/bugs/modalg/buc60728 deleted file mode 100755 index 278e19f85f..0000000000 --- a/tests/bugs/modalg/buc60728 +++ /dev/null @@ -1,22 +0,0 @@ - -puts "========================" -puts "BUC60728" -puts "========================" -puts "" -#################################################### -## Infinite loop in section. Section between the two attached faces never finish. -#################################################### - -restore [locate_data_file buc60728a.brep] s1 -restore [locate_data_file buc60728b.brep] s2 -build3d s1 -checkshape s1 -checkshape s2 - -bsection result s1 s2 - -#checksection res -#checkshape res - -set length 238.032 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60744 b/tests/bugs/modalg/buc60744 deleted file mode 100755 index e5cde98d9e..0000000000 --- a/tests/bugs/modalg/buc60744 +++ /dev/null @@ -1,47 +0,0 @@ -pload QAcommands - -puts "========================" -puts "BUC60744" -puts "========================" -puts "" - -restore [locate_data_file buc60744a.brep] a -restore [locate_data_file buc60744b.brep] b - -set che [checkshape a] -if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty BUC60744 (shape 1): Source shape is invalid. It was detected by Checkshape command" - puts "Body of the script was NOT executed" - renamevar a result -} else { - puts "BUC60744 OK (shape 1): Source shape is valid" - - set che [checkshape b] - if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty BUC60744 (shape 2): Source shape is invalid. It was detected by Checkshape command" - puts "Body of the script was NOT executed" - renamevar b result - } else { - puts "BUC60744 OK (shape 2): Source shape is valid" - - ksection result a b 1000 0.0001 0.00001 0 - - set ne [llength [explode result e]] - set nv [llength [explode result v]] - - if {$ne >= $nv} { - puts [format "Faulty : the number of edges is %s, but the number of vertexes is %s." $ne $nv] - } - } -} -bsection result a b - -set ne [llength [explode result e]] -set nv [llength [explode result v]] - -if {$ne >= $nv} { - puts [format "Faulty : the number of edges is %s, but the number of vertexes is %s." $ne $nv] -} - -set length 228.386 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60776_1 b/tests/bugs/modalg/buc60776_1 deleted file mode 100755 index 108307777a..0000000000 --- a/tests/bugs/modalg/buc60776_1 +++ /dev/null @@ -1,16 +0,0 @@ - -puts "========================" -puts "BUC60776" -puts "========================" - -restore [locate_data_file buc60776a.brep] a -checkshape a -restore [locate_data_file buc60776b.brep] b -checkshape b -bfuse result a b - -set square 60771.3 - -set 2dviewer 1 - - diff --git a/tests/bugs/modalg/buc60776_2 b/tests/bugs/modalg/buc60776_2 deleted file mode 100755 index a8e30d8d1d..0000000000 --- a/tests/bugs/modalg/buc60776_2 +++ /dev/null @@ -1,15 +0,0 @@ - -puts "========================" -puts "BUC60776" -puts "========================" - -restore [locate_data_file buc60776c.brep] a -checkshape a -restore [locate_data_file buc60776d.brep] b -checkshape b -bsection result a b - -set length 111.405 - -set 2dviewer 1 - diff --git a/tests/bugs/modalg/buc60777 b/tests/bugs/modalg/buc60777 deleted file mode 100755 index 1ef9960273..0000000000 --- a/tests/bugs/modalg/buc60777 +++ /dev/null @@ -1,24 +0,0 @@ - -puts "========================" -puts "BUC60777" -puts "========================" - -profile p x 30 y -10 x 10 y 10 x 10 y 30 t -30 -20 t -30 20 -mkoffset result p 1 -1 -explode p w - -regexp {Mass +: +([-0-9.+eE]+)} [lprops result_1] full end -regexp {Mass +: +([-0-9.+eE]+)} [lprops p_1] full end1 - -if { $end >= $end1} { - puts " Faulty Mkoffset operation was made wrongly" - } else { - puts " Mkoffset operation was made successfully" -} - -# Lenth of "profile" : 203.733802110964 - -renamevar result_1 result - -set length 191.044 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60782_1 b/tests/bugs/modalg/buc60782_1 deleted file mode 100755 index c937fdef4a..0000000000 --- a/tests/bugs/modalg/buc60782_1 +++ /dev/null @@ -1,38 +0,0 @@ -puts "TODO OCC12345 ALL: An exception was caught" -puts "TODO OCC12345 ALL: Exception" -puts "TODO OCC12345 ALL: Faulty BUC60782: mkoffset works wrongly" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -puts "========================" -puts "BUC60782" -puts "CASE 1" -puts "========================" -puts "" -puts "Results of Geom2d_OffsetCurve are sometimes strange (not correct). " -puts "" - -restore [locate_data_file buc60782a.brep] a -set che [checkshape a] -if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty BUC60782 (case 1): Source shape is invalid" -} else { - puts "BUC60782 OK (case 1): Sourse shape is correct" -} - -set che [checkshape a rr] -if { [regexp {OK} $che ] != 1} { - puts "Faulty : mistakes are found in SOURCE shape by checkshape command" - puts "Body of the script was not executed" -} else { - puts "Checking of SOURCE shape by checkshape - OK" - if [catch { mkoffset result a 1 10 } catch_result] { - puts "Faulty BUC60782: mkoffset works wrongly" - renamevar a result - } else { - puts "OK BUC60782: offset is created" - tpcompound result - } -} - -set square 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60782_2 b/tests/bugs/modalg/buc60782_2 deleted file mode 100755 index 7d042a14b8..0000000000 --- a/tests/bugs/modalg/buc60782_2 +++ /dev/null @@ -1,36 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_2" -puts "TODO OCC12345 ALL: Faulty : mistakes are found in SOURCE shape by checkshape command" -puts "TODO OCC12345 ALL: Faulty BUC60782" - -puts "========================" -puts "BUC60782" -puts "CASE 2" -puts "========================" -puts "" -puts "Results of Geom2d_OffsetCurve are sometimes strange (not correct). " -puts "" - -restore [locate_data_file buc60782b.brep] a -set che [checkshape a] -if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty BUC60782 (case 2): Source shape is invalid" -} else { - puts "BUC60782 OK (case 2): Sourse shape is correct" -} - -set che [checkshape a rr] -if { [regexp {OK} $che ] != 1} { - puts "Faulty : mistakes are found in SOURCE shape by checkshape command" - puts "Body of the script was not executed" -} else { - puts "Checking of SOURCE shape by checkshape - OK" - if [catch { mkoffset result a 1 10 } catch_result] { - puts "Faulty BUC60782: mkoffset works wrongly" - renamevar a result - } else { - puts "OK BUC60782: offset is created" - tpcompound result - } - set square 0 - set 2dviewer 0 -} diff --git a/tests/bugs/modalg/buc60782_3 b/tests/bugs/modalg/buc60782_3 deleted file mode 100755 index e1eb11f6d3..0000000000 --- a/tests/bugs/modalg/buc60782_3 +++ /dev/null @@ -1,39 +0,0 @@ -puts "TODO OCC12345 ALL: An exception was caught" -puts "TODO OCC12345 ALL: Exception" -puts "TODO OCC12345 ALL: Faulty BUC60782: mkoffset works wrongly" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - - -puts "========================" -puts "BUC60782" -puts "CASE 3" -puts "========================" -puts "" -puts "Results of Geom2d_OffsetCurve are sometimes strange (not correct). " -puts "" - -restore [locate_data_file buc60782c.brep] a - -set che [checkshape a] -if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty BUC60782 (case 3): Source shape is invalid" -} else { - puts "BUC60782 OK (case 3): Sourse shape is correct" -} - -set che [checkshape a rr] -if { [regexp {OK} $che ] != 1 } { - puts "Faulty : mistakes are found in SOURCE shape by checkshape command" - puts "Body of the script was not executed" -} else { - puts "Checking of SOURCE shape by checkshape - OK" - if [catch { mkoffset result a 1 10 } catch_result] { - puts "Faulty BUC60782: mkoffset works wrongly" - renamevar a result - } else { - puts "OK BUC60782: offset is created" - tpcompound result - } -} -set square 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60787_1 b/tests/bugs/modalg/buc60787_1 deleted file mode 100755 index 2119030376..0000000000 --- a/tests/bugs/modalg/buc60787_1 +++ /dev/null @@ -1,30 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty : result should be a shell, but not a compound of faces" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -puts "========" -puts "BUC60787" -puts "BUC60783" -puts "========" - -#restore Common_Shell_Case2.brep S1 -#restore Common_Solid_Case2.brep S2 - -restore [locate_data_file buc60787a.brep] S1 -checkshape S1 -restore [locate_data_file buc60787b.brep] S2 -checkshape S1 - -bcommon result S1 S2 - -set nb_info [nbshapes result] -regexp {COMPOUND +: +([-0-9.+eE]+)} $nb_info full err -regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full err1 - -if { $err != 0 || $err1 != 1} { - puts "Faulty : result should be a shell, but not a compound of faces" -} else { - puts "BUC60787 - OK" -} - -set square 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60787_2 b/tests/bugs/modalg/buc60787_2 deleted file mode 100755 index 48e5ec78e1..0000000000 --- a/tests/bugs/modalg/buc60787_2 +++ /dev/null @@ -1,29 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty : result should be a shell, but not a compound of faces" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -puts "========" -puts "BUC60787" -puts "BUC60783" -puts "========" - -#restore Cut_Shell_Case2.brep S1 -#restore Cut_Solid_Case2.brep S2 - -restore [locate_data_file buc60787c.brep] S1 -checkshape S1 -restore [locate_data_file buc60787d.brep] S2 -checkshape S2 - -bcut result S1 S2 - -set nb_info [nbshapes result] -regexp {COMPOUND +: +([-0-9.+eE]+)} $nb_info full err -regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full err1 - -if { $err != 0 || $err1 != 1} { - puts "Faulty : result should be a shell, but not a compound of faces" -} else { - puts "BUC60787 - OK" -} -set square 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60788_1 b/tests/bugs/modalg/buc60788_1 deleted file mode 100755 index bc6ba4bc1b..0000000000 --- a/tests/bugs/modalg/buc60788_1 +++ /dev/null @@ -1,28 +0,0 @@ - -puts "============" -puts "BUC60788" -puts "case 1" -puts "============" - -#restore Intersection_Shell1_Case1.brep S1 -#restore Intersection_Shell2_Case1.brep S2 - -restore [locate_data_file buc60788a.brep] S1 -checkshape S1 -restore [locate_data_file buc60788b.brep] S2 -checkshape S2 - -bsection result S1 S2 - -set nb_info [nbshapes result] -regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full err -regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full err1 - -if { $err != 4 && $err1 != 3} { - puts "Faulty : result (res) is incorrect" -} else { - puts "BUC60788 - OK" -} - -set length 750 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60788_2 b/tests/bugs/modalg/buc60788_2 deleted file mode 100755 index 5b9c8ff92c..0000000000 --- a/tests/bugs/modalg/buc60788_2 +++ /dev/null @@ -1,29 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty : result should be a shell, but not a compound of faces" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -puts "========" -puts "BUC60788" -puts "case 3" -puts "========" - -#restore Cut_Shell_Case2.brep S1 -#restore Cut_Solid_Case2.brep S2 - -restore [locate_data_file buc60788e.brep] S1 -checkshape S1 -restore [locate_data_file buc60787d.brep] S2 -checkshape S2 - -bcut result S1 S2 - -set nb_info [nbshapes result] -regexp {COMPOUND +: +([-0-9.+eE]+)} $nb_info full err -regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full err1 - -if { $err != 0 || $err1 != 1} { - puts "Faulty : result should be a shell, but not a compound of faces" -} else { - puts "BUC60788 - OK" -} -set square 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60788_3 b/tests/bugs/modalg/buc60788_3 deleted file mode 100755 index dbf3fd88dd..0000000000 --- a/tests/bugs/modalg/buc60788_3 +++ /dev/null @@ -1,29 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty : result should be a shell, but not a compound of faces" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -puts "========" -puts "BUC60788" -puts "case 2" -puts "========" - -#restore Common_Shell_Case2.brep S1 -#restore Common_Solid_Case2.brep S2 - -restore [locate_data_file buc60788c.brep] S1 -checkshape S1 -restore [locate_data_file buc60787b.brep] S2 -checkshape S1 - -bcommon result S1 S2 - -set nb_info [nbshapes result] -regexp {COMPOUND +: +([-0-9.+eE]+)} $nb_info full err -regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full err1 - -if { $err != 0 || $err1 != 1} { - puts "Faulty : result should be a shell, but not a compound of faces" -} else { - puts "BUC60788 - OK" -} -set square 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60789_1 b/tests/bugs/modalg/buc60789_1 deleted file mode 100755 index b35e264144..0000000000 --- a/tests/bugs/modalg/buc60789_1 +++ /dev/null @@ -1,26 +0,0 @@ - -puts "========" -puts "BUC60789" -puts "========" -puts "" - -#restore buc60789a.brep S1 -restore [locate_data_file buc60787b.brep] S1 -### (by apn during classification) -checkshape S1 -restore [locate_data_file buc60789b.brep] S2 -checkshape S2 - -bcommon result S1 S2 - -set nb_info [nbshapes result] -regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve -regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full ed - -if { $ve != 0 && $ed != 0 } { - puts " BUC60789 OK: COMMON operation was made properly" -} else { - puts "Faulty BUC60789: COMMON operation was made wrongly" -} -set length 78.3594 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60789_2 b/tests/bugs/modalg/buc60789_2 deleted file mode 100755 index 8ae8dde94e..0000000000 --- a/tests/bugs/modalg/buc60789_2 +++ /dev/null @@ -1,26 +0,0 @@ - -puts "========" -puts "BUC60789" -puts "========" -puts "" - -#restore buc60789c.brep S1 -##by apn -restore [locate_data_file buc60787b.brep] S1 -checkshape S1 -restore [locate_data_file buc60789d.brep] S2 -checkshape S2 - -bcut result S2 S1 - -set nb_info [nbshapes result] -regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve -regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full ed - - if { $ve != 0 && $ed != 0 } { - puts " BUC60789 OK: CUT operation was made properly" - } else { - puts "Faulty BUC60789: CUT operation was made wrongly" - } -set length 288.856 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60801 b/tests/bugs/modalg/buc60801 deleted file mode 100755 index 2adb282d60..0000000000 --- a/tests/bugs/modalg/buc60801 +++ /dev/null @@ -1,19 +0,0 @@ - -puts "========================" -puts "BUC60801" -puts "========================" - -box b -10 -10 -10 30 40 40 -box a1 -20 0 -20 20 20 100 -box a2 0 20 -20 50 20 100 -box c -20 -20 20 100 100 100 -bcut r1 b a1 -bcut r2 r1 a2 -bcut r3 r2 c -checkshape r3 - -renamevar r3 result - -set square 6400 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/buc60803 b/tests/bugs/modalg/buc60803 deleted file mode 100755 index 78d48220fa..0000000000 --- a/tests/bugs/modalg/buc60803 +++ /dev/null @@ -1,15 +0,0 @@ - -puts "========================" -puts "BUC60803" -puts "========================" - -restore [locate_data_file buc60803a.brep] a -checkshape a -restore [locate_data_file buc60803b.brep] b -checkshape b - -bfuse result a b - -set square 1.86064e+07 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/buc60830_4 b/tests/bugs/modalg/buc60830_4 deleted file mode 100755 index d0b5e69dcf..0000000000 --- a/tests/bugs/modalg/buc60830_4 +++ /dev/null @@ -1,20 +0,0 @@ -puts "=============" -puts "BUC60830" -puts "BUC60829" -puts "=============" - -restore [locate_data_file BUC60830-face2.brep] f -checkshape f - -set che [checkshape f rr] -if { [regexp {OK} $che] != 1 } { - puts "Faulty : mistakes are found in SOURCE shape by checkshape command" - puts "Body of the script was not executed" -} else { - puts "Checking of SOURCE shape by checkshape - OK" - mkoffset result f 1 3 - renamevar result_1 result -} - -set length 81.5088 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60839 b/tests/bugs/modalg/buc60839 deleted file mode 100755 index cad2dbf042..0000000000 --- a/tests/bugs/modalg/buc60839 +++ /dev/null @@ -1,17 +0,0 @@ - -puts "============" -puts "BUC60839" -puts "============" -puts "" - -restore [locate_data_file BUC60839-1.brep] a -checkshape a -restore [locate_data_file BUC60839-2.brep] b -checkshape b - -puts "Starting fuse operation" - -bfuse result a b - -set square 27341.6 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60841 b/tests/bugs/modalg/buc60841 deleted file mode 100755 index b12cccc345..0000000000 --- a/tests/bugs/modalg/buc60841 +++ /dev/null @@ -1,14 +0,0 @@ - -puts "========" -puts "BUC60841" -puts "========" - -restore [locate_data_file buc60841a.brep] sh1 -checkshape sh1 -restore [locate_data_file buc60841b.brep] sh2 -checkshape sh2 - -bfuse result sh1 sh2 - -set square 890971 -set 2dviewer 1 diff --git a/tests/bugs/modalg/buc60849 b/tests/bugs/modalg/buc60849 deleted file mode 100755 index cf84ffe5ef..0000000000 --- a/tests/bugs/modalg/buc60849 +++ /dev/null @@ -1,19 +0,0 @@ - -puts "============" -puts "BUC60849" -puts "============" -puts "" - -restore [locate_data_file BUC60849.brep] result -checkshape result - -set bndb [ lindex [bounding result] 3 ] - -if { $bndb > 100.000001 } { - puts "Faulty BUC60849 : Bounding box of spherical surface is created wroughly." -} else { - puts "BUC60849 OK :Bounding box of spherical surface is created properly." -} -set square 125663 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/buc60865 b/tests/bugs/modalg/buc60865 deleted file mode 100755 index 0b3f61ac12..0000000000 --- a/tests/bugs/modalg/buc60865 +++ /dev/null @@ -1,28 +0,0 @@ - -puts "============" -puts "BUC60865" -puts "BUC60864" -puts "============" -puts "" -########################## -## Section gives duplicate edges. -########################## - -restore [locate_data_file BUC60865_sh6.brep] sh -checkshape sh - -plane pl 1.1 0.99999 1 0 1 0 -mkface f pl -bsection result sh f - -set nb_info [nbshapes result] -regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full ed - -if { $ed == 5 } { - puts " BUC60865 : SECTION operation was made properly" -} else { - puts "Faulty BUC60865: SECTION operation was made wrongly" -} -set length 4.5 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/buc60878_1 b/tests/bugs/modalg/buc60878_1 deleted file mode 100755 index c5fe7f4740..0000000000 --- a/tests/bugs/modalg/buc60878_1 +++ /dev/null @@ -1,25 +0,0 @@ -puts "=============" -puts "BUC60878" -puts "=============" - -#restore BUC60878-wire1.brep a -#########dtext -10 -10 -60 "THE CASE IS INCORRECT" -#mkoffset r a 1 0.5 -#tpcompound res -#checkshape res - -restore [locate_data_file BUC60878-wire1.brep] a -checkshape a - -set che [checkshape a rr] -if { [regexp {OK} $che] != 1 } { - puts "Faulty : mistakes are found in SOURCE shape by checkshape command" - puts "Body of the script was not executed" -} else { - puts "Checking of SOURCE shape by checkshape - OK" - mkoffset result a 1 0.5 - renamevar result_1 result -} - -set length 370.796 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60878_2 b/tests/bugs/modalg/buc60878_2 deleted file mode 100755 index f68c06d12d..0000000000 --- a/tests/bugs/modalg/buc60878_2 +++ /dev/null @@ -1,25 +0,0 @@ -puts "=============" -puts "BUC60878" -puts "=============" - -#restore BUC60878-wire3.brep a -#########dtext -10 -10 -60 "THE CASE IS INCORRECT" -#mkoffset r a 1 0.25 -#tpcompound res -#checkshape res - -restore [locate_data_file BUC60878-wire3.brep] a -checkshape a - -set che [checkshape a rr] -if { [regexp {OK} $che] != 1 } { - puts "Faulty : mistakes are found in SOURCE shape by checkshape command" - puts "Body of the script was not executed" -} else { - puts "Checking of SOURCE shape by checkshape - OK" - mkoffset result a 1 0.25 - renamevar result_1 result -} - -set length 11.2406 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60878_3 b/tests/bugs/modalg/buc60878_3 deleted file mode 100755 index a67e88e0e8..0000000000 --- a/tests/bugs/modalg/buc60878_3 +++ /dev/null @@ -1,25 +0,0 @@ -puts "=============" -puts "BUC60878" -puts "=============" - -#restore BUC60878-wire5.brep a -###############dtext 0 -10 0 "THE CASE IS INCORRECT" -#mkoffset r a 1 4 -#tpcompound res -#checkshape res - -restore [locate_data_file BUC60878-wire5.brep] a -checkshape a - -set che [checkshape a rr] -if { [regexp {OK} $che] != 1 } { - puts "Faulty : mistakes are found in SOURCE shape by checkshape command" - puts "Body of the script was not executed" -} else { - puts "Checking of SOURCE shape by checkshape - OK" - mkoffset result a 1 4 - renamevar result_1 result -} - -set length 107.351 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60880 b/tests/bugs/modalg/buc60880 deleted file mode 100755 index e488e343ed..0000000000 --- a/tests/bugs/modalg/buc60880 +++ /dev/null @@ -1,38 +0,0 @@ - -puts "============" -puts "BUC60880" -puts "============" -puts "" -########################################## -## We have overlapping edges when section a shell by plane. -########################################## - -restore [locate_data_file BUC60880_sec_error2.brep] sh -checkshape sh - -plane pl 65000 19000 2600 1 0 0 -mkface f pl - -bsection result sh f - -set nb_info [nbshapes result] -regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full ed - -if { $ed == 1 } { - puts "BUC60880 OK: SECTION operation was made properly" -} else { - explode result e - set status [OCC333 result_1 result_2] - if {[llength ${status}] < 1} { - puts "BUC60880 ERROR" - } else { - regexp {([-0-9.+eE]+)} $status full code - if { ${code} == 3 || ${code} == 2} { - puts "BUC60880 : Section command works properly" - } else { - puts "Faulty BUC60880: Section was made WRONGLY" - } - } -} -set length 1424.94 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60881 b/tests/bugs/modalg/buc60881 deleted file mode 100755 index 0c4a2f7b2b..0000000000 --- a/tests/bugs/modalg/buc60881 +++ /dev/null @@ -1,15 +0,0 @@ - -puts "============" -puts "BUC60881" -puts "============" -puts "" - -restore [locate_data_file BUC60881.brep] a -explode a -checkshape a_1 -checkshape a_1 - -bfuse result a_1 a_2 - -set square 34069 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60882 b/tests/bugs/modalg/buc60882 deleted file mode 100755 index 0d57ec2e40..0000000000 --- a/tests/bugs/modalg/buc60882 +++ /dev/null @@ -1,45 +0,0 @@ -puts "============" -puts "BUC60882" -puts "============" -puts "" -####################################################################### -## The edge is corrupted after applying command "fsameparameter": tolerance is increased up to 1e+50 -####################################################################### - -pload XDE - -restore [locate_data_file BUC60882_samepar.brep] result - -set che [checkshape result] - -if { [regexp {Faulty} $che ] == 1 } { - puts "Warning BUC60882: Source shape is NOT correct. It was detected by Checkshape command" -} else { - puts "BUC60882 OK: Source shape is valid" -} - -puts "*** Before : " - -regexp {Tolerance +MAX=([-0-9.+eE]+)} [tolerance result] full MaxTol - -puts "MaxTolerance = $MaxTol" -if { $MaxTol > 1 } { - puts "Warning : Tolerance of Source edge is more then 1.0" -} else { - puts " Tolerance of source edge is less then 1.0" -} - -fsameparameter result 1e-5 - -puts "*** After : " -regexp {Tolerance +MAX=([-0-9.+eE]+)} [tolerance result] full MaxTol_1 - -puts "MaxTolerance = $MaxTol_1" -if { $MaxTol_1 > $MaxTol } { - puts [format "Faulty BUC60882 : Tolerance of Result edge increased and it is equal to %s" $MaxTol_1] -} else { - puts " BUC60882 OK: Tolerance of Result edge is less or equal to tolerance of Sourse edge." -} - -set length 1768.53 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60896 b/tests/bugs/modalg/buc60896 deleted file mode 100755 index 6f8c0b5dcc..0000000000 --- a/tests/bugs/modalg/buc60896 +++ /dev/null @@ -1,18 +0,0 @@ - -puts "============" -puts "BUC60896" -puts "============" -puts "" -############################################################### -## If give command "sameparameter edge" on attached edge in the DRAW this command hang. -############################################################### - -restore [locate_data_file BUC60896_edge.rle] result -# checkshape res - -sameparameter result -sameparameter result tol 1.e-2 -sameparameter result tol 1000 - -set length 48288.3 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60898 b/tests/bugs/modalg/buc60898 deleted file mode 100755 index 1a252cc45b..0000000000 --- a/tests/bugs/modalg/buc60898 +++ /dev/null @@ -1,26 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty BUC60898: here is reading problem" - -puts "===========" -puts " BUC60898" -puts "===========" -puts "" - -pload XDE - -if [catch { igesbrep [locate_data_file $filedir/buc60898.igs] a *} result] { -## rename to BUC60898.igs - puts "Faulty BUC60898: here is reading problem" -} else { - puts "BUC60898 OK" - tpcompound a - - if [catch {sewing result 1e-7 a } catch_result] { - puts "Faulty BUC60898: function SEWING gives except" - } else { - puts " BUC60898 OK: function SEWING works without except" - } - set square 0 - set 2dviewer 0 -} - - diff --git a/tests/bugs/modalg/buc60899_1 b/tests/bugs/modalg/buc60899_1 deleted file mode 100755 index 115e9c8a2a..0000000000 --- a/tests/bugs/modalg/buc60899_1 +++ /dev/null @@ -1,48 +0,0 @@ - -puts "============" -puts "BUC60899" -puts "============" -puts "" -##################################################### -## Execution of the script prism_sec.tcl gives exception "NumericError". -##################################################### - -set n 2 -set dx 4 -set sx 1 -set sz 10 -set xc [dval (2*$dx+2*$sx)*$n/2] -set zc -30 -set r [dval $xc*0.9] - -set x 0 -set y -50 -set z 0 -set pol "polyline w $x $y $z" -for {set i 1} {$i <= $n} {incr i} { - set x [dval $x+$dx] - set pol "$pol $x $y $z" - set x [dval $x+$sx] - set z [dval $z+$sz] - set pol "$pol $x $y $z" - set x [dval $x+$dx] - set pol "$pol $x $y $z" - set x [dval $x+$sx] - set z [dval $z-$sz] - set pol "$pol $x $y $z" -} - -eval $pol -circle c $xc 0 $zc $r -mkedge c c - -prism cyl c 0 0 -$zc*2 inf -prism crg w 0 -$y*2 0 inf - -bsection result crg cyl - -set length 15.1392 -set 2dviewer 0 - -# checksection res -# checkshape res diff --git a/tests/bugs/modalg/buc60899_2 b/tests/bugs/modalg/buc60899_2 deleted file mode 100755 index 09757b8361..0000000000 --- a/tests/bugs/modalg/buc60899_2 +++ /dev/null @@ -1,61 +0,0 @@ - -puts "============" -puts "BUC60899" -puts "============" -puts "" -##################################################### -## Execution of the script prism_sec.tcl gives exception "NumericError". -##################################################### - -set n 2 -set dx 4 -set sx 1 -set sz 10 -set xc [dval (2*$dx+2*$sx)*$n/2] -set zc -30 -set r [dval $xc*0.9] - -set x 0 -set y -50 -set z 0 -set pol "polyline w $x $y $z" -for {set i 1} {$i <= $n} {incr i} { - set x [dval $x+$dx] - set pol "$pol $x $y $z" - set x [dval $x+$sx] - set z [dval $z+$sz] - set pol "$pol $x $y $z" - set x [dval $x+$dx] - set pol "$pol $x $y $z" - set x [dval $x+$sx] - set z [dval $z-$sz] - set pol "$pol $x $y $z" -} - -eval $pol -polyline c $xc-$r -$r*2 $zc $xc+$r -$r*2 $zc $xc+$r $r*2 $zc $xc-$r $r*2 $zc $xc-$r -$r*2 $zc - -prism cyl c 0 0 -$zc*2 inf -prism crg w 0 -$y*2 0 inf -bsection result crg cyl - -#checksection res -#checkshape res - -set nb_info [nbshapes result] -regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full edgeness - - #set fullness [ nbshapes res ] - #puts "$fullness" - #set qq [ lindex $fullness 0 ] - #set edgeness [ lindex $fullness 10 ] - # puts "$edgeness" - -if { $edgeness == 1 } { - puts "Shape is empty, it is Faulty result" -} else { - puts "Shape is not empty, OK" -} - -set length 162.299 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60901 b/tests/bugs/modalg/buc60901 deleted file mode 100755 index 7c9395f234..0000000000 --- a/tests/bugs/modalg/buc60901 +++ /dev/null @@ -1,62 +0,0 @@ - -puts "============" -puts "BUC60901" -puts "============" -puts "" -################################################################ -## We should get the edges forming a closed intersection line but we see breaks. -################################################################ - -set n 3 -set dx 1 -set sx 20 -set sz 10 - -set xc [dval (2*$dx+2*$sx)*$n/2] -set yc 0 -set zc [dval $sz*10] -set nxc 0.5 -set nyc -0.3 -set nzc 1 -set r [dval $xc*0.9] - -set x 0 -set y [dval -$r*1.2] -set z 0 -set pol "polyline w $x $y $z" -for {set i 1} {$i <= $n} {incr i} { - set x [dval $x+$dx] - set pol "$pol $x $y $z" - set x [dval $x+$sx] - set z [dval $z+$sz] - set pol "$pol $x $y $z" - set x [dval $x+$dx] - set pol "$pol $x $y $z" - set x [dval $x+$sx] - set z [dval $z-$sz] - set pol "$pol $x $y $z" -} - -eval $pol -circle c $xc $yc $zc $nxc $nyc $nzc $r -mkedge c c - -set lcyl [dval -$zc*2] -set lcrg [dval -$y*2] - -prism cyl c 0 0 $lcyl -prism crg w 0 $lcrg 0 -bsection result crg cyl - -set nb_info [nbshapes result] -regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full nb_vertices -regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full nb_edges - -if { $nb_vertices != $nb_edges } { - puts "Section is opened: Faulty shape" -} else { - puts "Section is closed: OK" -} - -set length 350.404 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60905 b/tests/bugs/modalg/buc60905 deleted file mode 100755 index 29a629ed19..0000000000 --- a/tests/bugs/modalg/buc60905 +++ /dev/null @@ -1,24 +0,0 @@ - -puts "============" -puts "BUC60905" -puts "============" -puts "" -puts "TODO CR23530 ALL: Faulty shapes in variables faulty_1 to faulty_" - -######################################################### -## shape contains open shells if sewing would be made with big tolerance invalid shape -## will be produced, and visualization crashes. -######################################################### - -restore [locate_data_file BUC60905.brep] a -# checkshape a - -sewing result 10 a - -vinit -vdisplay result - -# checkshape res - -set square 270868 -set 3dviewer 0 diff --git a/tests/bugs/modalg/buc60909 b/tests/bugs/modalg/buc60909 deleted file mode 100755 index afbcfe6e23..0000000000 --- a/tests/bugs/modalg/buc60909 +++ /dev/null @@ -1,16 +0,0 @@ - -puts "============" -puts "BUC60909" -puts "============" -puts "" - -box boite 200 200 200 -nexplode boite F -profile cont S boite_4 F 0 50 X 50 Y 100 X -50 -featrevol boite cont boite_4 0 0 200 0 -1 0 1 1 -featperform revol result boite_1 - -set square 265343 -set 2dviewer 0 - - diff --git a/tests/bugs/modalg/buc60922 b/tests/bugs/modalg/buc60922 deleted file mode 100755 index 81374aafea..0000000000 --- a/tests/bugs/modalg/buc60922 +++ /dev/null @@ -1,27 +0,0 @@ - -puts "============" -puts "BUC60922" -puts "============" -puts "" -############################# -## Exception NumericError in Extrema -############################# - -restore [locate_data_file BUC60907_px1.rle] sh -checkshape sh - -line l 40 0 5 0 1 0 -mkedge e l -subshape sh F 379 -mksurface result sh_379 - -puts "Info: compute extrema" -extrema result l - -puts "Info: compute distmini" -distmini r sh e - -mkface result result - -set square 157.932 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60926 b/tests/bugs/modalg/buc60926 deleted file mode 100755 index d5f8bfcc6b..0000000000 --- a/tests/bugs/modalg/buc60926 +++ /dev/null @@ -1,20 +0,0 @@ - -puts "============" -puts "BUC60926" -puts "============" -puts "" -###################################################################### -## Creating a sphere of radius 1 at 0,0,0 and a cone with r1=1 r2=2 height=2 angle=3*PI/2 at 1,1,0 and -## then using BRepAlgoAPI_Fuse on the two solids will trigger a segmentation fault. -###################################################################### - -restore [locate_data_file shading_132.brep] a -checkshape a - -restore [locate_data_file BUC60926-2.brep] b -checkshape b - -bfuse result a b - -set square 41.7175 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60927 b/tests/bugs/modalg/buc60927 deleted file mode 100755 index 2e32accb5a..0000000000 --- a/tests/bugs/modalg/buc60927 +++ /dev/null @@ -1,16 +0,0 @@ - -puts "============" -puts "BUC60927" -puts "============" - -restore [locate_data_file BUC60927.brep] a - -explode a -checkshape a_1 -checkshape a_2 - -bcut result a_2 a_1 - -set square 94795.3 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/buc60930 b/tests/bugs/modalg/buc60930 deleted file mode 100755 index 80d4a4df0b..0000000000 --- a/tests/bugs/modalg/buc60930 +++ /dev/null @@ -1,21 +0,0 @@ - -puts "============" -puts "BUC60930" -puts "============" -puts "" -###################################### -## Exception ConstructionError in LocOpe_SplitShape. -###################################### - -restore [locate_data_file BUC60930_splitshape.brep] c -explode c -checkshape c_1 -checkshape c_2 - -renamevar c_1 f -renamevar c_2 e - -splitshape result f f e - -set square 13.3392 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60934 b/tests/bugs/modalg/buc60934 deleted file mode 100755 index 5a6fff90bc..0000000000 --- a/tests/bugs/modalg/buc60934 +++ /dev/null @@ -1,13 +0,0 @@ - -puts "============" -puts "BUC60934" -puts "============" - -restore [locate_data_file BUC60934.brep] a -checkshape a - -mkplane result a - -set square 40303.1 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/buc60942 b/tests/bugs/modalg/buc60942 deleted file mode 100755 index 4cbddcdc50..0000000000 --- a/tests/bugs/modalg/buc60942 +++ /dev/null @@ -1,35 +0,0 @@ - -puts "============" -puts "BUC60942" -puts "============" -############################################################### -## SplitShape algorithm modifies original shape (increases vertex tolerance of a plitting edge). -############################################################### - -restore [locate_data_file BUC60942_splitshape.brep] c -explode c -checkshape c_1 -checkshape c_2 - -renamevar c_1 f -renamevar c_2 w - -set tol1 [maxtolerance w] -regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tol1 full MaxEdgeTol1 -regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tol1 full MaxVertexTol1 - -splitshape result f f w - -set tol2 [maxtolerance w] -regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tol2 full MaxEdgeTol2 -regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tol2 full MaxVertexTol2 - - -if { $MaxEdgeTol1 < $MaxEdgeTol2 || $MaxVertexTol1 < $MaxVertexTol1 } { - puts "Faulty BUC60942: max tolerance of the input wire has been increased by about 10 times." -} else { - puts "BUC60942 OK: Tolerance of shape is correct" -} - -set square 37.7032 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60946 b/tests/bugs/modalg/buc60946 deleted file mode 100755 index 4981868ff0..0000000000 --- a/tests/bugs/modalg/buc60946 +++ /dev/null @@ -1,25 +0,0 @@ - -puts "============" -puts "BUC60946" -puts "============" - -restore [locate_data_file BUC60946_prism.brep] c -explode c -checkshape c_1 -checkshape c_2 - -renamevar c_1 sh -renamevar c_2 pr -bsection result sh pr - -set nb_info [nbshapes result] -regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full nb_vertices -regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full nb_edges - -if { $nb_vertices != $nb_edges } { - puts "Section is opened: Faulty shape" -} else { - puts "Section is closed: OK" -} -set length 52.5057 -set 2dviewer 0 diff --git a/tests/bugs/modalg/buc60971 b/tests/bugs/modalg/buc60971 deleted file mode 100755 index b296845575..0000000000 --- a/tests/bugs/modalg/buc60971 +++ /dev/null @@ -1,15 +0,0 @@ - -puts "========" -puts "BUC60971" -puts "CASE 2" -puts "========" -puts "" - -restore [locate_data_file buc60971.brep] a -explode a -checkshape a_1 -checkshape a_2 - -bfuse result a_2 a_3 -set square 93698.1 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug100 b/tests/bugs/modalg/bug100 deleted file mode 100755 index 3a7fed6c16..0000000000 --- a/tests/bugs/modalg/bug100 +++ /dev/null @@ -1,23 +0,0 @@ - -puts "================" -puts "OCC100" -puts "================" -puts "" -######################################## -## Draw is crashed during cut on Windows NT. SAM1185. -######################################## - -restore [locate_data_file OCC100_sp.brep] sh1 -checkshape sh1 - -restore [locate_data_file OCC100_cyl.brep] sh2 -checkshape sh2 - -#OCC100 : on WNT result is crushed when we make the next command: - -bcut result sh1 sh2 - -set square 2130.25 -set 2dviewer 0 - - diff --git a/tests/bugs/modalg/bug101 b/tests/bugs/modalg/bug101 deleted file mode 100755 index 00d25aa261..0000000000 --- a/tests/bugs/modalg/bug101 +++ /dev/null @@ -1,20 +0,0 @@ - -puts "================" -puts "BUC60663" -puts "BUC60662" -puts "OCC101" -puts "================" -puts "" -###################################### -## After restore c shell, section is incomplete -###################################### -restore [locate_data_file buc60663a.brep] sh1 -checkshape sh1 -restore [locate_data_file buc60663b.brep] sh2 -checkshape sh2 - -bsection result sh1 sh2 - -set length 26.2001 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug1013 b/tests/bugs/modalg/bug1013 deleted file mode 100755 index 2cca8e0e1a..0000000000 --- a/tests/bugs/modalg/bug1013 +++ /dev/null @@ -1,13 +0,0 @@ -puts "================" -puts "OCC1013" -puts "OCC906" -puts "================" -puts "" - -restore [locate_data_file DXF906.rle] wire -checkshape wire - -mkplane result wire - -set square 92131.6 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug10160_1 b/tests/bugs/modalg/bug10160_1 deleted file mode 100644 index 98e2c133f6..0000000000 --- a/tests/bugs/modalg/bug10160_1 +++ /dev/null @@ -1,59 +0,0 @@ -puts "TODO OCC11111 ALL: Error : Result shape is WRONG" - -puts "============" -puts "OCC10160" -puts "============" -puts "" -####################################################################### -# BOP perfomance improvemen -####################################################################### - -set BugNumber OCC10160 - -restore [locate_data_file OCC10160-1.brep] b1 -restore [locate_data_file OCC10160-2.brep] b2 - -set NbTests 3 - -dchrono h0 reset -dchrono h0 start - -bop b1 b2 -dchrono h0 stop -set CPU_time0_List [dchrono h0 show] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time0_List full CPU_user_time0 -puts "CPU_user_time0=${CPU_user_time0}" - -puts "Start boolean operation ..." -dchrono h reset; dchrono h start -# -# BOOLEAN OPERATION ----- START -# -for {set i 1} {$i <= ${NbTests}} {incr i} { - bopcommon result -} -# -# BOOLEAN OPERATION ----- FINISH -# -dchrono h stop; set CPU_time_List [dchrono h show] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time_List full CPU_user_time - -puts "Finish boolean operation ..." -puts "CPU_user_time=${CPU_user_time}" -set CPU_user_time [expr ${CPU_user_time} / ${NbTests}] -puts "CPU_user_time=${CPU_user_time}" - -set square 1.30062e+07 - -# Analysis of "nbshapes res" -set nb_v_good 20 -set nb_e_good 28 -set nb_w_good 16 -set nb_f_good 15 -set nb_sh_good 3 -set nb_sol_good 3 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 86 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug10160_10 b/tests/bugs/modalg/bug10160_10 deleted file mode 100644 index a6f967858b..0000000000 --- a/tests/bugs/modalg/bug10160_10 +++ /dev/null @@ -1,54 +0,0 @@ -puts "============" -puts "OCC10160" -puts "============" -puts "" -####################################################################### -# BOP perfomance improvemen -####################################################################### - -set BugNumber OCC10160 - -restore [locate_data_file OCC10160-2.brep] b1 -restore [locate_data_file OCC10160-3.brep] b2 - -set NbTests 3 - -puts "Prepare boolean operation ..." -dchrono h0 reset; dchrono h0 start -bop b1 b2 -dchrono h0 stop; set CPU_time0_List [dchrono h0 show] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time0_List full CPU_user_time0 -puts "CPU_user_time0=${CPU_user_time0}" - -puts "Start boolean operation ..." -dchrono h reset; dchrono h start -# -# BOOLEAN OPERATION ----- START -# -for {set i 1} {$i <= ${NbTests}} {incr i} { - bopfuse result -} -# -# BOOLEAN OPERATION ----- FINISH -# -dchrono h stop; set CPU_time_List [dchrono h show] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time_List full CPU_user_time -puts "Finish boolean operation ..." -puts "CPU_user_time=${CPU_user_time}" -set CPU_user_time [expr ${CPU_user_time} / ${NbTests}] -puts "CPU_user_time=${CPU_user_time}" - -set square 3.20326e+07 - -# Analysis of "nbshapes res" -set nb_v_good 116 -set nb_e_good 173 -set nb_w_good 67 -set nb_f_good 63 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 422 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug10160_11 b/tests/bugs/modalg/bug10160_11 deleted file mode 100644 index 8172a4166e..0000000000 --- a/tests/bugs/modalg/bug10160_11 +++ /dev/null @@ -1,54 +0,0 @@ -puts "============" -puts "OCC10160" -puts "============" -puts "" -####################################################################### -# BOP perfomance improvemen -####################################################################### - -set BugNumber OCC10160 - -restore [locate_data_file OCC10160-2.brep] b1 -restore [locate_data_file OCC10160-3.brep] b2 - -set NbTests 3 - -puts "Prepare boolean operation ..." -dchrono h0 reset; dchrono h0 start -bop b1 b2 -dchrono h0 stop; set CPU_time0_List [dchrono h0 show] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time0_List full CPU_user_time0 -puts "CPU_user_time0=${CPU_user_time0}" - -puts "Start boolean operation ..." -dchrono h reset; dchrono h start -# -# BOOLEAN OPERATION ----- START -# -for {set i 1} {$i <= ${NbTests}} {incr i} { - bopcut result -} -# -# BOOLEAN OPERATION ----- FINISH -# -dchrono h stop; set CPU_time_List [dchrono h show] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time_List full CPU_user_time -puts "Finish boolean operation ..." -puts "CPU_user_time=${CPU_user_time}" -set CPU_user_time [expr ${CPU_user_time} / ${NbTests}] -puts "CPU_user_time=${CPU_user_time}" - -set square 3.05154e+07 - -# Analysis of "nbshapes res" -set nb_v_good 96 -set nb_e_good 143 -set nb_w_good 51 -set nb_f_good 48 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 341 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug10160_12 b/tests/bugs/modalg/bug10160_12 deleted file mode 100644 index e4c0243320..0000000000 --- a/tests/bugs/modalg/bug10160_12 +++ /dev/null @@ -1,54 +0,0 @@ -puts "============" -puts "OCC10160" -puts "============" -puts "" -####################################################################### -# BOP perfomance improvemen -####################################################################### - -set BugNumber OCC10160 - -restore [locate_data_file OCC10160-2.brep] b1 -restore [locate_data_file OCC10160-3.brep] b2 - -set NbTests 3 - -puts "Prepare boolean operation ..." -dchrono h0 reset; dchrono h0 start -bop b1 b2 -dchrono h0 stop; set CPU_time0_List [dchrono h0 show] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time0_List full CPU_user_time0 -puts "CPU_user_time0=${CPU_user_time0}" - -puts "Start boolean operation ..." -dchrono h reset; dchrono h start -# -# BOOLEAN OPERATION ----- START -# -for {set i 1} {$i <= ${NbTests}} {incr i} { - boptuc result -} -# -# BOOLEAN OPERATION ----- FINISH -# -dchrono h stop; set CPU_time_List [dchrono h show] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time_List full CPU_user_time -puts "Finish boolean operation ..." -puts "CPU_user_time=${CPU_user_time}" -set CPU_user_time [expr ${CPU_user_time} / ${NbTests}] -puts "CPU_user_time=${CPU_user_time}" - -set square 6.38359e+06 - -# Analysis of "nbshapes res" -set nb_v_good 108 -set nb_e_good 161 -set nb_w_good 61 -set nb_f_good 60 -set nb_sh_good 3 -set nb_sol_good 3 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 397 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug10160_2 b/tests/bugs/modalg/bug10160_2 deleted file mode 100644 index e85072e0ef..0000000000 --- a/tests/bugs/modalg/bug10160_2 +++ /dev/null @@ -1,57 +0,0 @@ -puts "TODO OCC11111 ALL: Error : Result shape is WRONG" - -puts "============" -puts "OCC10160" -puts "============" -puts "" -####################################################################### -# BOP perfomance improvemen -####################################################################### - -set BugNumber OCC10160 - -restore [locate_data_file OCC10160-1.brep] b1 -restore [locate_data_file OCC10160-2.brep] b2 - -set NbTests 3 - -puts "Prepare boolean operation ..." -dchrono h0 reset; dchrono h0 start -bop b1 b2 -dchrono h0 stop; set CPU_time0_List [dchrono h0 show] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time0_List full CPU_user_time0 -puts "CPU_user_time0=${CPU_user_time0}" - -puts "Start boolean operation ..." -dchrono h reset; dchrono h start -# -# BOOLEAN OPERATION ----- START -# -for {set i 1} {$i <= ${NbTests}} {incr i} { - bopfuse result -} -# -# BOOLEAN OPERATION ----- FINISH -# -dchrono h stop; set CPU_time_List [dchrono h show] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time_List full CPU_user_time -puts "Finish boolean operation ..." -puts "CPU_user_time=${CPU_user_time}" -set CPU_user_time [expr ${CPU_user_time} / ${NbTests}] -puts "CPU_user_time=${CPU_user_time}" - -set square 4.75218e+07 - -# Analysis of "nbshapes res" -set nb_v_good 32 -set nb_e_good 60 -set nb_w_good 32 -set nb_f_good 29 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 156 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug10160_3 b/tests/bugs/modalg/bug10160_3 deleted file mode 100644 index bba4743bb5..0000000000 --- a/tests/bugs/modalg/bug10160_3 +++ /dev/null @@ -1,56 +0,0 @@ -puts "TODO OCC11111 ALL: Error : Result shape is WRONG" -puts "TODO OCC11111 ALL: Error : The square of result shape is" -puts "============" -puts "OCC10160" -puts "============" -puts "" -####################################################################### -# BOP perfomance improvemen -####################################################################### - -set BugNumber OCC10160 - -restore [locate_data_file OCC10160-1.brep] b1 -restore [locate_data_file OCC10160-2.brep] b2 - -set NbTests 3 - -puts "Prepare boolean operation ..." -dchrono h0 reset; dchrono h0 start -bop b1 b2 -dchrono h0 stop; set CPU_time0_List [dchrono h0 show] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time0_List full CPU_user_time0 -puts "CPU_user_time0=${CPU_user_time0}" - -puts "Start boolean operation ..." -dchrono h reset; dchrono h start -# -# BOOLEAN OPERATION ----- START -# -for {set i 1} {$i <= ${NbTests}} {incr i} { - bopcut result -} -# -# BOOLEAN OPERATION ----- FINISH -# -dchrono h stop; set CPU_time_List [dchrono h show] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time_List full CPU_user_time -puts "Finish boolean operation ..." -puts "CPU_user_time=${CPU_user_time}" -set CPU_user_time [expr ${CPU_user_time} / ${NbTests}] -puts "CPU_user_time=${CPU_user_time}" - -set square 2.36194e+07 - -# Analysis of "nbshapes res" -set nb_v_good 24 -set nb_e_good 34 -set nb_w_good 20 -set nb_f_good 19 -set nb_sh_good 4 -set nb_sol_good 4 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 106 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug10160_4 b/tests/bugs/modalg/bug10160_4 deleted file mode 100644 index c8283b9efe..0000000000 --- a/tests/bugs/modalg/bug10160_4 +++ /dev/null @@ -1,56 +0,0 @@ -puts "TODO OCC11111 ALL: Error : Result shape is WRONG" -puts "============" -puts "OCC10160" -puts "============" -puts "" -####################################################################### -# BOP perfomance improvemen -####################################################################### - -set BugNumber OCC10160 - -restore [locate_data_file OCC10160-1.brep] b1 -restore [locate_data_file OCC10160-2.brep] b2 - -set NbTests 3 - -puts "Prepare boolean operation ..." -dchrono h0 reset; dchrono h0 start -bop b1 b2 -dchrono h0 stop; set CPU_time0_List [dchrono h0 show] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time0_List full CPU_user_time0 -puts "CPU_user_time0=${CPU_user_time0}" - -puts "Start boolean operation ..." -dchrono h reset; dchrono h start -# -# BOOLEAN OPERATION ----- START -# -for {set i 1} {$i <= ${NbTests}} {incr i} { - boptuc result -} -# -# BOOLEAN OPERATION ----- FINISH -# -dchrono h stop; set CPU_time_List [dchrono h show] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time_List full CPU_user_time -puts "Finish boolean operation ..." -puts "CPU_user_time=${CPU_user_time}" -set CPU_user_time [expr ${CPU_user_time} / ${NbTests}] -puts "CPU_user_time=${CPU_user_time}" - -set square 3.56087e+07 - -# Analysis of "nbshapes res" -set nb_v_good 24 -set nb_e_good 34 -set nb_w_good 20 -set nb_f_good 17 -set nb_sh_good 3 -set nb_sol_good 3 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 102 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug10160_5 b/tests/bugs/modalg/bug10160_5 deleted file mode 100644 index 87ca7f71e6..0000000000 --- a/tests/bugs/modalg/bug10160_5 +++ /dev/null @@ -1,55 +0,0 @@ -puts "TODO OCC11111 ALL: Error : Result shape is WRONG" -puts "============" -puts "OCC10160" -puts "============" -puts "" -####################################################################### -# BOP perfomance improvemen -####################################################################### - -set BugNumber OCC10160 - -restore [locate_data_file OCC10160-1.brep] b1 -restore [locate_data_file OCC10160-3.brep] b2 - -set NbTests 3 - -puts "Prepare boolean operation ..." -dchrono h0 reset; dchrono h0 start -bop b1 b2 -dchrono h0 stop; set CPU_time0_List [dchrono h0 show] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time0_List full CPU_user_time0 -puts "CPU_user_time0=${CPU_user_time0}" - -puts "Start boolean operation ..." -dchrono h reset; dchrono h start -# -# BOOLEAN OPERATION ----- START -# -for {set i 1} {$i <= ${NbTests}} {incr i} { - bopcommon result -} -# -# BOOLEAN OPERATION ----- FINISH -# -dchrono h stop; set CPU_time_List [dchrono h show] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time_List full CPU_user_time -puts "Finish boolean operation ..." -puts "CPU_user_time=${CPU_user_time}" -set CPU_user_time [expr ${CPU_user_time} / ${NbTests}] -puts "CPU_user_time=${CPU_user_time}" - -set square 782201 - -# Analysis of "nbshapes res" -set nb_v_good 53 -set nb_e_good 75 -set nb_w_good 38 -set nb_f_good 34 -set nb_sh_good 6 -set nb_sol_good 6 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 213 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug10160_6 b/tests/bugs/modalg/bug10160_6 deleted file mode 100644 index 029f0ce478..0000000000 --- a/tests/bugs/modalg/bug10160_6 +++ /dev/null @@ -1,57 +0,0 @@ -puts "TODO OCC11111 ALL: Error : Result shape is WRONG" -puts "============" -puts "OCC10160" -puts "============" -puts "" -####################################################################### -# BOP perfomance improvemen -####################################################################### - -set BugNumber OCC10160 - -restore [locate_data_file OCC10160-1.brep] b1 -restore [locate_data_file OCC10160-3.brep] b2 - -set NbTests 3 - -puts "Prepare boolean operation ..." -dchrono h0 reset; dchrono h0 start -bop b1 b2 -dchrono h0 stop; set CPU_time0_List [dchrono h0 show] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time0_List full CPU_user_time0 -puts "CPU_user_time0=${CPU_user_time0}" - -puts "Start boolean operation ..." -dchrono h reset; dchrono h start -# -# BOOLEAN OPERATION ----- START -# -for {set i 1} {$i <= ${NbTests}} {incr i} { - bopfuse result -} -# -# BOOLEAN OPERATION ----- FINISH -# -dchrono h stop; set CPU_time_List [dchrono h show] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time_List full CPU_user_time -puts "Finish boolean operation ..." -puts "CPU_user_time=${CPU_user_time}" -set CPU_user_time [expr ${CPU_user_time} / ${NbTests}] -puts "CPU_user_time=${CPU_user_time}" - -set square 3.61484e+07 - -# Analysis of "nbshapes res" -set nb_v_good 121 -set nb_e_good 178 -set nb_w_good 65 -set nb_f_good 59 -set nb_sh_good 3 -set nb_sol_good 2 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 429 - -set 2dviewer 0 - - diff --git a/tests/bugs/modalg/bug10160_7 b/tests/bugs/modalg/bug10160_7 deleted file mode 100644 index bbbc95e988..0000000000 --- a/tests/bugs/modalg/bug10160_7 +++ /dev/null @@ -1,56 +0,0 @@ -puts "TODO OCC11111 ALL: Error : Result shape is WRONG" - -puts "============" -puts "OCC10160" -puts "============" -puts "" -####################################################################### -# BOP perfomance improvemen -####################################################################### - -set BugNumber OCC10160 - -restore [locate_data_file OCC10160-1.brep] b1 -restore [locate_data_file OCC10160-3.brep] b2 - -set NbTests 3 - -puts "Prepare boolean operation ..." -dchrono h0 reset; dchrono h0 start -bop b1 b2 -dchrono h0 stop; set CPU_time0_List [dchrono h0 show] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time0_List full CPU_user_time0 -puts "CPU_user_time0=${CPU_user_time0}" - -puts "Start boolean operation ..." -dchrono h reset; dchrono h start -# -# BOOLEAN OPERATION ----- START -# -for {set i 1} {$i <= ${NbTests}} {incr i} { - bopcut result -} -# -# BOOLEAN OPERATION ----- FINISH -# -dchrono h stop; set CPU_time_List [dchrono h show] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time_List full CPU_user_time -puts "Finish boolean operation ..." -puts "CPU_user_time=${CPU_user_time}" -set CPU_user_time [expr ${CPU_user_time} / ${NbTests}] -puts "CPU_user_time=${CPU_user_time}" - -set square 3.00597e+07 - -# Analysis of "nbshapes res" -set nb_v_good 61 -set nb_e_good 87 -set nb_w_good 44 -set nb_f_good 36 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 231 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug10160_8 b/tests/bugs/modalg/bug10160_8 deleted file mode 100644 index e2b97189cd..0000000000 --- a/tests/bugs/modalg/bug10160_8 +++ /dev/null @@ -1,55 +0,0 @@ -puts "TODO OCC11111 ALL: Error : Result shape is WRONG" -puts "============" -puts "OCC10160" -puts "============" -puts "" -####################################################################### -# BOP perfomance improvemen -####################################################################### - -set BugNumber OCC10160 - -restore [locate_data_file OCC10160-1.brep] b1 -restore [locate_data_file OCC10160-3.brep] b2 - -set NbTests 3 - -puts "Prepare boolean operation ..." -dchrono h0 reset; dchrono h0 start -bop b1 b2 -dchrono h0 stop; set CPU_time0_List [dchrono h0 show] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time0_List full CPU_user_time0 -puts "CPU_user_time0=${CPU_user_time0}" - -puts "Start boolean operation ..." -dchrono h reset; dchrono h start -# -# BOOLEAN OPERATION ----- START -# -for {set i 1} {$i <= ${NbTests}} {incr i} { - boptuc result -} -# -# BOOLEAN OPERATION ----- FINISH -# -dchrono h stop; set CPU_time_List [dchrono h show] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time_List full CPU_user_time -puts "Finish boolean operation ..." -puts "CPU_user_time=${CPU_user_time}" -set CPU_user_time [expr ${CPU_user_time} / ${NbTests}] -puts "CPU_user_time=${CPU_user_time}" - -set square 6.87093e+06 - -# Analysis of "nbshapes res" -set nb_v_good 113 -set nb_e_good 166 -set nb_w_good 59 -set nb_f_good 57 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 398 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug10160_9 b/tests/bugs/modalg/bug10160_9 deleted file mode 100644 index eb5f66f169..0000000000 --- a/tests/bugs/modalg/bug10160_9 +++ /dev/null @@ -1,54 +0,0 @@ -puts "============" -puts "OCC10160" -puts "============" -puts "" -####################################################################### -# BOP perfomance improvemen -####################################################################### - -set BugNumber OCC10160 - -restore [locate_data_file OCC10160-2.brep] b1 -restore [locate_data_file OCC10160-3.brep] b2 - -set NbTests 3 - -puts "Prepare boolean operation ..." -dchrono h0 reset; dchrono h0 start -bop b1 b2 -dchrono h0 stop; set CPU_time0_List [dchrono h0 show] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time0_List full CPU_user_time0 -puts "CPU_user_time0=${CPU_user_time0}" - -puts "Start boolean operation ..." -dchrono h reset; dchrono h start -# -# BOOLEAN OPERATION ----- START -# -for {set i 1} {$i <= ${NbTests}} {incr i} { - bopcommon result -} -# -# BOOLEAN OPERATION ----- FINISH -# -dchrono h stop; set CPU_time_List [dchrono h show] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time_List full CPU_user_time -puts "Finish boolean operation ..." -puts "CPU_user_time=${CPU_user_time}" -set CPU_user_time [expr ${CPU_user_time} / ${NbTests}] -puts "CPU_user_time=${CPU_user_time}" - -set square 4.86635e+06 - -# Analysis of "nbshapes res" -set nb_v_good 88 -set nb_e_good 131 -set nb_w_good 45 -set nb_f_good 45 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 312 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug10232 b/tests/bugs/modalg/bug10232 deleted file mode 100644 index 38ceba48e6..0000000000 --- a/tests/bugs/modalg/bug10232 +++ /dev/null @@ -1,38 +0,0 @@ -puts "TODO OCC11111 ALL: Error : Result shape is WRONG" - -puts "============" -puts "OCC10232" -puts "============" -puts "" -####################################################################### -# Exception "Segmentation violation" in Boolean Operations -####################################################################### - -set BugNumber OCC10232 - -puts "Load first shape ..." -restore [locate_data_file OCC10232_ms1.brep] b1 -puts "Load second shape ..." -restore [locate_data_file OCC10232_ms2.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopsection result -puts "Finish boolean operation ..." - -set length 3210.71 - -set nb_v_good 1197 -set nb_e_good 1182 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 2380 - -set 2dviewer 1 - diff --git a/tests/bugs/modalg/bug102_1 b/tests/bugs/modalg/bug102_1 deleted file mode 100755 index 90f0ed084f..0000000000 --- a/tests/bugs/modalg/bug102_1 +++ /dev/null @@ -1,19 +0,0 @@ - -puts "================" -puts "BUC60803" -puts "OCC102" -puts "================" -puts "" - -restore [locate_data_file buc60803a.brep] sh1 -checkshape sh1 -restore [locate_data_file buc60803b.brep] sh2 -checkshape sh2 - -bfuse result sh1 sh2 - -set square 1.86064e+07 -set 2dviewer 0 - - - diff --git a/tests/bugs/modalg/bug102_2 b/tests/bugs/modalg/bug102_2 deleted file mode 100755 index c9dbb81e47..0000000000 --- a/tests/bugs/modalg/bug102_2 +++ /dev/null @@ -1,18 +0,0 @@ - -puts "================" -puts "BUC60803" -puts "OCC102" -puts "================" -puts "" - -restore [locate_data_file buc60803a.brep] sh1 -checkshape sh1 -restore [locate_data_file buc60803b.brep] sh2 -checkshape sh2 - -bfuse result sh2 sh1 - -set square 1.86064e+07 -set 2dviewer 0 - - diff --git a/tests/bugs/modalg/bug10435_1 b/tests/bugs/modalg/bug10435_1 deleted file mode 100644 index 4605e60820..0000000000 --- a/tests/bugs/modalg/bug10435_1 +++ /dev/null @@ -1,38 +0,0 @@ -puts "============" -puts "OCC10435" -puts "============" -puts "" -####################################################################### -# error in fillet after Cut of torus from box -####################################################################### - -set BugNumber OCC10435 - -restore [locate_data_file OCC10435.brep] a - -checkshape a -explode a e - -set radius 5. - -if { [catch {fillet result a ${radius} a_10 ${radius} a_15 ${radius} a_16 } catch_result] } { - puts "Faulty ${BugNumber} exception (case 1): Fillet operation fails on given shape " -} else { - puts "${BugNumber} (case 1) OK: Fillet operation was made" - - set square 36455.2 - - # Analysis of "nbshapes res" - set nb_v_good 12 - set nb_e_good 19 - set nb_w_good 11 - set nb_f_good 10 - set nb_sh_good 1 - set nb_sol_good 1 - set nb_compsol_good 0 - set nb_compound_good 1 - set nb_shape_good 55 -} - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug10435_2 b/tests/bugs/modalg/bug10435_2 deleted file mode 100644 index ae6577a41b..0000000000 --- a/tests/bugs/modalg/bug10435_2 +++ /dev/null @@ -1,34 +0,0 @@ -puts "============" -puts "OCC10435" -puts "============" -puts "" -####################################################################### -# error in fillet after Cut of torus from box -####################################################################### - -set BugNumber OCC10435 - -puts "Load shape ..." -restore [locate_data_file OCC10435.brep] b1 - -explode b1 e - -puts "Start fillet ..." -fillet result b1 5 b1_15 5 b1_16 5 b1_10 -puts "Finish fillet ..." - -set square 36455.2 - -# Analysis of "nbshapes res" -set nb_v_good 12 -set nb_e_good 19 -set nb_w_good 11 -set nb_f_good 10 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 55 - -set 2dviewer 1 - diff --git a/tests/bugs/modalg/bug10605_1 b/tests/bugs/modalg/bug10605_1 deleted file mode 100644 index 023a6ecad7..0000000000 --- a/tests/bugs/modalg/bug10605_1 +++ /dev/null @@ -1,34 +0,0 @@ -puts "============" -puts "OCC10605" -puts "============" -puts "" -####################################################################### -# Fuse Fails -####################################################################### - -set BugNumber OCC10605 - -restore [locate_data_file OCC10605-1.brep] b1 -restore [locate_data_file OCC10605-3.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopcommon result -puts "Finish boolean operation ..." - -set square 233.798 - -# Analysis of "nbshapes res" -set nb_v_good 10 -set nb_e_good 15 -set nb_w_good 7 -set nb_f_good 7 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 42 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug10605_2 b/tests/bugs/modalg/bug10605_2 deleted file mode 100644 index af3bae240b..0000000000 --- a/tests/bugs/modalg/bug10605_2 +++ /dev/null @@ -1,34 +0,0 @@ -puts "============" -puts "OCC10605" -puts "============" -puts "" -####################################################################### -# Fuse Fails -####################################################################### - -set BugNumber OCC10605 - -restore [locate_data_file OCC10605-1.brep] b1 -restore [locate_data_file OCC10605-3.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopfuse result -puts "Finish boolean operation ..." - -set square 838.752 - -# Analysis of "nbshapes res" -set nb_v_good 15 -set nb_e_good 22 -set nb_w_good 10 -set nb_f_good 9 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 59 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug10605_3 b/tests/bugs/modalg/bug10605_3 deleted file mode 100644 index ed50c6eb71..0000000000 --- a/tests/bugs/modalg/bug10605_3 +++ /dev/null @@ -1,34 +0,0 @@ -puts "============" -puts "OCC10605" -puts "============" -puts "" -####################################################################### -# Fuse Fails -####################################################################### - -set BugNumber OCC10605 - -restore [locate_data_file OCC10605-1.brep] b1 -restore [locate_data_file OCC10605-3.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopcut result -puts "Finish boolean operation ..." - -set square 779.887 - -# Analysis of "nbshapes res" -set nb_v_good 13 -set nb_e_good 19 -set nb_w_good 8 -set nb_f_good 7 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 50 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug10605_4 b/tests/bugs/modalg/bug10605_4 deleted file mode 100644 index eb432e0348..0000000000 --- a/tests/bugs/modalg/bug10605_4 +++ /dev/null @@ -1,34 +0,0 @@ -puts "============" -puts "OCC10605" -puts "============" -puts "" -####################################################################### -# Fuse Fails -####################################################################### - -set BugNumber OCC10605 - -restore [locate_data_file OCC10605-1.brep] b1 -restore [locate_data_file OCC10605-3.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -boptuc result -puts "Finish boolean operation ..." - -set square 292.663 - -# Analysis of "nbshapes res" -set nb_v_good 12 -set nb_e_good 18 -set nb_w_good 9 -set nb_f_good 9 -set nb_sh_good 2 -set nb_sol_good 2 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 53 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug10605_5 b/tests/bugs/modalg/bug10605_5 deleted file mode 100644 index 3f6d3b4929..0000000000 --- a/tests/bugs/modalg/bug10605_5 +++ /dev/null @@ -1,33 +0,0 @@ -puts "============" -puts "OCC10605" -puts "============" -puts "" -####################################################################### -# Fuse Fails -####################################################################### - -set BugNumber OCC10605 - -restore [locate_data_file OCC10605-1.brep] b1 -restore [locate_data_file OCC10605-3.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopsection result b1 b2 -puts "Finish boolean operation ..." - -set length 59.8334 -# Analysis of "nbshapes res" -set nb_v_good 9 -set nb_e_good 9 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 19 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug10606_1 b/tests/bugs/modalg/bug10606_1 deleted file mode 100644 index 2196de4079..0000000000 --- a/tests/bugs/modalg/bug10606_1 +++ /dev/null @@ -1,34 +0,0 @@ -puts "============" -puts "OCC10606" -puts "============" -puts "" -####################################################################### -# Fuse Fails -####################################################################### - -set BugNumber OCC10606 - -restore [locate_data_file OCC10604-1.brep] b1 -restore [locate_data_file OCC10606-2.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopcommon result -puts "Finish boolean operation ..." - -set square 66.672 - -# Analysis of "nbshapes res" -set nb_v_good 6 -set nb_e_good 8 -set nb_w_good 2 -set nb_f_good 2 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 21 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug10606_2 b/tests/bugs/modalg/bug10606_2 deleted file mode 100644 index b2e880752c..0000000000 --- a/tests/bugs/modalg/bug10606_2 +++ /dev/null @@ -1,34 +0,0 @@ -puts "============" -puts "OCC10606" -puts "============" -puts "" -####################################################################### -# Fuse Fails -####################################################################### - -set BugNumber OCC10606 - -restore [locate_data_file OCC10604-1.brep] b1 -restore [locate_data_file OCC10606-2.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopfuse result -puts "Finish boolean operation ..." - -set square 1450.22 - -# Analysis of "nbshapes res" -set nb_v_good 6 -set nb_e_good 8 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 25 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug10606_3 b/tests/bugs/modalg/bug10606_3 deleted file mode 100644 index ca14f2ea3c..0000000000 --- a/tests/bugs/modalg/bug10606_3 +++ /dev/null @@ -1,34 +0,0 @@ -puts "============" -puts "OCC10606" -puts "============" -puts "" -####################################################################### -# Fuse Fails -####################################################################### - -set BugNumber OCC10606 - -restore [locate_data_file OCC10604-1.brep] b1 -restore [locate_data_file OCC10606-2.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopcut result -puts "Finish boolean operation ..." - -set square 761.355 - -# Analysis of "nbshapes res" -set nb_v_good 6 -set nb_e_good 8 -set nb_w_good 3 -set nb_f_good 3 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 23 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug10606_4 b/tests/bugs/modalg/bug10606_4 deleted file mode 100644 index 144937b15e..0000000000 --- a/tests/bugs/modalg/bug10606_4 +++ /dev/null @@ -1,34 +0,0 @@ -puts "============" -puts "OCC10606" -puts "============" -puts "" -####################################################################### -# Fuse Fails -####################################################################### - -set BugNumber OCC10606 - -restore [locate_data_file OCC10604-1.brep] b1 -restore [locate_data_file OCC10606-2.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -boptuc result -puts "Finish boolean operation ..." - -set square 755.54 - -# Analysis of "nbshapes res" -set nb_v_good 6 -set nb_e_good 8 -set nb_w_good 3 -set nb_f_good 3 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 23 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug10606_5 b/tests/bugs/modalg/bug10606_5 deleted file mode 100644 index 46e467e4a7..0000000000 --- a/tests/bugs/modalg/bug10606_5 +++ /dev/null @@ -1,34 +0,0 @@ -puts "============" -puts "OCC10606" -puts "============" -puts "" -####################################################################### -# Fuse Fails -####################################################################### - -set BugNumber OCC10606 - -restore [locate_data_file OCC10604-1.brep] b1 -restore [locate_data_file OCC10606-2.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopsection result b1 b2 -puts "Finish boolean operation ..." - -set length 18.3861 - -# Analysis of "nbshapes res" -set nb_v_good 4 -set nb_e_good 4 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 9 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug1077 b/tests/bugs/modalg/bug1077 deleted file mode 100644 index 5f6a1a718c..0000000000 --- a/tests/bugs/modalg/bug1077 +++ /dev/null @@ -1,16 +0,0 @@ -pload QAcommands - -puts "============" -puts "OCC1077" -puts "============" -puts "" -###################################################### -# BUG in boolean operations in the development version -###################################################### - -if { [catch { OCC1077 result } catch_result] } { - puts "Faulty OCC1077" -} - -set square 587.181 -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug108 b/tests/bugs/modalg/bug108 deleted file mode 100755 index 70b73d3b81..0000000000 --- a/tests/bugs/modalg/bug108 +++ /dev/null @@ -1,28 +0,0 @@ - -puts "================" -puts "BUC61037" -puts "OCC108" -puts "================" -puts "" -##################################################################### -## BRepTools::AddUVBounds for the planar face bounded by a circle returns too small bounding box. -##################################################################### - -restore [locate_data_file bug61037.brep] sh1 -checkshape sh1 - -set rr [bounding sh1] -regexp { *([-0-9.+eE]+) +([-0-9.+eE]+) +([-0-9.+eE]+) +([-0-9.+eE]+) +([-0-9.+eE]+) +([-0-9.+eE]+)} $rr full v1_x v1_y v1_z v2_x v2_y v2_z -vertex v1 $v1_x $v1_y $v1_z -vertex v2 $v2_x $v2_y $v2_z -edge result v1 v2 -regexp {Mass +: +([-0-9.+eE]+)} [lprops result] full dis -if { [expr $dis < 0.201357] } { - puts "Faulty BUC61037: Planar circle and bounded face a returns too small bounding box" -} else { - puts "OCC134 OK: bounding box is correct" -} - -set length 0.201357 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug10842_1 b/tests/bugs/modalg/bug10842_1 deleted file mode 100644 index a269905008..0000000000 --- a/tests/bugs/modalg/bug10842_1 +++ /dev/null @@ -1,36 +0,0 @@ -puts "TODO OCC111111 ALL: Error : Result shape is WRONG" - -puts "============" -puts "OCC10842" -puts "============" -puts "" -####################################################################### -# Bug in Bop -####################################################################### - -set BugNumber OCC10842 - -restore [locate_data_file OCC10842-1.brep] b1 -restore [locate_data_file OCC10842-2.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopcommon result -puts "Finish boolean operation ..." - -set square 2312.93 - -# Analysis of "nbshapes res" -set nb_v_good 7 -set nb_e_good 9 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 27 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug10842_2 b/tests/bugs/modalg/bug10842_2 deleted file mode 100644 index 85e0e6fd46..0000000000 --- a/tests/bugs/modalg/bug10842_2 +++ /dev/null @@ -1,36 +0,0 @@ -puts "TODO OCC111111 ALL: Error : Result shape is WRONG" - -puts "============" -puts "OCC10842" -puts "============" -puts "" -####################################################################### -# Bug in Bop -####################################################################### - -set BugNumber OCC10842 - -restore [locate_data_file OCC10842-1.brep] b1 -restore [locate_data_file OCC10842-2.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopfuse result -puts "Finish boolean operation ..." - -set square 27919.7 - -# Analysis of "nbshapes res" -set nb_v_good 15 -set nb_e_good 21 -set nb_w_good 7 -set nb_f_good 6 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 52 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug10842_3 b/tests/bugs/modalg/bug10842_3 deleted file mode 100644 index 0dd94602c8..0000000000 --- a/tests/bugs/modalg/bug10842_3 +++ /dev/null @@ -1,36 +0,0 @@ -puts "TODO OCC111111 ALL: Error : Result shape is WRONG" - -puts "============" -puts "OCC10842" -puts "============" -puts "" -####################################################################### -# Bug in Bop -####################################################################### - -set BugNumber OCC10842 - -restore [locate_data_file OCC10842-1.brep] b1 -restore [locate_data_file OCC10842-2.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopcut result -puts "Finish boolean operation ..." - -set square 18757.7 - -# Analysis of "nbshapes res" -set nb_v_good 13 -set nb_e_good 18 -set nb_w_good 6 -set nb_f_good 6 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 46 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug10842_4 b/tests/bugs/modalg/bug10842_4 deleted file mode 100644 index df6e78c140..0000000000 --- a/tests/bugs/modalg/bug10842_4 +++ /dev/null @@ -1,36 +0,0 @@ -puts "TODO OCC111111 ALL: Error : Result shape is WRONG" - -puts "============" -puts "OCC10842" -puts "============" -puts "" -####################################################################### -# Bug in Bop -####################################################################### - -set BugNumber OCC10842 - -restore [locate_data_file OCC10842-1.brep] b1 -restore [locate_data_file OCC10842-2.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -boptuc result -puts "Finish boolean operation ..." - -set square 11475 - -# Analysis of "nbshapes res" -set nb_v_good 9 -set nb_e_good 12 -set nb_w_good 5 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 33 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug10842_5 b/tests/bugs/modalg/bug10842_5 deleted file mode 100644 index 87cddb120d..0000000000 --- a/tests/bugs/modalg/bug10842_5 +++ /dev/null @@ -1,34 +0,0 @@ -puts "============" -puts "OCC10842" -puts "============" -puts "" -####################################################################### -# Bug in Bop -####################################################################### - -set BugNumber OCC10842 - -restore [locate_data_file OCC10842-1.brep] b1 -restore [locate_data_file OCC10842-2.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopsection result b1 b2 -puts "Finish boolean operation ..." - -set length 122.816 - -# Analysis of "nbshapes res" -set nb_v_good 6 -set nb_e_good 6 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 13 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug10846_1 b/tests/bugs/modalg/bug10846_1 deleted file mode 100644 index 151d20a9aa..0000000000 --- a/tests/bugs/modalg/bug10846_1 +++ /dev/null @@ -1,34 +0,0 @@ -puts "============" -puts "OCC10846" -puts "============" -puts "" -####################################################################### -# Cut operation produces invalid result -####################################################################### - -set BugNumber OCC10846 - -restore [locate_data_file bug10846_solid1.brep] b1 -restore [locate_data_file bug10846_solid2.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopcommon result -puts "Finish boolean operation ..." - -set square 183.567 - -# Analysis of "nbshapes res" -set nb_v_good 18 -set nb_e_good 31 -set nb_w_good 19 -set nb_f_good 19 -set nb_sh_good 6 -set nb_sol_good 6 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 100 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug10846_2 b/tests/bugs/modalg/bug10846_2 deleted file mode 100644 index 17e59f1ef0..0000000000 --- a/tests/bugs/modalg/bug10846_2 +++ /dev/null @@ -1,34 +0,0 @@ -puts "============" -puts "OCC10846" -puts "============" -puts "" -####################################################################### -# Cut operation produces invalid result -####################################################################### - -set BugNumber OCC10846 - -restore [locate_data_file bug10846_solid1.brep] b1 -restore [locate_data_file bug10846_solid2.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopfuse result -puts "Finish boolean operation ..." - -set square 2309.97 - -# Analysis of "nbshapes res" -set nb_v_good 25 -set nb_e_good 45 -set nb_w_good 15 -set nb_f_good 15 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 103 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug10846_3 b/tests/bugs/modalg/bug10846_3 deleted file mode 100644 index c69041bca7..0000000000 --- a/tests/bugs/modalg/bug10846_3 +++ /dev/null @@ -1,34 +0,0 @@ -puts "============" -puts "OCC10846" -puts "============" -puts "" -####################################################################### -# Cut operation produces invalid result -####################################################################### - -set BugNumber OCC10846 - -restore [locate_data_file bug10846_solid1.brep] b1 -restore [locate_data_file bug10846_solid2.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopcut result -puts "Finish boolean operation ..." - -set square 510.907 - -# Analysis of "nbshapes res" -set nb_v_good 24 -set nb_e_good 43 -set nb_w_good 20 -set nb_f_good 20 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 110 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug10846_4 b/tests/bugs/modalg/bug10846_4 deleted file mode 100644 index 0f277e7ddb..0000000000 --- a/tests/bugs/modalg/bug10846_4 +++ /dev/null @@ -1,34 +0,0 @@ -puts "============" -puts "OCC10846" -puts "============" -puts "" -####################################################################### -# Cut operation produces invalid result -####################################################################### - -set BugNumber OCC10846 - -restore [locate_data_file bug10846_solid1.brep] b1 -restore [locate_data_file bug10846_solid2.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -boptuc result -puts "Finish boolean operation ..." - -set square 1982.63 - -# Analysis of "nbshapes res" -set nb_v_good 19 -set nb_e_good 33 -set nb_w_good 14 -set nb_f_good 14 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 83 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug10846_5 b/tests/bugs/modalg/bug10846_5 deleted file mode 100644 index 4130e90237..0000000000 --- a/tests/bugs/modalg/bug10846_5 +++ /dev/null @@ -1,22 +0,0 @@ -puts "============" -puts "OCC10846" -puts "============" -puts "" -####################################################################### -# Cut operation produces invalid result -####################################################################### - -set BugNumber OCC10846 - -restore [locate_data_file bug10846_solid1.brep] b1 -restore [locate_data_file bug10846_solid2.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopsection result b1 b2 -puts "Finish boolean operation ..." - -set length 94.4534 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug109 b/tests/bugs/modalg/bug109 deleted file mode 100755 index df88060a3d..0000000000 --- a/tests/bugs/modalg/bug109 +++ /dev/null @@ -1,34 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty BUC61057: here can be shading problem" - -puts "================" -puts "BUC61057" -puts "OCC109" -puts "================" -puts "" -########################################################## -## Visualisation of the attached shape is wrong in the shading mode. -########################################################## - -restore [locate_data_file OCC109.brep] result - -checkshape result - -vinit -tclean result -vdisplay result -vsetdispmode result 1 -vfit - -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -if { $tri != 294 && $nod != 300 } { - puts "Faulty BUC61057: here can be shading problem" -} else { - puts "Shading of BUC61057 is OK" -} - -set square 33.8757 -set only_screen 1 - diff --git a/tests/bugs/modalg/bug110_1 b/tests/bugs/modalg/bug110_1 deleted file mode 100755 index 12eff3b10a..0000000000 --- a/tests/bugs/modalg/bug110_1 +++ /dev/null @@ -1,41 +0,0 @@ - -puts "========================" -puts " BUC60706 " -puts " OCC110 " -puts "(cases 1-3)" -puts "========================" - -restore [locate_data_file buc60706a.brep] f -checkshape f - -restore [locate_data_file buc60706b.brep] w -checkshape w -pipe t w f - -restore [locate_data_file buc60706c.brep] s -checkshape s - -bcut res_1 s t -checkshape res_1 - -restore [locate_data_file buc60706d.brep] f -checkshape f - -restore [locate_data_file buc60706e.brep] w -checkshape w -pipe t w f - -bcut res_2 res_1 t -checkshape res_2 - -restore [locate_data_file buc60706g.brep] f -checkshape f - -restore [locate_data_file buc60706h.brep] w -checkshape w -pipe t w f - -bcut result res_2 t - -set square 865172 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug110_2 b/tests/bugs/modalg/bug110_2 deleted file mode 100755 index 523c69ac6e..0000000000 --- a/tests/bugs/modalg/bug110_2 +++ /dev/null @@ -1,41 +0,0 @@ - -puts "========================" -puts " BUC60706 " -puts " OCC110 " -puts "(case 4-6)" -puts "========================" - -restore [locate_data_file buc60706j.brep] f -checkshape f - -restore [locate_data_file buc60706b.brep] w -checkshape w -pipe t w f - -restore [locate_data_file buc60706l.brep] s -checkshape s - -bcut res_1 s t -checkshape res_1 - -restore [locate_data_file buc60706m.brep] f -checkshape f - -restore [locate_data_file buc60706e.brep] w -checkshape w -pipe t w f - -bcut res_2 res_1 t -checkshape res_2 - -restore [locate_data_file buc60706p.brep] f -checkshape f - -restore [locate_data_file buc60706h.brep] w -checkshape w -pipe t w f - -bcut result res_2 t - -set square 860752 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug110_3 b/tests/bugs/modalg/bug110_3 deleted file mode 100755 index 3d389aa1d4..0000000000 --- a/tests/bugs/modalg/bug110_3 +++ /dev/null @@ -1,41 +0,0 @@ - -puts "========================" -puts " BUC60706 " -puts " OCC110 " -puts "(case 7-9)" -puts "========================" - -restore [locate_data_file buc60706s.brep] f -checkshape f - -restore [locate_data_file buc60706b.brep] w -checkshape w -pipe t w f - -restore [locate_data_file buc60706l.brep] s -checkshape s - -bcut res_1 s t -checkshape res_1 - -restore [locate_data_file buc60706v.brep] f -checkshape f - -restore [locate_data_file buc60706e.brep] w -checkshape w -pipe t w f - -bcut res_2 res_1 t -checkshape res_2 - -restore [locate_data_file buc60706x.brep] f -checkshape f - -restore [locate_data_file buc60706h.brep] w -checkshape w -pipe t w f - -bcut result res_2 t - -set square 861220 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug11565_1 b/tests/bugs/modalg/bug11565_1 deleted file mode 100755 index 29a46b572b..0000000000 --- a/tests/bugs/modalg/bug11565_1 +++ /dev/null @@ -1,27 +0,0 @@ -puts "============" -puts "OCC11565" -puts "============" -puts "" -####################################################################### -# Boolean operation "Cut" in 2d cannot cut the hole from the rectangle -####################################################################### - -restore [locate_data_file OCC11565.brep] a -explode a - -bop a_1 a_2 -bopcut result - -set square 28.6255 -set nb_v_good 12 -set nb_e_good 12 -set nb_w_good 2 -set nb_f_good 1 -set nb_sh_good 1 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 29 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug11565_2 b/tests/bugs/modalg/bug11565_2 deleted file mode 100755 index 3a2358bcc2..0000000000 --- a/tests/bugs/modalg/bug11565_2 +++ /dev/null @@ -1,27 +0,0 @@ -puts "============" -puts "OCC11565" -puts "============" -puts "" -####################################################################### -# Boolean operation "Cut" in 2d cannot cut the hole from the rectangle -####################################################################### - -restore [locate_data_file OCC11565.brep] a -explode a - -bop a_1 a_3 -bopcut result - -set square 28.6438 -set nb_v_good 12 -set nb_e_good 12 -set nb_w_good 2 -set nb_f_good 1 -set nb_sh_good 1 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 29 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug116 b/tests/bugs/modalg/bug116 deleted file mode 100755 index 072b9622f9..0000000000 --- a/tests/bugs/modalg/bug116 +++ /dev/null @@ -1,24 +0,0 @@ - -puts "================" -puts "OCC116" -puts "================" -puts "" -############################################# -## Creation of chamfer is impossible on attached shape.(SAM1201) -############################################# - -restore [locate_data_file OCC116.brep] sh -checkshape sh - -explode sh f -explode sh_6 e - -if [catch {chamf result sh sh_6_1 sh_6 A 2 45 sh_6_8 sh_6 A 2 45 } catch_result] { - puts "1) Faulty OCC116: chamfer is NOT created properly" - } else { - puts "1) CHAMF OCC116 OK" -} - -set square 48357.5 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug117_1 b/tests/bugs/modalg/bug117_1 deleted file mode 100755 index df5947b78e..0000000000 --- a/tests/bugs/modalg/bug117_1 +++ /dev/null @@ -1,16 +0,0 @@ - -puts "================" -puts "OCC117" -puts "================" -puts "" - -restore [locate_data_file OCC117.brep] sh -explode sh -checkshape sh_1 -checkshape sh_2 - -bfuse result sh_1 sh_2 - -set square 292297 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug117_2 b/tests/bugs/modalg/bug117_2 deleted file mode 100755 index 4847bb82c1..0000000000 --- a/tests/bugs/modalg/bug117_2 +++ /dev/null @@ -1,17 +0,0 @@ - -puts "================" -puts "OCC117" -puts "================" -puts "" - -restore [locate_data_file OCC117.brep] sh -explode sh -checkshape sh_1 -checkshape sh_2 - -bfuse result sh_2 sh_1 - -set square 292297 -set 2dviewer 0 - - diff --git a/tests/bugs/modalg/bug118 b/tests/bugs/modalg/bug118 deleted file mode 100755 index 936f184aad..0000000000 --- a/tests/bugs/modalg/bug118 +++ /dev/null @@ -1,17 +0,0 @@ -puts "========" -puts "OCC118" -puts "========" -######################################################## -## The Cone part of final fuse shape becomes invisible -######################################################## - -restore [locate_data_file OCC118-1.brep] a -checkshape a -restore [locate_data_file OCC118-2.brep] b -checkshape b - -bop a b -bopfuse result a b - -set square 4844.63 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug118_1 b/tests/bugs/modalg/bug118_1 deleted file mode 100755 index 069e6ea12c..0000000000 --- a/tests/bugs/modalg/bug118_1 +++ /dev/null @@ -1,17 +0,0 @@ -puts "========" -puts "OCC118" -puts "========" -######################################################## -## The Cone part of final fuse shape becomes invisible -######################################################## - -restore [locate_data_file OCC118-1.brep] a -checkshape a -restore [locate_data_file OCC118-2.brep] b -checkshape b - -bfuse result a b - -set square 4844.63 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug118_2 b/tests/bugs/modalg/bug118_2 deleted file mode 100755 index ea8056d799..0000000000 --- a/tests/bugs/modalg/bug118_2 +++ /dev/null @@ -1,17 +0,0 @@ -puts "========" -puts "OCC118" -puts "========" -######################################################## -## The Cone part of final fuse shape becomes invisible -######################################################## - -restore [locate_data_file OCC118-1.brep] a -checkshape a -restore [locate_data_file OCC118-2.brep] b -checkshape b - -bfuse result b a - -set square 4844.63 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug12213 b/tests/bugs/modalg/bug12213 deleted file mode 100644 index d52e13b4ad..0000000000 --- a/tests/bugs/modalg/bug12213 +++ /dev/null @@ -1,47 +0,0 @@ -puts "============" -puts "OCC12213" -puts "============" -puts "" -####################################################################### -# Invalid sweep was created by command "buildsweep" in DRAW in case circular path -####################################################################### - -set BugNumber OCC12213 - -circle c1 0 0 0 100 -trim cc1 c1 0 3.14 -mkedge e2 cc1 -wire w2 e2 - -box a 95 -10 -5 10 10 10 -explode a w -explode a_4 e -wire w21 a_4_1 a_4_2 a_4_3 a_4_4 - -box b -110 -10 -5 20 10 10 -explode b w -explode b_4 e -wire w22 b_4_1 b_4_2 b_4_3 b_4_4 - -explode w2 v - -mksweep w2 -addsweep w21 w2_1 -addsweep w22 w2_2 -buildsweep result - -set square 15708.8 - -# Analysis of "nbshapes res" -set nb_v_good 8 -set nb_e_good 12 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 29 - -set 2dviewer 1 - diff --git a/tests/bugs/modalg/bug12257 b/tests/bugs/modalg/bug12257 deleted file mode 100644 index 39214ff550..0000000000 --- a/tests/bugs/modalg/bug12257 +++ /dev/null @@ -1,37 +0,0 @@ -puts "============" -puts "OCC12257" -puts "============" -puts "" -####################################################################### -# Fuse operation fails -####################################################################### - -set BugNumber OCC12257 - -puts "Load shape ..." -restore [locate_data_file OCC12257.brep] b1 - -explode b1 - -puts "Prepare boolean operation ..." -bop b1_1 b1_2 - -puts "Start boolean operation ..." -bopfuse result -puts "Finish boolean operation ..." - -set square 3394.17 - -# Analysis of "nbshapes res" -set nb_v_good 72 -set nb_e_good 109 -set nb_w_good 39 -set nb_f_good 39 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 262 - -set 2dviewer 1 - diff --git a/tests/bugs/modalg/bug1226 b/tests/bugs/modalg/bug1226 deleted file mode 100644 index cc775f0d25..0000000000 --- a/tests/bugs/modalg/bug1226 +++ /dev/null @@ -1,24 +0,0 @@ -puts "================" -puts "OCC1226" -puts "The revolution problem reproduced in OCC Samples" -puts "================" -puts "" - -vertex v1 0 0 0 -vertex v2 50 0 0 -vertex v3 50 50 0 - -edge e1 v1 v2 -edge e2 v2 v3 -edge e3 v3 v1 - -wire w e1 e2 e3 - -mkplane f w - -revol result f 0 0 30 0 1 0 180 - -set square 23211.3 -set 2dviewer 0 - - diff --git a/tests/bugs/modalg/bug122_1 b/tests/bugs/modalg/bug122_1 deleted file mode 100755 index 3bf29a6fe4..0000000000 --- a/tests/bugs/modalg/bug122_1 +++ /dev/null @@ -1,17 +0,0 @@ - -puts "================" -puts "OCC122" -puts "================" -puts "" - -restore [locate_data_file OCC122.brep] sh -explode sh - -checkshape sh_1 -checkshape sh_2 - -bfuse result sh_1 sh_2 - -set square 172790 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug122_2 b/tests/bugs/modalg/bug122_2 deleted file mode 100755 index 1fbedc286e..0000000000 --- a/tests/bugs/modalg/bug122_2 +++ /dev/null @@ -1,16 +0,0 @@ -puts "================" -puts "OCC122" -puts "================" -puts "" - -restore [locate_data_file OCC122.brep] sh -explode sh - -checkshape sh_1 -checkshape sh_2 - -bfuse result sh_2 sh_1 - -set square 172790 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug122_3 b/tests/bugs/modalg/bug122_3 deleted file mode 100755 index b92f668e11..0000000000 --- a/tests/bugs/modalg/bug122_3 +++ /dev/null @@ -1,16 +0,0 @@ -puts "================" -puts "OCC122" -puts "================" -puts "" - -restore [locate_data_file OCC122.brep] sh -explode sh - -checkshape sh_1 -checkshape sh_2 - -bcut result sh_1 sh_2 - -set square 83334.1 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug122_4 b/tests/bugs/modalg/bug122_4 deleted file mode 100755 index 7e892c3f91..0000000000 --- a/tests/bugs/modalg/bug122_4 +++ /dev/null @@ -1,16 +0,0 @@ - -puts "================" -puts "OCC122" -puts "================" -puts "" - -restore [locate_data_file OCC122.brep] sh -explode sh - -checkshape sh_1 -checkshape sh_2 - -bcut result sh_2 sh_1 - -set square 132943 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug123_1 b/tests/bugs/modalg/bug123_1 deleted file mode 100755 index ca0a6d22c5..0000000000 --- a/tests/bugs/modalg/bug123_1 +++ /dev/null @@ -1,17 +0,0 @@ - -puts "================" -puts "OCC123" -puts "================" -puts "" - -restore [locate_data_file OCC123.brep] sh -checkshape sh - -explode sh - -bfuse result sh_1 sh_2 - -set square 81598.4 -set 2dviewer 0 - - diff --git a/tests/bugs/modalg/bug123_2 b/tests/bugs/modalg/bug123_2 deleted file mode 100755 index edb5a8869b..0000000000 --- a/tests/bugs/modalg/bug123_2 +++ /dev/null @@ -1,18 +0,0 @@ - -puts "================" -puts "OCC123" -puts "================" -puts "" - -restore [locate_data_file OCC123.brep] sh -checkshape sh - -explode sh - -bfuse result sh_2 sh_1 - -set square 81598.4 -set 2dviewer 0 - - - diff --git a/tests/bugs/modalg/bug1243_1 b/tests/bugs/modalg/bug1243_1 deleted file mode 100644 index 8fa04a21b7..0000000000 --- a/tests/bugs/modalg/bug1243_1 +++ /dev/null @@ -1,26 +0,0 @@ -puts "================" -puts "OCC1243" -puts "================" -puts "Bad solid created from face with command 'revol'" -puts "" - -restore [locate_data_file OCC1243-1.brep] f1 -checkshape f1 - -revol result f1 -5000.0 0.0 0.0 10000.0 0.0 0.0 360.0 - -set tolerance [maxtolerance result] -regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxFaceTolerance -regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxEdgeTolerance -regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxVertexTolerance - -set max_tolerance 1.00000e-06 - -if { ${MaxFaceTolerance} > ${max_tolerance} || ${MaxEdgeTolerance} > ${max_tolerance} || ${MaxVertexTolerance} > ${max_tolerance} } { - puts "OCC1243 - Error" -} else { - puts "OCC1243 - OK" -} - -set square 350733 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug1243_2 b/tests/bugs/modalg/bug1243_2 deleted file mode 100644 index 3fc9d74348..0000000000 --- a/tests/bugs/modalg/bug1243_2 +++ /dev/null @@ -1,26 +0,0 @@ -puts "================" -puts "OCC1243" -puts "================" -puts "Bad solid created from face with command 'revol'" -puts "" - -restore [locate_data_file OCC1243-2.brep] f1 -checkshape f1 - -revol result f1 -5000.0 0.0 0.0 10000.0 0.0 0.0 360.0 - -set tolerance [maxtolerance result] -regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxFaceTolerance -regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxEdgeTolerance -regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxVertexTolerance - -set max_tolerance 1.00000e-06 - -if { ${MaxFaceTolerance} > ${max_tolerance} || ${MaxEdgeTolerance} > ${max_tolerance} || ${MaxVertexTolerance} > ${max_tolerance} } { - puts "OCC1243 - Error" -} else { - puts "OCC1243 - OK" -} - -set square 3.06024e+06 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug12507 b/tests/bugs/modalg/bug12507 deleted file mode 100755 index dbef9be48f..0000000000 --- a/tests/bugs/modalg/bug12507 +++ /dev/null @@ -1,30 +0,0 @@ -puts "============" -puts "OCC12507" -puts "============" -puts "" -####################################################################### -# Wrong result of fuse operation -####################################################################### - -puts "First shape ..." -pcylinder c 3 3 -explode c e - -puts "Second shape ..." -tcopy c_3 e3 -ttranslate e3 0 6 0 - -bop c_3 e3 -bopfuse result - -set nb_v_good 3 -set nb_e_good 4 -set nb_w_good 1 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 9 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug1255 b/tests/bugs/modalg/bug1255 deleted file mode 100644 index 7ee3cb6152..0000000000 --- a/tests/bugs/modalg/bug1255 +++ /dev/null @@ -1,16 +0,0 @@ -puts "================" -puts "OCC1255" -puts "================" -puts "" -# Exception in command 'section' - -restore [locate_data_file OCC1255.brep] a -checkshape a - -plane p1 0 -36.8067 0 0 1 0 -mkface f1 p1 - -bsection result a f1 - -set length 5534.74 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug1255_1 b/tests/bugs/modalg/bug1255_1 deleted file mode 100644 index e204e59af1..0000000000 --- a/tests/bugs/modalg/bug1255_1 +++ /dev/null @@ -1,24 +0,0 @@ -puts "=========" -puts " OCC1255 " -puts "=========" -puts "" -############################################### -## Exception in command 'section' -# (This script tests new topology) -############################################### - -restore [locate_data_file OCC1255.brep] a -checkshape a - -plane p1 0 -36.8067 0 0 1 0 -mkface f1 p1 - -if { [catch {bop a f1 } ] } { - puts "Faulty OCC1255: BOP operation was made wrongly" -} else { - bopsection result -} - -set length 5383.42 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug12627 b/tests/bugs/modalg/bug12627 deleted file mode 100755 index 073bbadf66..0000000000 --- a/tests/bugs/modalg/bug12627 +++ /dev/null @@ -1,30 +0,0 @@ -puts "============" -puts "OCC12627" -puts "============" -puts "" -####################################################################### -# Classification of a point comparing to a face is incorrect -####################################################################### - -set BugNumber OCC12627 - -restore [locate_data_file OCC12627_1.brep] b1 -restore [locate_data_file OCC12627_2.brep] b2 - -bop b1 b2 -bopfuse result - -set square 272295 -set nb_v_good 13 -set nb_e_good 20 -set nb_w_good 9 -set nb_f_good 9 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 54 - -set 2dviewer 0 - - diff --git a/tests/bugs/modalg/bug12661 b/tests/bugs/modalg/bug12661 deleted file mode 100755 index 762d9f9f40..0000000000 --- a/tests/bugs/modalg/bug12661 +++ /dev/null @@ -1,82 +0,0 @@ -puts "================" -puts "OCC12661" -puts "================" -puts "" -####################################################################################### -# Wrong calculation of bnd box for edge if edge has polygon of triangulation -####################################################################################### - -proc GetPercent {Value GoodValue} { - set Percent 0. - if {${GoodValue} != 0.} { - set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] - } elseif {${Value} != 0.} { - set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] - } else { - set Percent 0. - } - return ${Percent} -} - -set BugNumber OCC12661 - -restore [locate_data_file OCC12661.brep] result -set res [bounding result] - -set x1 [lindex ${res} 0] -set y1 [lindex ${res} 1] -set z1 [lindex ${res} 2] -set x2 [lindex ${res} 3] -set y2 [lindex ${res} 4] -set z2 [lindex ${res} 5] - -set good_x1 -6.3659273065258741 -set good_y1 0.7051405053395956 -set good_z1 -2.5792617865186296 -set good_x2 6.3659273065258795 -set good_y2 7.6599592236605769 -set good_z2 3.0815250146676485 - -set percent_max 0.1 -set status 0 - -set x1_percent [GetPercent ${x1} ${good_x1}] -set y1_percent [GetPercent ${y1} ${good_y1}] -set z1_percent [GetPercent ${z1} ${good_z1}] -set x2_percent [GetPercent ${x2} ${good_x2}] -set y2_percent [GetPercent ${y2} ${good_y2}] -set z2_percent [GetPercent ${z2} ${good_z2}] - -if {${x1_percent} > ${percent_max}} { - puts "Faulty ${BugNumber} : x1 is wrong" - set status 1 -} -if {${y1_percent} > ${percent_max}} { - puts "Faulty ${BugNumber} : y1 is wrong" - set status 1 -} -if {${z1_percent} > ${percent_max}} { - puts "Faulty ${BugNumber} : z1 is wrong" - set status 1 -} -if {${x2_percent} > ${percent_max}} { - puts "Faulty ${BugNumber} : x2 is wrong" - set status 1 -} -if {${y2_percent} > ${percent_max}} { - puts "Faulty ${BugNumber} : y2 is wrong" - set status 1 -} -if {${z2_percent} > ${percent_max}} { - puts "Faulty ${BugNumber} : z2 is wrong" - set status 1 -} - -if { ${status} == 0 } { - puts "${BugNumber}: OK" -} else { - puts "${BugNumber}: Faulty" -} - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug12918 b/tests/bugs/modalg/bug12918 deleted file mode 100755 index 079b51fba0..0000000000 --- a/tests/bugs/modalg/bug12918 +++ /dev/null @@ -1,29 +0,0 @@ -puts "============" -puts "OCC12918" -puts "============" -puts "" -####################################################################### -# Boolean Operations failed -####################################################################### - -set BugNumber OCC12918 - -restore [locate_data_file OCC12918_1.brep] b1 -restore [locate_data_file OCC12918_2.brep] b2 - -bop b1 b2 -bopfuse result - -set square 0.00240038 -set nb_v_good 24 -set nb_e_good 36 -set nb_w_good 14 -set nb_f_good 14 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 91 - -set 2dviewer 1 - diff --git a/tests/bugs/modalg/bug13116_1 b/tests/bugs/modalg/bug13116_1 deleted file mode 100755 index 45a23c3452..0000000000 --- a/tests/bugs/modalg/bug13116_1 +++ /dev/null @@ -1,29 +0,0 @@ -puts "============" -puts "OCC13116" -puts "============" -puts "" -####################################################################### -# Boolean Operations produce faulty shape -####################################################################### - -set BugNumber OCC13116 - -restore [locate_data_file OCC13116_sh1.brep] b1 -restore [locate_data_file OCC13116_sh2.brep] b2 - -bop b1 b2 -bopfuse result - -set square 438194 -set nb_v_good 21 -set nb_e_good 37 -set nb_w_good 16 -set nb_f_good 16 -set nb_sh_good 2 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 94 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug13116_2 b/tests/bugs/modalg/bug13116_2 deleted file mode 100755 index 4cd36f391f..0000000000 --- a/tests/bugs/modalg/bug13116_2 +++ /dev/null @@ -1,27 +0,0 @@ -puts "============" -puts "OCC13116" -puts "============" -puts "" -####################################################################### -# Boolean Operations produce faulty shape -####################################################################### - -restore [locate_data_file OCC13116_sh1.brep] b1 -restore [locate_data_file OCC13116_sh2.brep] b2 - -bop b1 b2 -bopcommon result - -set square 3769.91 -set nb_v_good 3 -set nb_e_good 5 -set nb_w_good 2 -set nb_f_good 2 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 15 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug13116_3 b/tests/bugs/modalg/bug13116_3 deleted file mode 100755 index 5f36a5ea38..0000000000 --- a/tests/bugs/modalg/bug13116_3 +++ /dev/null @@ -1,27 +0,0 @@ -puts "============" -puts "OCC13116" -puts "============" -puts "" -####################################################################### -# Boolean Operations produce faulty shape -####################################################################### - -restore [locate_data_file OCC13116_sh1.brep] b1 -restore [locate_data_file OCC13116_sh2.brep] b2 - -bop b1 b2 -bopcut result - -set square 438194 -set nb_v_good 21 -set nb_e_good 34 -set nb_w_good 15 -set nb_f_good 15 -set nb_sh_good 2 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 89 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug13116_4 b/tests/bugs/modalg/bug13116_4 deleted file mode 100755 index a4364700b7..0000000000 --- a/tests/bugs/modalg/bug13116_4 +++ /dev/null @@ -1,27 +0,0 @@ -puts "============" -puts "OCC13116" -puts "============" -puts "" -####################################################################### -# Boolean Operations produce faulty shape -####################################################################### - -restore [locate_data_file OCC13116_sh1.brep] b1 -restore [locate_data_file OCC13116_sh2.brep] b2 - -bop b1 b2 -boptuc result - -set square 3769.89 -set nb_v_good 3 -set nb_e_good 8 -set nb_w_good 3 -set nb_f_good 3 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 20 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug13140 b/tests/bugs/modalg/bug13140 deleted file mode 100755 index 4f6182227d..0000000000 --- a/tests/bugs/modalg/bug13140 +++ /dev/null @@ -1,47 +0,0 @@ -puts "============" -puts "OCC13140" -puts "============" -puts "" -####################################################################### -# Exception during creation pipe on from attached spine and profile -####################################################################### - -restore [locate_data_file OCC13140_Spine.brep] Spine -restore [locate_data_file OCC13140_Profile.brep] Profile - -pipe result Spine Profile - -set square 3.48689 -set good_vertex 2 -set good_edge 3 -set good_wire 1 -set good_face 1 - -set explode_v_length [llength [explode result v] ] -set explode_e_length [llength [explode result e] ] -set explode_w_length [llength [explode result w] ] -set explode_f_length [llength [explode result f] ] - -if { ${explode_v_length} != ${good_vertex} } { - puts "vertex: Faulty" -} else { - puts "vertex: OK" -} -if { ${explode_e_length} != ${good_edge} } { - puts "edge: Faulty" -} else { - puts "edge: OK" -} -if { ${explode_w_length} != ${good_wire} } { - puts "wire: Faulty" -} else { - puts "wire: OK" -} -if { ${explode_f_length} != ${good_face} } { - puts "face: Faulty" -} else { - puts "face: OK" -} - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug13142 b/tests/bugs/modalg/bug13142 deleted file mode 100755 index e1563caa66..0000000000 --- a/tests/bugs/modalg/bug13142 +++ /dev/null @@ -1,28 +0,0 @@ -puts "============" -puts "OCC13142" -puts "============" -puts "" -####################################################################### -# Exception is raised while performing boolean operations -####################################################################### - -restore [locate_data_file OCC13142.brep] result - -vinit -vdisplay result -vfit -vsetdispmode 1 - -set square 513.007 -set nb_v_good 34 -set nb_e_good 66 -set nb_w_good 47 -set nb_f_good 42 -set nb_sh_good 9 -set nb_sol_good 9 -set nb_compsol_good 0 -set nb_compound_good 3 -set nb_shape_good 210 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug13186_1 b/tests/bugs/modalg/bug13186_1 deleted file mode 100755 index 1b98aede77..0000000000 --- a/tests/bugs/modalg/bug13186_1 +++ /dev/null @@ -1,29 +0,0 @@ -puts "TODO OCC12345 ALL: Error : Result shape is WRONG" -puts "============" -puts "OCC13186" -puts "============" -puts "" -####################################################################### -# Problem with Boolean operation -# Bug is reprodused on Linux platform only -####################################################################### - -restore [locate_data_file OCC13186_cutcyl11.brep] b1 -restore [locate_data_file OCC13186_sphere.brep] b2 - -bop b1 b2 -bopcut result - -set square 42.5841 -set nb_v_good 19 -set nb_e_good 25 -set nb_w_good 12 -set nb_f_good 7 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 66 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug13186_2 b/tests/bugs/modalg/bug13186_2 deleted file mode 100755 index 10c6b3bcc2..0000000000 --- a/tests/bugs/modalg/bug13186_2 +++ /dev/null @@ -1,29 +0,0 @@ -puts "TODO OCC12345 ALL: Error : Result shape is WRONG" -puts "============" -puts "OCC13186" -puts "============" -puts "" -####################################################################### -# Problem with Boolean operation -# Bug is reprodused on Linux platform only -####################################################################### - -restore [locate_data_file OCC13186_cutcyl11.brep] b1 -restore [locate_data_file OCC13186_sphere.brep] b2 - -bop b1 b2 -bopfuse result - -set square 85.6816 -set nb_v_good 21 -set nb_e_good 28 -set nb_w_good 13 -set nb_f_good 8 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 73 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug13186_3 b/tests/bugs/modalg/bug13186_3 deleted file mode 100755 index aa62fa0484..0000000000 --- a/tests/bugs/modalg/bug13186_3 +++ /dev/null @@ -1,29 +0,0 @@ -puts "TODO OCC12345 ALL: Error : Result shape is WRONG" -puts "============" -puts "OCC13186" -puts "============" -puts "" -####################################################################### -# Problem with Boolean operation -# Bug is reprodused on Linux platform only -####################################################################### - -restore [locate_data_file OCC13186_cutcyl11.brep] b1 -restore [locate_data_file OCC13186_sphere.brep] b2 - -bop b1 b2 -bopcommon result - -set square 14.9648 -set nb_v_good 8 -set nb_e_good 11 -set nb_w_good 7 -set nb_f_good 5 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 34 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug13186_4 b/tests/bugs/modalg/bug13186_4 deleted file mode 100755 index ccb5179adb..0000000000 --- a/tests/bugs/modalg/bug13186_4 +++ /dev/null @@ -1,29 +0,0 @@ -puts "TODO OCC12345 ALL: Error : Result shape is WRONG" -puts "============" -puts "OCC13186" -puts "============" -puts "" -####################################################################### -# Problem with Boolean operation -# Bug is reprodused on Linux platform only -####################################################################### - -restore [locate_data_file OCC13186_cutcyl11.brep] b1 -restore [locate_data_file OCC13186_sphere.brep] b2 - -bop b1 b2 -boptuc result - -set square 58.0624 -set nb_v_good 10 -set nb_e_good 14 -set nb_w_good 8 -set nb_f_good 6 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 41 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug13209_1 b/tests/bugs/modalg/bug13209_1 deleted file mode 100755 index e42f64f226..0000000000 --- a/tests/bugs/modalg/bug13209_1 +++ /dev/null @@ -1,27 +0,0 @@ -puts "============" -puts "OCC13209" -puts "============" -puts "" -####################################################################### -# Exception is raised while performing boolean operations -####################################################################### - -restore [locate_data_file OCC13209_s1.brep] b1 -restore [locate_data_file OCC13209_s2.brep] b2 - -bop b1 b2 -bopfuse result - -set square 17308.3 -set nb_v_good 13 -set nb_e_good 25 -set nb_w_good 13 -set nb_f_good 12 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 66 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug13209_2 b/tests/bugs/modalg/bug13209_2 deleted file mode 100755 index fcd4e9ebf2..0000000000 --- a/tests/bugs/modalg/bug13209_2 +++ /dev/null @@ -1,30 +0,0 @@ -puts "============" -puts "OCC13209" -puts "============" -puts "" -####################################################################### -# Exception is raised while performing boolean operations -####################################################################### - -restore [locate_data_file OCC13209_s1.brep] b1 -restore [locate_data_file OCC13209_s2.brep] b2 - -bop b1 b2 -bopcommon result - -set square 2990.42 -set nb_v_good 13 -set nb_e_good 23 -set nb_w_good 10 -set nb_f_good 10 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 59 - -set 2dviewer 0 - - - - diff --git a/tests/bugs/modalg/bug13209_3 b/tests/bugs/modalg/bug13209_3 deleted file mode 100755 index e9d940df67..0000000000 --- a/tests/bugs/modalg/bug13209_3 +++ /dev/null @@ -1,27 +0,0 @@ -puts "============" -puts "OCC13209" -puts "============" -puts "" -####################################################################### -# Exception is raised while performing boolean operations -####################################################################### - -restore [locate_data_file OCC13209_s1.brep] b1 -restore [locate_data_file OCC13209_s2.brep] b2 - -bop b1 b2 -bopcut result - -set square 17292.5 -set nb_v_good 13 -set nb_e_good 26 -set nb_w_good 12 -set nb_f_good 11 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 65 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug13209_4 b/tests/bugs/modalg/bug13209_4 deleted file mode 100755 index c9de1b5e0f..0000000000 --- a/tests/bugs/modalg/bug13209_4 +++ /dev/null @@ -1,27 +0,0 @@ -puts "============" -puts "OCC13209" -puts "============" -puts "" -####################################################################### -# Exception is raised while performing boolean operations -####################################################################### - -restore [locate_data_file OCC13209_s1.brep] b1 -restore [locate_data_file OCC13209_s2.brep] b2 - -bop b1 b2 -boptuc result - -set square 3006.19 -set nb_v_good 11 -set nb_e_good 18 -set nb_w_good 11 -set nb_f_good 11 -set nb_sh_good 3 -set nb_sol_good 3 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 58 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug13211_1 b/tests/bugs/modalg/bug13211_1 deleted file mode 100755 index 4413d96d6a..0000000000 --- a/tests/bugs/modalg/bug13211_1 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC13211" -puts "============" -puts "" -####################################################################### -# Wrong treatment of conical faces in BOP algorithm -####################################################################### - -restore [locate_data_file OCC13211-f14.brep] b1 -restore [locate_data_file OCC13211-f24.brep] b2 - -bop b1 b2 -bopsection result - -set length 37.7057 -set nb_v_good 5 -set nb_e_good 4 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 10 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug13211_10 b/tests/bugs/modalg/bug13211_10 deleted file mode 100755 index 79e24d1680..0000000000 --- a/tests/bugs/modalg/bug13211_10 +++ /dev/null @@ -1,27 +0,0 @@ -puts "============" -puts "OCC13211" -puts "============" -puts "" -####################################################################### -# Wrong treatment of conical faces in BOP algorithm -####################################################################### - -restore [locate_data_file OCC13209_s1.brep] s1 -restore [locate_data_file OCC13209_s2.brep] s2 - -bop s1 s2 -boptuc result - -set square 3006.19 -set nb_v_good 11 -set nb_e_good 18 -set nb_w_good 11 -set nb_f_good 11 -set nb_sh_good 3 -set nb_sol_good 3 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 58 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug13211_11 b/tests/bugs/modalg/bug13211_11 deleted file mode 100755 index 5ecd0b9f66..0000000000 --- a/tests/bugs/modalg/bug13211_11 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC13211" -puts "============" -puts "" -####################################################################### -# Wrong treatment of conical faces in BOP algorithm -####################################################################### - -restore [locate_data_file OCC13209_s1.brep] s1 -restore [locate_data_file OCC13209_s2.brep] s2 - -bop s1 s2 -bopsection result - -set length 228.699 -set nb_v_good 13 -set nb_e_good 15 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 29 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug13211_2 b/tests/bugs/modalg/bug13211_2 deleted file mode 100755 index 9e78307060..0000000000 --- a/tests/bugs/modalg/bug13211_2 +++ /dev/null @@ -1,46 +0,0 @@ -puts "TODO ?OCC12345 ALL: Error : Result shape is WRONG" -puts "============" -puts "OCC13211" -puts "============" -puts "" -####################################################################### -# Wrong treatment of conical faces in BOP algorithm -####################################################################### - -set BugNumber OCC13211 - -vertex v1 136.06, 187.51, 0.0 -vertex v2 136.06, 143.01, 0.0 -edge e1 v1 v2 -vertex v3 136.06, 143.01, 0.0 -vertex v4 128.08, 143.01, 0.0 -edge e2 v3 v4 -vertex v5 128.08, 143.01, 0.0 -vertex v6 127.88, 164.75, 0.0 -edge e3 v5 v6 -vertex v7 127.88, 164.75, 0.0 -vertex v8 116.11, 176.00, 0.0 -edge e4 v7 v8 -vertex v9 116.11, 176.00, 0.0 -vertex v10 136.06, 187.51, 0.0 -edge e5 v9 v10 -wire twire e1 e2 e3 e4 e5 -mkplane tface twire -revol r1 tface 153.08, 143.01 0.0 1 0 0 360 1 -revol r2 tface 136.06, 68.01, 0.0 0 1 0 360 1 - -bop r1 r2 -bopfuse result - -set square 17308.3 -set nb_v_good 13 -set nb_e_good 25 -set nb_w_good 13 -set nb_f_good 12 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 66 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug13211_3 b/tests/bugs/modalg/bug13211_3 deleted file mode 100755 index 5f60902008..0000000000 --- a/tests/bugs/modalg/bug13211_3 +++ /dev/null @@ -1,43 +0,0 @@ -puts "============" -puts "OCC13211" -puts "============" -puts "" -####################################################################### -# Wrong treatment of conical faces in BOP algorithm -####################################################################### - -vertex v1 136.06, 187.51, 0.0 -vertex v2 136.06, 143.01, 0.0 -edge e1 v1 v2 -vertex v3 136.06, 143.01, 0.0 -vertex v4 128.08, 143.01, 0.0 -edge e2 v3 v4 -vertex v5 128.08, 143.01, 0.0 -vertex v6 127.88, 164.75, 0.0 -edge e3 v5 v6 -vertex v7 127.88, 164.75, 0.0 -vertex v8 116.11, 176.00, 0.0 -edge e4 v7 v8 -vertex v9 116.11, 176.00, 0.0 -vertex v10 136.06, 187.51, 0.0 -edge e5 v9 v10 -wire twire e1 e2 e3 e4 e5 -mkplane tface twire -revol r1 tface 153.08, 143.01 0.0 1 0 0 360 1 -revol r2 tface 136.06, 68.01, 0.0 0 1 0 360 1 - -bop r1 r2 -bopcommon result - -set square 2990.42 -set nb_v_good 13 -set nb_e_good 23 -set nb_w_good 10 -set nb_f_good 10 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 59 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug13211_4 b/tests/bugs/modalg/bug13211_4 deleted file mode 100755 index d8c09f7a02..0000000000 --- a/tests/bugs/modalg/bug13211_4 +++ /dev/null @@ -1,44 +0,0 @@ -puts "TODO ?OCC12345 ALL: Error : Result shape is WRONG" -puts "============" -puts "OCC13211" -puts "============" -puts "" -####################################################################### -# Wrong treatment of conical faces in BOP algorithm -####################################################################### - -vertex v1 136.06, 187.51, 0.0 -vertex v2 136.06, 143.01, 0.0 -edge e1 v1 v2 -vertex v3 136.06, 143.01, 0.0 -vertex v4 128.08, 143.01, 0.0 -edge e2 v3 v4 -vertex v5 128.08, 143.01, 0.0 -vertex v6 127.88, 164.75, 0.0 -edge e3 v5 v6 -vertex v7 127.88, 164.75, 0.0 -vertex v8 116.11, 176.00, 0.0 -edge e4 v7 v8 -vertex v9 116.11, 176.00, 0.0 -vertex v10 136.06, 187.51, 0.0 -edge e5 v9 v10 -wire twire e1 e2 e3 e4 e5 -mkplane tface twire -revol r1 tface 153.08, 143.01 0.0 1 0 0 360 1 -revol r2 tface 136.06, 68.01, 0.0 0 1 0 360 1 - -bop r1 r2 -bopcut result - -set square 17292.5 -set nb_v_good 13 -set nb_e_good 26 -set nb_w_good 12 -set nb_f_good 11 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 65 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug13211_5 b/tests/bugs/modalg/bug13211_5 deleted file mode 100755 index 5d832e4b44..0000000000 --- a/tests/bugs/modalg/bug13211_5 +++ /dev/null @@ -1,43 +0,0 @@ -puts "============" -puts "OCC13211" -puts "============" -puts "" -####################################################################### -# Wrong treatment of conical faces in BOP algorithm -####################################################################### - -vertex v1 136.06, 187.51, 0.0 -vertex v2 136.06, 143.01, 0.0 -edge e1 v1 v2 -vertex v3 136.06, 143.01, 0.0 -vertex v4 128.08, 143.01, 0.0 -edge e2 v3 v4 -vertex v5 128.08, 143.01, 0.0 -vertex v6 127.88, 164.75, 0.0 -edge e3 v5 v6 -vertex v7 127.88, 164.75, 0.0 -vertex v8 116.11, 176.00, 0.0 -edge e4 v7 v8 -vertex v9 116.11, 176.00, 0.0 -vertex v10 136.06, 187.51, 0.0 -edge e5 v9 v10 -wire twire e1 e2 e3 e4 e5 -mkplane tface twire -revol r1 tface 153.08, 143.01 0.0 1 0 0 360 1 -revol r2 tface 136.06, 68.01, 0.0 0 1 0 360 1 - -bop r1 r2 -boptuc result - -set square 3006.19 -set nb_v_good 11 -set nb_e_good 18 -set nb_w_good 11 -set nb_f_good 11 -set nb_sh_good 3 -set nb_sol_good 3 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 58 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug13211_6 b/tests/bugs/modalg/bug13211_6 deleted file mode 100755 index 4eb80cc3b9..0000000000 --- a/tests/bugs/modalg/bug13211_6 +++ /dev/null @@ -1,43 +0,0 @@ -puts "============" -puts "OCC13211" -puts "============" -puts "" -####################################################################### -# Wrong treatment of conical faces in BOP algorithm -####################################################################### - -vertex v1 136.06, 187.51, 0.0 -vertex v2 136.06, 143.01, 0.0 -edge e1 v1 v2 -vertex v3 136.06, 143.01, 0.0 -vertex v4 128.08, 143.01, 0.0 -edge e2 v3 v4 -vertex v5 128.08, 143.01, 0.0 -vertex v6 127.88, 164.75, 0.0 -edge e3 v5 v6 -vertex v7 127.88, 164.75, 0.0 -vertex v8 116.11, 176.00, 0.0 -edge e4 v7 v8 -vertex v9 116.11, 176.00, 0.0 -vertex v10 136.06, 187.51, 0.0 -edge e5 v9 v10 -wire twire e1 e2 e3 e4 e5 -mkplane tface twire -revol r1 tface 153.08, 143.01 0.0 1 0 0 360 1 -revol r2 tface 136.06, 68.01, 0.0 0 1 0 360 1 - -bop r1 r2 -bopsection result - -set length 228.699 -set nb_v_good_vertex 13 -set nb_e_good_edge 15 -set nb_w_good_wire 0 -set nb_f_good_face 0 -set nb_sh_good_shell 0 -set nb_sol_good_solid 0 -set nb_compsol_good_compsolid 0 -set nb_compound_good_compound 1 -set nb_shape_good_shape 29 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug13211_7 b/tests/bugs/modalg/bug13211_7 deleted file mode 100755 index 35455eadc1..0000000000 --- a/tests/bugs/modalg/bug13211_7 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC13211" -puts "============" -puts "" -####################################################################### -# Wrong treatment of conical faces in BOP algorithm -####################################################################### - -restore [locate_data_file OCC13209_s1.brep] s1 -restore [locate_data_file OCC13209_s2.brep] s2 - -bop s1 s2 -bopfuse result - -set square 17308.3 -set nb_v_good 13 -set nb_e_good 25 -set nb_w_good 13 -set nb_f_good 12 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 66 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug13211_8 b/tests/bugs/modalg/bug13211_8 deleted file mode 100755 index 775c689910..0000000000 --- a/tests/bugs/modalg/bug13211_8 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC13211" -puts "============" -puts "" -####################################################################### -# Wrong treatment of conical faces in BOP algorithm -####################################################################### - -restore [locate_data_file OCC13209_s1.brep] s1 -restore [locate_data_file OCC13209_s2.brep] s2 - -bop s1 s2 -bopcommon result - -set square 2990.42 -set nb_v_good 13 -set nb_e_good 23 -set nb_w_good 10 -set nb_f_good 10 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 59 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug13211_9 b/tests/bugs/modalg/bug13211_9 deleted file mode 100755 index 6c44ff238f..0000000000 --- a/tests/bugs/modalg/bug13211_9 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC13211" -puts "============" -puts "" -####################################################################### -# Wrong treatment of conical faces in BOP algorithm -####################################################################### - -restore [locate_data_file OCC13209_s1.brep] s1 -restore [locate_data_file OCC13209_s2.brep] s2 - -bop s1 s2 -bopcut result - -set square 17292.5 -set nb_v_good 13 -set nb_e_good 26 -set nb_w_good 12 -set nb_f_good 11 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 65 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug13395 b/tests/bugs/modalg/bug13395 deleted file mode 100755 index 84e659a20d..0000000000 --- a/tests/bugs/modalg/bug13395 +++ /dev/null @@ -1,54 +0,0 @@ -puts "============" -puts "OCC13395" -puts "============" -puts "" -####################################################################### -# Pipe is constructed wrongly on a result of revolution -####################################################################### - -# revolution of an edge to obtain half-disk -line line1 0 0 0 1 0 0 -mkedge edge1 line1 0 10 -revol revol1 edge1 0 0 0 0 1 0 180 - -# spine for pipe -line line2 0 0 0 0 1 0 -mkedge edge2 line2 0 10 -wire wire_spine edge2 - -# invalid pipe -pipe result wire_spine revol1 - -set square 828.319 -set good_vertex 6 -set good_edge 9 -set good_wire 5 -set good_face 5 -set explode_v_length [llength [explode result v] ] -set explode_e_length [llength [explode result e] ] -set explode_w_length [llength [explode result w] ] -set explode_f_length [llength [explode result f] ] - -if { ${explode_v_length} != ${good_vertex} } { - puts "vertex: Faulty" -} else { - puts "vertex: OK" -} -if { ${explode_e_length} != ${good_edge} } { - puts "edge: Faulty" -} else { - puts "edge: OK" -} -if { ${explode_w_length} != ${good_wire} } { - puts "wire: Faulty" -} else { - puts "wire: OK" -} -if { ${explode_f_length} != ${good_face} } { - puts "face: Faulty" -} else { - puts "face: OK" -} - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug13538 b/tests/bugs/modalg/bug13538 deleted file mode 100755 index 817c1bfb5b..0000000000 --- a/tests/bugs/modalg/bug13538 +++ /dev/null @@ -1,30 +0,0 @@ -puts "============" -puts "OCC13538" -puts "============" -puts "" -####################################################################### -# Problem with Boolean operation on Shells -####################################################################### - -box a 100 100 100 -box b 100 100 100 -ttranslate b 0 0 100 -explode a Sh -explode b Sh - -bop a_1 b_1 -bopcommon result - -set square 10000 -set nb_v_good 4 -set nb_e_good 4 -set nb_w_good 1 -set nb_f_good 1 -set nb_sh_good 1 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 12 - -set 2viewer 0 - diff --git a/tests/bugs/modalg/bug1360 b/tests/bugs/modalg/bug1360 deleted file mode 100644 index 3d3bec60ac..0000000000 --- a/tests/bugs/modalg/bug1360 +++ /dev/null @@ -1,19 +0,0 @@ -pload QAcommands - -puts "================" -puts "OCC1360" -puts "================" -puts "" -###################################################### -# Solid correctly displayed in shadding mode, but one tis faces itself has no prs -###################################################### - -pload XDE - -restore [locate_data_file OCC1360.brep] sh - -fixshape result sh 1e-7 - -set square 407.599 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug140 b/tests/bugs/modalg/bug140 deleted file mode 100755 index 9f342caf75..0000000000 --- a/tests/bugs/modalg/bug140 +++ /dev/null @@ -1,23 +0,0 @@ - -puts "================" -puts "OCC140" -puts "================" -puts "" -######################################################### -## Fillet is created incorrectly on attached shape. -######################################################### - -restore [locate_data_file shading_137.brep] s -checkshape s - -dset SCALE1 5 -tscale s 0 0 0 SCALE1 -explode s e -blend sh s 4.5*SCALE1 s_4 4.5*SCALE1 s_5 4.5*SCALE1 s_1 -explode sh so - -renamevar sh_1 result -fsameparameter result - -set square 3.65424e+06 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug144 b/tests/bugs/modalg/bug144 deleted file mode 100755 index b10e67e68b..0000000000 --- a/tests/bugs/modalg/bug144 +++ /dev/null @@ -1,34 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty : the distanse is" -puts "TODO OCC12345 ALL: Error : The length of result shape is" - -puts "================" -puts "BUC60663" -puts "OCC144" -puts "================" -puts "" - -restore [locate_data_file buc60663a.brep] a -checkshape a -restore [locate_data_file buc60663b.brep] b -checkshape b - -bsection result a b - -puts [checksection result] - -regexp {(result_[-0-9.+eE]+$)} [explode result v] full ver - -explode b e -explode b_4 v -distmini d $ver b_5 - -regexp {([-0-9.+eE]+)$} [dump d_val] full dist -regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} [ maxtolerance $ver ] full toler - -if { [expr $dist > $toler] } { - puts "Faulty : the distanse is $dist. It is more $toler." -} - -set length 0 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug14506 b/tests/bugs/modalg/bug14506 deleted file mode 100755 index f36847847c..0000000000 --- a/tests/bugs/modalg/bug14506 +++ /dev/null @@ -1,29 +0,0 @@ -puts "TODO OCC12345 ALL: Error : Result shape is WRONG" - -puts "============" -puts "OCC14506" -puts "============" -puts "" -####################################################################### -# Wrong section of faces with bspline geometry -####################################################################### - -restore [locate_data_file bug14506_face1.brep] face1 -restore [locate_data_file bug14506_face2.brep] face2 - -bop face1 face2 -bopsection result - -set length 129.639 -set nb_v_good 2 -set nb_e_good 2 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 5 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug14536 b/tests/bugs/modalg/bug14536 deleted file mode 100755 index 11e559b7c9..0000000000 --- a/tests/bugs/modalg/bug14536 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC14536" -puts "============" -puts "" -####################################################################### -# Boolean Operation Algorithm failed -####################################################################### - -restore [locate_data_file OCC14536-sh1.brep] s1 -restore [locate_data_file OCC14536-sh2.brep] s2 - -bop s1 s2 -bopfuse result - -set square 330318 -set nb_v_good 7 -set nb_e_good 13 -set nb_w_good 6 -set nb_f_good 6 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 35 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug1456 b/tests/bugs/modalg/bug1456 deleted file mode 100644 index ccde302470..0000000000 --- a/tests/bugs/modalg/bug1456 +++ /dev/null @@ -1,36 +0,0 @@ -puts "============" -puts "OCC1456" -puts "============" -puts "" -###################################################### -# Impossible to build mixed type fillets -###################################################### - -restore [locate_data_file OCC1456.brep] a - -checkshape a - -############################################## -explode a w -explode a_4 e -mkevol result a -updatevol a_4_1 0 5 0.5 20 1 5 -updatevol a_4_2 0 5 -updatevol a_4_3 0 5 -updatevol a_4_4 0 5 0.5 20 1 5 -updatevol a_4_5 0 5 0.5 20 1 5 -updatevol a_4_6 0 5 -updatevol a_4_7 0 5 0.5 20 1 5 -updatevol a_4_8 0 5 - -if { [catch { buildevol } catch_result] } { - puts "Faulty OCC1456 (case 2)" -} - -vinit -vdisplay result -vsetdispmode 0 -vfit - -set square 3.21455e+06 -set only_screen 1 diff --git a/tests/bugs/modalg/bug14643 b/tests/bugs/modalg/bug14643 deleted file mode 100755 index 61159b278f..0000000000 --- a/tests/bugs/modalg/bug14643 +++ /dev/null @@ -1,39 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" - -puts "============" -puts "OCC14643" -puts "============" -puts "" -####################################################################### -# Checkshape command gives wrong result for compound of 66 solids -####################################################################### - -set BugNumber OCC14643 - -restore [locate_data_file OCC14643.brep] result - -set square 8.63143e+07 -set nb_v_good 108 -set nb_e_good 282 -set nb_w_good 239 -set nb_f_good 259 -set nb_sh_good 66 -set nb_sol_good 66 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 1021 - -puts "" -puts "Check each solid" -explode result -for {set k 1} {$k < 67} {incr k} { - puts "" - puts [eval whatis result_$k] - puts [eval checkshape result_$k] - wait .5 -} -puts "" -puts "End check each solid" - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug14777 b/tests/bugs/modalg/bug14777 deleted file mode 100755 index 06ccd40c09..0000000000 --- a/tests/bugs/modalg/bug14777 +++ /dev/null @@ -1,27 +0,0 @@ -puts "============" -puts "OCC14777" -puts "============" -puts "" -####################################################################### -# Boolean Operation Algorithm failed -####################################################################### - -restore [locate_data_file OCC14777-s1.brep] s1 -restore [locate_data_file OCC14777-s2.brep] s2 - -bop s1 s2 -bopcut result - -set square 10653.3 -set nb_v_good 6 -set nb_e_good 9 -set nb_w_good 5 -set nb_f_good 5 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 28 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug1477_1 b/tests/bugs/modalg/bug1477_1 deleted file mode 100644 index ec27ed3140..0000000000 --- a/tests/bugs/modalg/bug1477_1 +++ /dev/null @@ -1,25 +0,0 @@ -puts "============" -puts "OCC1477" -puts "============" -puts "" -###################################################### -# Problems in MakePipeShell -# (case 1) -###################################################### - -restore [locate_data_file OCC1477-1.brep] s1 -restore [locate_data_file OCC1477-2.brep] s2 - -checkshape s1 -checkshape s2 - -mksweep s1 - -addsweep s2 - -if { [catch {buildsweep result} catch_result] } { - puts "Faulty OCC1477" -} - -set square 913238 -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug1477_10 b/tests/bugs/modalg/bug1477_10 deleted file mode 100644 index 5ba4490fec..0000000000 --- a/tests/bugs/modalg/bug1477_10 +++ /dev/null @@ -1,29 +0,0 @@ -puts "TODO OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO OCC11111 ALL: Error : The square of result shape is" - -puts "============" -puts "OCC1477" -puts "============" -puts "" -###################################################### -# Problems in MakePipeShell -# (case 10) -###################################################### - -restore [locate_data_file OCC1477-1.brep] s1 -restore [locate_data_file OCC1477-2.brep] s2 - -checkshape s1 -checkshape s2 - -mksweep s1 - -addsweep s2 -T 0 1 1 2 2 .5 - -if { [catch {buildsweep result -C} catch_result] } { - puts "Faulty OCC1477" -} - -set square 0 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug1477_11 b/tests/bugs/modalg/bug1477_11 deleted file mode 100644 index e820087640..0000000000 --- a/tests/bugs/modalg/bug1477_11 +++ /dev/null @@ -1,31 +0,0 @@ -puts "TODO ?OCC11111 ALL: An exception was caught" -puts "TODO ?OCC11111 ALL: Exception" -puts "TODO ?OCC11111 ALL: Faulty OCC1477" -puts "TODO ?OCC11111 ALL: TEST INCOMPLETE" - -puts "============" -puts "OCC1477" -puts "============" -puts "" -###################################################### -# Problems in MakePipeShell -# (case 11) -###################################################### - -restore [locate_data_file OCC1477-1.brep] s1 -restore [locate_data_file OCC1477-2.brep] s2 - -checkshape s1 -checkshape s2 - -mksweep s1 - -addsweep s2 0 1 1 2 2 .5 - -if { [catch {buildsweep result -R} catch_result] } { - puts "Faulty OCC1477" -} - -set square 1.81647e+006 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug1477_12 b/tests/bugs/modalg/bug1477_12 deleted file mode 100644 index d842464f99..0000000000 --- a/tests/bugs/modalg/bug1477_12 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC1477" -puts "============" -puts "" -###################################################### -# Problems in MakePipeShell -# (case 12) -###################################################### - -restore [locate_data_file OCC1477-1.brep] s1 -restore [locate_data_file OCC1477-2.brep] s2 - -checkshape s1 -checkshape s2 - -mksweep s1 - -addsweep s2 -T 0 1 1 2 2 .5 - -if { [catch {buildsweep result -R} catch_result] } { - puts "Faulty OCC1477" -} - -set good_square 1.99019e+06 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug1477_2 b/tests/bugs/modalg/bug1477_2 deleted file mode 100644 index 0791b76a0f..0000000000 --- a/tests/bugs/modalg/bug1477_2 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC1477" -puts "============" -puts "" -###################################################### -# Problems in MakePipeShell -# (case 2) -###################################################### - -restore [locate_data_file OCC1477-1.brep] s1 -restore [locate_data_file OCC1477-2.brep] s2 - -checkshape s1 -checkshape s2 - -mksweep s1 - -addsweep s2 -T - -if { [catch {buildsweep result} catch_result] } { - puts "Faulty OCC1477" -} - -set square 913238 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug1477_3 b/tests/bugs/modalg/bug1477_3 deleted file mode 100644 index 5a8856743b..0000000000 --- a/tests/bugs/modalg/bug1477_3 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC1477" -puts "============" -puts "" -###################################################### -# Problems in MakePipeShell -# (case 3) -###################################################### - -restore [locate_data_file OCC1477-1.brep] s1 -restore [locate_data_file OCC1477-2.brep] s2 - -checkshape s1 -checkshape s2 - -mksweep s1 - -addsweep s2 - -if { [catch {buildsweep result -C} catch_result] } { - puts "Faulty OCC1477" -} - -set square 1.02648e+06 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug1477_4 b/tests/bugs/modalg/bug1477_4 deleted file mode 100644 index 6cf2622d9b..0000000000 --- a/tests/bugs/modalg/bug1477_4 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC1477" -puts "============" -puts "" -###################################################### -# Problems in MakePipeShell -# (case 4) -###################################################### - -restore [locate_data_file OCC1477-1.brep] s1 -restore [locate_data_file OCC1477-2.brep] s2 - -checkshape s1 -checkshape s2 - -mksweep s1 - -addsweep s2 -T - -if { [catch {buildsweep result -C} catch_result] } { - puts "Faulty OCC1477" -} - -set square 1.11707e+06 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug1477_5 b/tests/bugs/modalg/bug1477_5 deleted file mode 100644 index 170be3cec4..0000000000 --- a/tests/bugs/modalg/bug1477_5 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC1477" -puts "============" -puts "" -###################################################### -# Problems in MakePipeShell -# (case 5) -###################################################### - -restore [locate_data_file OCC1477-1.brep] s1 -restore [locate_data_file OCC1477-2.brep] s2 - -checkshape s1 -checkshape s2 - -mksweep s1 - -addsweep s2 - -if { [catch {buildsweep result -R} catch_result] } { - puts "Faulty OCC1477" -} - -set square 1.02342e+06 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug1477_6 b/tests/bugs/modalg/bug1477_6 deleted file mode 100644 index d434bc9ce2..0000000000 --- a/tests/bugs/modalg/bug1477_6 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC1477" -puts "============" -puts "" -###################################################### -# Problems in MakePipeShell -# (case 6) -###################################################### - -restore [locate_data_file OCC1477-1.brep] s1 -restore [locate_data_file OCC1477-2.brep] s2 - -checkshape s1 -checkshape s2 - -mksweep s1 - -addsweep s2 -T - -if { [catch {buildsweep result -R} catch_result] } { - puts "Faulty OCC1477" -} - -set square 1.10891e+06 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug1477_7 b/tests/bugs/modalg/bug1477_7 deleted file mode 100644 index 207c93f8c3..0000000000 --- a/tests/bugs/modalg/bug1477_7 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC1477" -puts "============" -puts "" -###################################################### -# Problems in MakePipeShell -# (case 7) -###################################################### - -restore [locate_data_file OCC1477-1.brep] s1 -restore [locate_data_file OCC1477-2.brep] s2 - -checkshape s1 -checkshape s2 - -mksweep s1 - -addsweep s2 0 1 1 2 2 .5 - -if { [catch {buildsweep result} catch_result] } { - puts "Faulty OCC1477" -} - -set square 1.49907e+06 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug1477_8 b/tests/bugs/modalg/bug1477_8 deleted file mode 100644 index 1f30885fba..0000000000 --- a/tests/bugs/modalg/bug1477_8 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC1477" -puts "============" -puts "" -###################################################### -# Problems in MakePipeShell -# (case 8) -###################################################### - -restore [locate_data_file OCC1477-1.brep] s1 -restore [locate_data_file OCC1477-2.brep] s2 - -checkshape s1 -checkshape s2 - -mksweep s1 - -addsweep s2 -T 0 1 1 2 2 .5 - -if { [catch {buildsweep result} catch_result] } { - puts "Faulty OCC1477" -} - -set square 1.56786e+06 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug1477_9 b/tests/bugs/modalg/bug1477_9 deleted file mode 100644 index 5590bcc157..0000000000 --- a/tests/bugs/modalg/bug1477_9 +++ /dev/null @@ -1,29 +0,0 @@ -puts "TODO OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO OCC11111 ALL: Error : The square of result shape is" - -puts "============" -puts "OCC1477" -puts "============" -puts "" -###################################################### -# Problems in MakePipeShell -# (case 9) -###################################################### - -restore [locate_data_file OCC1477-1.brep] s1 -restore [locate_data_file OCC1477-2.brep] s2 - -checkshape s1 -checkshape s2 - -mksweep s1 - -addsweep s2 0 1 1 2 2 .5 - -if { [catch {buildsweep result -C} catch_result] } { - puts "Faulty OCC1477" -} - -set square 0 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug14780 b/tests/bugs/modalg/bug14780 deleted file mode 100755 index 7e71e6a512..0000000000 --- a/tests/bugs/modalg/bug14780 +++ /dev/null @@ -1,29 +0,0 @@ -puts "============" -puts "OCC14780" -puts "============" -puts "" -###################################################### -# Boolean operations (section, fuse, common, cut) give incorrect result -###################################################### - -set BugNumber OCC14780 - -restore [locate_data_file OCC14780_part1.brep] s1 -restore [locate_data_file OCC14780_part2.brep] s2 - -bop s1 s2 -bopsection result - -regexp {nb alone Vertices +: +([-0-9.+eE]+)} [checksection result] full Vertices - -set good_Vertices 0 -if { ${Vertices} != ${good_Vertices} } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -set length 171.289 -set 2dviewer 0 - - diff --git a/tests/bugs/modalg/bug15036 b/tests/bugs/modalg/bug15036 deleted file mode 100755 index ee06151f28..0000000000 --- a/tests/bugs/modalg/bug15036 +++ /dev/null @@ -1,43 +0,0 @@ -puts "============" -puts "OCC15936" -puts "============" -puts "" -####################################################################### -# Wrong shape build by revolution algorithm -####################################################################### - -vertex v1 0 725 20 -vertex v2 0 709 20 -vertex v3 0 709 230 -vertex v4 0 645 230 -vertex v5 0 645 320 -vertex v6 0 805 320 -vertex v7 0 805 230 -vertex v8 0 741 230 -vertex v9 0 741 20 -edge e12 v1 v2 -edge e23 v2 v3 -edge e34 v3 v4 -edge e45 v4 v5 -edge e56 v5 v6 -edge e67 v6 v7 -edge e78 v7 v8 -edge e89 v8 v9 -edge e91 v9 v1 -wire w e12 e23 e34 e45 e56 e67 e78 e89 e91 -mkplane fr w 1 - -revol result fr 0.001428571428572667 640.5285714285715 20 -1.691188905560395E-05 0.9999999998569939 0 360 - -set square 1.03597e+06 -set nb_v_good 9 -set nb_e_good 14 -set nb_w_good 13 -set nb_f_good 9 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 47 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug15836 b/tests/bugs/modalg/bug15836 deleted file mode 100755 index 61980d90f0..0000000000 --- a/tests/bugs/modalg/bug15836 +++ /dev/null @@ -1,25 +0,0 @@ -puts "============" -puts "OCC15836" -puts "============" -puts "" -####################################################################### -# Wrong visualization of filleted shape on IRIX32 platform -####################################################################### - -restore [locate_data_file OCC15836.brep] f -explode f e - -fillet result f 10 f_8 15 f_9 20 f_11 25 f_17 30 f_21 35 f_29 - -set square 42816.6 -set nb_v_good 31 -set nb_e_good 50 -set nb_w_good 21 -set nb_f_good 21 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 126 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug15850 b/tests/bugs/modalg/bug15850 deleted file mode 100755 index dc41ca7dfc..0000000000 --- a/tests/bugs/modalg/bug15850 +++ /dev/null @@ -1,28 +0,0 @@ -puts "TODO OCC12345 ALL: Error : Result shape is WRONG" -puts "============" -puts "OCC15850" -puts "============" -puts "" -####################################################################### -# Regression in BOP - wrong results for simple shapes with Bspline geometry -####################################################################### - -restore [locate_data_file OCC15850_bb.brep] bb -restore [locate_data_file OCC15850_bc.brep] bc - -bop bb bc -bopcut result - -set square 732.453 -set nb_v_good 12 -set nb_e_good 17 -set nb_w_good 9 -set nb_f_good 7 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 48 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug15850_1 b/tests/bugs/modalg/bug15850_1 deleted file mode 100755 index 6816d4cc73..0000000000 --- a/tests/bugs/modalg/bug15850_1 +++ /dev/null @@ -1,28 +0,0 @@ -puts "TODO OCC12345 ALL: Error : Result shape is WRONG" -puts "============" -puts "OCC15850" -puts "============" -puts "" -####################################################################### -# Regression in BOP - wrong results for simple shapes with Bspline geometry -####################################################################### - -restore [locate_data_file OCC15850_bb.brep] bb -restore [locate_data_file OCC15850_bc.brep] bc - -bop bb bc -boptuc result - -set square 301.996 -set nb_v_good 6 -set nb_e_good 8 -set nb_w_good 6 -set nb_f_good 6 -set nb_sh_good 2 -set nb_sol_good 2 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 31 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug15850_2 b/tests/bugs/modalg/bug15850_2 deleted file mode 100755 index 42a2e28cdc..0000000000 --- a/tests/bugs/modalg/bug15850_2 +++ /dev/null @@ -1,28 +0,0 @@ -puts "TODO OCC12345 ALL: Error : Result shape is WRONG" -puts "============" -puts "OCC15850" -puts "============" -puts "" -####################################################################### -# Regression in BOP - wrong results for simple shapes with Bspline geometry -####################################################################### - -restore [locate_data_file OCC15850_bb.brep] bb -restore [locate_data_file OCC15850_bc.brep] bc - -bop bb bc -bopcommon result - -set square 245.55 -set nb_v_good 4 -set nb_e_good 5 -set nb_w_good 3 -set nb_f_good 3 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 18 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug15850_3 b/tests/bugs/modalg/bug15850_3 deleted file mode 100755 index 869ab3e3ad..0000000000 --- a/tests/bugs/modalg/bug15850_3 +++ /dev/null @@ -1,28 +0,0 @@ -puts "TODO OCC12345 ALL: Error : Result shape is WRONG" -puts "============" -puts "OCC15850" -puts "============" -puts "" -####################################################################### -# Regression in BOP - wrong results for simple shapes with Bspline geometry -####################################################################### - -restore [locate_data_file OCC15850_bb.brep] bb -restore [locate_data_file OCC15850_bc.brep] bc - -bop bb bc -bopfuse result - -set square 788.9 -set nb_v_good 14 -set nb_e_good 20 -set nb_w_good 12 -set nb_f_good 10 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 59 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug15850_4 b/tests/bugs/modalg/bug15850_4 deleted file mode 100755 index 9a7180632b..0000000000 --- a/tests/bugs/modalg/bug15850_4 +++ /dev/null @@ -1,38 +0,0 @@ -puts "TODO OCC12345 ALL: Error : Result shape is WRONG" -puts "============" -puts "OCC15850" -puts "============" -puts "" -####################################################################### -# Regression in BOP - wrong results for simple shapes with Bspline geometry -####################################################################### - -set BugNumber OCC15850 - -restore [locate_data_file OCC15850_bb.brep] bb -restore [locate_data_file OCC15850_bc.brep] bc - -bop bb bc -bopsection result - -set length 37.6991 -set nb_v_good 4 -set nb_e_good 4 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 9 - -regexp {nb alone Vertices +: +([-0-9.+eE]+)} [checksection result] full Vertices -set good_Vertices 0 -if { ${Vertices} != ${good_Vertices} } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug15943 b/tests/bugs/modalg/bug15943 deleted file mode 100755 index 11aee304ef..0000000000 --- a/tests/bugs/modalg/bug15943 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC15943" -puts "============" -puts "" -####################################################################### -# Wrong result of boolen fuse -####################################################################### - -restore [locate_data_file OCC15943_p1.brep] b1 -restore [locate_data_file OCC15943_p2.brep] b2 - -bop b1 b2 -bopfuse result - -set square 266944 -set nb_v_good 12 -set nb_e_good 20 -set nb_w_good 10 -set nb_f_good 10 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 55 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug15968_1 b/tests/bugs/modalg/bug15968_1 deleted file mode 100755 index aafb8936c4..0000000000 --- a/tests/bugs/modalg/bug15968_1 +++ /dev/null @@ -1,30 +0,0 @@ -puts "============" -puts "OCC15968" -puts "============" -puts "" -####################################################################### -# Result of checkshape command depends on order of subshapes in a shape -####################################################################### - -restore [locate_data_file OCC15968.brep] s - -explode s f - -# shell 1 -shape s1 sh -add s_2 s1 -add s_1 s1 -renamevar s1 result - -set square 164 -set nb_v_good 10 -set nb_e_good 11 -set nb_w_good 3 -set nb_f_good 2 -set nb_sh_good 1 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 27 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug15968_2 b/tests/bugs/modalg/bug15968_2 deleted file mode 100755 index 78c3700833..0000000000 --- a/tests/bugs/modalg/bug15968_2 +++ /dev/null @@ -1,30 +0,0 @@ -puts "============" -puts "OCC15968" -puts "============" -puts "" -####################################################################### -# Result of checkshape command depends on order of subshapes in a shape -####################################################################### - -restore [locate_data_file OCC15968.brep] s - -explode s f - -# shell 2 -shape s2 sh -add s_1 s2 -add s_2 s2 -renamevar s2 result - -set square 164 -set nb_v_good 10 -set nb_e_good 11 -set nb_w_good 3 -set nb_f_good 2 -set nb_sh_good 1 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 27 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug16517_1 b/tests/bugs/modalg/bug16517_1 deleted file mode 100755 index bb2ddb036b..0000000000 --- a/tests/bugs/modalg/bug16517_1 +++ /dev/null @@ -1,44 +0,0 @@ -puts "============" -puts "OCC16517" -puts "============" -puts "" -####################################################################### -# Cylindrical projection is wrong -####################################################################### - -set BugNumber OCC16517 - -restore [locate_data_file OCC16517_c.brep] c -restore [locate_data_file OCC16517_s.brep] s - -set Result_List [prj p c s 0 0 1] -set Result_Numbers [llength ${Result_List}] -set mistake 0 -if { ${Result_Numbers} != 2 } { - puts "Faulty ${BugNumber} : projection numbers are wrong" - set mistake 1 -} else { - puts "First projection ..." - renamevar p_1 result - - set status 0 - set length 110.167 - set nb_v_good 1 - set nb_e_good 1 - set nb_w_good 1 - set nb_f_good 0 - set nb_sh_good 0 - set nb_sol_good 0 - set nb_compsol_good 0 - set nb_compound_good 0 - set nb_shape_good 3 -} - -if { ${mistake} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug16517_2 b/tests/bugs/modalg/bug16517_2 deleted file mode 100755 index 6a1e214c0c..0000000000 --- a/tests/bugs/modalg/bug16517_2 +++ /dev/null @@ -1,46 +0,0 @@ -puts "============" -puts "OCC16517" -puts "============" -puts "" -####################################################################### -# Cylindrical projection is wrong -####################################################################### - -set BugNumber OCC16517 - -restore [locate_data_file OCC16517_c.brep] c -restore [locate_data_file OCC16517_s.brep] s - -set Result_List [prj p c s 0 0 1] -set Result_Numbers [llength ${Result_List}] -set mistake 0 -if { ${Result_Numbers} != 2 } { - puts "Faulty ${BugNumber} : projection numbers are wrong" - set mistake 1 -} else { - puts "Second projection ..." - renamevar p_2 result - set status 0 - - set length 110.167 - set nb_v_good 1 - set nb_e_good 1 - set nb_w_good 1 - set nb_f_good 0 - set nb_sh_good 0 - set nb_sol_good 0 - set nb_compsol_good 0 - set nb_compound_good 0 - set nb_shape_good 3 -} - -# Resume -puts "" -if { ${mistake} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug165_4 b/tests/bugs/modalg/bug165_4 deleted file mode 100644 index 49c2d68c5f..0000000000 --- a/tests/bugs/modalg/bug165_4 +++ /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 -5.7 -set incr_stepoffset 0.1 -set finish_stepoffset -2.8 - -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" -} - -dchrono h stop -dchrono h show - -renamevar result_1 result - -set length 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug165_5 b/tests/bugs/modalg/bug165_5 deleted file mode 100644 index 4437242231..0000000000 --- a/tests/bugs/modalg/bug165_5 +++ /dev/null @@ -1,77 +0,0 @@ -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 -2.6 -set incr_stepoffset 0.1 -set finish_stepoffset 0.0 - -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" -} - -dchrono h stop -dchrono h show - -renamevar result_1 result - -set length 1081.52 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug165_6 b/tests/bugs/modalg/bug165_6 deleted file mode 100644 index aeb81211ce..0000000000 --- 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 diff --git a/tests/bugs/modalg/bug165_7 b/tests/bugs/modalg/bug165_7 deleted file mode 100644 index c2fd0a3dea..0000000000 --- a/tests/bugs/modalg/bug165_7 +++ /dev/null @@ -1,77 +0,0 @@ -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 5.1 -set incr_stepoffset 0.1 -set finish_stepoffset 6.3 - -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 1113.06 -set 2dviewer 0 - -dchrono h stop -dchrono h show diff --git a/tests/bugs/modalg/bug1665 b/tests/bugs/modalg/bug1665 deleted file mode 100755 index 811021e144..0000000000 --- a/tests/bugs/modalg/bug1665 +++ /dev/null @@ -1,21 +0,0 @@ -puts "========" -puts "OCC1665" -puts "========" -############################################################ -## Geom_BSplineSurface::SetVPeriodic throws an exception -############################################################ - -restore [locate_data_file OCC1665.draw] a - -if {[catch {setvperiodic a} message]} { - puts "OCC1665 FAULTY : setvperiodic" -} else { - if {[catch {mkface result a} message]} { - puts "OCC1665 FAULTY : mkface" - } else { - set nb_e_good 3 - } -} - -set square 12265.3 -set 3dviewer 2 diff --git a/tests/bugs/modalg/bug16667_1 b/tests/bugs/modalg/bug16667_1 deleted file mode 100755 index 81d8c6305d..0000000000 --- a/tests/bugs/modalg/bug16667_1 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC16667" -puts "============" -puts "" -####################################################################### -# 2D Offset algorithm fails -####################################################################### - -restore [locate_data_file OCC16667-face.brep] a - -mkoffset resoffset a 1 20 -renamevar resoffset_1 result - -set length 1542.3 -set nb_v_good 7 -set nb_e_good 7 -set nb_w_good 1 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 15 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug16667_2 b/tests/bugs/modalg/bug16667_2 deleted file mode 100755 index 8871038535..0000000000 --- a/tests/bugs/modalg/bug16667_2 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC16667" -puts "============" -puts "" -####################################################################### -# 2D Offset algorithm fails -####################################################################### - -restore [locate_data_file OCC16667-face.brep] a - -mkoffset resoffset a 1 -20 -renamevar resoffset_1 result - -set length 1188.62 -set nb_v_good 5 -set nb_e_good 5 -set nb_w_good 1 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 11 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug16667_3 b/tests/bugs/modalg/bug16667_3 deleted file mode 100755 index a62593ed51..0000000000 --- a/tests/bugs/modalg/bug16667_3 +++ /dev/null @@ -1,27 +0,0 @@ -puts "TODO OCC12345 ALL: Error : Result shape is WRONG" -puts "============" -puts "OCC16667" -puts "============" -puts "" -####################################################################### -# 2D Offset algorithm fails -####################################################################### - -restore [locate_data_file OCC16667-wire.brep] a - -mkoffset resoffset a 1 20 -renamevar resoffset_1 result - -set length 1451.49 -set nb_v_good 8 -set nb_e_good 8 -set nb_w_good 1 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 17 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug16667_4 b/tests/bugs/modalg/bug16667_4 deleted file mode 100755 index 8fd515e2c6..0000000000 --- a/tests/bugs/modalg/bug16667_4 +++ /dev/null @@ -1,28 +0,0 @@ -puts "TODO OCC12345 ALL: Error : Result shape is WRONG" -puts "============" -puts "OCC16667" -puts "============" -puts "" -####################################################################### -# 2D Offset algorithm fails -####################################################################### - -restore [locate_data_file OCC16667-wire.brep] a - -mkoffset resoffset a 1 -20 -renamevar resoffset_1 result - -set length 1200.16 -set nb_v_good 8 -set nb_e_good 8 -set nb_w_good 1 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 17 - -set 2dviewer 0 - - diff --git a/tests/bugs/modalg/bug16781 b/tests/bugs/modalg/bug16781 deleted file mode 100755 index 68c744440b..0000000000 --- a/tests/bugs/modalg/bug16781 +++ /dev/null @@ -1,27 +0,0 @@ -puts "============" -puts "OCC16781" -puts "============" -puts "" -####################################################################### -# Wrong result of Cut operation. -####################################################################### - -restore [locate_data_file OCC16781-wing_solid.brep] s1 -restore [locate_data_file OCC16781-extr.brep] s2 - -bop s1 s2 -bopcut result - -set square 3.92094e+07 -set nb_v_good 14 -set nb_e_good 21 -set nb_w_good 9 -set nb_f_good 9 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 56 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug17194_1 b/tests/bugs/modalg/bug17194_1 deleted file mode 100755 index 149c5d3bc3..0000000000 --- a/tests/bugs/modalg/bug17194_1 +++ /dev/null @@ -1,29 +0,0 @@ -puts "============" -puts "OCC17194" -puts "============" -puts "" -####################################################################### -# Incorrect section of a face got by extrusion of an arc of circle -####################################################################### - -set BugNumber OCC17194 - -circle f 0 0 0 0 0 1 1 0 0 20 -mkedge f f -pi/2 pi/2 -prism f f 50 0 30 -plane pl 10 0 0 1 0 4 -mkface pl pl -bsection result f pl - -set nb_v_good 4 -set nb_e_good 2 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 7 - -set length 15.8064 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug17194_2 b/tests/bugs/modalg/bug17194_2 deleted file mode 100755 index 618e031935..0000000000 --- a/tests/bugs/modalg/bug17194_2 +++ /dev/null @@ -1,30 +0,0 @@ -puts "============" -puts "OCC17194" -puts "============" -puts "" -####################################################################### -# Incorrect section of a face got by extrusion of an arc of circle -####################################################################### - -set BugNumber OCC17194 - -circle f 0 0 0 0 0 1 1 0 0 20 -mkedge f f -pi/2 pi/2 -prism f f 50 0 30 -plane pl 10 0 10 1 0 4 -mkface pl pl -bsection result f pl - -set nb_v_good 2 -set nb_e_good 1 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 4 - -set length 54.6122 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug17357_1 b/tests/bugs/modalg/bug17357_1 deleted file mode 100755 index 1824e6723f..0000000000 --- a/tests/bugs/modalg/bug17357_1 +++ /dev/null @@ -1,27 +0,0 @@ -puts "============" -puts "OCC17357" -puts "============" -puts "" -####################################################################### -# Any boolean operation is impossible between attached shapes -####################################################################### - -restore [locate_data_file OCC17357-1.brep] b1 -restore [locate_data_file OCC17357-2.brep] b2 - -bop b1 b2 -bopcommon result - -set square 1.18671 -set nb_v_good 10 -set nb_e_good 18 -set nb_w_good 8 -set nb_f_good 8 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 47 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug17357_2 b/tests/bugs/modalg/bug17357_2 deleted file mode 100755 index 7d49291e77..0000000000 --- a/tests/bugs/modalg/bug17357_2 +++ /dev/null @@ -1,27 +0,0 @@ -puts "============" -puts "OCC17357" -puts "============" -puts "" -####################################################################### -# Any boolean operation is impossible between attached shapes -####################################################################### - -restore [locate_data_file OCC17357-1.brep] b1 -restore [locate_data_file OCC17357-2.brep] b2 - -bop b1 b2 -bopfuse result - -set square 241.111 -set nb_v_good 16 -set nb_e_good 24 -set nb_w_good 12 -set nb_f_good 10 -set nb_sh_goodl 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 65 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug17357_3 b/tests/bugs/modalg/bug17357_3 deleted file mode 100755 index 3e7b43055b..0000000000 --- a/tests/bugs/modalg/bug17357_3 +++ /dev/null @@ -1,27 +0,0 @@ -puts "============" -puts "OCC17357" -puts "============" -puts "" -####################################################################### -# Any boolean operation is impossible between attached shapes -####################################################################### - -restore [locate_data_file OCC17357-1.brep] b1 -restore [locate_data_file OCC17357-2.brep] b2 - -bop b1 b2 -bopcut result - -set square 241.111 -set nb_v_good 18 -set nb_e_good 30 -set nb_w_good 14 -set nb_f_good 12 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 77 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug17357_4 b/tests/bugs/modalg/bug17357_4 deleted file mode 100755 index 2083ce5f33..0000000000 --- a/tests/bugs/modalg/bug17357_4 +++ /dev/null @@ -1,27 +0,0 @@ -puts "============" -puts "OCC17357" -puts "============" -puts "" -####################################################################### -# Any boolean operation is impossible between attached shapes -####################################################################### - -restore [locate_data_file OCC17357-1.brep] b1 -restore [locate_data_file OCC17357-2.brep] b2 - -bop b1 b2 -boptuc result - -set square 1.18671 -set nb_v_good 8 -set nb_e_good 12 -set nb_w_good 6 -set nb_f_good 6 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 35 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug17357_5 b/tests/bugs/modalg/bug17357_5 deleted file mode 100755 index 179c395dd0..0000000000 --- a/tests/bugs/modalg/bug17357_5 +++ /dev/null @@ -1,18 +0,0 @@ -puts "============" -puts "OCC17357" -puts "============" -puts "" -####################################################################### -# Any boolean operation is impossible between attached shapes -####################################################################### - -restore [locate_data_file OCC17357-1.brep] b1 -restore [locate_data_file OCC17357-2.brep] b2 - -bop b1 b2 -bopsection result - -set length 3.84991 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug174 b/tests/bugs/modalg/bug174 deleted file mode 100755 index c4eda7d275..0000000000 --- a/tests/bugs/modalg/bug174 +++ /dev/null @@ -1,14 +0,0 @@ -puts "========" -puts "OCC174" -puts "========" -puts "" -########################################################################### -## After analyze given face (file ff97.brep) using BRepCheck we recieve problem - "Bad Orientation of Subshape". -## But we believe that this shape must be OK or we have to recieve more detail another reply from BRepCheck. -########################################################################### - -restore [locate_data_file OCC174.brep] result - -set square 376.873 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug178_1 b/tests/bugs/modalg/bug178_1 deleted file mode 100755 index 0e8e48e5e4..0000000000 --- a/tests/bugs/modalg/bug178_1 +++ /dev/null @@ -1,18 +0,0 @@ - -puts "================" -puts "BUC60938" -puts "OCC178" -puts "================" - - -restore [locate_data_file BUC60937.brep] a - -explode a -checkshape a_1 -checkshape a_2 - -bcommon result a_1 a_2 - -set square 152908 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug178_2 b/tests/bugs/modalg/bug178_2 deleted file mode 100755 index c71a9165d3..0000000000 --- a/tests/bugs/modalg/bug178_2 +++ /dev/null @@ -1,15 +0,0 @@ - -puts "================" -puts "BUC60937" -puts "OCC178" -puts "================" - -restore [locate_data_file BUC60937.brep] a -explode a -checkshape a_1 -checkshape a_2 - -bfuse result a_1 a_2 - -set square 835463 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug178_3 b/tests/bugs/modalg/bug178_3 deleted file mode 100755 index 081a3830c7..0000000000 --- a/tests/bugs/modalg/bug178_3 +++ /dev/null @@ -1,16 +0,0 @@ - -puts "================" -puts "BUC60936" -puts "OCC178" -puts "================" - -restore [locate_data_file BUC60937.brep] a - -explode a -checkshape a_1 -checkshape a_2 - -bcut result a_1 a_2 - -set square 786002 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug179 b/tests/bugs/modalg/bug179 deleted file mode 100755 index e0eeebe55c..0000000000 --- a/tests/bugs/modalg/bug179 +++ /dev/null @@ -1,31 +0,0 @@ - -puts "========" -puts "OCC179" -puts "========" -puts "" -########################################### -## Bug in meshing of the enclosed face -########################################### - -restore [locate_data_file OCC179.brep] result - -tclean result -isos result 0 -incmesh result 0.01 -triangles result - -set tri 0 -set nod 0 - -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -if { $tri == 1874 || $nod == 1861} { - puts " OCC179 shading: OK" -} else { - puts " OCC179 shading: Faulty" -} - -set square 12229.8 -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug18186 b/tests/bugs/modalg/bug18186 deleted file mode 100755 index 99998d66cb..0000000000 --- a/tests/bugs/modalg/bug18186 +++ /dev/null @@ -1,29 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO OCC12345 ALL: Error : Result shape is WRONG" -puts "============" -puts "OCC18186" -puts "============" -puts "" -####################################################################### -# Boolean operation algo fails -####################################################################### - -restore [locate_data_file OCC18186_r3.brep] bb -restore [locate_data_file OCC18186_Tool2.brep] bc - -bop bb bc -bopcut result - -set square 308374 -set nb_v_good 43 -set nb_e_good 68 -set nb_w_good 27 -set nb_f_good 27 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 168 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug19071 b/tests/bugs/modalg/bug19071 deleted file mode 100755 index 32f3ed070f..0000000000 --- a/tests/bugs/modalg/bug19071 +++ /dev/null @@ -1,37 +0,0 @@ -puts "============" -puts "OCC19071" -puts "============" -puts "" -####################################################################### -# The MakeFuse or the MakePartition function crash together on 2 torus -####################################################################### - -set BugNumber OCC19071 - -puts "Load first shape ..." -restore [locate_data_file OCC19071_Rotation_2.brep] b1 -puts "Load second shape ..." -restore [locate_data_file OCC19071_Torus_2.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopfuse result -puts "Finish boolean operation ..." - -set square 177462 - -set nb_v_good 6 -set nb_e_good 16 -set nb_w_good 6 -set nb_f_good 6 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 37 - - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug19793_2 b/tests/bugs/modalg/bug19793_2 deleted file mode 100755 index 02a47794e3..0000000000 --- a/tests/bugs/modalg/bug19793_2 +++ /dev/null @@ -1,39 +0,0 @@ -puts "============" -puts "OCC19793" -puts "============" -puts "" -####################################################################### -# Fuse problem of symetrical shapes. Appendix for NPAL19789 -####################################################################### - -cpulimit 100 -#cpulimit 4500 -set BugNumber OCC19793 - -puts "Load first shape ..." -restore [locate_data_file bug19793_new_shape.brep] b1 -puts "Load second shape ..." -restore [locate_data_file bug19793_shape.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopsection result -puts "Finish boolean operation ..." - -set length 17730.1 - -set nb_e_good 1190 -set nb_v_good 68 -set nb_e_good 70 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 139 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug19811 b/tests/bugs/modalg/bug19811 deleted file mode 100755 index 5b4ef22252..0000000000 --- a/tests/bugs/modalg/bug19811 +++ /dev/null @@ -1,35 +0,0 @@ -puts "============" -puts "OCC19811" -puts "============" -puts "" -####################################################################### -# Scaling problem. Appendix for NPAL19806 -####################################################################### - -set BugNumber OCC19811 - -puts "Load shape ..." -restore [locate_data_file bug19811_VanneMP_supports_tiges_V3.brep] result - -puts "Scaling operation ..." -if [catch { tscale result 0 0 0 0.5 } catch_result] { - puts "Faulty ${BugNumber} : Scaling is wrong" -} - -set square 1.6949e+06 - -set nb_v_good 173 -set nb_e_good 285 -set nb_w_good 113 -set nb_f_good 113 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 686 - -vinit -vdisplay result -vfit - -set only_screen 0 diff --git a/tests/bugs/modalg/bug20222 b/tests/bugs/modalg/bug20222 deleted file mode 100755 index 4c8dcaa7d7..0000000000 --- a/tests/bugs/modalg/bug20222 +++ /dev/null @@ -1,19 +0,0 @@ -puts "============" -puts "OCC20222" -puts "============" -puts "" -####################################################################### -# Chamfer operation produces incorrect shape (PACE-01-006) -####################################################################### - -set BugNumber OCC20222 - -restore [locate_data_file OCC20222.brep] s -explode s f -explode s_10 e -chamf result s s_10_3 s_10 S 50 - -checkshape result - -set square 712126 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug20285_1 b/tests/bugs/modalg/bug20285_1 deleted file mode 100755 index 259b622125..0000000000 --- a/tests/bugs/modalg/bug20285_1 +++ /dev/null @@ -1,39 +0,0 @@ -puts "============" -puts "OCC20285" -puts "============" -puts "" -####################################################################### -# SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277 -####################################################################### - -set BugNumber OCC20285 - -puts "Load first shape ..." -restore [locate_data_file OCC20285-main.brep] a1 -explode a1 -renamevar a1_5 b1 - -puts "Load second shape ..." -restore [locate_data_file OCC20285-tool.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopsection result -puts "Finish boolean operation ..." - -set length 750.952 - -set nb_v_good 8 -set nb_e_good 7 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 16 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug20285_10 b/tests/bugs/modalg/bug20285_10 deleted file mode 100755 index e8baf098f8..0000000000 --- a/tests/bugs/modalg/bug20285_10 +++ /dev/null @@ -1,41 +0,0 @@ -puts "TODO OCC11111 ALL: Error : Result shape is WRONG" - -puts "============" -puts "OCC20285" -puts "============" -puts "" -####################################################################### -# SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277 -####################################################################### - -set BugNumber OCC20285 - -puts "Load first shape ..." -restore [locate_data_file OCC20285-main.brep] a1 -explode a1 -renamevar a1_6 b1 - -puts "Load second shape ..." -restore [locate_data_file OCC20285-tool.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -boptuc result -puts "Finish boolean operation ..." - -set square 37856.9 - -set nb_v_good 15 -set nb_e_good 22 -set nb_w_good 9 -set nb_f_good 9 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 58 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug20285_11 b/tests/bugs/modalg/bug20285_11 deleted file mode 100755 index c506d71e0d..0000000000 --- a/tests/bugs/modalg/bug20285_11 +++ /dev/null @@ -1,39 +0,0 @@ -puts "============" -puts "OCC20285" -puts "============" -puts "" -####################################################################### -# SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277 -####################################################################### - -set BugNumber OCC20285 - -puts "Load first shape ..." -restore [locate_data_file OCC20285-main.brep] a1 -explode a1 -renamevar a1_7 b1 - -puts "Load second shape ..." -restore [locate_data_file OCC20285-tool.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopsection result -puts "Finish boolean operation ..." - -set length 446.679 - -set nb_v_good 8 -set nb_e_good 8 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 17 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug20285_12 b/tests/bugs/modalg/bug20285_12 deleted file mode 100755 index 985760a2eb..0000000000 --- a/tests/bugs/modalg/bug20285_12 +++ /dev/null @@ -1,39 +0,0 @@ -puts "============" -puts "OCC20285" -puts "============" -puts "" -####################################################################### -# SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277 -####################################################################### - -set BugNumber OCC20285 - -puts "Load first shape ..." -restore [locate_data_file OCC20285-main.brep] a1 -explode a1 -renamevar a1_7 b1 - -puts "Load second shape ..." -restore [locate_data_file OCC20285-tool.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopcommon result -puts "Finish boolean operation ..." - -set square 17028.5 - -set nb_v_good 12 -set nb_e_good 18 -set nb_w_good 8 -set nb_f_good 8 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 49 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug20285_13 b/tests/bugs/modalg/bug20285_13 deleted file mode 100755 index ff1ac556ad..0000000000 --- a/tests/bugs/modalg/bug20285_13 +++ /dev/null @@ -1,39 +0,0 @@ -puts "============" -puts "OCC20285" -puts "============" -puts "" -####################################################################### -# SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277 -####################################################################### - -set BugNumber OCC20285 - -puts "Load first shape ..." -restore [locate_data_file OCC20285-main.brep] a1 -explode a1 -renamevar a1_7 b1 - -puts "Load second shape ..." -restore [locate_data_file OCC20285-tool.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopfuse result -puts "Finish boolean operation ..." - -set square 160323 - -set nb_v_good 26 -set nb_e_good 39 -set nb_w_good 15 -set nb_f_good 15 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 98 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug20285_14 b/tests/bugs/modalg/bug20285_14 deleted file mode 100755 index ccf29dc52a..0000000000 --- a/tests/bugs/modalg/bug20285_14 +++ /dev/null @@ -1,39 +0,0 @@ -puts "============" -puts "OCC20285" -puts "============" -puts "" -####################################################################### -# SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277 -####################################################################### - -set BugNumber OCC20285 - -puts "Load first shape ..." -restore [locate_data_file OCC20285-main.brep] a1 -explode a1 -renamevar a1_7 b1 - -puts "Load second shape ..." -restore [locate_data_file OCC20285-tool.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopcut result -puts "Finish boolean operation ..." - -set square 135189 - -set nb_v_good 20 -set nb_e_good 30 -set nb_w_good 12 -set nb_f_good 12 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 77 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug20285_15 b/tests/bugs/modalg/bug20285_15 deleted file mode 100755 index b05dfffb09..0000000000 --- a/tests/bugs/modalg/bug20285_15 +++ /dev/null @@ -1,39 +0,0 @@ -puts "============" -puts "OCC20285" -puts "============" -puts "" -####################################################################### -# SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277 -####################################################################### - -set BugNumber OCC20285 - -puts "Load first shape ..." -restore [locate_data_file OCC20285-main.brep] a1 -explode a1 -renamevar a1_7 b1 - -puts "Load second shape ..." -restore [locate_data_file OCC20285-tool.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -boptuc result -puts "Finish boolean operation ..." - -set square 42162.7 - -set nb_v_good 18 -set nb_e_good 27 -set nb_w_good 11 -set nb_f_good 11 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 70 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug20285_2 b/tests/bugs/modalg/bug20285_2 deleted file mode 100755 index 23b99f7350..0000000000 --- a/tests/bugs/modalg/bug20285_2 +++ /dev/null @@ -1,39 +0,0 @@ -puts "============" -puts "OCC20285" -puts "============" -puts "" -####################################################################### -# SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277 -####################################################################### - -set BugNumber OCC20285 - -puts "Load first shape ..." -restore [locate_data_file OCC20285-main.brep] a1 -explode a1 -renamevar a1_5 b1 - -puts "Load second shape ..." -restore [locate_data_file OCC20285-tool.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopcommon result -puts "Finish boolean operation ..." - -set square 17577 - -set nb_v_good 8 -set nb_e_good 12 -set nb_w_good 6 -set nb_f_good 6 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 35 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug20285_3 b/tests/bugs/modalg/bug20285_3 deleted file mode 100755 index 9c6c908d9b..0000000000 --- a/tests/bugs/modalg/bug20285_3 +++ /dev/null @@ -1,39 +0,0 @@ -puts "============" -puts "OCC20285" -puts "============" -puts "" -####################################################################### -# SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277 -####################################################################### - -set BugNumber OCC20285 - -puts "Load first shape ..." -restore [locate_data_file OCC20285-main.brep] a1 -explode a1 -renamevar a1_5 b1 - -puts "Load second shape ..." -restore [locate_data_file OCC20285-tool.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopfuse result -puts "Finish boolean operation ..." - -set square 113140 - -set nb_v_good 18 -set nb_e_good 28 -set nb_w_good 11 -set nb_f_good 11 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 71 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug20285_4 b/tests/bugs/modalg/bug20285_4 deleted file mode 100755 index e1736b5f37..0000000000 --- a/tests/bugs/modalg/bug20285_4 +++ /dev/null @@ -1,39 +0,0 @@ -puts "============" -puts "OCC20285" -puts "============" -puts "" -####################################################################### -# SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277 -####################################################################### - -set BugNumber OCC20285 - -puts "Load first shape ..." -restore [locate_data_file OCC20285-main.brep] a1 -explode a1 -renamevar a1_5 b1 - -puts "Load second shape ..." -restore [locate_data_file OCC20285-tool.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopcut result -puts "Finish boolean operation ..." - -set square 92859.7 - -set nb_v_good 13 -set nb_e_good 19 -set nb_w_good 8 -set nb_f_good 8 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 51 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug20285_5 b/tests/bugs/modalg/bug20285_5 deleted file mode 100755 index 578a72430a..0000000000 --- a/tests/bugs/modalg/bug20285_5 +++ /dev/null @@ -1,39 +0,0 @@ -puts "============" -puts "OCC20285" -puts "============" -puts "" -####################################################################### -# SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277 -####################################################################### - -set BugNumber OCC20285 - -puts "Load first shape ..." -restore [locate_data_file OCC20285-main.brep] a1 -explode a1 -renamevar a1_5 b1 - -puts "Load second shape ..." -restore [locate_data_file OCC20285-tool.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -boptuc result -puts "Finish boolean operation ..." - -set square 37856.9 - -set nb_v_good 15 -set nb_e_good 22 -set nb_w_good 9 -set nb_f_good 9 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 58 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug20285_6 b/tests/bugs/modalg/bug20285_6 deleted file mode 100755 index 4c0c5e31dd..0000000000 --- a/tests/bugs/modalg/bug20285_6 +++ /dev/null @@ -1,42 +0,0 @@ -puts "TODO OCC11111 ALL: Error : The length of result shape is" -puts "TODO OCC11111 ALL: Error : Result shape is WRONG" - -puts "============" -puts "OCC20285" -puts "============" -puts "" -####################################################################### -# SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277 -####################################################################### - -set BugNumber OCC20285 - -puts "Load first shape ..." -restore [locate_data_file OCC20285-main.brep] a1 -explode a1 -renamevar a1_6 b1 - -puts "Load second shape ..." -restore [locate_data_file OCC20285-tool.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopsection result -puts "Finish boolean operation ..." - -set length 750.952 - -set nb_v_good 8 -set nb_e_good 7 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 16 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug20285_7 b/tests/bugs/modalg/bug20285_7 deleted file mode 100755 index 7b383b071a..0000000000 --- a/tests/bugs/modalg/bug20285_7 +++ /dev/null @@ -1,42 +0,0 @@ -puts "TODO OCC11111 ALL: Error : The square of result shape is" -puts "TODO OCC11111 ALL: Error : Result shape is WRONG" - -puts "============" -puts "OCC20285" -puts "============" -puts "" -####################################################################### -# SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277 -####################################################################### - -set BugNumber OCC20285 - -puts "Load first shape ..." -restore [locate_data_file OCC20285-main.brep] a1 -explode a1 -renamevar a1_6 b1 - -puts "Load second shape ..." -restore [locate_data_file OCC20285-tool.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopcommon result -puts "Finish boolean operation ..." - -set square 17577 - -set nb_v_good 8 -set nb_e_good 12 -set nb_w_good 6 -set nb_f_good 6 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 35 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug20285_8 b/tests/bugs/modalg/bug20285_8 deleted file mode 100755 index 36825b68ce..0000000000 --- a/tests/bugs/modalg/bug20285_8 +++ /dev/null @@ -1,42 +0,0 @@ -puts "TODO OCC11111 ALL: Error : The square of result shape is" -puts "TODO OCC11111 ALL: Error : Result shape is WRONG" - -puts "============" -puts "OCC20285" -puts "============" -puts "" -####################################################################### -# SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277 -####################################################################### - -set BugNumber OCC20285 - -puts "Load first shape ..." -restore [locate_data_file OCC20285-main.brep] a1 -explode a1 -renamevar a1_6 b1 - -puts "Load second shape ..." -restore [locate_data_file OCC20285-tool.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopfuse result -puts "Finish boolean operation ..." - -set square 113140 - -set nb_v_good 18 -set nb_e_good 28 -set nb_w_good 11 -set nb_f_good 11 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 71 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug20285_9 b/tests/bugs/modalg/bug20285_9 deleted file mode 100755 index 6c71942dc1..0000000000 --- a/tests/bugs/modalg/bug20285_9 +++ /dev/null @@ -1,42 +0,0 @@ -puts "TODO OCC11111 ALL: Error : The square of result shape is" -puts "TODO OCC11111 ALL: Error : Result shape is WRONG" - -puts "============" -puts "OCC20285" -puts "============" -puts "" -####################################################################### -# SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277 -####################################################################### - -set BugNumber OCC20285 - -puts "Load first shape ..." -restore [locate_data_file OCC20285-main.brep] a1 -explode a1 -renamevar a1_6 b1 - -puts "Load second shape ..." -restore [locate_data_file OCC20285-tool.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopcut result -puts "Finish boolean operation ..." - -set square 92859.7 - -set nb_v_good 13 -set nb_e_good 19 -set nb_w_good 8 -set nb_f_good 8 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 51 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug20297_1 b/tests/bugs/modalg/bug20297_1 deleted file mode 100755 index 36974e9112..0000000000 --- a/tests/bugs/modalg/bug20297_1 +++ /dev/null @@ -1,39 +0,0 @@ -puts "============" -puts "OCC20297" -puts "Customer : TATA" -puts "============" -puts "" -####################################################################### -# Boolean operations (for ex. fuse) fail for given shapes -####################################################################### - -set BugNumber OCC20297 - -puts "Load first shape ..." -restore [locate_data_file OCC20297_1.brep] a1 -explode a1 -renamevar a1_1 b1 -puts "Load second shape ..." -restore [locate_data_file OCC20297_2.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopsection result -puts "Finish boolean operation ..." - -set length 389.898 - -set nb_v_good 64 -set nb_e_good 64 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 129 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug20297_2 b/tests/bugs/modalg/bug20297_2 deleted file mode 100755 index cd0ef7486c..0000000000 --- a/tests/bugs/modalg/bug20297_2 +++ /dev/null @@ -1,40 +0,0 @@ -puts "============" -puts "OCC20297" -puts "Customer : TATA" -puts "============" -puts "" -####################################################################### -# Boolean operations (for ex. fuse) fail for given shapes -####################################################################### -####################################################################### - -set BugNumber OCC20297 - -puts "Load first shape ..." -restore [locate_data_file OCC20297_1.brep] a1 -explode a1 -renamevar a1_1 b1 -puts "Load second shape ..." -restore [locate_data_file OCC20297_2.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopcommon result -puts "Finish boolean operation ..." - -set square 31648.3 - -set nb_v_good 129 -set nb_e_good 194 -set nb_w_good 71 -set nb_f_good 69 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 466 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug20297_3 b/tests/bugs/modalg/bug20297_3 deleted file mode 100755 index b672095d96..0000000000 --- a/tests/bugs/modalg/bug20297_3 +++ /dev/null @@ -1,40 +0,0 @@ -puts "============" -puts "OCC20297" -puts "Customer : TATA" -puts "============" -puts "" -####################################################################### -# Boolean operations (for ex. fuse) fail for given shapes -####################################################################### -####################################################################### - -set BugNumber OCC20297 - -puts "Load first shape ..." -restore [locate_data_file OCC20297_1.brep] a1 -explode a1 -renamevar a1_1 b1 -puts "Load second shape ..." -restore [locate_data_file OCC20297_2.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopfuse result -puts "Finish boolean operation ..." - -set square 46473.9 - -set nb_v_good 140 -set nb_e_good 209 -set nb_w_good 83 -set nb_f_good 77 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 512 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug20297_4 b/tests/bugs/modalg/bug20297_4 deleted file mode 100755 index ebda37c1c9..0000000000 --- a/tests/bugs/modalg/bug20297_4 +++ /dev/null @@ -1,40 +0,0 @@ -puts "============" -puts "OCC20297" -puts "Customer : TATA" -puts "============" -puts "" -####################################################################### -# Boolean operations (for ex. fuse) fail for given shapes -####################################################################### -####################################################################### - -set BugNumber OCC20297 - -puts "Load first shape ..." -restore [locate_data_file OCC20297_1.brep] a1 -explode a1 -renamevar a1_1 b1 -puts "Load second shape ..." -restore [locate_data_file OCC20297_2.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopcut result -puts "Finish boolean operation ..." - -set square 69719.6 - -set nb_v_good 141 -set nb_e_good 211 -set nb_w_good 86 -set nb_f_good 78 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 519 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug20297_5 b/tests/bugs/modalg/bug20297_5 deleted file mode 100755 index bd7add7d9c..0000000000 --- a/tests/bugs/modalg/bug20297_5 +++ /dev/null @@ -1,40 +0,0 @@ -puts "============" -puts "OCC20297" -puts "Customer : TATA" -puts "============" -puts "" -####################################################################### -# Boolean operations (for ex. fuse) fail for given shapes -####################################################################### -####################################################################### - -set BugNumber OCC20297 - -puts "Load first shape ..." -restore [locate_data_file OCC20297_1.brep] a1 -explode a1 -renamevar a1_1 b1 -puts "Load second shape ..." -restore [locate_data_file OCC20297_2.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -boptuc result -puts "Finish boolean operation ..." - -set square 8402.56 - -set nb_v_good 128 -set nb_e_good 192 -set nb_w_good 68 -set nb_f_good 68 -set nb_sh_good 2 -set nb_sol_good 2 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 461 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug20413 b/tests/bugs/modalg/bug20413 deleted file mode 100755 index 862df55f0d..0000000000 --- a/tests/bugs/modalg/bug20413 +++ /dev/null @@ -1,36 +0,0 @@ -puts "============" -puts "OCC20413" -puts "============" -puts "" -####################################################################### -# Section is wrong for given shapes -####################################################################### - -set BugNumber OCC20413 - -puts "Load first shape ..." -restore [locate_data_file OCC20413_a1.brep] b1 -puts "Load second shape ..." -restore [locate_data_file OCC20413_a2.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopsection result -puts "Finish boolean operation ..." - -set length 233.024 - -set nb_v_good 9 -set nb_e_good 9 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 19 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug20465 b/tests/bugs/modalg/bug20465 deleted file mode 100755 index 38c21cee41..0000000000 --- a/tests/bugs/modalg/bug20465 +++ /dev/null @@ -1,31 +0,0 @@ -puts "========================" -puts "OCC20465" -puts "========================" -puts "" -####################################################################### -# Wrong checkshape results for shells -####################################################################### - -set BugNumber OCC20465 - -restore [locate_data_file OCC20465.brep] r - -checkshape r -explode r f -compound r_1 r_2 r_3 r_4 r_5 r_6 r_7 r_8 r_9 r_10 r_11 result - -set square 900 - -set nb_v_good 23 -set nb_e_good 33 -set nb_w_good 13 -set nb_f_good 11 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 81 - -set square 900 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug20521 b/tests/bugs/modalg/bug20521 deleted file mode 100755 index 6a6cff91fb..0000000000 --- a/tests/bugs/modalg/bug20521 +++ /dev/null @@ -1,35 +0,0 @@ -puts "================" -puts "OCC20521" -puts "================" -puts "" -####################################################################################### -# Triangulation for a fece is not build -###################################################################################### - -set BugNumber OCC20521 - -catch { pload XDE } - -testreadstep [locate_data_file OCC20521-3DB.stp] result - -set square 322688 - -set nb_v_good 119 -set nb_e_good 199 -set nb_w_good 96 -set nb_f_good 87 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 503 - -vinit -tclean result -vsetdispmode 1 -vdisplay result -vfit - -set 3dviewer 0 - - diff --git a/tests/bugs/modalg/bug20785 b/tests/bugs/modalg/bug20785 deleted file mode 100755 index 6a7ea868d3..0000000000 --- a/tests/bugs/modalg/bug20785 +++ /dev/null @@ -1,51 +0,0 @@ -puts "========" -puts "OCC20785" -puts "========" -puts "" -###################################################### -# Surfaces are empty after shading -###################################################### - -set BugNumber OCC20785 - -restore [locate_data_file OCC20785.brep] result - -set square 322688 - -set nb_v_good 119 -set nb_e_good 199 -set nb_w_good 96 -set nb_f_good 87 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 503 - -vinit -vdisplay res -vsetdispmode 1 -vfit - -set only_screen 0 - -set scale 2.7840527693872859 -set center_X 3.7559505017270567e-07 -set center_Y -71.035163389154491 -set proj_X -0.89892524480819702 -set proj_Y -0.37323716282844543 -set proj_Z -0.22940616309642792 -set up_X -0.41990724205970764 -set up_Y 0.58468854427337646 -set up_Z 0.69413024187088013 -set at_X -74.980735778808594 -set at_Y 22.785961151123047 -set at_Z -49.215263366699219 - -vviewparams ${scale} ${center_X} ${center_Y} \ - ${proj_X} ${proj_Y} ${proj_Z} \ - ${up_X} ${up_Y} ${up_Z} \ - ${at_X} ${at_Y} ${at_Z} - -set only_screen 0 - diff --git a/tests/bugs/modalg/bug20793 b/tests/bugs/modalg/bug20793 deleted file mode 100755 index 0d244450e8..0000000000 --- a/tests/bugs/modalg/bug20793 +++ /dev/null @@ -1,33 +0,0 @@ -puts "============" -puts "OCC20793" -puts "============" -puts "" -####################################################################### -# BRepOffsetAPI_MakeOffset produces incorrect result -####################################################################### - -set BugNumber OCC20793 - -puts "Load shape ..." -restore [locate_data_file OCC20793.brep] a - -if [catch { mkoffset resoffset a 1 10 } ] { - puts "Faulty ${BugNumber} : mkoffset is wrong" -} else { - renamevar resoffset_1 result - -set length 671.746 - -set nb_v_good 4 -set nb_e_good 4 -set nb_w_good 1 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 9 - -} - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug20807_1 b/tests/bugs/modalg/bug20807_1 deleted file mode 100755 index 99b16c7443..0000000000 --- a/tests/bugs/modalg/bug20807_1 +++ /dev/null @@ -1,34 +0,0 @@ -puts "============" -puts "OCC20807" -puts "============" -puts "" -####################################################################### -# Construction of pipe among a helix containing several convolutions fails -####################################################################### - -set BugNumber OCC20807 - -restore [locate_data_file bug20807_helix_10.brep] spine -wire spine spine - -restore [locate_data_file bug20807_profile.brep] profile - -mksweep spine -setsweep -CN 0 0 1 -addsweep profile - -buildsweep result - -set square 254837 - -set nb_v_good 8 -set nb_e_good 12 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 29 - -set 2dviewer 1 diff --git a/tests/bugs/modalg/bug20807_2 b/tests/bugs/modalg/bug20807_2 deleted file mode 100755 index 8eb2764750..0000000000 --- a/tests/bugs/modalg/bug20807_2 +++ /dev/null @@ -1,33 +0,0 @@ -puts "============" -puts "OCC20807" -puts "============" -puts "" -####################################################################### -# Construction of pipe among a helix containing several convolutions fails -####################################################################### - -set BugNumber OCC20807 - -restore [locate_data_file bug20807_coil.brep] spine -explode spine - -restore [locate_data_file bug20807_circ.brep] profile - -mksweep spine_1 -addsweep profile - -buildsweep result - -set square 44761.1 - -set nb_v_good 2 -set nb_e_good 3 -set nb_w_good 1 -set nb_f_good 1 -set nb_sh_good 1 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 8 - -set 2dviewer 1 diff --git a/tests/bugs/modalg/bug20807_3 b/tests/bugs/modalg/bug20807_3 deleted file mode 100755 index 711a6a71ea..0000000000 --- a/tests/bugs/modalg/bug20807_3 +++ /dev/null @@ -1,32 +0,0 @@ -puts "============" -puts "OCC20807" -puts "============" -puts "" -####################################################################### -# Construction of pipe among a helix containing several convolutions fails -####################################################################### - -set BugNumber OCC20807 - -restore [locate_data_file bug20807_coil2.brep] spine - -restore [locate_data_file bug20807_circ2.brep] profile - -mksweep spine -addsweep profile - -buildsweep result - -set square 2933.11 - -set nb_v_good 2 -set nb_e_good 3 -set nb_w_good 1 -set nb_f_good 1 -set nb_sh_good 1 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 8 - -set 2dviewer 1 diff --git a/tests/bugs/modalg/bug20807_4 b/tests/bugs/modalg/bug20807_4 deleted file mode 100755 index 6825b32aa3..0000000000 --- a/tests/bugs/modalg/bug20807_4 +++ /dev/null @@ -1,34 +0,0 @@ -puts "============" -puts "OCC20807" -puts "============" -puts "" -####################################################################### -# Construction of pipe among a helix containing several convolutions fails -####################################################################### - -set BugNumber OCC20807 - -restore [locate_data_file bug20807_spiral.brep] sp -explode sp -wire spine sp_1 - -restore [locate_data_file bug20807_circ3.brep] profile - -mksweep spine -addsweep profile - -buildsweep result - -set square 4.78336e+06 - -set nb_v_good 2 -set nb_e_good 3 -set nb_w_good 1 -set nb_f_good 1 -set nb_sh_good 1 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 8 - -set 2dviewer 1 diff --git a/tests/bugs/modalg/bug20827 b/tests/bugs/modalg/bug20827 deleted file mode 100755 index aec2ad795e..0000000000 --- a/tests/bugs/modalg/bug20827 +++ /dev/null @@ -1,25 +0,0 @@ -puts "================" -puts "OCC20827" -puts "================" -puts "" -####################################################################################### -# Problem of displaying in SHADING mode -###################################################################################### - -set BugNumber OCC20827 - -restore [locate_data_file OCC20827-ran24s_a-d_1_f107.brep] result - -set square 9707.82 - -set nb_v_good 93 -set nb_e_good 93 -set nb_w_good 13 -set nb_f_good 1 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 200 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug2083_1 b/tests/bugs/modalg/bug2083_1 deleted file mode 100644 index 1149afadf0..0000000000 --- a/tests/bugs/modalg/bug2083_1 +++ /dev/null @@ -1,28 +0,0 @@ -puts "============" -puts "OCC2083" -puts "============" -puts "" -###################################################### -# BRepOffsetAPI_MakePipeShell throws an exception -###################################################### - -restore [locate_data_file OCC2083-f1.brep] f1 -restore [locate_data_file OCC2083-f2.brep] f2 -restore [locate_data_file OCC2083-w.brep] s - -checkshape f1 -checkshape f2 -checkshape s - -explode f1 w -explode f2 w -mksweep s -addsweep f1_1 -addsweep f2_1 - -if { [catch {buildsweep result} catch_result] } { - puts "Faulty OCC2083" -} - -set square 36302.3 -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug2083_2 b/tests/bugs/modalg/bug2083_2 deleted file mode 100644 index f9c0386a97..0000000000 --- a/tests/bugs/modalg/bug2083_2 +++ /dev/null @@ -1,29 +0,0 @@ -puts "============" -puts "OCC2083" -puts "============" -puts "" -###################################################### -# BRepOffsetAPI_MakePipeShell throws an exception -###################################################### - -restore [locate_data_file OCC2083-f1.brep] f1 -restore [locate_data_file OCC2083-f2.brep] f2 -restore [locate_data_file OCC2083-w.brep] s - -checkshape f1 -checkshape f2 -checkshape s - -explode f1 w -explode f2 w -mksweep s -addsweep f1_1 -T -addsweep f2_1 -T - -if { [catch {buildsweep result} catch_result] } { - puts "Faulty OCC2083" -} - -set square 36583.8 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug2083_3 b/tests/bugs/modalg/bug2083_3 deleted file mode 100644 index 3865579dc4..0000000000 --- a/tests/bugs/modalg/bug2083_3 +++ /dev/null @@ -1,29 +0,0 @@ -puts "============" -puts "OCC2083" -puts "============" -puts "" -###################################################### -# BRepOffsetAPI_MakePipeShell throws an exception -###################################################### - -restore [locate_data_file OCC2083-f1.brep] f1 -restore [locate_data_file OCC2083-f2.brep] f2 -restore [locate_data_file OCC2083-w.brep] s - -checkshape f1 -checkshape f2 -checkshape s - -explode f1 w -explode f2 w -mksweep s -addsweep f1_1 -T -addsweep f2_1 - -if { [catch {buildsweep result} catch_result] } { - puts "Faulty OCC2083" -} - -set square 36546.8 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug2083_4 b/tests/bugs/modalg/bug2083_4 deleted file mode 100644 index ea963c56b5..0000000000 --- a/tests/bugs/modalg/bug2083_4 +++ /dev/null @@ -1,29 +0,0 @@ -puts "============" -puts "OCC2083" -puts "============" -puts "" -###################################################### -# BRepOffsetAPI_MakePipeShell throws an exception -###################################################### - -restore [locate_data_file OCC2083-f1.brep] f1 -restore [locate_data_file OCC2083-f2.brep] f2 -restore [locate_data_file OCC2083-w.brep] s - -checkshape f1 -checkshape f2 -checkshape s - -explode f1 w -explode f2 w -mksweep s -addsweep f1_1 -addsweep f2_1 -T - -if { [catch {buildsweep result} catch_result] } { - puts "Faulty OCC2083" -} - -set square 36339.5 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug20964_1 b/tests/bugs/modalg/bug20964_1 deleted file mode 100755 index be0dba6d80..0000000000 --- a/tests/bugs/modalg/bug20964_1 +++ /dev/null @@ -1,37 +0,0 @@ -puts "============" -puts "OCC20964" -puts "Customer : TATA" -puts "============" -puts "" -####################################################################### -# Wrong result of cut operation for given shapes -####################################################################### - -set BugNumber OCC20964 - -puts "Load first shape ..." -restore [locate_data_file OCC20964_revsolid.brep] b1 -puts "Load second shape ..." -restore [locate_data_file OCC20964_sphere.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopsection result -puts "Finish boolean operation ..." - -set length 323.636 - -set nb_v_good 6 -set nb_e_good 6 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 13 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug20964_2 b/tests/bugs/modalg/bug20964_2 deleted file mode 100755 index 389b42df66..0000000000 --- a/tests/bugs/modalg/bug20964_2 +++ /dev/null @@ -1,37 +0,0 @@ -puts "============" -puts "OCC20964" -puts "Customer : TATA" -puts "============" -puts "" -####################################################################### -# Wrong result of cut operation for given shapes -####################################################################### - -set BugNumber OCC20964 - -puts "Load first shape ..." -restore [locate_data_file OCC20964_revsolid.brep] b1 -puts "Load second shape ..." -restore [locate_data_file OCC20964_sphere.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopcommon result -puts "Finish boolean operation ..." - -set square 5164.66 - -set nb_v_good 8 -set nb_e_good 12 -set nb_w_good 6 -set nb_f_good 5 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 34 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug20964_3 b/tests/bugs/modalg/bug20964_3 deleted file mode 100755 index bb6d442a69..0000000000 --- a/tests/bugs/modalg/bug20964_3 +++ /dev/null @@ -1,37 +0,0 @@ -puts "============" -puts "OCC20964" -puts "Customer : TATA" -puts "============" -puts "" -####################################################################### -# Wrong result of cut operation for given shapes -####################################################################### - -set BugNumber OCC20964 - -puts "Load first shape ..." -restore [locate_data_file OCC20964_revsolid.brep] b1 -puts "Load second shape ..." -restore [locate_data_file OCC20964_sphere.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopfuse result -puts "Finish boolean operation ..." - -set square 828829 - -set nb_v_good 20 -set nb_e_good 32 -set nb_w_good 18 -set nb_f_good 16 -set nb_sh_good 3 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 91 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug20964_4 b/tests/bugs/modalg/bug20964_4 deleted file mode 100755 index 3c2f2d887a..0000000000 --- a/tests/bugs/modalg/bug20964_4 +++ /dev/null @@ -1,37 +0,0 @@ -puts "============" -puts "OCC20964" -puts "Customer : TATA" -puts "============" -puts "" -####################################################################### -# Wrong result of cut operation for given shapes -####################################################################### - -set BugNumber OCC20964 - -puts "Load first shape ..." -restore [locate_data_file OCC20964_revsolid.brep] b1 -puts "Load second shape ..." -restore [locate_data_file OCC20964_sphere.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopcut result -puts "Finish boolean operation ..." - -set square 821892 - -set nb_v_good 22 -set nb_e_good 35 -set nb_w_good 17 -set nb_f_good 14 -set nb_sh_good 2 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 92 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug20964_5 b/tests/bugs/modalg/bug20964_5 deleted file mode 100755 index 045919fba7..0000000000 --- a/tests/bugs/modalg/bug20964_5 +++ /dev/null @@ -1,37 +0,0 @@ -puts "============" -puts "OCC20964" -puts "Customer : TATA" -puts "============" -puts "" -####################################################################### -# Wrong result of cut operation for given shapes -####################################################################### - -set BugNumber OCC20964 - -puts "Load first shape ..." -restore [locate_data_file OCC20964_revsolid.brep] b1 -puts "Load second shape ..." -restore [locate_data_file OCC20964_sphere.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -boptuc result -puts "Finish boolean operation ..." - -set square 12101.2 - -set nb_v_good 6 -set nb_e_good 9 -set nb_w_good 7 -set nb_f_good 7 -set nb_sh_good 2 -set nb_sol_good 2 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 34 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug21 b/tests/bugs/modalg/bug21 deleted file mode 100755 index f8ba733c7b..0000000000 --- a/tests/bugs/modalg/bug21 +++ /dev/null @@ -1,21 +0,0 @@ -puts "================" -puts "OCC21" -puts "================" -puts "" - -#test for XSDRAWEXE application# -#==============================# - -pload XDE - -restore [locate_data_file OCC21.brep] sh -checkshape sh -puts "two faces in the compound share one edge" - -DT_SplitAngle result sh 90 - -puts "in the resulting shape sharing is not preserved" - -set square 12154.8 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug21060 b/tests/bugs/modalg/bug21060 deleted file mode 100755 index bef0a13ec4..0000000000 --- a/tests/bugs/modalg/bug21060 +++ /dev/null @@ -1,33 +0,0 @@ -puts "TODO OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO OCC11111 ALL: Error : Result shape is WRONG" -puts "TODO OCC11111 ALL: Error : The square of result shape is" - -puts "================" -puts "OCC21060" -puts "================" -puts "" -####################################################################################### -# Triangulatiom fails on non-manifold face with Sl wire -###################################################################################### - -set BugNumber OCC21060 - -restore [locate_data_file OCC21060-A9_205.brep] result -vinit -vsetdispmode 1 -vdisplay result -vfit - -set square 12 - -set nb_v_good 4 -set nb_e_good 4 -set nb_w_good 2 -set nb_f_good 2 -set nb_sh_good 1 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 13 - -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug212 b/tests/bugs/modalg/bug212 deleted file mode 100755 index 362dac5679..0000000000 --- a/tests/bugs/modalg/bug212 +++ /dev/null @@ -1,18 +0,0 @@ -puts "========" -puts "OCC212" -puts "========" -################################################ -## Bug in Topological "Common" boolean operation -################################################ - -restore [locate_data_file OCC212-1.brep] S1 -checkshape S1 -restore [locate_data_file OCC212-2.brep] S2 -checkshape S2 - -bop S1 S2 -bopcommon result - -set square 314.301 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug21255 b/tests/bugs/modalg/bug21255 deleted file mode 100755 index 9050872b2b..0000000000 --- a/tests/bugs/modalg/bug21255 +++ /dev/null @@ -1,56 +0,0 @@ -puts "============" -puts "OCC21255" -puts "============" -puts "" -####################################################################### -# Some problems with 3D chamfer construction -####################################################################### - -set BugNumber OCC21255 - -restore [locate_data_file OCC21255-1.brep] ss -explode ss F -explode ss_7 E - -vinit -if [catch { chamf result ss ss_7_2 ss_7 5. 5. } ] { - puts "Faulty ${BugNumber} : chamf is wrong" -} else { -set square 45382.5 - -set nb_v_good 15 -set nb_e_good 22 -set nb_w_good 9 -set nb_f_good 9 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 58 - - set 3dviewer 0 - vdisplay result - vsetdispmode 1 - vfit - - set scale 5.8955238204183011 - set center_X -43.928617104386774 - set center_Y 295.47887425975171 - set proj_X 0.62061613798141479 - set proj_Y -0.6891753077507019 - set proj_Z -0.37399500608444214 - set up_X -0.12894462049007416 - set up_Y -0.56017255783081055 - set up_Z 0.81827831268310547 - set at_X 15.248310089111328 - set at_Y 165.90042114257812 - set at_Z 225.19309997558594 - - vviewparams ${scale} ${center_X} ${center_Y} \ - ${proj_X} ${proj_Y} ${proj_Z} \ - ${up_X} ${up_Y} ${up_Z} \ - ${at_X} ${at_Y} ${at_Z} - -} - -set only_screen 1 diff --git a/tests/bugs/modalg/bug21261_1 b/tests/bugs/modalg/bug21261_1 deleted file mode 100755 index 2b8bff9055..0000000000 --- a/tests/bugs/modalg/bug21261_1 +++ /dev/null @@ -1,54 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-1.brep] s - -thickshell result s 5 - -set square 36766 - -set nb_v_good 4 -set nb_e_good 10 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 24 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - -set scale 5.8136266443689317 -set center_X -34.878384652992025 -set center_Y 41.518039353084561 -set proj_X 0.5689244270324707 -set proj_Y -0.54117375612258911 -set proj_Z -0.61923813819885254 -set up_X 0.48309960961341858 -set up_Y -0.38943690061569214 -set up_Z 0.78418976068496704 -set at_X -38.500396728515625 -set at_Y 34.677536010742188 -set at_Z -7.9150166511535645 - -vviewparams ${scale} ${center_X} ${center_Y} \ - ${proj_X} ${proj_Y} ${proj_Z} \ - ${up_X} ${up_Y} ${up_Z} \ - ${at_X} ${at_Y} ${at_Z} - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_10 b/tests/bugs/modalg/bug21261_10 deleted file mode 100755 index a38188c12e..0000000000 --- a/tests/bugs/modalg/bug21261_10 +++ /dev/null @@ -1,54 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-5.brep] s - -thickshell result s -5 - -set square 29923.6 - -set nb_v_good 4 -set nb_e_good 10 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 24 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - -set scale 6.3723487126883533 -set center_X -4.2632564145606011e-14 -set center_Y -22.430308400362279 -set proj_X 0.57735025882720947 -set proj_Y -0.57735025882720947 -set proj_Z 0.57735025882720947 -set up_X -0.40824827551841736 -set up_Y 0.40824827551841736 -set up_Z 0.81649655103683472 -set at_X 0 -set at_Y 0 -set at_Z 0 - -vviewparams ${scale} ${center_X} ${center_Y} \ - ${proj_X} ${proj_Y} ${proj_Z} \ - ${up_X} ${up_Y} ${up_Z} \ - ${at_X} ${at_Y} ${at_Z} - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_11 b/tests/bugs/modalg/bug21261_11 deleted file mode 100755 index 7072c3a3b8..0000000000 --- a/tests/bugs/modalg/bug21261_11 +++ /dev/null @@ -1,54 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-cone1.brep] s - -thickshell result s -5 - -set square 11054.2 - -set nb_v_good 4 -set nb_e_good 8 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 22 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - -set scale 17.084273613995954 -set center_X 210.44987026890158 -set center_Y -5.2570485620847549 -set proj_X 0.98952245712280273 -set proj_Y -0.12535266578197479 -set proj_Z 0.071637466549873352 -set up_X -0.016377445310354233 -set up_Y 0.39552098512649536 -set up_Z 0.91831082105636597 -set at_X 121.38485717773438 -set at_Y -46.730243682861328 -set at_Z 83.376449584960938 - -vviewparams ${scale} ${center_X} ${center_Y} \ - ${proj_X} ${proj_Y} ${proj_Z} \ - ${up_X} ${up_Y} ${up_Z} \ - ${at_X} ${at_Y} ${at_Z} - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_12 b/tests/bugs/modalg/bug21261_12 deleted file mode 100755 index a1d8306bf6..0000000000 --- a/tests/bugs/modalg/bug21261_12 +++ /dev/null @@ -1,36 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-revarc.brep] s - -thickshell result s -5 - -set square 39635.4 - -set nb_v_good 4 -set nb_e_good 8 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 22 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_13 b/tests/bugs/modalg/bug21261_13 deleted file mode 100755 index d14d0d212b..0000000000 --- a/tests/bugs/modalg/bug21261_13 +++ /dev/null @@ -1,36 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-revbzc.brep] s - -thickshell result s -5 - -set square 73788.5 - -set nb_v_good 4 -set nb_e_good 8 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 22 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_14 b/tests/bugs/modalg/bug21261_14 deleted file mode 100755 index 1b00b6f246..0000000000 --- a/tests/bugs/modalg/bug21261_14 +++ /dev/null @@ -1,36 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-2137_tsrf.brep] s - -thickshell result s -5 - -set square 27432.4 - -set nb_v_good 4 -set nb_e_good 6 -set nb_w_good 6 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 22 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_15 b/tests/bugs/modalg/bug21261_15 deleted file mode 100755 index ecd6539de8..0000000000 --- a/tests/bugs/modalg/bug21261_15 +++ /dev/null @@ -1,39 +0,0 @@ -puts "TODO OCC11111 ALL: Exception" -puts "TODO OCC11111 ALL: An exception was caught" -puts "TODO ?OCC11111 ALL: TEST INCOMPLETE" -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-2137_bss1_crash_C0.brep] s - -thickshell result s -5 - -set square 27432.4 - -set nb_v_good 4 -set nb_e_good 6 -set nb_w_good 6 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 22 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_16 b/tests/bugs/modalg/bug21261_16 deleted file mode 100755 index 813fa34a86..0000000000 --- a/tests/bugs/modalg/bug21261_16 +++ /dev/null @@ -1,36 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-1988_ellipsepipesrf_1.brep] s - -thickshell result s -5 - -set square 17366.2 - -set nb_v_good 4 -set nb_e_good 8 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 22 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_17 b/tests/bugs/modalg/bug21261_17 deleted file mode 100755 index 3e960bf1fd..0000000000 --- a/tests/bugs/modalg/bug21261_17 +++ /dev/null @@ -1,36 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-1988_bscpipesrf_2.brep] s - -thickshell result s -5 - -set square 10250 - -set nb_v_good 4 -set nb_e_good 8 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 22 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_18 b/tests/bugs/modalg/bug21261_18 deleted file mode 100755 index 380bb63ed4..0000000000 --- a/tests/bugs/modalg/bug21261_18 +++ /dev/null @@ -1,36 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-1.brep] s - -thickshell result s -5 - -set square 30288.5 - -set nb_v_good 4 -set nb_e_good 10 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 24 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_19 b/tests/bugs/modalg/bug21261_19 deleted file mode 100755 index 4118781047..0000000000 --- a/tests/bugs/modalg/bug21261_19 +++ /dev/null @@ -1,36 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-box_trim_thickening.brep] s - -thickshell result s -5 - -set square 47143.4 - -set nb_v_good 26 -set nb_e_good 47 -set nb_w_good 23 -set nb_f_good 21 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 119 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_2 b/tests/bugs/modalg/bug21261_2 deleted file mode 100755 index ac01f10a45..0000000000 --- a/tests/bugs/modalg/bug21261_2 +++ /dev/null @@ -1,54 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-1.brep] s - -thickshell result s -5 - -set square 30288.5 - -set nb_v_good 4 -set nb_e_good 10 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 24 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - -set scale 5.8136266443689317 -set center_X -34.878384652992025 -set center_Y 41.518039353084561 -set proj_X 0.5689244270324707 -set proj_Y -0.54117375612258911 -set proj_Z -0.61923813819885254 -set up_X 0.48309960961341858 -set up_Y -0.38943690061569214 -set up_Z 0.78418976068496704 -set at_X -38.500396728515625 -set at_Y 34.677536010742188 -set at_Z -7.9150166511535645 - -vviewparams ${scale} ${center_X} ${center_Y} \ - ${proj_X} ${proj_Y} ${proj_Z} \ - ${up_X} ${up_Y} ${up_Z} \ - ${at_X} ${at_Y} ${at_Z} - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_20 b/tests/bugs/modalg/bug21261_20 deleted file mode 100755 index 7f63b12d25..0000000000 --- a/tests/bugs/modalg/bug21261_20 +++ /dev/null @@ -1,36 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-comb.brep] s - -thickshell result s -5 - -set square 25639.3 - -set nb_v_good 18 -set nb_e_good 31 -set nb_w_good 17 -set nb_f_good 15 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 83 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_21 b/tests/bugs/modalg/bug21261_21 deleted file mode 100755 index 5a2d84e3c6..0000000000 --- a/tests/bugs/modalg/bug21261_21 +++ /dev/null @@ -1,39 +0,0 @@ -puts "TODO OCC11111 ALL: Exception" -puts "TODO OCC11111 ALL: An exception was caught" -puts "TODO ?OCC11111 ALL: TEST INCOMPLETE" -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-comb1.brep] s - -thickshell result s -5 - -set square 25639.3 - -set nb_v_good 18 -set nb_e_good 31 -set nb_w_good 17 -set nb_f_good 15 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 83 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_22 b/tests/bugs/modalg/bug21261_22 deleted file mode 100755 index 7473484fac..0000000000 --- a/tests/bugs/modalg/bug21261_22 +++ /dev/null @@ -1,36 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-2.brep] s - -thickshell result s -5 - -set square 66487 - -set nb_v_good 12 -set nb_e_good 24 -set nb_w_good 12 -set nb_f_good 12 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 62 - - - -vinit -vdisplay result -vsetdispmode 1 -vfit - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_23 b/tests/bugs/modalg/bug21261_23 deleted file mode 100755 index 854763fb93..0000000000 --- a/tests/bugs/modalg/bug21261_23 +++ /dev/null @@ -1,36 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-3.brep] s - -thickshell result s -5 - -set square 115498 - -set nb_v_good 24 -set nb_e_good 48 -set nb_w_good 24 -set nb_f_good 24 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 122 - - - -vinit -vdisplay result -vsetdispmode 1 -vfit - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_24 b/tests/bugs/modalg/bug21261_24 deleted file mode 100755 index 5e6373edd2..0000000000 --- a/tests/bugs/modalg/bug21261_24 +++ /dev/null @@ -1,36 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-4.brep] s - -thickshell result s -5 - -set square 44935.7 - -set nb_v_good 16 -set nb_e_good 28 -set nb_w_good 14 -set nb_f_good 14 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 74 - - - -vinit -vdisplay result -vsetdispmode 1 -vfit - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_25 b/tests/bugs/modalg/bug21261_25 deleted file mode 100755 index 704c7d4b4c..0000000000 --- a/tests/bugs/modalg/bug21261_25 +++ /dev/null @@ -1,36 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-5.brep] s - -thickshell result s -5 - -set square 29923.6 - -set nb_v_good 4 -set nb_e_good 10 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 24 - - - -vinit -vdisplay result -vsetdispmode 1 -vfit - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_26 b/tests/bugs/modalg/bug21261_26 deleted file mode 100755 index 7ab75bdae3..0000000000 --- a/tests/bugs/modalg/bug21261_26 +++ /dev/null @@ -1,36 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-cone1.brep] s - -thickshell result s -5 - -set square 11054.2 - -set nb_v_good 4 -set nb_e_good 8 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 22 - - - -vinit -vdisplay result -vsetdispmode 1 -vfit - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_27 b/tests/bugs/modalg/bug21261_27 deleted file mode 100755 index 1eee43c16a..0000000000 --- a/tests/bugs/modalg/bug21261_27 +++ /dev/null @@ -1,36 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-revarc.brep] s - -thickshell result s -5 - -set square 39635.4 - -set nb_v_good 4 -set nb_e_good 8 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 22 - - - -vinit -vdisplay result -vsetdispmode 1 -vfit - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_28 b/tests/bugs/modalg/bug21261_28 deleted file mode 100755 index c54e83f603..0000000000 --- a/tests/bugs/modalg/bug21261_28 +++ /dev/null @@ -1,36 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-revbzc.brep] s - -thickshell result s -5 - -set square 73788.5 - -set nb_v_good 4 -set nb_e_good 8 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 22 - - - -vinit -vdisplay result -vsetdispmode 1 -vfit - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_29 b/tests/bugs/modalg/bug21261_29 deleted file mode 100755 index 92e18e64c8..0000000000 --- a/tests/bugs/modalg/bug21261_29 +++ /dev/null @@ -1,36 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-uneven_thickening.brep] s - -thickshell result s -2 - -set square 4087.41 - -set nb_v_good 30 -set nb_e_good 51 -set nb_w_good 21 -set nb_f_good 21 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 125 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_3 b/tests/bugs/modalg/bug21261_3 deleted file mode 100755 index 841eb26633..0000000000 --- a/tests/bugs/modalg/bug21261_3 +++ /dev/null @@ -1,54 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-2.brep] s - -thickshell result s 5 - -set square 61710.5 - -set nb_v_good 12 -set nb_e_good 24 -set nb_w_good 12 -set nb_f_good 12 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 62 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - -set scale 5.4752524438940986 -set center_X 0.12443750381514462 -set center_Y 30.91257192276079 -set proj_X 0.75705158710479736 -set proj_Y -0.55456298589706421 -set proj_Z 0.34544554352760315 -set up_X -0.26271694898605347 -set up_Y 0.22571359574794769 -set up_Z 0.93810069561004639 -set at_X -8.4405813217163086 -set at_Y 5.1293683052062988 -set at_Z 1.3484655618667603 - -vviewparams ${scale} ${center_X} ${center_Y} \ - ${proj_X} ${proj_Y} ${proj_Z} \ - ${up_X} ${up_Y} ${up_Z} \ - ${at_X} ${at_Y} ${at_Z} - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_30 b/tests/bugs/modalg/bug21261_30 deleted file mode 100755 index de3b029020..0000000000 --- a/tests/bugs/modalg/bug21261_30 +++ /dev/null @@ -1,36 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-2137_tsrf.brep] s - -thickshell result s 5 - -set square 27432.4 - -set nb_v_good 4 -set nb_e_good 6 -set nb_w_good 6 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 22 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_31 b/tests/bugs/modalg/bug21261_31 deleted file mode 100755 index ad7fff8a8c..0000000000 --- a/tests/bugs/modalg/bug21261_31 +++ /dev/null @@ -1,36 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-1988_ellipsepipesrf_1.brep] s - -thickshell result s 2 - -set square 9163.91 - -set nb_v_good 4 -set nb_e_good 8 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 22 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_32 b/tests/bugs/modalg/bug21261_32 deleted file mode 100755 index 69bd16dcb4..0000000000 --- a/tests/bugs/modalg/bug21261_32 +++ /dev/null @@ -1,36 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-1988_bscpipesrf_2.brep] s - -thickshell result s 2 - -set square 5315.89 - -set nb_v_good 4 -set nb_e_good 8 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 22 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_33 b/tests/bugs/modalg/bug21261_33 deleted file mode 100755 index 7dbc87a285..0000000000 --- a/tests/bugs/modalg/bug21261_33 +++ /dev/null @@ -1,36 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-box_trim_thickening.brep] s - -thickshell result s 5 - -set square 50357.1 - -set nb_v_good 34 -set nb_e_good 67 -set nb_w_good 35 -set nb_f_good 33 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 171 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_34 b/tests/bugs/modalg/bug21261_34 deleted file mode 100755 index 295561e54e..0000000000 --- a/tests/bugs/modalg/bug21261_34 +++ /dev/null @@ -1,36 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-box_trim_thickening.brep] s - -thickshell result s 5 i - -set square 50743.4 - -set nb_v_good 26 -set nb_e_good 47 -set nb_w_good 23 -set nb_f_good 21 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 119 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_35 b/tests/bugs/modalg/bug21261_35 deleted file mode 100755 index cef4765c35..0000000000 --- a/tests/bugs/modalg/bug21261_35 +++ /dev/null @@ -1,36 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-box_trim_thickening.brep] s - -thickshell result s -5 i - -set square 47143.4 - -set nb_v_good 26 -set nb_e_good 47 -set nb_w_good 23 -set nb_f_good 21 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 119 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_36 b/tests/bugs/modalg/bug21261_36 deleted file mode 100755 index 34d2c2af5d..0000000000 --- a/tests/bugs/modalg/bug21261_36 +++ /dev/null @@ -1,36 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-comb.brep] s - -thickshell result s 5 - -set square 24835.8 - -set nb_v_good 16 -set nb_e_good 26 -set nb_w_good 14 -set nb_f_good 12 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 70 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_37 b/tests/bugs/modalg/bug21261_37 deleted file mode 100755 index 20b489d52b..0000000000 --- a/tests/bugs/modalg/bug21261_37 +++ /dev/null @@ -1,36 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-comb.brep] s - -thickshell result s 5 i - -set square 24835.8 - -set nb_v_good 16 -set nb_e_good 26 -set nb_w_good 14 -set nb_f_good 12 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 70 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_38 b/tests/bugs/modalg/bug21261_38 deleted file mode 100755 index c2ea41575d..0000000000 --- a/tests/bugs/modalg/bug21261_38 +++ /dev/null @@ -1,36 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-comb.brep] s - -thickshell result s -5 i - -set square 25735.8 - -set nb_v_good 16 -set nb_e_good 26 -set nb_w_good 14 -set nb_f_good 12 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 70 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_39 b/tests/bugs/modalg/bug21261_39 deleted file mode 100755 index bbbd4406be..0000000000 --- a/tests/bugs/modalg/bug21261_39 +++ /dev/null @@ -1,36 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-uneven_thickening.brep] s - -thickshell result s 2 - -set square 4435.62 - -set nb_v_good 30 -set nb_e_good 51 -set nb_w_good 21 -set nb_f_good 21 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 125 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_4 b/tests/bugs/modalg/bug21261_4 deleted file mode 100755 index 4c7572cae4..0000000000 --- a/tests/bugs/modalg/bug21261_4 +++ /dev/null @@ -1,54 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-2.brep] s - -thickshell result s -5 - -set square 66487 - -set nb_v_good 12 -set nb_e_good 24 -set nb_w_good 12 -set nb_f_good 12 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 62 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - -set scale 5.4752524438940986 -set center_X 0.12443750381514462 -set center_Y 30.91257192276079 -set proj_X 0.75705158710479736 -set proj_Y -0.55456298589706421 -set proj_Z 0.34544554352760315 -set up_X -0.26271694898605347 -set up_Y 0.22571359574794769 -set up_Z 0.93810069561004639 -set at_X -8.4405813217163086 -set at_Y 5.1293683052062988 -set at_Z 1.3484655618667603 - -vviewparams ${scale} ${center_X} ${center_Y} \ - ${proj_X} ${proj_Y} ${proj_Z} \ - ${up_X} ${up_Y} ${up_Z} \ - ${at_X} ${at_Y} ${at_Z} - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_40 b/tests/bugs/modalg/bug21261_40 deleted file mode 100755 index f498f5e6cb..0000000000 --- a/tests/bugs/modalg/bug21261_40 +++ /dev/null @@ -1,54 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-3.brep] s - -thickshell result s -5 i - -set square 115498 - -set nb_v_good 24 -set nb_e_good 48 -set nb_w_good 24 -set nb_f_good 24 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 122 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - -set scale 4.1681300306816444 -set center_X 0.13164276086378379 -set center_Y 6.6154949824974238 -set proj_X 0.48621529340744019 -set proj_Y -0.47558537125587463 -set proj_Z 0.73308473825454712 -set up_X -0.51949578523635864 -set up_Y 0.51725912094116211 -set up_Z 0.68012285232543945 -set at_X 1.1775522232055664 -set at_Y -1.214188814163208 -set at_Z 0.14915035665035248 - -vviewparams ${scale} ${center_X} ${center_Y} \ - ${proj_X} ${proj_Y} ${proj_Z} \ - ${up_X} ${up_Y} ${up_Z} \ - ${at_X} ${at_Y} ${at_Z} - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_41 b/tests/bugs/modalg/bug21261_41 deleted file mode 100755 index db566bfe09..0000000000 --- a/tests/bugs/modalg/bug21261_41 +++ /dev/null @@ -1,54 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-3.brep] s - -thickshell result s 5 i - -set square 110064 - -set nb_v_good 24 -set nb_e_good 48 -set nb_w_good 24 -set nb_f_good 24 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 122 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - -set scale 4.1681300306816444 -set center_X 0.13164276086378379 -set center_Y 6.6154949824974238 -set proj_X 0.48621529340744019 -set proj_Y -0.47558537125587463 -set proj_Z 0.73308473825454712 -set up_X -0.51949578523635864 -set up_Y 0.51725912094116211 -set up_Z 0.68012285232543945 -set at_X 1.1775522232055664 -set at_Y -1.214188814163208 -set at_Z 0.14915035665035248 - -vviewparams ${scale} ${center_X} ${center_Y} \ - ${proj_X} ${proj_Y} ${proj_Z} \ - ${up_X} ${up_Y} ${up_Z} \ - ${at_X} ${at_Y} ${at_Z} - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_42 b/tests/bugs/modalg/bug21261_42 deleted file mode 100755 index 203677a660..0000000000 --- a/tests/bugs/modalg/bug21261_42 +++ /dev/null @@ -1,54 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-4.brep] s - -thickshell result s -5 i - -set square 44935.7 - -set nb_v_good 16 -set nb_e_good 28 -set nb_w_good 14 -set nb_f_good 14 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 74 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - -set scale 5.7979972910353759 -set center_X 134.00320461480183 -set center_Y 57.36536300752401 -set proj_X 0.40099617838859558 -set proj_Y -0.39083370566368103 -set proj_Z 0.82852339744567871 -set up_X -0.58777821063995361 -set up_Y 0.58394128084182739 -set up_Z 0.55993682146072388 -set at_X 14.468252182006836 -set at_Y -14.975484848022461 -set at_Z -8.813446044921875 - -vviewparams ${scale} ${center_X} ${center_Y} \ - ${proj_X} ${proj_Y} ${proj_Z} \ - ${up_X} ${up_Y} ${up_Z} \ - ${at_X} ${at_Y} ${at_Z} - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_43 b/tests/bugs/modalg/bug21261_43 deleted file mode 100755 index deae111267..0000000000 --- a/tests/bugs/modalg/bug21261_43 +++ /dev/null @@ -1,54 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-4.brep] s - -thickshell result s 5 i - -set square 43286.4 - -set nb_v_good 16 -set nb_e_good 28 -set nb_w_good 14 -set nb_f_good 14 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 74 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - -set scale 5.7979972910353759 -set center_X 134.00320461480183 -set center_Y 57.36536300752401 -set proj_X 0.40099617838859558 -set proj_Y -0.39083370566368103 -set proj_Z 0.82852339744567871 -set up_X -0.58777821063995361 -set up_Y 0.58394128084182739 -set up_Z 0.55993682146072388 -set at_X 14.468252182006836 -set at_Y -14.975484848022461 -set at_Z -8.813446044921875 - -vviewparams ${scale} ${center_X} ${center_Y} \ - ${proj_X} ${proj_Y} ${proj_Z} \ - ${up_X} ${up_Y} ${up_Z} \ - ${at_X} ${at_Y} ${at_Z} - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_44 b/tests/bugs/modalg/bug21261_44 deleted file mode 100755 index 0001237a34..0000000000 --- a/tests/bugs/modalg/bug21261_44 +++ /dev/null @@ -1,54 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-cone1.brep] s - -thickshell result s 5 - -set square 14506.6 - -set nb_v_good 4 -set nb_e_good 8 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 22 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - -set scale 17.084273613995954 -set center_X 210.44987026890158 -set center_Y -5.2570485620847549 -set proj_X 0.98952245712280273 -set proj_Y -0.12535266578197479 -set proj_Z 0.071637466549873352 -set up_X -0.016377445310354233 -set up_Y 0.39552098512649536 -set up_Z 0.91831082105636597 -set at_X 121.38485717773438 -set at_Y -46.730243682861328 -set at_Z 83.376449584960938 - -vviewparams ${scale} ${center_X} ${center_Y} \ - ${proj_X} ${proj_Y} ${proj_Z} \ - ${up_X} ${up_Y} ${up_Z} \ - ${at_X} ${at_Y} ${at_Z} - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_45 b/tests/bugs/modalg/bug21261_45 deleted file mode 100755 index 2ab6f512c7..0000000000 --- a/tests/bugs/modalg/bug21261_45 +++ /dev/null @@ -1,36 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-revarc.brep] s - -thickshell result s 5 - -set square 48246.4 - -set nb_v_good 4 -set nb_e_good 8 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 22 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_46 b/tests/bugs/modalg/bug21261_46 deleted file mode 100755 index a08115cd6c..0000000000 --- a/tests/bugs/modalg/bug21261_46 +++ /dev/null @@ -1,36 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-revbzc.brep] s - -thickshell result s 5 - -set square 83884.6 - -set nb_v_good 4 -set nb_e_good 8 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 22 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_5 b/tests/bugs/modalg/bug21261_5 deleted file mode 100755 index 155ea36345..0000000000 --- a/tests/bugs/modalg/bug21261_5 +++ /dev/null @@ -1,54 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-3.brep] s - -thickshell result s 5 - -set square 110064 - -set nb_v_good 24 -set nb_e_good 48 -set nb_w_good 24 -set nb_f_good 24 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 122 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - -set scale 4.1681300306816444 -set center_X 0.13164276086378379 -set center_Y 6.6154949824974238 -set proj_X 0.48621529340744019 -set proj_Y -0.47558537125587463 -set proj_Z 0.73308473825454712 -set up_X -0.51949578523635864 -set up_Y 0.51725912094116211 -set up_Z 0.68012285232543945 -set at_X 1.1775522232055664 -set at_Y -1.214188814163208 -set at_Z 0.14915035665035248 - -vviewparams ${scale} ${center_X} ${center_Y} \ - ${proj_X} ${proj_Y} ${proj_Z} \ - ${up_X} ${up_Y} ${up_Z} \ - ${at_X} ${at_Y} ${at_Z} - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_6 b/tests/bugs/modalg/bug21261_6 deleted file mode 100755 index 8c7e84d427..0000000000 --- a/tests/bugs/modalg/bug21261_6 +++ /dev/null @@ -1,54 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-3.brep] s - -thickshell result s -5 - -set square 115498 - -set nb_v_good 24 -set nb_e_good 48 -set nb_w_good 24 -set nb_f_good 24 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 122 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - -set scale 4.1681300306816444 -set center_X 0.13164276086378379 -set center_Y 6.6154949824974238 -set proj_X 0.48621529340744019 -set proj_Y -0.47558537125587463 -set proj_Z 0.73308473825454712 -set up_X -0.51949578523635864 -set up_Y 0.51725912094116211 -set up_Z 0.68012285232543945 -set at_X 1.1775522232055664 -set at_Y -1.214188814163208 -set at_Z 0.14915035665035248 - -vviewparams ${scale} ${center_X} ${center_Y} \ - ${proj_X} ${proj_Y} ${proj_Z} \ - ${up_X} ${up_Y} ${up_Z} \ - ${at_X} ${at_Y} ${at_Z} - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_7 b/tests/bugs/modalg/bug21261_7 deleted file mode 100755 index 37539d4970..0000000000 --- a/tests/bugs/modalg/bug21261_7 +++ /dev/null @@ -1,54 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-4.brep] s - -thickshell result s 5 - -set square 43286.4 - -set nb_v_good 16 -set nb_e_good 28 -set nb_w_good 14 -set nb_f_good 14 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 74 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - -set scale 5.7979972910353759 -set center_X 134.00320461480183 -set center_Y 57.36536300752401 -set proj_X 0.40099617838859558 -set proj_Y -0.39083370566368103 -set proj_Z 0.82852339744567871 -set up_X -0.58777821063995361 -set up_Y 0.58394128084182739 -set up_Z 0.55993682146072388 -set at_X 14.468252182006836 -set at_Y -14.975484848022461 -set at_Z -8.813446044921875 - -vviewparams ${scale} ${center_X} ${center_Y} \ - ${proj_X} ${proj_Y} ${proj_Z} \ - ${up_X} ${up_Y} ${up_Z} \ - ${at_X} ${at_Y} ${at_Z} - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_8 b/tests/bugs/modalg/bug21261_8 deleted file mode 100755 index 94ccb61220..0000000000 --- a/tests/bugs/modalg/bug21261_8 +++ /dev/null @@ -1,54 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-4.brep] s - -thickshell result s -5 - -set square 44935.7 - -set nb_v_good 16 -set nb_e_good 28 -set nb_w_good 14 -set nb_f_good 14 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 74 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - -set scale 5.7979972910353759 -set center_X 134.00320461480183 -set center_Y 57.36536300752401 -set proj_X 0.40099617838859558 -set proj_Y -0.39083370566368103 -set proj_Z 0.82852339744567871 -set up_X -0.58777821063995361 -set up_Y 0.58394128084182739 -set up_Z 0.55993682146072388 -set at_X 14.468252182006836 -set at_Y -14.975484848022461 -set at_Z -8.813446044921875 - -vviewparams ${scale} ${center_X} ${center_Y} \ - ${proj_X} ${proj_Y} ${proj_Z} \ - ${up_X} ${up_Y} ${up_Z} \ - ${at_X} ${at_Y} ${at_Z} - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21261_9 b/tests/bugs/modalg/bug21261_9 deleted file mode 100755 index f9d6d84309..0000000000 --- a/tests/bugs/modalg/bug21261_9 +++ /dev/null @@ -1,54 +0,0 @@ -puts "========" -puts "OCC21261" -puts "Customer : TATA" -puts "========" -puts "" -###################################################### -# Implementation of thickening of shell functionality -###################################################### - -set BugNumber OCC21261 - -restore [locate_data_file OCC21261-5.brep] s - -thickshell result s 5 - -set square 36363.8 - -set nb_v_good 4 -set nb_e_good 10 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 24 - - - -vinit -vdisplay result -vsetdispmode 0 -vfit - -set scale 6.3723487126883533 -set center_X -4.2632564145606011e-14 -set center_Y -22.430308400362279 -set proj_X 0.57735025882720947 -set proj_Y -0.57735025882720947 -set proj_Z 0.57735025882720947 -set up_X -0.40824827551841736 -set up_Y 0.40824827551841736 -set up_Z 0.81649655103683472 -set at_X 0 -set at_Y 0 -set at_Z 0 - -vviewparams ${scale} ${center_X} ${center_Y} \ - ${proj_X} ${proj_Y} ${proj_Z} \ - ${up_X} ${up_Y} ${up_Z} \ - ${at_X} ${at_Y} ${at_Z} - - -set only_screen 0 diff --git a/tests/bugs/modalg/bug212_1 b/tests/bugs/modalg/bug212_1 deleted file mode 100755 index 2bca2110f9..0000000000 --- a/tests/bugs/modalg/bug212_1 +++ /dev/null @@ -1,17 +0,0 @@ -puts "========" -puts "OCC212" -puts "========" -################################################ -## Bug in Topological "Common" boolean operation -################################################ - -restore [locate_data_file OCC212-1.brep] S1 -checkshape S1 -restore [locate_data_file OCC212-2.brep] S2 -checkshape S2 - -bcommon result S1 S2 - -set square 314.301 -set 3dviewer 0 - diff --git a/tests/bugs/modalg/bug212_2 b/tests/bugs/modalg/bug212_2 deleted file mode 100755 index f7ae228d2a..0000000000 --- a/tests/bugs/modalg/bug212_2 +++ /dev/null @@ -1,17 +0,0 @@ -puts "========" -puts "OCC212" -puts "========" -################################################ -## Bug in Topological "Common" boolean operation -################################################ - -restore [locate_data_file OCC212-1.brep] S1 -checkshape S1 -restore [locate_data_file OCC212-2.brep] S2 -checkshape S2 - -bcommon result S2 S1 - -set square 314.301 -set 3dviewer 0 - diff --git a/tests/bugs/modalg/bug212_3 b/tests/bugs/modalg/bug212_3 deleted file mode 100755 index a33f93429f..0000000000 --- a/tests/bugs/modalg/bug212_3 +++ /dev/null @@ -1,18 +0,0 @@ -puts "========" -puts "OCC212" -puts "========" -################################################ -## Bug in Topological "Common" boolean operation -################################################ - -restore [locate_data_file OCC212-1.brep] S1 -checkshape S1 -restore [locate_data_file OCC212-2.brep] S2 -checkshape S2 - -bop S1 S2 -bopcommon result - -set square 314.301 -set 2dviewer 1 - diff --git a/tests/bugs/modalg/bug213 b/tests/bugs/modalg/bug213 deleted file mode 100755 index 7314139b6e..0000000000 --- a/tests/bugs/modalg/bug213 +++ /dev/null @@ -1,20 +0,0 @@ -puts "========" -puts "OCC213" -puts "========" -################################################ -## Bug in Topological "fuse" boolean operation -################################################ - -cpulimit 3500 - -restore [locate_data_file OCC213-1.brep] S1 -checkshape S1 -restore [locate_data_file OCC213-2.brep] S2 -checkshape S2 - -bop S1 S2 -bopfuse result - -set square 4835.45 -set 2dviewer 1 - diff --git a/tests/bugs/modalg/bug213_1 b/tests/bugs/modalg/bug213_1 deleted file mode 100755 index e03a1302a8..0000000000 --- a/tests/bugs/modalg/bug213_1 +++ /dev/null @@ -1,16 +0,0 @@ -puts "========" -puts "OCC213" -puts "========" -################################################ -## Bug in Topological "fuse" boolean operation -################################################ - -restore [locate_data_file OCC213-1.brep] S1 -checkshape S1 -restore [locate_data_file OCC213-2.brep] S2 -checkshape S2 - -bfuse result S1 S2 -set square 4835.45 -set 3dviewer 0 - diff --git a/tests/bugs/modalg/bug213_2 b/tests/bugs/modalg/bug213_2 deleted file mode 100755 index 91e347b23a..0000000000 --- a/tests/bugs/modalg/bug213_2 +++ /dev/null @@ -1,15 +0,0 @@ -puts "========" -puts "OCC213" -puts "========" -################################################ -## Bug in Topological "fuse" boolean operation -################################################ - -restore [locate_data_file OCC213-1.brep] S1 -checkshape S1 -restore [locate_data_file OCC213-2.brep] S2 -checkshape S2 - -bfuse result S2 S1 -set square 4835.45 -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug21415 b/tests/bugs/modalg/bug21415 deleted file mode 100755 index 7b57ac973a..0000000000 --- a/tests/bugs/modalg/bug21415 +++ /dev/null @@ -1,60 +0,0 @@ -puts "TODO OCC11111 ALL: Error : The square of result shape is" -pload QAcommands - -puts "============" -puts "OCC21415" -puts "============" -puts "" -####################################################################### -# Bad triangulation of cylindrical face with large vertex tolerances -####################################################################### - -set BugNumber OCC21415 - -# Data - -set scale 19.469810863701095 -set center_X 436.67687011410339 -set center_Y 148.0981469658436 -set proj_X 0.99999862909317017 -set proj_Y 0.0012245246907696128 -set proj_Z -0.0011169711360707879 -set up_X 0.00037844621692784131 -set up_Y 0.48741284012794495 -set up_Z 0.87317168712615967 -set at_X 291.61880493164062 -set at_Y -453.53787231445312 -set at_Z 82.229469299316406 - -# Start - -restore [locate_data_file OCC21415-face_bad_meshed.brep] result -vinit -vdisplay result -vfit - -vsetdispmode 1 -vfit - - -vviewparams ${scale} ${center_X} ${center_Y} \ - ${proj_X} ${proj_Y} ${proj_Z} \ - ${up_X} ${up_Y} ${up_Z} \ - ${at_X} ${at_Y} ${at_Z} - -puts "TEMPORARY!!!!!!!!!!!!!!!!!" -set square 400000 -puts "TEMPORARY!!!!!!!!!!!!!!!!!" - -# Analysis of "nbshapes res" -set nb_v_good 1 -set nb_e_good 2 -set nb_w_good 1 -set nb_f_good 1 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 5 - -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug21448 b/tests/bugs/modalg/bug21448 deleted file mode 100755 index 2fb2f90336..0000000000 --- a/tests/bugs/modalg/bug21448 +++ /dev/null @@ -1,50 +0,0 @@ -puts "============" -puts "OCC21448" -puts "============" -puts "" -####################################################################### -# Invalid result of BRepOffsetAPI_MakePipeShell -####################################################################### - -set BugNumber OCC21448 - -puts "Load first shape ..." -restore [locate_data_file bug21448_base_1.brep] base1 - -puts "Load second shape ..." -restore [locate_data_file bug21448_Invert_2.brep] Invert_2 - -puts "Load third shape ..." -restore [locate_data_file bug21448_chemin.brep] chemin - -puts "Prepare shapes ..." -wire w1 chemin -explode base1 W -explode Invert_2 W -explode chemin V - -puts "Start Make pipe ..." -mksweep w1 -addsweep base1_1 chemin_1 -R -addsweep Invert_2_1 chemin_2 -R -buildsweep result -puts "Finish Make pipe ..." - -set square 1040.94 - -set nb_v_good 4 -set nb_e_good 6 -set nb_w_good 2 -set nb_f_good 2 -set nb_sh_good 1 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 15 - -vinit -vsetdispmode 0 -vdisplay result -vfit - -set only_screen 0 diff --git a/tests/bugs/modalg/bug21460 b/tests/bugs/modalg/bug21460 deleted file mode 100755 index aeb40c38c2..0000000000 --- a/tests/bugs/modalg/bug21460 +++ /dev/null @@ -1,38 +0,0 @@ -puts "============" -puts "OCC21460" -puts "============" -puts "" -####################################################################### -# SIGFPE in BOP on two attached edges -####################################################################### - -set BugNumber OCC21460 - -puts "Load first shape ..." -restore [locate_data_file bug21460_aE1.brep] e1 - -puts "Load second shape ..." -restore [locate_data_file bug21460_aE2.brep] e2 - -puts "Prepare boolean operation ..." -bop e1 e2 - -puts "Start boolean operation ..." -bopfuse result -puts "Finish boolean operation ..." - -set mistake 0 - -set length 448.285 - -set nb_v_good 5 -set nb_e_good 4 -set nb_w_good 1 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 11 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug21540 b/tests/bugs/modalg/bug21540 deleted file mode 100755 index 489c942251..0000000000 --- a/tests/bugs/modalg/bug21540 +++ /dev/null @@ -1,37 +0,0 @@ -puts "============" -puts "OCC21540" -puts "============" -puts "" -####################################################################### -# Boolean operation section produces wrong result (OCC 6.3.1) -####################################################################### - -set BugNumber OCC21540 - -puts "Load first shape ..." -restore [locate_data_file OCC21540-HalfSpace.brep] b1 - -puts "Load second shape ..." -restore [locate_data_file OCC21540-Shape.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopsection result -puts "Finish boolean operation ..." - -set length 462.35 - -set nb_v_good 58 -set nb_e_good 58 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 117 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug21652_1 b/tests/bugs/modalg/bug21652_1 deleted file mode 100755 index 2f29925f9c..0000000000 --- a/tests/bugs/modalg/bug21652_1 +++ /dev/null @@ -1,36 +0,0 @@ -puts "TODO OCC11111 ALL: Error : Result shape is WRONG" - -puts "============" -puts "OCC21652" -puts "Customer : TATA" -puts "============" -puts "" -####################################################################### -# TATA-08-005 Problem with offset on the wire -####################################################################### - -set BugNumber OCC21652 - -puts "Load shape ..." -restore [locate_data_file OCC21652.brep] a - -if [catch { mkoffset resoffset a 1 1.0 } ] { - puts "Faulty ${BugNumber} : mkoffset is wrong" -} else { - renamevar resoffset_1 result - -set length 372.531 - -set nb_v_good 93 -set nb_e_good 93 -set nb_w_good 1 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 187 -} - -set 2dviewer 1 - diff --git a/tests/bugs/modalg/bug21652_2 b/tests/bugs/modalg/bug21652_2 deleted file mode 100755 index b098efd314..0000000000 --- a/tests/bugs/modalg/bug21652_2 +++ /dev/null @@ -1,34 +0,0 @@ -puts "TODO OCC11111 ALL: Error : Result shape is WRONG" - -puts "============" -puts "OCC21652" -puts "Customer : TATA" -puts "============" -puts "" -####################################################################### -# TATA-08-005 Problem with offset on the wire -####################################################################### - -set BugNumber OCC21652 - -puts "Load shape ..." -restore [locate_data_file OCC21652.brep] a - -if [catch { mkoffset resoffset a 1 0.9 } ] { - puts "Faulty ${BugNumber} : mkoffset is wrong" -} else { - renamevar resoffset_1 result - -set length 371.913 - -set nb_v_good 93 -set nb_e_good 93 -set nb_w_good 1 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 187 -} -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug21722 b/tests/bugs/modalg/bug21722 deleted file mode 100755 index 3cc537f316..0000000000 --- a/tests/bugs/modalg/bug21722 +++ /dev/null @@ -1,41 +0,0 @@ -puts "============" -puts "OCC21722" -puts "============" -puts "" -####################################################################### -# The operation Section produces non-complete result. -####################################################################### - -set BugNumber OCC21722 - -puts "Load shape ..." -restore [locate_data_file OCC21722.brep] g - -puts "Prepare first shape ..." -explode g -copy g_1 b1 - -puts "Prepare second shape ..." -copy g_2 b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopsection result -puts "Finish boolean operation ..." - -set length 1.91376 - -set nb_v_good 4 -set nb_e_good 2 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 7 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug2172_1 b/tests/bugs/modalg/bug2172_1 deleted file mode 100644 index 2ce9f618ca..0000000000 --- a/tests/bugs/modalg/bug2172_1 +++ /dev/null @@ -1,22 +0,0 @@ -puts "============" -puts "OCC2172" -puts "============" -puts "" -###################################################### -# Fuse operation produces invalid shape -###################################################### -## (new topology) -## (bfuse) -###################################################### - -restore [locate_data_file OCC2172-torus.brep] torus -restore [locate_data_file OCC2172-cylinder.brep] cylinder - -checkshape torus -checkshape cylinder - -bfuse result torus cylinder - -set square 28603.8 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug2172_2 b/tests/bugs/modalg/bug2172_2 deleted file mode 100644 index cdda117dc4..0000000000 --- a/tests/bugs/modalg/bug2172_2 +++ /dev/null @@ -1,22 +0,0 @@ -puts "============" -puts "OCC2172" -puts "============" -puts "" -###################################################### -# Fuse operation produces invalid shape -###################################################### -## (new topology) -## (bfuse) -###################################################### - -restore [locate_data_file OCC2172-torus.brep] torus -restore [locate_data_file OCC2172-cylinder.brep] cylinder - -checkshape torus -checkshape cylinder - -bfuse result cylinder torus - -set square 28603.8 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug2172_3 b/tests/bugs/modalg/bug2172_3 deleted file mode 100644 index e950a60dcd..0000000000 --- a/tests/bugs/modalg/bug2172_3 +++ /dev/null @@ -1,24 +0,0 @@ -puts "============" -puts "OCC2172" -puts "============" -puts "" -###################################################### -# Fuse operation produces invalid shape -###################################################### -## (old topology) -## (fuse) -###################################################### - -restore [locate_data_file OCC2172-torus.brep] torus -restore [locate_data_file OCC2172-cylinder.brep] cylinder - -checkshape torus -checkshape cylinder - -if { [catch {bfuse result torus cylinder} catch_result] } { - puts "Faulty OCC2172" -} - -set square 28603.8 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug2172_4 b/tests/bugs/modalg/bug2172_4 deleted file mode 100644 index d28938b40d..0000000000 --- a/tests/bugs/modalg/bug2172_4 +++ /dev/null @@ -1,24 +0,0 @@ -puts "============" -puts "OCC2172" -puts "============" -puts "" -###################################################### -# Fuse operation produces invalid shape -###################################################### -## (old topology) -## (fuse) -###################################################### - -restore [locate_data_file OCC2172-torus.brep] torus -restore [locate_data_file OCC2172-cylinder.brep] cylinder - -checkshape torus -checkshape cylinder - -if { [catch {bfuse result cylinder torus} catch_result] } { - puts "Faulty OCC2172" -} - -set square 28603.8 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug21754 b/tests/bugs/modalg/bug21754 deleted file mode 100755 index 560dc0ec38..0000000000 --- a/tests/bugs/modalg/bug21754 +++ /dev/null @@ -1,36 +0,0 @@ -puts "================" -puts "OCC21754" -puts "================" -puts "" -################################################################# -# Section of face by plane yields empty result -################################################################# - -set BugNumber OCC21754 - -# load shape and make face with natural bounds, to excluse possibility of -# lame excuse saying that it contains small edges -restore [locate_data_file OCC21754-bug_bsection_empty.brep] a -mksurface s a -mkface f s - -# create plane at Z=-0.410 (the bug is reproduced for Z in range [-0.405;-0.420]) -plane pl 0 0 -0.410 0 0 1 -mkface p pl 0 10 -5 5 - -bsection result f p -2d - -set nb_v_good 2 -set nb_e_good 1 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 4 - -set length 0.592137 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug21909 b/tests/bugs/modalg/bug21909 deleted file mode 100755 index 58552629b2..0000000000 --- a/tests/bugs/modalg/bug21909 +++ /dev/null @@ -1,74 +0,0 @@ -pload QAcommands - -puts "============" -puts "OCC21909" -puts "============" -puts "" -####################################################################### -# The surface is visualized with rendering errors -####################################################################### - -set BugNumber OCC21909 - -# Data - -set scale 57.547428234801195 -set center_X -29.161882474505589 -set center_Y -27.085456554411167 -set proj_X -0.25567048788070679 -set proj_Y -0.92769843339920044 -set proj_Z 0.27204453945159912 -set up_X 0.43156850337982178 -set up_Y 0.14228194952011108 -set up_Z 0.89078855514526367 -set at_X 53.189125061035156 -set at_Y -25.674787521362305 -set at_Z -2.9377093315124512 - -set x1 190 - -set y1 216 -set y2 228 - -# -restore [locate_data_file OCC21909-render_error.brep] result - -vinit -vdisplay result -vfit - -vsetdispmode 1 -vfit - -vviewparams ${scale} ${center_X} ${center_Y} \ - ${proj_X} ${proj_Y} ${proj_Z} \ - ${up_X} ${up_Y} ${up_Z} \ - ${at_X} ${at_Y} ${at_Z} - -vmoveto ${x1} ${y1} -vmoveto ${x1} ${y1} - -set status 0 -for {set i ${y1} } {$i <= ${y2} } {incr i} { - set Color1 [QAGetPixelColor ${x1} ${i}] - - set R1 [lindex ${Color1} 2] - set G1 [lindex ${Color1} 5] - set B1 [lindex ${Color1} 8] - - puts "x = ${x1} y = ${i} R = ${R1} G = ${G1} B = ${B1}" - - if { ${R1} == 0 && ${G1} == 0 && ${B1} == 0 } { - incr status - puts "Error : rendering x = ${x1} y = ${i}" - } -} - -if { ${status} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -set 3dviewer 0 - diff --git a/tests/bugs/modalg/bug221 b/tests/bugs/modalg/bug221 deleted file mode 100755 index 173af51319..0000000000 --- a/tests/bugs/modalg/bug221 +++ /dev/null @@ -1,29 +0,0 @@ -puts "========" -puts "OCC221" -puts "========" -puts "" -###################################################################### -##After loading attached file (one simple face) checkshape give a problem (Bad Orientation of SubShape) -## but I believe that this face is correct. Also I believe that face is vitiated during performing checkshape -## (perhaps - in BRepCheck_Face::ClassifyWire()) -###################################################################### - -restore [locate_data_file OCC221.brep] result -set che [checkshape result r] -if { [regexp {OK} $che] != 1 } { - puts "Faulty OCC221 (checkshape) : Checkshape command works wrongly" -} else { - puts "OCC221 OK (checkshape) : Checkshape command works properly" -} -puts "" -set che [checkshape result] -if { [regexp {Faulty} $che] == 1} { - puts "Faulty OCC221 (checkshape) : Checkshape command works wrongly" -} else { - puts "OCC221 OK (checkshape) : Checkshape command works properly" -} - -set square 425.537 -set 2dviewer 0 - - diff --git a/tests/bugs/modalg/bug22109_1 b/tests/bugs/modalg/bug22109_1 deleted file mode 100755 index 02896eeb26..0000000000 --- a/tests/bugs/modalg/bug22109_1 +++ /dev/null @@ -1,35 +0,0 @@ -puts "============" -puts "OCC22109" -puts "============" -puts "" -####################################################################### -# Boolean operation common fails. Appendix to the SALOME bug: 0021060 -####################################################################### - -set BugNumber OCC22109 - -puts "Load first shape ..." -restore [locate_data_file bug22109_Solid_24.brep] b1 - -puts "Load second shape ..." -restore [locate_data_file bug22109_tore.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopcommon result -puts "Finish boolean operation ..." - -set nb_v_good 0 -set nb_e_good 0 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 1 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug22109_2 b/tests/bugs/modalg/bug22109_2 deleted file mode 100755 index f5b7c41ba6..0000000000 --- a/tests/bugs/modalg/bug22109_2 +++ /dev/null @@ -1,37 +0,0 @@ -puts "============" -puts "OCC22109" -puts "============" -puts "" -####################################################################### -# Boolean operation common fails. Appendix to the SALOME bug: 0021060 -####################################################################### - -set BugNumber OCC22109 - -puts "Load first shape ..." -restore [locate_data_file bug22109_Solid_24.brep] b1 - -puts "Load second shape ..." -restore [locate_data_file bug22109_tore.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopfuse result -puts "Finish boolean operation ..." - -set square 87449.7 - -set nb_v_good 17 -set nb_e_good 25 -set nb_w_good 14 -set nb_f_good 10 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 69 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug22109_3 b/tests/bugs/modalg/bug22109_3 deleted file mode 100755 index 29bb709baa..0000000000 --- a/tests/bugs/modalg/bug22109_3 +++ /dev/null @@ -1,37 +0,0 @@ -puts "============" -puts "OCC22109" -puts "============" -puts "" -####################################################################### -# Boolean operation common fails. Appendix to the SALOME bug: 0021060 -####################################################################### - -set BugNumber OCC22109 - -puts "Load first shape ..." -restore [locate_data_file bug22109_Solid_24.brep] b1 - -puts "Load second shape ..." -restore [locate_data_file bug22109_tore.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopcut result -puts "Finish boolean operation ..." - -set square 87443.6 - -set nb_v_good 16 -set nb_e_good 23 -set nb_w_good 14 -set nb_f_good 10 -set nb_sh_good 2 -set nb_sol_good 2 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 68 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug22109_4 b/tests/bugs/modalg/bug22109_4 deleted file mode 100755 index 42d9186f4e..0000000000 --- a/tests/bugs/modalg/bug22109_4 +++ /dev/null @@ -1,37 +0,0 @@ -puts "============" -puts "OCC22109" -puts "============" -puts "" -####################################################################### -# Boolean operation common fails. Appendix to the SALOME bug: 0021060 -####################################################################### - -set BugNumber OCC22109 - -puts "Load first shape ..." -restore [locate_data_file bug22109_Solid_24.brep] b1 - -puts "Load second shape ..." -restore [locate_data_file bug22109_tore.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -boptuc result -puts "Finish boolean operation ..." - -set square 1140.6 - -set nb_v_good 5 -set nb_e_good 9 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 25 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug22109_5 b/tests/bugs/modalg/bug22109_5 deleted file mode 100755 index d06800cfd5..0000000000 --- a/tests/bugs/modalg/bug22109_5 +++ /dev/null @@ -1,37 +0,0 @@ -puts "============" -puts "OCC22109" -puts "============" -puts "" -####################################################################### -# Boolean operation common fails. Appendix to the SALOME bug: 0021060 -####################################################################### - -set BugNumber OCC22109 - -puts "Load first shape ..." -restore [locate_data_file bug22109_Solid_24.brep] b1 - -puts "Load second shape ..." -restore [locate_data_file bug22109_tore.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopsection result -puts "Finish boolean operation ..." - -set length 127.699 - -set nb_v_good 4 -set nb_e_good 6 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 11 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug22196 b/tests/bugs/modalg/bug22196 deleted file mode 100755 index be2cd23851..0000000000 --- a/tests/bugs/modalg/bug22196 +++ /dev/null @@ -1,29 +0,0 @@ -puts "TODO OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" - -puts "================" -puts "OCC22196" -puts "================" -puts "" -####################################################################################### -# Problem with putting texture on the bottle.brep shape -###################################################################################### - -set BugNumber OCC22196 - -restore [locate_data_file OCC22196-scaled.brep] result - -set square 147.003 - -set nb_v_good 75 -set nb_e_good 157 -set nb_w_good 74 -set nb_f_good 71 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 380 - - -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug22306_1 b/tests/bugs/modalg/bug22306_1 deleted file mode 100755 index f693ce32c6..0000000000 --- a/tests/bugs/modalg/bug22306_1 +++ /dev/null @@ -1,36 +0,0 @@ -puts "============" -puts "OCC22306" -puts "============" -puts "" -####################################################################### -# Fuse between cylinder and sphere produces not vallid result -####################################################################### - -set BugNumber OCC22306 - -puts "Load first shape ..." -restore [locate_data_file OCC22306-cyl.brep] b1 - -puts "Load second shape ..." -restore [locate_data_file OCC22306-sph.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopfuse result -puts "Finish boolean operation ..." - -set square 655.829 - -set nb_v_good 5 -set nb_e_good 10 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 26 - -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug22306_2 b/tests/bugs/modalg/bug22306_2 deleted file mode 100755 index a30432e7cd..0000000000 --- a/tests/bugs/modalg/bug22306_2 +++ /dev/null @@ -1,37 +0,0 @@ -puts "============" -puts "OCC22306" -puts "============" -puts "" -####################################################################### -# Fuse between cylinder and sphere produces not vallid result -####################################################################### - -set BugNumber OCC22306 - -puts "Load first shape ..." -restore [locate_data_file OCC22306-cyl.brep] b1 - -puts "Load second shape ..." -restore [locate_data_file OCC22306-sph.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopcut result -puts "Finish boolean operation ..." - -set square 458.125 - -set nb_v_good 4 -set nb_e_good 7 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 22 - -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug22306_3 b/tests/bugs/modalg/bug22306_3 deleted file mode 100755 index 32a043eadf..0000000000 --- a/tests/bugs/modalg/bug22306_3 +++ /dev/null @@ -1,36 +0,0 @@ -puts "============" -puts "OCC22306" -puts "============" -puts "" -####################################################################### -# Fuse between cylinder and sphere produces not vallid result -####################################################################### - -set BugNumber OCC22306 - -puts "Load first shape ..." -restore [locate_data_file OCC22306-cyl.brep] b1 - -puts "Load second shape ..." -restore [locate_data_file OCC22306-sph.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -boptuc result -puts "Finish boolean operation ..." - -set square 327.269 - -set nb_v_good 5 -set nb_e_good 10 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 26 - -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug22306_4 b/tests/bugs/modalg/bug22306_4 deleted file mode 100755 index e9949b4092..0000000000 --- a/tests/bugs/modalg/bug22306_4 +++ /dev/null @@ -1,36 +0,0 @@ -puts "============" -puts "OCC22306" -puts "============" -puts "" -####################################################################### -# Fuse between cylinder and sphere produces not vallid result -####################################################################### - -set BugNumber OCC22306 - -puts "Load first shape ..." -restore [locate_data_file OCC22306-cyl.brep] b1 - -puts "Load second shape ..." -restore [locate_data_file OCC22306-sph.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopsection result -puts "Finish boolean operation ..." - -set length 26.4582 - -set nb_v_good 3 -set nb_e_good 3 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 7 - -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug22306_5 b/tests/bugs/modalg/bug22306_5 deleted file mode 100755 index bb5181f0c6..0000000000 --- a/tests/bugs/modalg/bug22306_5 +++ /dev/null @@ -1,36 +0,0 @@ -puts "============" -puts "OCC22306" -puts "============" -puts "" -####################################################################### -# Fuse between cylinder and sphere produces not vallid result -####################################################################### - -set BugNumber OCC22306 - -puts "Load first shape ..." -restore [locate_data_file OCC22306-cyl.brep] b1 - -puts "Load second shape ..." -restore [locate_data_file OCC22306-sph.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopcommon result -puts "Finish boolean operation ..." - -set square 129.564 - -set nb_v_good 4 -set nb_e_good 7 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 22 - -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug22310 b/tests/bugs/modalg/bug22310 deleted file mode 100755 index 4535479732..0000000000 --- a/tests/bugs/modalg/bug22310 +++ /dev/null @@ -1,37 +0,0 @@ -puts "============" -puts "OCC22310" -puts "============" -puts "" -####################################################################### -# Boolean operation common fails. Appendix to the SALOME bug: 0021128 -####################################################################### - -set BugNumber OCC22310 - -puts "Load first shape ..." -restore [locate_data_file bug22310_vol_inf_30.brep] b1 - -puts "Load second shape ..." -restore [locate_data_file bug22310_vol_sup_30.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopcommon result -puts "Finish boolean operation ..." - -set square 0.0457691 - -set nb_v_good 6 -set nb_e_good 9 -set nb_w_good 5 -set nb_f_good 5 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 28 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug22356 b/tests/bugs/modalg/bug22356 deleted file mode 100755 index 748acac8a5..0000000000 --- a/tests/bugs/modalg/bug22356 +++ /dev/null @@ -1,37 +0,0 @@ -puts "============" -puts "OCC22356" -puts "============" -puts "" -####################################################################### -# The result of fuse is not valid for two straight edges. -# Appendix to the SALOME bug: IPAL22182 -####################################################################### - -set BugNumber OCC22356 - -restore [locate_data_file bug22356_cy.brep] bq -explode bq e -copy bq_1 b1 -copy bq_2 b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopfuse result -puts "Finish boolean operation ..." - -set length 300 - -set nb_v_good 3 -set nb_e_good 2 -set nb_w_good 1 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 7 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug22361 b/tests/bugs/modalg/bug22361 deleted file mode 100755 index 257be48c33..0000000000 --- a/tests/bugs/modalg/bug22361 +++ /dev/null @@ -1,37 +0,0 @@ -puts "============" -puts "OCC22361" -puts "============" -puts "" -################################################################################################################################ -# Incorrect result of BRepOffsetAPI_MakePipeShell algorithm: it tries to build conical surface between two non-coaxial circles -################################################################################################################################ -set BugNumber 22361 - -circle c1 0 0 0 7 -circle c2 5.28270543795374 13.2067635948844 26.4135271897687 21 -polyline pp 0 0 0 5.28270543795374 13.2067635948844 26.4135271897687 -mkedge c1 c1 -wire c1 c1 -mkedge c2 c2 -wire c2 c2 -fit - -mksweep pp -addsweep c1 -addsweep c2 - -buildsweep result - -set square 2745.88 - -set nb_v_good 2 -set nb_e_good 3 -set nb_w_good 1 -set nb_f_good 1 -set nb_sh_good 1 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 8 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22409_1 b/tests/bugs/modalg/bug22409_1 deleted file mode 100755 index be3f117efd..0000000000 --- a/tests/bugs/modalg/bug22409_1 +++ /dev/null @@ -1,37 +0,0 @@ -puts "============" -puts "OCC22409" -puts "============" -puts "" -####################################################################### -# Boolean operation cut fails. Appendix to the SALOME bug: 0019957 -####################################################################### - -set BugNumber OCC22409 - -puts "Load first shape ..." -restore [locate_data_file bug22409_Defaut1.brep] b1 - -puts "Load second shape ..." -restore [locate_data_file bug22409_Solid_7.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopcommon result -puts "Finish boolean operation ..." - -set square 14969 - -set nb_v_good 6 -set nb_e_good 9 -set nb_w_good 5 -set nb_f_good 5 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 28 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug22409_2 b/tests/bugs/modalg/bug22409_2 deleted file mode 100755 index f0141b4088..0000000000 --- a/tests/bugs/modalg/bug22409_2 +++ /dev/null @@ -1,37 +0,0 @@ -puts "============" -puts "OCC22409" -puts "============" -puts "" -####################################################################### -# Boolean operation cut fails. Appendix to the SALOME bug: 0019957 -####################################################################### - -set BugNumber OCC22409 - -puts "Load first shape ..." -restore [locate_data_file bug22409_bloc.brep] b1 - -puts "Load second shape ..." -restore [locate_data_file bug22409_Defaut1_new.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopcut result -puts "Finish boolean operation ..." - -set square 366764 - -set nb_v_good 40 -set nb_e_good 60 -set nb_w_good 22 -set nb_f_good 22 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 147 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug22428 b/tests/bugs/modalg/bug22428 deleted file mode 100755 index a8bd90bbb0..0000000000 --- a/tests/bugs/modalg/bug22428 +++ /dev/null @@ -1,30 +0,0 @@ -puts "================" -puts "OCC22428" -puts "================" -puts "" -########################################################################################## -# The shape is valid on Linux but non-valid on Windows. Appendix for SALOME PARTITION_S2 -########################################################################################## - -set BugNumber OCC22428 - -restore [locate_data_file bug22428_f1.brep] result -set info [ checkshape result ] -set word1 [string compare [lindex ${info} end] "valid"] -set word2 [string compare [lindex ${info} end-1] "be"] -set word3 [string compare [lindex ${info} end-2] "to"] -set word4 [string compare [lindex ${info} end-3] "seems"] -set word5 [string compare [lindex ${info} end-4] "shape"] -set word6 [string compare [lindex ${info} end-5] "This"] - -# Resume -puts "" -if { ${word1} == 0 && ${word2} == 0 && ${word3} == 0 && ${word4} == 0 && ${word5} == 0 && ${word6} == 0} { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} - -set square 7837.39 -set 3dviewer 0 - diff --git a/tests/bugs/modalg/bug22436 b/tests/bugs/modalg/bug22436 deleted file mode 100755 index 3b4e2f3839..0000000000 --- a/tests/bugs/modalg/bug22436 +++ /dev/null @@ -1,30 +0,0 @@ -puts "============" -puts "OCC22436" -puts "============" -puts "" -####################################################################### -# Extra compound is created when importing non-manifold topology from STEP file -####################################################################### - -catch { pload XDE } - -set BugNumber OCC22436 - -param read.step.nonmanifold 1 - -stepread [locate_data_file bug22436_box.step] b1 * -renamevar b1_1 result - -set square 3.2e+11 - -set nb_v_good 12 -set nb_e_good 20 -set nb_w_good 11 -set nb_f_good 11 -set nb_sh_good 2 -set nb_sol_good 2 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 59 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug22500 b/tests/bugs/modalg/bug22500 deleted file mode 100755 index 56ddbfafea..0000000000 --- a/tests/bugs/modalg/bug22500 +++ /dev/null @@ -1,18 +0,0 @@ -puts "========================" -puts "OCC22500" -puts "========================" -puts "" -####################################################################### -# Sewing creates invalid shape -####################################################################### - -set BugNumber OCC22500 - -restore [locate_data_file OCC22500-bug602badsewing.brep] a - -if { [catch {sewing result 0.01 a} catch_result] } { - puts "Faulty ${BugNumber} : function Sewing works wrongly" -} - -set square 0.0363594 -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22557 b/tests/bugs/modalg/bug22557 deleted file mode 100755 index 4913814064..0000000000 --- a/tests/bugs/modalg/bug22557 +++ /dev/null @@ -1,37 +0,0 @@ -puts "============" -puts "OCC22557" -puts "============" -puts "" -####################################################################### -# Bad result of the Cut operation (for CAS63-sp12-*) -####################################################################### - -set BugNumber OCC22557 - -puts "Load first shape ..." -restore [locate_data_file bug22557_Bloc_racine_70deg.brep] b1 - -puts "Load second shape ..." -restore [locate_data_file bug22557_PaveEntree.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopcut result -puts "Finish boolean operation ..." - -set square 0.172993 - -set nb_v_good 192 -set nb_e_good 288 -set nb_w_good 98 -set nb_f_good 98 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 679 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug22558 b/tests/bugs/modalg/bug22558 deleted file mode 100755 index 52e673d8a7..0000000000 --- a/tests/bugs/modalg/bug22558 +++ /dev/null @@ -1,30 +0,0 @@ -pload QAcommands - -puts "============" -puts "OCC22558" -puts "============" -puts "" -####################################################################### -# Bug in gp_Dir::Mirror(const gp_Ax2 & axis) -####################################################################### - -set BugNumber OCC22558 - -set check1 -57735 -set check2 57735 -set info [ OCC22558 1 1 1 1 0 0 0 0 0 ] - -set res_z1 [lindex ${info} end] -set res_y1 [lindex ${info} end-1] -set res_x1 [lindex ${info} end-2] - -set res_z [ expr int($res_z1 * 100000) ] -set res_y [ expr int($res_y1 * 100000) ] -set res_x [ expr int($res_x1 * 100000) ] - -if { ${res_x} == ${check1} && ${res_y} == ${check2} && ${res_z} == ${check2} } { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} - diff --git a/tests/bugs/modalg/bug22586 b/tests/bugs/modalg/bug22586 deleted file mode 100755 index 041b449a8e..0000000000 --- a/tests/bugs/modalg/bug22586 +++ /dev/null @@ -1,22 +0,0 @@ -pload QAcommands - -puts "===========" -puts "OCC22586" -puts "===========" -puts "" -####################################################################### -# ShapeFix_FixSmallFace mistakenly removes a non-small pipe-like face with a seam edge -####################################################################### - -set BugNumber OCC22586 - -restore [locate_data_file OCC22586.brep] shape - -if { [catch { OCC22586 shape result } catch_result] } { - puts "Faulty ${BugNumber}" -} else { - puts "${BugNumber} OK" -} - -set 3dviewer 1 -set square 11275.7 diff --git a/tests/bugs/modalg/bug22588 b/tests/bugs/modalg/bug22588 deleted file mode 100755 index c863854414..0000000000 --- a/tests/bugs/modalg/bug22588 +++ /dev/null @@ -1,39 +0,0 @@ -puts "============" -puts "OCC22588" -puts "============" -puts "" -####################################################################### -# Revolution with negative volume in some cases -####################################################################### - -set BugNumber OCC22588 - -vertex v1 0 0 0 -vertex v12 0 0 160 -vertex v13 25 0 25 -edge e7 v1 v12 -edge e8 v12 v13 -edge e9 v13 v1 -wire w2 e7 e8 e9 -plane pln1 25 0 25 0 1 0 -25 0 -25 -mkface face2 pln1 w2 -revol result face2 0 0 0 0 0 1 45 - -set square 5694.99 - -set nb_v_good 3 -set nb_e_good 8 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 21 - -vinit -vdisplay result -vfit - -set only_screen 0 - diff --git a/tests/bugs/modalg/bug22631 b/tests/bugs/modalg/bug22631 deleted file mode 100755 index da8164fc25..0000000000 --- a/tests/bugs/modalg/bug22631 +++ /dev/null @@ -1,33 +0,0 @@ -puts "================" -puts "OCC22631" -puts "================" -puts "" -####################################################################################### -# Regression in vizualization for b-spline surface -###################################################################################### - -set BugNumber OCC22631 - -catch { pload XDE } - -testreadstep [locate_data_file OCC22145.stp] result - -set square 205444 - -set nb_v_good 3344 -set nb_e_good 4685 -set nb_w_good 1943 -set nb_f_good 1943 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 2 -set nb_shape_good 11919 - -vinit -tclean result -vsetdispmode 1 -vdisplay result -vfit - -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug22641 b/tests/bugs/modalg/bug22641 deleted file mode 100755 index 0ef73b8591..0000000000 --- a/tests/bugs/modalg/bug22641 +++ /dev/null @@ -1,36 +0,0 @@ -puts "TODO OCC11111 ALL: Error : The square of result shape is" -puts "TODO OCC11111 ALL: Error : Result shape is WRONG" - -puts "================" -puts "OCC22641" -puts "================" -puts "" -####################################################################################### -# Meshing problem on the attached model -###################################################################################### - -set BugNumber OCC22641 - -catch { pload XDE } - -testreadstep [locate_data_file OCC22641-RailBosch.stp] result - -set square 160133 - -set nb_v_good 7608 -set nb_e_good 12032 -set nb_w_good 4750 -set nb_f_good 4444 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 28836 - -vinit -tclean result -vsetdispmode 1 -vdisplay result -vfit - -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug22678 b/tests/bugs/modalg/bug22678 deleted file mode 100755 index c72b144a17..0000000000 --- a/tests/bugs/modalg/bug22678 +++ /dev/null @@ -1,37 +0,0 @@ -puts "============" -puts "OCC22678" -puts "============" -puts "" -####################################################################### -# Bad result of the Cut operation. -####################################################################### - -set BugNumber OCC22678 - -puts "Load first shape ..." -restore [locate_data_file bug22678_objCut.brep] b1 - -puts "Load second shape ..." -restore [locate_data_file bug22678_toolCut.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopcut result -puts "Finish boolean operation ..." - -set square 574348 - -set nb_v_good 17 -set nb_e_good 29 -set nb_w_good 16 -set nb_f_good 15 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 80 - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug22695 b/tests/bugs/modalg/bug22695 deleted file mode 100755 index 8cae4e3440..0000000000 --- a/tests/bugs/modalg/bug22695 +++ /dev/null @@ -1,49 +0,0 @@ -puts "============" -puts "OCC22695" -puts "============" -puts "" -####################################################################### -# The algorithm BRepFilletAPI_MakeFillet2d crashes in cases when some original edges of the face degenerate (become punctual) -####################################################################### - -set BugNumber OCC22695 - -smallview - -polyline pp 0 0 0 10 0 0 10 10 0 0 10 0 0 0 0 -mkplane ff pp -explode ff e -fit - -donly ff ff_1 ff_2 -if { [catch {chfi2d res1 ff ff_1 ff_2 F 5} catch_result] } { - puts "Faulty ${BugNumber}" -} - -#set length 37.854 - -explode res1 e -donly res1 res1_3 res1_4 -if { [catch {chfi2d res2 res1 res1_3 res1_4 F 5} catch_result] } { - puts "Faulty ${BugNumber}" -} - -#set length 35.708 - -explode res2 e -donly res2 res2_1 res2_5 -if { [catch {chfi2d res3 res2 res2_1 res2_5 F 5} catch_result] } { - puts "Faulty ${BugNumber}" -} - -#set length 33.5619 - -explode res3 e -donly res3 res3_4 res3_5 -if { [catch {chfi2d result res3 res3_4 res3_5 F 5} catch_result] } { - puts "Faulty ${BugNumber}" -} - -set length 31.4159 -set 3dviewer 0 - diff --git a/tests/bugs/modalg/bug22717 b/tests/bugs/modalg/bug22717 deleted file mode 100755 index 0a575f85cd..0000000000 --- a/tests/bugs/modalg/bug22717 +++ /dev/null @@ -1,22 +0,0 @@ -puts "===========" -puts "OCC22717" -puts "===========" -puts "" -####################################################################### -# Exception during sewing -####################################################################### - -set BugNumber OCC22717 - -catch { pload XDE } - -igesread [locate_data_file OCC22717-8_hole.igs] shape_8h * - -if [catch {sewing result 0.019 shape_8h} catch_result] { - puts "Faulty ${BugNumber} : function Sewing works wrongly" -} else { - checkshape result f -} -set square 16490.5 -set 3dviewer 0 - diff --git a/tests/bugs/modalg/bug22725 b/tests/bugs/modalg/bug22725 deleted file mode 100755 index acf8bd5c86..0000000000 --- a/tests/bugs/modalg/bug22725 +++ /dev/null @@ -1,36 +0,0 @@ -puts "============" -puts "OCC22725" -puts "============" -puts "" -####################################################################### -# BRepOffsetAPI_ThruSections algorithm produces twisted surface on some wires -####################################################################### - -set BugNumber OCC22725 - -restore [locate_data_file OCC22725-ruled_arc9.brep] a -restore [locate_data_file OCC22725-ruled_bsc9.brep] b - -wire w1 a -wire w2 b - -set issolid 0 -set isruled 1 - -if { [catch { thrusections result ${issolid} ${isruled} w1 w2 } catch_result] } { - puts "Faulty ${BugNumber} : thrusections is wrong" -} - -set square 11010.6 - -set nb_v_good 2 -set nb_e_good 3 -set nb_w_good 1 -set nb_f_good 1 -set nb_sh_good 1 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 8 - -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug22727 b/tests/bugs/modalg/bug22727 deleted file mode 100755 index 7946cd245d..0000000000 --- a/tests/bugs/modalg/bug22727 +++ /dev/null @@ -1,30 +0,0 @@ -puts "================" -puts "OCC22727" -puts "================" -puts "" -####################################################################################### -# Fillet not produces a result -###################################################################################### - -set BugNumber OCC22727 - -restore [locate_data_file OCC22727-toFillet.brep] t - -tscale t 0.0507219 -0.0399294 -0.00324254 1000 -explode t e -blend result t 2. t_3 - -set square 3471.94 - -set nb_v_good 12 -set nb_e_good 14 -set nb_w_good 3 -set nb_f_good 3 -set nb_sh_good 1 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 34 - -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug22765 b/tests/bugs/modalg/bug22765 deleted file mode 100755 index b6aa4eec2b..0000000000 --- a/tests/bugs/modalg/bug22765 +++ /dev/null @@ -1,16 +0,0 @@ -puts "========================" -puts "OCC22765" -puts "========================" -puts "" -####################################################################### -# Sewing produced invalid shape from attached compound with tolerance 0.1 -####################################################################### - -set BugNumber OCC22765 - -restore [locate_data_file OCC22765.brep] a -sewing result 0.1 a - -checkshape result f -set square 0.0141287 -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug22770_1 b/tests/bugs/modalg/bug22770_1 deleted file mode 100755 index 1ebf722b75..0000000000 --- a/tests/bugs/modalg/bug22770_1 +++ /dev/null @@ -1,40 +0,0 @@ -puts "================" -puts "OCC22770" -puts "================" -puts "" -####################################################################################### -# Improve comman sewing in DRAW -###################################################################################### - -set BugNumber OCC22770 - -catch { pload XDE } - -# Create a new document and set UndoLimit -# NewDocument D MDTV-XCAF -# UndoLimit D 100 -# Open a transaction -# NewCommand D - -vertex a 1 0 0 -vertex b 10 0 0 -edge e1 a b -vertex c 10.01 0 0 -vertex d 20 0 0 -edge e2 c d -sewing result +t 0.1 e1 e2 +e - -set length 18.99 - -set nb_v_good 3 -set nb_e_good 2 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 6 - -set 3dviewer 0 - diff --git a/tests/bugs/modalg/bug22770_10 b/tests/bugs/modalg/bug22770_10 deleted file mode 100755 index a3cf744931..0000000000 --- a/tests/bugs/modalg/bug22770_10 +++ /dev/null @@ -1,27 +0,0 @@ -puts "================" -puts "OCC22770" -puts "================" -puts "" -####################################################################################### -# Improve comman sewing in DRAW -###################################################################################### - -set BugNumber OCC22770 - -restore [locate_data_file 22770-tramp.brep] a -restore [locate_data_file 22770-trans.brep] b -sewing result +t 0.01 a b +mint 0.01 -a - -set square 1.88469e+07 - -set nb_v_good 478 -set nb_e_good 748 -set nb_w_good 273 -set nb_f_good 259 -set nb_sh_good 2 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 1761 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22770_11 b/tests/bugs/modalg/bug22770_11 deleted file mode 100755 index 66c4e02873..0000000000 --- a/tests/bugs/modalg/bug22770_11 +++ /dev/null @@ -1,27 +0,0 @@ -puts "================" -puts "OCC22770" -puts "================" -puts "" -####################################################################################### -# Improve comman sewing in DRAW -###################################################################################### - -set BugNumber OCC22770 - -restore [locate_data_file 22770-tramp.brep] a -restore [locate_data_file 22770-trans.brep] b -sewing result +t 0.01 a b +mint 0.01 +s - -set square 1.88469e+07 - -set nb_v_good 476 -set nb_e_good 748 -set nb_w_good 273 -set nb_f_good 259 -set nb_sh_good 2 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 1759 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22770_12 b/tests/bugs/modalg/bug22770_12 deleted file mode 100755 index f7469d60e6..0000000000 --- a/tests/bugs/modalg/bug22770_12 +++ /dev/null @@ -1,27 +0,0 @@ -puts "================" -puts "OCC22770" -puts "================" -puts "" -####################################################################################### -# Improve comman sewing in DRAW -###################################################################################### - -set BugNumber OCC22770 - -restore [locate_data_file 22770-tramp.brep] a -restore [locate_data_file 22770-trans.brep] b -sewing result a b -c - -set square 1.8847e+07 - -set nb_v_good 930 -set nb_e_good 1164 -set nb_w_good 273 -set nb_f_good 259 -set nb_sh_good 11 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 2638 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22770_13 b/tests/bugs/modalg/bug22770_13 deleted file mode 100755 index 23e9f35119..0000000000 --- a/tests/bugs/modalg/bug22770_13 +++ /dev/null @@ -1,39 +0,0 @@ -puts "TODO OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" - -puts "================" -puts "OCC22770" -puts "================" -puts "" -####################################################################################### -# Improve comman sewing in DRAW -###################################################################################### - -set BugNumber OCC22770 - -catch { pload XDE } - -# Create a new document and set UndoLimit - -# NewDocument D MDTV-XCAF -# UndoLimit D 100 - -# Open a transaction -# NewCommand D - -restore [locate_data_file 22770-tramp.brep] a -restore [locate_data_file 22770-trans.brep] b -sewing result a b +c - -set square 1.8847e+07 - -set nb_v_good 796 -set nb_e_good 1103 -set nb_w_good 273 -set nb_f_good 259 -set nb_sh_good 5 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 2437 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22770_14 b/tests/bugs/modalg/bug22770_14 deleted file mode 100755 index 5adb151355..0000000000 --- a/tests/bugs/modalg/bug22770_14 +++ /dev/null @@ -1,27 +0,0 @@ -puts "================" -puts "OCC22770" -puts "================" -puts "" -####################################################################################### -# Improve comman sewing in DRAW -###################################################################################### - -set BugNumber OCC22770 - -restore [locate_data_file 22770-tramp.brep] a -restore [locate_data_file 22770-trans.brep] b -sewing result a b +c -f - -set square 1.8847e+07 - -set nb_v_good 1469 -set nb_e_good 1474 -set nb_w_good 273 -set nb_f_good 259 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 3476 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22770_15 b/tests/bugs/modalg/bug22770_15 deleted file mode 100755 index 8f631d0de5..0000000000 --- a/tests/bugs/modalg/bug22770_15 +++ /dev/null @@ -1,39 +0,0 @@ -puts "TODO OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" - -puts "================" -puts "OCC22770" -puts "================" -puts "" -####################################################################################### -# Improve comman sewing in DRAW -###################################################################################### - -set BugNumber OCC22770 - -catch { pload XDE } - -# Create a new document and set UndoLimit - -# NewDocument D MDTV-XCAF -# UndoLimit D 100 - -# Open a transaction -# NewCommand D - -restore [locate_data_file 22770-tramp.brep] a -restore [locate_data_file 22770-trans.brep] b -sewing result a b -p - -set square 1.8847e+07 - -set nb_v_good 796 -set nb_e_good 1103 -set nb_w_good 273 -set nb_f_good 259 -set nb_sh_good 5 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 2437 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22770_16 b/tests/bugs/modalg/bug22770_16 deleted file mode 100755 index 5484064722..0000000000 --- a/tests/bugs/modalg/bug22770_16 +++ /dev/null @@ -1,31 +0,0 @@ -puts "================" -puts "OCC22770" -puts "================" -puts "" -####################################################################################### -# Improve comman sewing in DRAW -###################################################################################### - -set BugNumber OCC22770 - -vertex a 1 0 0 -vertex b 10 0 0 -edge e1 a b -vertex c 10.01 0 0 -vertex d 20 0 0 -edge e2 c d -sewing result 0.1 e1 e2 +e - -set length 18.99 - -set nb_v_good 3 -set nb_e_good 2 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 6 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22770_17 b/tests/bugs/modalg/bug22770_17 deleted file mode 100755 index 9d66f491c6..0000000000 --- a/tests/bugs/modalg/bug22770_17 +++ /dev/null @@ -1,31 +0,0 @@ -puts "================" -puts "OCC22770" -puts "================" -puts "" -####################################################################################### -# Improve comman sewing in DRAW -###################################################################################### - -set BugNumber OCC22770 - -vertex a 1 0 0 -vertex b 10 0 0 -edge e1 a b -vertex c 10.01 0 0 -vertex d 20 0 0 -edge e2 c d -sewing result 0.1 e1 e2 -e - -set length 18.99 - -set nb_v_good 4 -set nb_e_good 2 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 7 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22770_18 b/tests/bugs/modalg/bug22770_18 deleted file mode 100755 index d0c5ab40ff..0000000000 --- a/tests/bugs/modalg/bug22770_18 +++ /dev/null @@ -1,30 +0,0 @@ -puts "================" -puts "OCC22770" -puts "================" -puts "" -####################################################################################### -# Improve comman sewing in DRAW -###################################################################################### - -set BugNumber OCC22770 - -box a 1 2 3 -box b 2 0 0 1 2 3 -explode a f -explode b f - -sewing result 1.1 a_2 b_1 - -set square 12 - -set nb_v_good 4 -set nb_e_good 4 -set nb_w_good 2 -set nb_f_good 2 -set nb_sh_good 1 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 13 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22770_19 b/tests/bugs/modalg/bug22770_19 deleted file mode 100755 index c41c1aa6f8..0000000000 --- a/tests/bugs/modalg/bug22770_19 +++ /dev/null @@ -1,30 +0,0 @@ -puts "================" -puts "OCC22770" -puts "================" -puts "" -####################################################################################### -# Improve comman sewing in DRAW -###################################################################################### - -set BugNumber OCC22770 - -box a 1 2 3 -box b 2 0 0 1 2 3 -explode a f -explode b f - -sewing result 1.1 a_2 b_1 -f - -set square 12 - -set nb_v_good 8 -set nb_e_good 8 -set nb_w_good 2 -set nb_f_good 2 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 21 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22770_2 b/tests/bugs/modalg/bug22770_2 deleted file mode 100755 index 871021134a..0000000000 --- a/tests/bugs/modalg/bug22770_2 +++ /dev/null @@ -1,39 +0,0 @@ -puts "================" -puts "OCC22770" -puts "================" -puts "" -####################################################################################### -# Improve comman sewing in DRAW -###################################################################################### - -set BugNumber OCC22770 - -catch { pload XDE } - -# Create a new document and set UndoLimit -# NewDocument D MDTV-XCAF -# UndoLimit D 100 -# Open a transaction -# NewCommand D - -vertex a 1 0 0 -vertex b 10 0 0 -edge e1 a b -vertex c 10.01 0 0 -vertex d 20 0 0 -edge e2 c d -sewing result +t 0.1 e1 e2 -e - -set length 18.99 - -set nb_v_good 4 -set nb_e_good 2 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 7 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22770_20 b/tests/bugs/modalg/bug22770_20 deleted file mode 100755 index 1c2f60b797..0000000000 --- a/tests/bugs/modalg/bug22770_20 +++ /dev/null @@ -1,30 +0,0 @@ -puts "================" -puts "OCC22770" -puts "================" -puts "" -####################################################################################### -# Improve comman sewing in DRAW -###################################################################################### - -set BugNumber OCC22770 - -box a 1 2 3 -box b 2 0 0 1 2 3 -explode a f -explode b f - -sewing result 1.1 a_2 b_1 +f - -set square 12 - -set nb_v_good 4 -set nb_e_good 4 -set nb_w_good 2 -set nb_f_good 2 -set nb_sh_good 1 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 13 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22770_21 b/tests/bugs/modalg/bug22770_21 deleted file mode 100755 index d213aabd01..0000000000 --- a/tests/bugs/modalg/bug22770_21 +++ /dev/null @@ -1,30 +0,0 @@ -puts "================" -puts "OCC22770" -puts "================" -puts "" -####################################################################################### -# Improve comman sewing in DRAW -###################################################################################### - -set BugNumber OCC22770 - -box a 1 1 1 -box b 1 0 0 1 2 1 -explode a f -explode b f - -sewing result a_2 a_3 b_3 - -set square 3 - -set nb_v_good 10 -set nb_e_good 11 -set nb_w_good 3 -set nb_f_good 3 -set nb_sh_good 1 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 29 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22770_22 b/tests/bugs/modalg/bug22770_22 deleted file mode 100755 index 881360172f..0000000000 --- a/tests/bugs/modalg/bug22770_22 +++ /dev/null @@ -1,30 +0,0 @@ -puts "================" -puts "OCC22770" -puts "================" -puts "" -####################################################################################### -# Improve comman sewing in DRAW -###################################################################################### - -set BugNumber OCC22770 - -box a 1 1 1 -box b 1 0 0 1 2 1 -explode a f -explode b f - -sewing result a_2 a_3 b_3 +n - -set square 3 - -set nb_v_good 8 -set nb_e_good 10 -set nb_w_good 3 -set nb_f_good 3 -set nb_sh_good 1 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 25 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22770_23 b/tests/bugs/modalg/bug22770_23 deleted file mode 100755 index bc31bc4fb6..0000000000 --- a/tests/bugs/modalg/bug22770_23 +++ /dev/null @@ -1,28 +0,0 @@ -puts "================" -puts "OCC22770" -puts "================" -puts "" -####################################################################################### -# Improve comman sewing in DRAW -###################################################################################### - -set BugNumber OCC22770 - -restore [locate_data_file 22770-tramp.brep] a -restore [locate_data_file 22770-trans.brep] b - -sewing result 0.1 a b - -set square 1.8847e+07 - -set nb_v_good 480 -set nb_e_good 741 -set nb_w_good 273 -set nb_f_good 259 -set nb_sh_good 2 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 1756 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22770_24 b/tests/bugs/modalg/bug22770_24 deleted file mode 100755 index 514f25b65a..0000000000 --- a/tests/bugs/modalg/bug22770_24 +++ /dev/null @@ -1,30 +0,0 @@ -puts "TODO OCC11111 ALL: Error : Result shape is WRONG" - -puts "================" -puts "OCC22770" -puts "================" -puts "" -####################################################################################### -# Improve comman sewing in DRAW -###################################################################################### - -set BugNumber OCC22770 - -restore [locate_data_file 22770-tramp.brep] a -restore [locate_data_file 22770-trans.brep] b - -sewing result 0.1 a b +mint 0.01 - -set square 1.88469e+07 - -set nb_v_good 476 -set nb_e_good 748 -set nb_w_good 273 -set nb_f_good 259 -set nb_sh_good 2 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 1759 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22770_25 b/tests/bugs/modalg/bug22770_25 deleted file mode 100755 index b598450d54..0000000000 --- a/tests/bugs/modalg/bug22770_25 +++ /dev/null @@ -1,30 +0,0 @@ -puts "TODO OCC11111 ALL: Error : Result shape is WRONG" - -puts "================" -puts "OCC22770" -puts "================" -puts "" -####################################################################################### -# Improve comman sewing in DRAW -###################################################################################### - -set BugNumber OCC22770 - -restore [locate_data_file 22770-tramp.brep] a -restore [locate_data_file 22770-trans.brep] b - -sewing result 0.1 a b +mint 0.01 -a - -set square 1.88469e+07 - -set nb_v_good 478 -set nb_e_good 748 -set nb_w_good 273 -set nb_f_good 259 -set nb_sh_good 2 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 1761 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22770_26 b/tests/bugs/modalg/bug22770_26 deleted file mode 100755 index 458b9bbf1b..0000000000 --- a/tests/bugs/modalg/bug22770_26 +++ /dev/null @@ -1,30 +0,0 @@ -puts "TODO OCC11111 ALL: Error : Result shape is WRONG" - -puts "================" -puts "OCC22770" -puts "================" -puts "" -####################################################################################### -# Improve comman sewing in DRAW -###################################################################################### - -set BugNumber OCC22770 - -restore [locate_data_file 22770-tramp.brep] a -restore [locate_data_file 22770-trans.brep] b - -sewing result 0.1 a b +mint 0.01 +s - -set square 1.88469e+07 - -set nb_v_good 476 -set nb_e_good 748 -set nb_w_good 273 -set nb_f_good 259 -set nb_sh_good 2 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 1759 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22770_27 b/tests/bugs/modalg/bug22770_27 deleted file mode 100755 index 434392e1e7..0000000000 --- a/tests/bugs/modalg/bug22770_27 +++ /dev/null @@ -1,28 +0,0 @@ -puts "================" -puts "OCC22770" -puts "================" -puts "" -####################################################################################### -# Improve comman sewing in DRAW -###################################################################################### - -set BugNumber OCC22770 - -restore [locate_data_file 22770-tramp.brep] a -restore [locate_data_file 22770-trans.brep] b - -sewing result 0.1 a b -c - -set square 1.8847e+07 - -set nb_v_good 483 -set nb_e_good 744 -set nb_w_good 273 -set nb_f_good 259 -set nb_sh_good 2 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 1762 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22770_28 b/tests/bugs/modalg/bug22770_28 deleted file mode 100755 index 3ea3fffc4e..0000000000 --- a/tests/bugs/modalg/bug22770_28 +++ /dev/null @@ -1,28 +0,0 @@ -puts "================" -puts "OCC22770" -puts "================" -puts "" -####################################################################################### -# Improve comman sewing in DRAW -###################################################################################### - -set BugNumber OCC22770 - -restore [locate_data_file 22770-tramp.brep] a -restore [locate_data_file 22770-trans.brep] b - -sewing result 0.1 a b +c - -set square 1.8847e+07 - -set nb_v_good 480 -set nb_e_good 741 -set nb_w_good 273 -set nb_f_good 259 -set nb_sh_good 2 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 1756 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22770_29 b/tests/bugs/modalg/bug22770_29 deleted file mode 100755 index dd81aead93..0000000000 --- a/tests/bugs/modalg/bug22770_29 +++ /dev/null @@ -1,28 +0,0 @@ -puts "================" -puts "OCC22770" -puts "================" -puts "" -####################################################################################### -# Improve comman sewing in DRAW -###################################################################################### - -set BugNumber OCC22770 - -restore [locate_data_file 22770-tramp.brep] a -restore [locate_data_file 22770-trans.brep] b - -sewing result 0.1 a b +c -f - -set square 1.8847e+07 - -set nb_v_good 1469 -set nb_e_good 1474 -set nb_w_good 273 -set nb_f_good 259 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 3476 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22770_3 b/tests/bugs/modalg/bug22770_3 deleted file mode 100755 index 0426ee29ea..0000000000 --- a/tests/bugs/modalg/bug22770_3 +++ /dev/null @@ -1,37 +0,0 @@ -puts "================" -puts "OCC22770" -puts "================" -puts "" -####################################################################################### -# Improve comman sewing in DRAW -###################################################################################### - -set BugNumber OCC22770 - -catch { pload XDE } - -# Create a new document and set UndoLimit -# NewDocument D MDTV-XCAF -# UndoLimit D 100 -# Open a transaction -# NewCommand D - -box a 1 2 3 -box b 2 0 0 1 2 3 -explode a f -explode b f -sewing result +t 1.1 a_2 b_1 - -set square 12 -set nb_v_good 4 -set nb_e_good 4 -set nb_w_good 2 -set nb_f_good 2 -set nb_sh_good 1 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 13 - -set 3dviewer 0 - diff --git a/tests/bugs/modalg/bug22770_30 b/tests/bugs/modalg/bug22770_30 deleted file mode 100755 index 41710a7d22..0000000000 --- a/tests/bugs/modalg/bug22770_30 +++ /dev/null @@ -1,28 +0,0 @@ -puts "================" -puts "OCC22770" -puts "================" -puts "" -####################################################################################### -# Improve comman sewing in DRAW -###################################################################################### - -set BugNumber OCC22770 - -restore [locate_data_file 22770-tramp.brep] a -restore [locate_data_file 22770-trans.brep] b - -sewing result 0.1 a b -p - -set square 1.8847e+07 - -set nb_v_good 480 -set nb_e_good 741 -set nb_w_good 273 -set nb_f_good 259 -set nb_sh_good 2 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 1756 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22770_4 b/tests/bugs/modalg/bug22770_4 deleted file mode 100755 index 84581a5907..0000000000 --- a/tests/bugs/modalg/bug22770_4 +++ /dev/null @@ -1,28 +0,0 @@ -puts "================" -puts "OCC22770" -puts "================" -puts "" -####################################################################################### -# Improve comman sewing in DRAW -###################################################################################### - -set BugNumber OCC22770 - -box a 1 2 3 -box b 2 0 0 1 2 3 -explode a f -explode b f -sewing result +t 1.1 a_2 b_1 -f - -set square 12 -set nb_v_good 8 -set nb_e_good 8 -set nb_w_good 2 -set nb_f_good 2 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 21 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22770_5 b/tests/bugs/modalg/bug22770_5 deleted file mode 100755 index c779148f2c..0000000000 --- a/tests/bugs/modalg/bug22770_5 +++ /dev/null @@ -1,28 +0,0 @@ -puts "================" -puts "OCC22770" -puts "================" -puts "" -####################################################################################### -# Improve comman sewing in DRAW -###################################################################################### - -set BugNumber OCC22770 - -box a 1 2 3 -box b 2 0 0 1 2 3 -explode a f -explode b f -sewing result +t 1.1 a_2 b_1 +f - -set square 12 -set nb_v_good 4 -set nb_e_good 4 -set nb_w_good 2 -set nb_f_good 2 -set nb_sh_good 1 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 13 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22770_6 b/tests/bugs/modalg/bug22770_6 deleted file mode 100755 index 8b96320efc..0000000000 --- a/tests/bugs/modalg/bug22770_6 +++ /dev/null @@ -1,28 +0,0 @@ -puts "================" -puts "OCC22770" -puts "================" -puts "" -####################################################################################### -# Improve comman sewing in DRAW -###################################################################################### - -set BugNumber OCC22770 - -box a 1 1 1 -box b 1 0 0 1 2 1 -explode a f -explode b f -sewing result a_2 a_3 b_3 - -set square 3 -set nb_v_good 10 -set nb_e_good 11 -set nb_w_good 3 -set nb_f_good 3 -set nb_sh_good 1 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 29 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22770_7 b/tests/bugs/modalg/bug22770_7 deleted file mode 100755 index 5a207fc206..0000000000 --- a/tests/bugs/modalg/bug22770_7 +++ /dev/null @@ -1,28 +0,0 @@ -puts "================" -puts "OCC22770" -puts "================" -puts "" -####################################################################################### -# Improve comman sewing in DRAW -###################################################################################### - -set BugNumber OCC22770 - -box a 1 1 1 -box b 1 0 0 1 2 1 -explode a f -explode b f -sewing result a_2 a_3 b_3 +n - -set square 3 -set nb_v_good 8 -set nb_e_good 10 -set nb_w_good 3 -set nb_f_good 3 -set nb_sh_good 1 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 25 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22770_8 b/tests/bugs/modalg/bug22770_8 deleted file mode 100755 index af0acc45fb..0000000000 --- a/tests/bugs/modalg/bug22770_8 +++ /dev/null @@ -1,29 +0,0 @@ -puts "TODO OCC11111 ALL: Error : Result shape is WRONG" - -puts "================" -puts "OCC22770" -puts "================" -puts "" -####################################################################################### -# Improve comman sewing in DRAW -###################################################################################### - -set BugNumber OCC22770 - -restore [locate_data_file 22770-tramp.brep] a -restore [locate_data_file 22770-trans.brep] b -sewing result +t 0.01 a b - -set square 1.88469e+07 - -set nb_v_good 482 -set nb_e_good 744 -set nb_w_good 273 -set nb_f_good 259 -set nb_sh_good 2 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 1761 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22770_9 b/tests/bugs/modalg/bug22770_9 deleted file mode 100755 index 41b7b405f9..0000000000 --- a/tests/bugs/modalg/bug22770_9 +++ /dev/null @@ -1,27 +0,0 @@ -puts "================" -puts "OCC22770" -puts "================" -puts "" -####################################################################################### -# Improve comman sewing in DRAW -###################################################################################### - -set BugNumber OCC22770 - -restore [locate_data_file 22770-tramp.brep] a -restore [locate_data_file 22770-trans.brep] b -sewing result +t 0.01 a b +mint 0.01 - -set square 1.88469e+07 - -set nb_v_good 476 -set nb_e_good 748 -set nb_w_good 273 -set nb_f_good 259 -set nb_sh_good 2 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 1759 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22771 b/tests/bugs/modalg/bug22771 deleted file mode 100755 index ec60b79ad5..0000000000 --- a/tests/bugs/modalg/bug22771 +++ /dev/null @@ -1,40 +0,0 @@ -puts "============" -puts "OCC22771" -puts "============" -puts "" -####################################################################### -# An extra vertex produced in result of Boolean section for the cases of closed intersection curves. -####################################################################### - -set BugNumber OCC22771 - -puts "Load first shape ..." -restore [locate_data_file bug22771_Box_1.brep] b1 - -puts "Load second shape ..." -restore [locate_data_file bug22771_Cylinder_1.brep] b2 - -puts "Prepare boolean operation ..." -explode b1 f -copy b1_5 b1 -copy b2_1 b2 - -bop b1 b2 - -puts "Start boolean operation ..." -bopsection result -puts "Finish boolean operation ..." - -set length 314.159 - -set nb_v_good 1 -set nb_e_good 1 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 3 - -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug22781_1 b/tests/bugs/modalg/bug22781_1 deleted file mode 100755 index cf78f32584..0000000000 --- a/tests/bugs/modalg/bug22781_1 +++ /dev/null @@ -1,14 +0,0 @@ -puts "================" -puts "OCC22781" -puts "================" -puts "" -####################################################################################### -# Regression in GCPnts_TangentialDeflection -###################################################################################### - -set BugNumber OCC22781 - -restore [locate_data_file OCC22781-BeforeCont.brep] result - -set length 5.82393 -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22781_2 b/tests/bugs/modalg/bug22781_2 deleted file mode 100755 index 1d2703a655..0000000000 --- a/tests/bugs/modalg/bug22781_2 +++ /dev/null @@ -1,21 +0,0 @@ -pload QAcommands - -puts "================" -puts "OCC22781" -puts "================" -puts "" -####################################################################################### -# Regression in GCPnts_TangentialDeflection -###################################################################################### - -set BugNumber OCC22781 - -restore [locate_data_file OCC22781-BeforeCont.brep] result -vinit -vdisplay result -vfit -vsetdispmode 0 -vselect 290 135 - -set length 5.82393 -set only_screen 0 \ No newline at end of file diff --git a/tests/bugs/modalg/bug22781_3 b/tests/bugs/modalg/bug22781_3 deleted file mode 100755 index 676ea6fbf4..0000000000 --- a/tests/bugs/modalg/bug22781_3 +++ /dev/null @@ -1,15 +0,0 @@ -puts "================" -puts "OCC22781" -puts "================" -puts "" -####################################################################################### -# Regression in GCPnts_TangentialDeflection -###################################################################################### - -set BugNumber OCC22781 - -restore [locate_data_file OCC22781-BeforeCont.brep] result - -set length 5.82393 -set 3dviewer 0 - diff --git a/tests/bugs/modalg/bug22781_4 b/tests/bugs/modalg/bug22781_4 deleted file mode 100755 index 496fa0521f..0000000000 --- a/tests/bugs/modalg/bug22781_4 +++ /dev/null @@ -1,21 +0,0 @@ -pload QAcommands - -puts "================" -puts "OCC22781" -puts "================" -puts "" -####################################################################################### -# Regression in GCPnts_TangentialDeflection -###################################################################################### - -set BugNumber OCC22781 - -restore [locate_data_file OCC22781-BeforeCont.brep] result -vinit -vdisplay result -vfit -vsetdispmode 1 -vselect 290 135 - -set length 5.82393 -set only_screen 0 diff --git a/tests/bugs/modalg/bug22783 b/tests/bugs/modalg/bug22783 deleted file mode 100755 index 8910dd6ff0..0000000000 --- a/tests/bugs/modalg/bug22783 +++ /dev/null @@ -1,30 +0,0 @@ -puts "===========" -puts "OCC22783" -puts "===========" -puts "" -####################################################################### -# Improvement of BRepOffsetAPI_MakeFilling: keep old and new boundary edges with all pcurves -####################################################################### - -catch {pload XDE} - -set BugNumber OCC22783 - -restore [locate_data_file bug22783_cs.brep] a -explode a -explode a_1 e -explode a_1_6 -explode a_1_13 -edge e1 a_1_6_1 a_1_13_1 -edge e2 a_1_6_2 a_1_13_2 -smallview -donly a_1_6 a_1_13 e1 e2 -fit - -filling result 4 0 0 a_1_6 0 a_1_13 0 e1 0 e2 0 -tolerance result -checkshape result -dump result - -set square 0.00456273 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug22786 b/tests/bugs/modalg/bug22786 deleted file mode 100755 index 24fffc47f7..0000000000 --- a/tests/bugs/modalg/bug22786 +++ /dev/null @@ -1,36 +0,0 @@ -puts "============" -puts "OCC22786" -puts "============" -puts "" -####################################################################### -# 64bit issue in AdvApp2Var -####################################################################### - -set BugNumber OCC22786 - -restore [locate_data_file OCC22786-c.brep] c - -explode c - -gplate result 5 0 c_1 0 c_2 0 c_3 0 c_4 0 c_5 0 - -set square 2.92409 - -set nb_v_good 4 -set nb_e_good 4 -set nb_w_good 1 -set nb_f_good 1 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 10 - - -vinit -vdisplay c_1 c_2 c_3 c_4 c_5 -vdisplay result -vsetdispmode 1 -vfit - -set only_screen 1 diff --git a/tests/bugs/modalg/bug22790 b/tests/bugs/modalg/bug22790 deleted file mode 100755 index 15712fa378..0000000000 --- a/tests/bugs/modalg/bug22790 +++ /dev/null @@ -1,35 +0,0 @@ -puts "============" -puts "OCC22790" -puts "============" -puts "" -####################################################################### -# Boolean opeation Fuse fails. -####################################################################### - -set BugNumber OCC22790 - -puts "Load shape ..." -restore [locate_data_file OCC22790-cx.brep] b - -explode b -copy b_1 b1 -copy b_3 b2 - -bop b1 b2 - -bopfuse result - -set square 1.21408e+09 - -set nb_v_good 11 -set nb_e_good 12 -set nb_w_good 4 -set nb_f_good 2 -set nb_sh_good 1 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 31 - -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug22798_1 b/tests/bugs/modalg/bug22798_1 deleted file mode 100755 index aaee325b0b..0000000000 --- a/tests/bugs/modalg/bug22798_1 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC22798" -puts "============" -puts "" -############################################################################# -# Regression: BRepBuilderAPI_GTransform produces an invalid result on sphere -############################################################################# - -set BugNumber OCC22798 - -psphere a 100 -nurbsconvert result a - -set square 126261 - -set nb_v_good 2 -set nb_e_good 3 -set nb_w_good 1 -set nb_f_good 1 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 9 - -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug22798_2 b/tests/bugs/modalg/bug22798_2 deleted file mode 100755 index 94d907594f..0000000000 --- a/tests/bugs/modalg/bug22798_2 +++ /dev/null @@ -1,27 +0,0 @@ -puts "============" -puts "OCC22798" -puts "============" -puts "" -############################################################################# -# Regression: BRepBuilderAPI_GTransform produces an invalid result on sphere -############################################################################# - -set BugNumber OCC22798 - -psphere a 100 -scalexyz result a 2 3 4 - -set square 1.12112e+06 - -set nb_v_good 2 -set nb_e_good 3 -set nb_w_good 1 -set nb_f_good 1 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 9 - -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug22801 b/tests/bugs/modalg/bug22801 deleted file mode 100755 index 2579527a07..0000000000 --- a/tests/bugs/modalg/bug22801 +++ /dev/null @@ -1,36 +0,0 @@ -puts "============" -puts "OCC22801" -puts "============" -puts "" -####################################################################### -# Boolean operations algorithm fails on two customer's shapes -####################################################################### - -set BugNumber OCC22801 - -puts "Load first shape ..." -restore [locate_data_file OCC22801-first_shape.brep] b1 - -puts "Load second shape ..." -restore [locate_data_file OCC22801-second_shape.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopcut result -puts "Finish boolean operation ..." - -set square 287634 - -set nb_v_good 55 -set nb_e_good 97 -set nb_w_good 44 -set nb_f_good 44 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 243 - -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug22804 b/tests/bugs/modalg/bug22804 deleted file mode 100755 index c8e3e496b2..0000000000 --- a/tests/bugs/modalg/bug22804 +++ /dev/null @@ -1,58 +0,0 @@ -puts "========================" -puts "OCC22804" -puts "========================" -puts "" -####################################################################### -# Sewing increases tolerance of vertices for redundant value. -####################################################################### - -set BugNumber OCC22804 - -catch {pload XDE} - -restore [locate_data_file OCC22804-sew_bug.brep] a - -set tol 200 -sewing result ${tol} a - -set ToleranceList [tolerance result] -regexp {Tolerance MAX=([-0-9.+eE]+)} $ToleranceList full oTolerance -regexp {FACE[ \t]*: MAX=([-0-9.+eE]+)} $ToleranceList full FaceTolerance -regexp {EDGE[ \t]*: MAX=([-0-9.+eE]+)} $ToleranceList full EdgeTolerance -regexp {VERTEX[ \t]*: MAX=([-0-9.+eE]+)} $ToleranceList full VertexTolerance - -set percent_max 0.1 - -proc GetPercent {Value GoodValue} { - set Percent 0. - if {${GoodValue} != 0.} { - set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] - } elseif {${Value} != 0.} { - set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] - } else { - set Percent 0. - } - return ${Percent} -} -set IsOk 1 - -set minTolerance ${EdgeTolerance} -if { ${minTolerance} > ${VertexTolerance} } { - set minTolerance $(VertexTolerance) -} - -set minTolerance_percent [GetPercent ${minTolerance} ${oTolerance}] -puts "minTolerance_percent = ${minTolerance_percent} %" -if { ${minTolerance_percent} > ${percent_max} } { - set IsOk 0 -} - -if { ${IsOk} == 0 } { - puts "${BugNumber}: Faulty" -} else { - puts "${BugNumber}: OK" -} - -set square 1.22542e+09 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug22814 b/tests/bugs/modalg/bug22814 deleted file mode 100755 index c0cecf0a7b..0000000000 --- a/tests/bugs/modalg/bug22814 +++ /dev/null @@ -1,30 +0,0 @@ -puts "============" -puts "OCC22814" -puts "============" -puts "" -####################################################################### -# Boolean opeation Section fails -####################################################################### - -set BugNumber OCC22814 - -restore [locate_data_file bug22814_F6_Shell.brep] b1 -restore [locate_data_file bug22814_F6_box.brep] b2 - -bop b1 b2 -bopsection result - -set length 0.667008 - -set nb_v_good 4 -set nb_e_good 4 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 9 - -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug22818_1 b/tests/bugs/modalg/bug22818_1 deleted file mode 100755 index 6278cb5780..0000000000 --- a/tests/bugs/modalg/bug22818_1 +++ /dev/null @@ -1,37 +0,0 @@ -puts "================" -puts "OCC22818" -puts "================" -puts "" -####################################################################################### -# Wrong triangulation of Revolution surface with slice angle <= 180 degree -###################################################################################### - -set BugNumber OCC22818 - -vertex v1 0 10 0 -vertex v2 0 10 10 -vertex v3 0 0 -10 -edge e1 v1 v2 -edge e2 v2 v3 -edge e3 v3 v1 -wire w1 e1 e2 e3 -plane pln 0 10 0 1 0 0 -mkface f1 pln -add w1 f1 -don f1 -revol result f1 0 10 0 0 0 1 180 -checkshape result - -set square 823.385 - -set nb_v_good 3 -set nb_e_good 8 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 21 - -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug22818_2 b/tests/bugs/modalg/bug22818_2 deleted file mode 100755 index a50b75a3a3..0000000000 --- a/tests/bugs/modalg/bug22818_2 +++ /dev/null @@ -1,38 +0,0 @@ -puts "================" -puts "OCC22818" -puts "================" -puts "" -####################################################################################### -# Wrong triangulation of Revolution surface with slice angle <= 180 degree -###################################################################################### - -set BugNumber OCC22818 - -vertex v1 0 10 0 -vertex v2 0 10 10 -vertex v3 0 5 5 -vertex v4 0 0 -10 -edge e1 v1 v2 -edge e2 v2 v3 -edge e3 v3 v1 -wire w1 e1 e2 e3 -plane pln 0 5 5 1 0 0 -mkface f1 pln -add w1 f1 -don f1 -revol result f1 0 10 0 0 0 1 180 -checkshape result - -set square 186.072 - -set nb_v_good 3 -set nb_e_good 8 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 21 - -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug22823 b/tests/bugs/modalg/bug22823 deleted file mode 100755 index 218f58b224..0000000000 --- a/tests/bugs/modalg/bug22823 +++ /dev/null @@ -1,28 +0,0 @@ -puts "============" -puts "OCC22823" -puts "============" -puts "" -############################################################################################## -# Exception in thickshell operation -############################################################################################## - -catch {pload XDE} - -set BugNumber OCC22823 - -restore [locate_data_file OCC22823-occ_bug_thickshell.brep] sh - -checkshape sh -tolerance sh -set aStatus [catch {thickshell result sh 0.01} ] - -# Resume -puts "" -if { ${aStatus} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -set square 0.38266 -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22828 b/tests/bugs/modalg/bug22828 deleted file mode 100755 index d1a27b5a47..0000000000 --- a/tests/bugs/modalg/bug22828 +++ /dev/null @@ -1,28 +0,0 @@ -puts "============" -puts "OCC22828" -puts "============" -puts "" -####################################################################### -# Fuse on simple shapes with conical surfaces crashes -####################################################################### - -set BugNumber OCC22828 - -restore [locate_data_file bug22828_shape1.brep] b1 -restore [locate_data_file bug22828_shape2.brep] b2 -catch { bfuse result b1 b2 } - -set square 4029.04 - -set nb_v_good 11 -set nb_e_good 15 -set nb_w_good 12 -set nb_f_good 9 -set nb_sh_good 2 -set nb_sol_good 2 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 52 - -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug22830 b/tests/bugs/modalg/bug22830 deleted file mode 100755 index 62520d6fa1..0000000000 --- a/tests/bugs/modalg/bug22830 +++ /dev/null @@ -1,30 +0,0 @@ -puts "================" -puts "OCC22830" -puts "================" -puts "" -####################################################################################### -# BRep mesh can't apply mesh for the face -###################################################################################### - -set BugNumber OCC22830 - -restore [locate_data_file OCC22830-maze.brep] result -vinit -tclean result -vsetdispmode 1 -vdisplay result -vfit - -set square 52482 - -set nb_v_good 300 -set nb_e_good 300 -set nb_w_good 30 -set nb_f_good 1 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 631 - -set only_screen 1 diff --git a/tests/bugs/modalg/bug22833 b/tests/bugs/modalg/bug22833 deleted file mode 100755 index c4413e1c94..0000000000 --- a/tests/bugs/modalg/bug22833 +++ /dev/null @@ -1,33 +0,0 @@ -puts "========================" -puts "OCC22833" -puts "========================" -puts "" -####################################################################### -# Command "checkshape" in DRAWEXE give error "Self intersection wire" on attached shape -####################################################################### - -set BugNumber OCC22833 - -restore [locate_data_file OCC22833-bugInt.brep] result - -set text [checkshape result f] -set last1 [lindex $text end] -set last2 [lindex $text end-1] - -set status 0 -set s1 "OK" -set s2 "looks" - -if { [string equal $last1 $s1] && [string equal $last2 $s2] } { - set status 0 -} else { - set status 1 } - -if { ${status} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -set square 63427.2 -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug22864 b/tests/bugs/modalg/bug22864 deleted file mode 100755 index 47c6d02e89..0000000000 --- a/tests/bugs/modalg/bug22864 +++ /dev/null @@ -1,101 +0,0 @@ -puts "============" -puts "OCC22864" -puts "============" -puts "" -############################################################################################## -# The algorithm BiTgte_Blend obtains instable results -############################################################################################## - -set BugNumber OCC22864 - -restore [locate_data_file bug22864_face1.brep] f1 -restore [locate_data_file bug22864_face2.brep] f2 - -shape aShape C -add f1 aShape -add f2 aShape - -# -set status 0 -# -set nb_v_good 2 -set nb_e_good 3 -set nb_w_good 1 -set nb_f_good 1 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 8 -# -set Numbers 11 -# -for {set i 0} {$i < ${Numbers}} {incr i} { - puts "i=$i" - rollingball result aShape 15 @ f1 f2 - - set nb_info [nbshapes result] - regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full nb_v - regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full nb_e - regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full nb_w - regexp {FACE +: +([-0-9.+eE]+)} $nb_info full nb_f - regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full nb_sh - regexp {SOLID +: +([-0-9.+eE]+)} $nb_info full nb_sol - regexp {COMPSOLID +: +([-0-9.+eE]+)} $nb_info full nb_compsol - regexp {COMPOUND +: +([-0-9.+eE]+)} $nb_info full nb_compound - regexp {SHAPE +: +([-0-9.+eE]+)} $nb_info full nb_shape - - if {$nb_v != $nb_v_good || $nb_e != $nb_e_good || - $nb_w != $nb_w_good || $nb_f != $nb_f_good || - $nb_sh != $nb_sh_good || $nb_sol != $nb_sol_good || - $nb_compsol != $nb_compsol_good || $nb_compound != $nb_compound_good || - $nb_shape != $nb_shape_good } { - set status 1 - } - - set aFile $imagedir/${test_image}.brep - puts "aFile=${aFile}" - file delete ${aFile} - if { [file exists ${aFile}] } { - puts "There is old ${aFile} file; Error" - set status 1 - } - # - save result ${aFile} - catch {exec chmod 777 ${aFile}} - if { ![file exists ${aFile}] } { - puts "There is not ${aFile} file; save command: Error" - set status 1 - } - - set fp [open ${aFile} "r"] - set Log [read -nonewline ${fp}] - close ${fp} - # - if {$i == 0} { - set StandardLog ${Log} - } else { - set info_result [string compare ${Log} ${StandardLog}] - if {${info_result} == 0} { - # Log == StandardLog - puts "Log == StandardLog" - } else { - # Log != StandardLog - set status 1 - puts "Log != StandardLog" - } - } -} - -# Resume -puts "" -if {${status} == 0} { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} - -set square 6935.38 -set 2dviewer 0 - - diff --git a/tests/bugs/modalg/bug22881 b/tests/bugs/modalg/bug22881 deleted file mode 100755 index 9cf18bd225..0000000000 --- a/tests/bugs/modalg/bug22881 +++ /dev/null @@ -1,27 +0,0 @@ -puts "================" -puts "OCC22881" -puts "================" -puts "" -####################################################################################### -# Sewing does not sew edge to its copy -###################################################################################### - -set BugNumber OCC22881 - -restore [locate_data_file OCC22881-sewing-pb.brep] a - -sewing result a - -set square 12.819 - -set nb_v_good 4 -set nb_e_good 6 -set nb_w_good 4 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 19 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22884 b/tests/bugs/modalg/bug22884 deleted file mode 100755 index 03aa90c26a..0000000000 --- a/tests/bugs/modalg/bug22884 +++ /dev/null @@ -1,53 +0,0 @@ -pload QAcommands - -puts "============" -puts "OCC22884" -puts "============" -puts "" -############################################################################# -# The attached face cannot be displayed in shading mode -############################################################################# - -set BugNumber OCC22884 - -set x1 136 -set y1 176 - -restore [locate_data_file bug22884_Face_1.brep] result -vinit -vdisplay result -vfit -vsetdispmode 1 - -set square 697.812 - -set nb_v_good 46 -set nb_e_good 46 -set nb_w_good 3 -set nb_f_good 1 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 96 - -set Color [QAGetPixelColor $x1 $y1] -set R [lindex ${Color} 2] -set G [lindex ${Color} 5] -set B [lindex ${Color} 8] -set color_status 0 -if { $R == 0 && $G == 0 && $B == 0 } { - set color_status 1 -} else { - set color_status 0 -} - - -if { ${color_status} == 0} { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} - -set 3dviewer 0 - diff --git a/tests/bugs/modalg/bug22893 b/tests/bugs/modalg/bug22893 deleted file mode 100755 index fa98fb2884..0000000000 --- a/tests/bugs/modalg/bug22893 +++ /dev/null @@ -1,29 +0,0 @@ -puts "============" -puts "OCC22893" -puts "============" -puts "" -############################################################################# -# Possible regression is tesselation algorithm of OCCT 6.5.2 -############################################################################# - -set BugNumber OCC22893 - -catch {pload XDE} - -igesread [locate_data_file OCC22893-thread_22534_boing777.igs] result * - -set square 26974.5 - -set nb_v_good 4183 -set nb_e_good 4191 -set nb_w_good 653 -set nb_f_good 639 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 9667 - -set 2dviewer 0 - - diff --git a/tests/bugs/modalg/bug22946 b/tests/bugs/modalg/bug22946 deleted file mode 100755 index 7717eb422c..0000000000 --- a/tests/bugs/modalg/bug22946 +++ /dev/null @@ -1,17 +0,0 @@ -puts "================" -puts "OCC22946" -puts "================" -puts "" -####################################################################################### -# BRepFeat_SplitShape crashes on splitting a face by two edges -###################################################################################### - -set BugNumber OCC22946 - -restore [locate_data_file OCC22946-FaceWithNewCurves.brep] a -restore [locate_data_file OCC22946-CompoundWithoutPcurves.brep] b - -splitshape result a a b - -set square 6.06498e+08 -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22967 b/tests/bugs/modalg/bug22967 deleted file mode 100755 index 3f0fa17119..0000000000 --- a/tests/bugs/modalg/bug22967 +++ /dev/null @@ -1,59 +0,0 @@ -puts "============" -puts "OCC22967" -puts "============" -puts "" -############################################################################################################ -# Boolean operations between two cylinders with orthogonal axis generate a shape with big vertex tolerance -########################################################################################################### - -set BugNumber OCC22967 -set check_value 1.04742e-05 - -restore [locate_data_file bug22967_Cylinder_1.brep] b1 -restore [locate_data_file bug22967_Scale_1.brep] b2 -bop b1 b2 -bopfuse result -set info [ maxtolerance result ] - -regexp {Edge[ \t]*:.*Max[ \t]*([-0-9.+eE]+)} $info full last1 -regexp {Vertex[ \t]*:.*Max[ \t]*([-0-9.+eE]+)} $info full last - -proc GetPercent {Value GoodValue} { - set Percent 0. - if {${GoodValue} != 0.} { - set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] - } elseif {${Value} != 0.} { - set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] - } else { - set Percent 0. - } - return ${Percent} -} - -set percent_max 5 -set status 0 - -set Tolerance_percent [expr abs ( [GetPercent ${last} ${check_value}] ) ] -if {${Tolerance_percent} > ${percent_max}} { - set status 1 -} else { - set status 0 -} - -set Tolerance_percent [expr abs ( [GetPercent ${last1} ${check_value}] ) ] -if {${Tolerance_percent} > ${percent_max}} { - set status 1 -} else { - set status 0 -} - -# Resume -if {${status} > 0} { - puts "${BugNumber}: Faulty" -} else { - puts "OK ${BugNumber}" -} - -set square 671262 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug22968 b/tests/bugs/modalg/bug22968 deleted file mode 100755 index 8b431cb194..0000000000 --- a/tests/bugs/modalg/bug22968 +++ /dev/null @@ -1,28 +0,0 @@ -puts "================" -puts "OCC22968" -puts "================" -puts "" -###################################################################################### -# RebuildShape exchanges 2d-curves -###################################################################################### - -set BugNumber OCC22968 - -pload XDE - -restore [locate_data_file OCC22968-cylface.brep] a -checkshape a f -removeloc result a -set info [ checkshape result f ] - -if { [regexp {The Shape result looks OK} $info] } { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} - -set square 3141.59 -set 2dviewer 0 - - - diff --git a/tests/bugs/modalg/bug22986 b/tests/bugs/modalg/bug22986 deleted file mode 100755 index f754280238..0000000000 --- a/tests/bugs/modalg/bug22986 +++ /dev/null @@ -1,27 +0,0 @@ -puts "===========" -puts "OCC22986" -puts "===========" -puts "" -####################################################################### -# Regression with OCCT652 on Windows. DRAWEXE craches during featprism -####################################################################### - -set BugNumber OCC22986 - -#eval datadir ${CfeDir}/data/900 - -restore [locate_data_file CFE900_cts21gbs.rle] base -restore [locate_data_file cts21322_face.rle] wire - -explode base face -copy base_6 fsketch - -splitshape result fsketch fsketch wire -if { [llength [explode result f]] != 3 } { - puts "Faulty ${BugNumber} : The result of splitshape command is incorrect." -} else { - puts "${BugNumber} OK" -} - -set square 414 -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug22990 b/tests/bugs/modalg/bug22990 deleted file mode 100755 index d764ba85fc..0000000000 --- a/tests/bugs/modalg/bug22990 +++ /dev/null @@ -1,24 +0,0 @@ -puts "============" -puts "OCC22990" -puts "============" -puts "" -############################################################################################################ -# Regression vs 6.5.2: splitting sphere across the seam is incomplete -########################################################################################################### - -set BugNumber OCC22990 - -psphere s 10 -plane p 2 0 0 1 0 0 -mkface f p -100 100 -100 100 -bsection e s f -2d - -explode s f -explode e e - -splitshape result s s_1 e_1 e_2 - -set nb_f_good 3 -set square 1256.64 -set 3dviewer 0 - diff --git a/tests/bugs/modalg/bug23 b/tests/bugs/modalg/bug23 deleted file mode 100755 index be9031fb08..0000000000 --- a/tests/bugs/modalg/bug23 +++ /dev/null @@ -1,29 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty OCC23 : Checkshape command works wrongly" -puts "TODO OCC12345 ALL: Error : The length of result shape is" -puts "================" -puts "OCC23" -puts "================" -puts "" -##################################################################### -## Checkshape gives result that there is a selfintersection on wire, but there are no intersection on it. -##################################################################### - -restore [locate_data_file OCC23.brep] sh - -decho off -set che [checkshape sh] -decho on - -if { [regexp {Faulty} $che] == 1 } { - puts "Faulty OCC23 : Checkshape command works wrongly" -} else { - puts "OCC23 OK : Checkshape command works properly" -} - -explode sh f -explode sh_2 w - -renamevar sh_2_1 result - -set length 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug23004 b/tests/bugs/modalg/bug23004 deleted file mode 100755 index d66fb64e74..0000000000 --- a/tests/bugs/modalg/bug23004 +++ /dev/null @@ -1,27 +0,0 @@ -puts "===========" -puts "OCC23004" -puts "===========" -###################################################### -# Boolean operation cut produces incorrect result -###################################################### - -set BugNumber OCC23004 - -restore [locate_data_file bug23004_b_7_1] b1 -restore [locate_data_file bug23004_b_7_2] b2 -bop b1 b2 -bopcut result - -set square 31308.8 - -set nb_v_good 26 -set nb_e_good 41 -set nb_w_good 17 -set nb_f_good 17 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 104 - -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug23008 b/tests/bugs/modalg/bug23008 deleted file mode 100755 index 8b3c7251c7..0000000000 --- a/tests/bugs/modalg/bug23008 +++ /dev/null @@ -1,34 +0,0 @@ -puts "================" -puts "OCC23008" -puts "================" -puts "" -###################################################################################### -# Too many intersection vertices between line and cylinder -###################################################################################### - -set BugNumber OCC23008 - -restore [locate_data_file bug23008_ez15] b1 -restore [locate_data_file bug23008_fz37] b2 -bop b1 b2 -set info [ bopnews -v ] -for {set i 0} {$i <= 100} {incr i} { - set word [lsearch $info z$i] - if {$word == -1} { - lappend check_z 0 - } else { - lappend check_z 1 - } -} - -# Resume -puts "" -set result [lsearch $check_z 1] -if { ${result} == -1 } { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} - -set 3dviewer 0 - diff --git a/tests/bugs/modalg/bug23029 b/tests/bugs/modalg/bug23029 deleted file mode 100755 index 0726aed0ce..0000000000 --- a/tests/bugs/modalg/bug23029 +++ /dev/null @@ -1,34 +0,0 @@ -puts "============" -puts "OCC23029" -puts "============" -puts "" -####################################################################### -# split shape algorithm works incorrectly in some cases -####################################################################### - -set BugNumber OCC23029 - -restore [locate_data_file OCC23029-F.brep] f -restore [locate_data_file OCC23029-W.brep] w - -checkshape f -checkshape w - -splitshape res f f w -explode res -renamevar res_2 result - -set square 27.3919 - -set nb_v_good 5 -set nb_e_good 5 -set nb_w_good 1 -set nb_f_good 1 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 12 - -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug23029_1 b/tests/bugs/modalg/bug23029_1 deleted file mode 100755 index b6b72cddbc..0000000000 --- a/tests/bugs/modalg/bug23029_1 +++ /dev/null @@ -1,56 +0,0 @@ -puts "============" -puts "OCC23029" -puts "============" -puts "" -####################################################################### -# split shape algorithm works incorrectly in some cases -####################################################################### - -set BugNumber OCC23029 - -catch { pload XDE } - -testreadstep [locate_data_file OCC23029-ProblemF.stp] a -restore [locate_data_file OCC23029-TempW.brep] t - -checkshape a -explode a f -splitshape result a a_1 t - -set square 215.198 - -set nb_v_good 19 -set nb_e_good 21 -set nb_w_good 2 -set nb_f_good 2 -set nb_sh_good 1 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 45 - -set CheckShape_status 0 - -set ll [ llength [explode result f2 ] ] - -if { $ll != 2 } { - set CheckShape_status 1 -} - -# Resume -puts "" -if { ${CheckShape_status} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -vinit -vsetdispmode 1 -vdisplay result -vfit - -vmoveto 252 289 - -set only_screen 1 - diff --git a/tests/bugs/modalg/bug23031 b/tests/bugs/modalg/bug23031 deleted file mode 100755 index 7cd9ad4074..0000000000 --- a/tests/bugs/modalg/bug23031 +++ /dev/null @@ -1,28 +0,0 @@ -puts "========" -puts "OCC23031" -puts "========" -puts "" -########################################################### -# Empty result for the extrema between a circle and a line. -########################################################### - -set BugNumber OCC23031 - - -restore [locate_data_file OCC23031-b1.brep] b1 -restore [locate_data_file OCC23031-b2.brep] b2 - -mkcurve c1 b1 -mkcurve c2 b2 - -set extrema_res [extrema c1 c2] -set extrema_length [llength ${extrema_res} ] - -if {${extrema_length} != 1 } { - puts "${BugNumber}: Faulty" -} else { - puts "${BugNumber}: OK" -} - -set 3dviewer 0 - diff --git a/tests/bugs/modalg/bug23043 b/tests/bugs/modalg/bug23043 deleted file mode 100755 index 6c0faf59d3..0000000000 --- a/tests/bugs/modalg/bug23043 +++ /dev/null @@ -1,31 +0,0 @@ -puts "========================" -puts "OCC23043" -puts "========================" -puts "" -################################################################################################################ -# Wrong results of BRepExtrema_DistShapeShape: non-null minimum distance between intersecting line and cylinder -################################################################################################################ - -set BugNumber OCC23043 - -restore [locate_data_file bug23043_croix.brep] a -restore [locate_data_file bug23043_cylindre.brep] b -vdisplay a b -vfit -distmini dd a b -set dist1 [ dval dd ] -set dist2 [ dval dd2 ] -set dist3 [ dval dd3 ] -set dist4 [ dval dd4 ] - - -puts "" -if { $dist1 == 0 && $dist2 == 0 && $dist3 == 0 && $dist4 == 0 } { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} - -set 3dviewer 0 - - diff --git a/tests/bugs/modalg/bug23060 b/tests/bugs/modalg/bug23060 deleted file mode 100755 index 2069fc3be3..0000000000 --- a/tests/bugs/modalg/bug23060 +++ /dev/null @@ -1,17 +0,0 @@ -puts "===========" -puts "OCC23060" -puts "===========" -puts "" -####################################################################### -# Exception is raised during intersection of two edges -####################################################################### - -set BugNumber OCC23060 - -restore [locate_data_file bug23060_ce.brep] result -explode result -bop result_1 result_2 - -set length 176.06 -set 3dviewer 0 - diff --git a/tests/bugs/modalg/bug23089 b/tests/bugs/modalg/bug23089 deleted file mode 100755 index a0b56b3522..0000000000 --- a/tests/bugs/modalg/bug23089 +++ /dev/null @@ -1,27 +0,0 @@ -puts "================" -puts "OCC23089" -puts "================" -puts "" -########################################################################################## -# Wrong result done by solid classifier algorithm -########################################################################################## - -set BugNumber OCC23089 - -restore [locate_data_file bug23088_Pipe_1.brep] b2 -restore [locate_data_file bug23089_px.draw] px -set info [ bclassify b2 px ] -set word1 [string compare [lindex ${info} end] "shape"] -set word2 [string compare [lindex ${info} end-1] "IN"] -set word3 [string compare [lindex ${info} end-2] "is"] -set word4 [string compare [lindex ${info} end-3] "point"] -set word5 [string compare [lindex ${info} end-4] "The"] - -# Resume -puts "" -if { ${word1} == 0 && ${word2} == 0 && ${word3} == 0 && ${word4} == 0 && ${word5} == 0 } { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug23100 b/tests/bugs/modalg/bug23100 deleted file mode 100755 index 31e74f6211..0000000000 --- a/tests/bugs/modalg/bug23100 +++ /dev/null @@ -1,34 +0,0 @@ -puts "TODO OCC11111 ALL: Error : Result shape is WRONG" - -puts "============" -puts "OCC23100" -puts "============" -puts "" -####################################################################### -# Wrong adjustment of p-curves on a cylinder -####################################################################### - -set BugNumber OCC23100 - -restore [locate_data_file bug23100_qf.brep] qf - -explode qf -copy qf_1 b1 -copy qf_2 b2 - -catch {bop b1 b2} -catch {bopfuse result} - -set square 50252.6 - -set nb_v_good 7 -set nb_e_good 8 -set nb_w_good 2 -set nb_f_good 2 -set nb_sh_good 2 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 22 - -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug23114 b/tests/bugs/modalg/bug23114 deleted file mode 100755 index b323d17396..0000000000 --- a/tests/bugs/modalg/bug23114 +++ /dev/null @@ -1,23 +0,0 @@ -puts "================" -puts "OCC23114" -puts "================" -puts "" -####################################################################################### -# Extrema algorithm throws the exception -###################################################################################### - -set BugNumber OCC23114 - -restore [locate_data_file OCC23114-c1.draw] c1 -restore [locate_data_file OCC23114-c2.draw] c2 -trim c1t c1 6.8444417666253693e-010 3.3201579728233819e-007 -trim c2t c2 0.57529999999422077 0.99999999996162448 -set exception_status [ catch { extrema c1t c2t } ] - -if { ${exception_status} == 0 } { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug23125 b/tests/bugs/modalg/bug23125 deleted file mode 100755 index b27d8ed793..0000000000 --- a/tests/bugs/modalg/bug23125 +++ /dev/null @@ -1,23 +0,0 @@ -puts "================" -puts "OCC23125" -puts "================" -puts "" -########################################################################################## -# Wrong result done by classifier algorithm for a point and a solid -########################################################################################## - -set BugNumber OCC23125 - -restore [locate_data_file bug23125_ref] b -restore [locate_data_file bug23125_pref] p -set info [ bclassify b p ] - -# Resume -puts "" -if { [regexp "The point is IN shape" $info] != 1 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug23137_1 b/tests/bugs/modalg/bug23137_1 deleted file mode 100755 index cd7ab82f50..0000000000 --- a/tests/bugs/modalg/bug23137_1 +++ /dev/null @@ -1,21 +0,0 @@ -puts "============" -puts "CR23137" -puts "============" -puts "" -########################################################################################################## -# Class BRepAlgoAPI_Cut does not made correct result on attached shapes. -########################################################################################################## - -restore [locate_data_file bug23137_bspl_cut.brep] b -explode b -copy b_1 b1 -copy b_2 b2 -#to provide positive volume of b2 -invert b2 - -bop b1 b2 -bopcut result - -set square 44460.7 - -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug23137_2 b/tests/bugs/modalg/bug23137_2 deleted file mode 100755 index 92a35b1cc2..0000000000 --- a/tests/bugs/modalg/bug23137_2 +++ /dev/null @@ -1,21 +0,0 @@ -puts "============" -puts "CR23137" -puts "============" -puts "" -########################################################################################################## -# Class BRepAlgoAPI_Cut does not made correct result on attached shapes. -########################################################################################################## - -restore [locate_data_file bug23137_rev_cut.brep] b -explode b -copy b_1 b1 -copy b_2 b2 -#to provide positive volume of b1 -invert b1 - -bop b1 b2 -bopcut result - -set square 3452.78 - -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug23158 b/tests/bugs/modalg/bug23158 deleted file mode 100755 index 8640b5dc66..0000000000 --- a/tests/bugs/modalg/bug23158 +++ /dev/null @@ -1,22 +0,0 @@ -puts "============" -puts "OCC23158" -puts "============" -puts "" -####################################################################### -# ApproxInt_PrmPrmSvSurfaces raises FPE (division by zero) signal -####################################################################### - -set BugNumber OCC23158 - -restore [locate_data_file bug23158_f1.brep] b1 -restore [locate_data_file bug23158_f2.brep] b2 - -set exception_status [ catch { bop b1 b2 } ] - -if { ${exception_status} == 0 } { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug23160 b/tests/bugs/modalg/bug23160 deleted file mode 100755 index caead06792..0000000000 --- a/tests/bugs/modalg/bug23160 +++ /dev/null @@ -1,28 +0,0 @@ -puts "============" -puts "OCC23160" -puts "============" -puts "" -####################################################################### -# Cut operation with the attached shapes produces a not correct result. -####################################################################### - -set BugNumber OCC23160 - -restore [locate_data_file bug23160_tshape.brep] b1 -restore [locate_data_file bug23160_box.brep] b2 -bop b1 b2 -bopcut result - -set square 270192 - -set nb_v_good 16 -set nb_e_good 24 -set nb_w_good 10 -set nb_f_good 10 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 63 - -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug23162_1 b/tests/bugs/modalg/bug23162_1 deleted file mode 100755 index 4777151144..0000000000 --- a/tests/bugs/modalg/bug23162_1 +++ /dev/null @@ -1,47 +0,0 @@ -puts "================" -puts "OCC23162" -puts "================" -puts "" -############################################################################## -# BRepOffsetAPI_MakePipeShell works wrong -############################################################################## - -set BugNumber OCC23162 - -catch {pload XDE} - -set status 0 - -set radius 100. -puts "------------- Radius $radius" -# make a ring quarter -vertex v1 [expr $radius / 2] 0 0 -vertex v2 $radius 0 0 -edge e v1 v2 -revol rq e 0 0 0 0 0 1 45 - -# make rq scaled and translated -scaleshape rq2 rq 0.2 -ttranslate rq2 0 0 $radius - -# get wires of rq -explode rq W -explode rq2 W - -# make a spine -vertex v1 0 0 0 -vertex v2 0 0 $radius -edge e v1 v2 -wire spine e - -# make a pipe -mksweep spine -addsweep rq_1 v1 -addsweep rq2_1 v2 -buildsweep result - -# BUG: a pipe is invalid -checkshape result -short - -set square 14572.5 -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug23162_2 b/tests/bugs/modalg/bug23162_2 deleted file mode 100755 index cdf95c3a31..0000000000 --- a/tests/bugs/modalg/bug23162_2 +++ /dev/null @@ -1,47 +0,0 @@ -puts "================" -puts "OCC23162" -puts "================" -puts "" -############################################################################## -# BRepOffsetAPI_MakePipeShell works wrong -############################################################################## - -set BugNumber OCC23162 - -catch {pload XDE} - -set status 0 - -set radius 10. -puts "------------- Radius $radius" -# make a ring quarter -vertex v1 [expr $radius / 2] 0 0 -vertex v2 $radius 0 0 -edge e v1 v2 -revol rq e 0 0 0 0 0 1 45 - -# make rq scaled and translated -scaleshape rq2 rq 0.2 -ttranslate rq2 0 0 $radius - -# get wires of rq -explode rq W -explode rq2 W - -# make a spine -vertex v1 0 0 0 -vertex v2 0 0 $radius -edge e v1 v2 -wire spine e - -# make a pipe -mksweep spine -addsweep rq_1 v1 -addsweep rq2_1 v2 -buildsweep result - -# BUG: a pipe is invalid -checkshape result -short - -set square 145.725 -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug23162_3 b/tests/bugs/modalg/bug23162_3 deleted file mode 100755 index d658253e4f..0000000000 --- a/tests/bugs/modalg/bug23162_3 +++ /dev/null @@ -1,47 +0,0 @@ -puts "================" -puts "OCC23162" -puts "================" -puts "" -############################################################################## -# BRepOffsetAPI_MakePipeShell works wrong -############################################################################## - -set BugNumber OCC23162 - -catch {pload XDE} - -set status 0 - -set radius 1. -puts "------------- Radius $radius" -# make a ring quarter -vertex v1 [expr $radius / 2] 0 0 -vertex v2 $radius 0 0 -edge e v1 v2 -revol rq e 0 0 0 0 0 1 45 - -# make rq scaled and translated -scaleshape rq2 rq 0.2 -ttranslate rq2 0 0 $radius - -# get wires of rq -explode rq W -explode rq2 W - -# make a spine -vertex v1 0 0 0 -vertex v2 0 0 $radius -edge e v1 v2 -wire spine e - -# make a pipe -mksweep spine -addsweep rq_1 v1 -addsweep rq2_1 v2 -buildsweep result - -# BUG: a pipe is invalid -checkshape result -short - -set square 1.45725 -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug23162_4 b/tests/bugs/modalg/bug23162_4 deleted file mode 100755 index a8bb3cea7d..0000000000 --- a/tests/bugs/modalg/bug23162_4 +++ /dev/null @@ -1,47 +0,0 @@ -puts "================" -puts "OCC23162" -puts "================" -puts "" -############################################################################## -# BRepOffsetAPI_MakePipeShell works wrong -############################################################################## - -set BugNumber OCC23162 - -catch {pload XDE} - -set status 0 - -set radius 0.1 -puts "------------- Radius $radius" -# make a ring quarter -vertex v1 [expr $radius / 2] 0 0 -vertex v2 $radius 0 0 -edge e v1 v2 -revol rq e 0 0 0 0 0 1 45 - -# make rq scaled and translated -scaleshape rq2 rq 0.2 -ttranslate rq2 0 0 $radius - -# get wires of rq -explode rq W -explode rq2 W - -# make a spine -vertex v1 0 0 0 -vertex v2 0 0 $radius -edge e v1 v2 -wire spine e - -# make a pipe -mksweep spine -addsweep rq_1 v1 -addsweep rq2_1 v2 -buildsweep result - -# BUG: a pipe is invalid -checkshape result -short - -set square 0.0145725 -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug23162_5 b/tests/bugs/modalg/bug23162_5 deleted file mode 100755 index 778fbb151b..0000000000 --- a/tests/bugs/modalg/bug23162_5 +++ /dev/null @@ -1,47 +0,0 @@ -puts "================" -puts "OCC23162" -puts "================" -puts "" -############################################################################## -# BRepOffsetAPI_MakePipeShell works wrong -############################################################################## - -set BugNumber OCC23162 - -catch {pload XDE} - -set status 0 - -set radius 0.01 -puts "------------- Radius $radius" -# make a ring quarter -vertex v1 [expr $radius / 2] 0 0 -vertex v2 $radius 0 0 -edge e v1 v2 -revol rq e 0 0 0 0 0 1 45 - -# make rq scaled and translated -scaleshape rq2 rq 0.2 -ttranslate rq2 0 0 $radius - -# get wires of rq -explode rq W -explode rq2 W - -# make a spine -vertex v1 0 0 0 -vertex v2 0 0 $radius -edge e v1 v2 -wire spine e - -# make a pipe -mksweep spine -addsweep rq_1 v1 -addsweep rq2_1 v2 -buildsweep result - -# BUG: a pipe is invalid -checkshape result -short - -set square 0.000145725 -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug23162_6 b/tests/bugs/modalg/bug23162_6 deleted file mode 100755 index fcd026b1e9..0000000000 --- a/tests/bugs/modalg/bug23162_6 +++ /dev/null @@ -1,47 +0,0 @@ -puts "================" -puts "OCC23162" -puts "================" -puts "" -############################################################################## -# BRepOffsetAPI_MakePipeShell works wrong -############################################################################## - -set BugNumber OCC23162 - -catch {pload XDE} - -set status 0 - -set radius 0.001 -puts "------------- Radius $radius" -# make a ring quarter -vertex v1 [expr $radius / 2] 0 0 -vertex v2 $radius 0 0 -edge e v1 v2 -revol rq e 0 0 0 0 0 1 45 - -# make rq scaled and translated -scaleshape rq2 rq 0.2 -ttranslate rq2 0 0 $radius - -# get wires of rq -explode rq W -explode rq2 W - -# make a spine -vertex v1 0 0 0 -vertex v2 0 0 $radius -edge e v1 v2 -wire spine e - -# make a pipe -mksweep spine -addsweep rq_1 v1 -addsweep rq2_1 v2 -buildsweep result - -# BUG: a pipe is invalid -checkshape result -short - -set square 1.45725e-06 -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug23170 b/tests/bugs/modalg/bug23170 deleted file mode 100755 index 4373a54938..0000000000 --- a/tests/bugs/modalg/bug23170 +++ /dev/null @@ -1,18 +0,0 @@ -puts "============" -puts "OCC23170" -puts "============" -puts "" -###################################### -# Bug of creating a full sphere face -###################################### - -set BugNumber OCC23170 - -pload MODELING - -sphere s 10 - -mkface result s 0 6.2831853071795880 -1.5707963267948970 1.5707963267948970 - -set square 1256.63 -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug23174 b/tests/bugs/modalg/bug23174 deleted file mode 100755 index 6ee5a6268f..0000000000 --- a/tests/bugs/modalg/bug23174 +++ /dev/null @@ -1,103 +0,0 @@ -puts "================" -puts "OCC23174" -puts "================" -puts "" -############################################################################## -# BRepLib_MakeFace(Wire) creates an invalid face on a wire of cylinder bottom -############################################################################## - -set BugNumber OCC23174 - -catch {pload XDE} - -set status 0 - -# make a cylinder -pcylinder cyl 50 150 - -# get wires -explode cyl W - -# make a face from the 3-d wire (planar bottom of the cylinder) -mkplane f cyl_3 0 - -# BUG: face is built on a cylindrical face of the cylinder instead of -# a bottom face -set reslog [checkshape f -short] -puts $reslog -if { $reslog != "This shape seems to be valid" } { set status 1 } - -# ======================================================================== -# Make a new cylindrical face from a wire composed from more than 3 edges -# to check that the bug fix is valid for a wire of more than 1 edge -# ======================================================================== - -# get a bottom edge cyl_1; cyl_2 is a top edge; cyl_3 is a seam edge -nexplode cyl E - -# get its 3D curve -mkcurve c3D cyl_1 - -# split cyl_1 into 3 edges -mkedge e1 c3D 0 2 -mkedge e2 c3D 2 4 -mkedge e3 c3D 4 6.28318530717959 - -# make a reversed seam -copy cyl_3 cyl_3_r -treverse cyl_3_r - -# make a new wire for a new cylindrical face -wire w e1 e2 e3 cyl_3 cyl_2 cyl_3_r - -# get a surface for a new face -nexplode cyl F -mksurface cyl_surf cyl_3 - -# make a new cylindrical face -mkface cyl_face_0 cyl_surf w -fixshape cyl_face cyl_face_0 - -# make a wire of 3 bottom edges to check the fix -explode cyl_face E -wire w cyl_face_2 cyl_face_1 cyl_face_3 - -# check the fix, i.e. that cylindrical surface is rejected and thus a valid face is built -mkplane f w 0 -donly f -set res_log [checkshape f -short] -puts $reslog -if { $reslog != "This shape seems to be valid" } { set status 1 } - -# ================================================================= -#check that mkplane finds cyl_surf if the wire of cyl_face is given -# ================================================================= - -explode cyl_face W -mkplane f cyl_face_1 0 - -# get surface of f -mksurface cyl_surf_2 f - -# compare points of 2 surfaces at same UV -svalue cyl_surf 1 1 x1 y1 z1 -svalue cyl_surf_2 1 1 x2 y2 z2 - -if { [ expr [dval x1] - [dval x2] ] > 0.0 } { set status 1 } -if { [ expr [dval y1] - [dval y2] ] > 0.0 } { set status 1 } -if { [ expr [dval z1] - [dval z2] ] > 0.0 } { set status 1 } - -# Resume -puts "" -if { ${status} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} -renamevar f result -set square 47123.9 -set 2dviewer 0 - - - - diff --git a/tests/bugs/modalg/bug23214 b/tests/bugs/modalg/bug23214 deleted file mode 100755 index bff2c5b450..0000000000 --- a/tests/bugs/modalg/bug23214 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC23214" -puts "============" -puts "" -####################################################################### -# BOP section operation produces incorrect result. -####################################################################### - -restore [locate_data_file OCC23214-face_1188.brep] b1 -restore [locate_data_file OCC23214-shell_for_line_1188.brep] b2 - -bop b1 b2 -bopsection result - -set length 2.94086 -set nb_good_vertex 4 -set nb_good_edge 2 -set nb_good_wire 0 -set nb_good_face 0 -set nb_good_shell 0 -set nb_good_solid 0 -set nb_good_compsolid 0 -set nb_good_compound 1 -set nb_good_shape 7 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug23218 b/tests/bugs/modalg/bug23218 deleted file mode 100755 index 1806c85fbd..0000000000 --- a/tests/bugs/modalg/bug23218 +++ /dev/null @@ -1,48 +0,0 @@ -puts "============" -puts "OCC23218" -puts "============" -puts "" -####################################################################### -# Wrong value of tolerance for the intersection curve. -####################################################################### - -set BugNumber OCC23218 - -puts "Load first shape ..." -restore [locate_data_file bug23218_b1] b1 - -puts "Load second shape ..." -restore [locate_data_file bug23218_b4] b2 - -puts "Start project operation ..." -set result [bopcurves b1 b2] -puts $result -puts "Finish project operation ..." - -set GoodToleranceReached 8.9651741230950248e-06 -regexp {Tolerance Reached=([-0-9.+eE]+)} $result full ToleranceReached - -proc GetPercent {Value GoodValue} { - set Percent 0. - if {${GoodValue} != 0.} { - set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] - } elseif {${Value} != 0.} { - set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] - } else { - set Percent 0. - } - return ${Percent} -} - - -set percent_max 0.1 -set ToleranceReached_percent [expr abs ( [GetPercent ${ToleranceReached} ${GoodToleranceReached}] ) ] - -if {${ToleranceReached_percent} > ${percent_max}} { - puts "${BugNumber}: Faulty" -} else { - puts "OK ${BugNumber}" -} - -set 3dviewer 0 - diff --git a/tests/bugs/modalg/bug23341 b/tests/bugs/modalg/bug23341 deleted file mode 100755 index 98d44b30c6..0000000000 --- a/tests/bugs/modalg/bug23341 +++ /dev/null @@ -1,22 +0,0 @@ -puts "================" -puts "OCC23341" -puts "================" -puts "" -####################################################################### -# Wrong result done by 2D classifier algorithm for a point and a face -####################################################################### - -set BugNumber OCC23341 - -restore [locate_data_file bug23341_f1] f1 -restore [locate_data_file bug23341_p] p -set info [b2dclassify f1 p] -set check [regexp "OUT" $info] - -if { ${check} == 1 } { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} - - diff --git a/tests/bugs/modalg/bug23367_1 b/tests/bugs/modalg/bug23367_1 deleted file mode 100755 index 21bf887b72..0000000000 --- a/tests/bugs/modalg/bug23367_1 +++ /dev/null @@ -1,18 +0,0 @@ -puts "============" -puts "CR23367" -puts "============" -puts "" -########################################################################################################## -# New functionality restoring the middle path of pipe-like shape -########################################################################################################## - -box b 10 100 10 -explode b f -donly b b_3 b_4 -fit - -middlepath result b b_3 b_4 - -set length 100. - -set 2dviewer 1 diff --git a/tests/bugs/modalg/bug23367_10 b/tests/bugs/modalg/bug23367_10 deleted file mode 100755 index fd9e1aea46..0000000000 --- a/tests/bugs/modalg/bug23367_10 +++ /dev/null @@ -1,27 +0,0 @@ -puts "============" -puts "CR23367" -puts "============" -puts "" -########################################################################################################## -# New functionality restoring the middle path of pipe-like shape -########################################################################################################## - -polyline pp 0 0 0 10 0 0 20 10 0 20 20 0 -polyline sp 0 0 0 0 0 100 0 50 200 0 100 100 -mksweep sp -addsweep pp -buildsweep a -R -explode a e -wire w1 a_2 a_5 a_8 -wire w2 a_24 a_22 a_20 -donly a w1 w2 -fit -middlepath result a w1 w2 - -set length 288.824 - -set 2dviewer 1 - - - - diff --git a/tests/bugs/modalg/bug23367_11 b/tests/bugs/modalg/bug23367_11 deleted file mode 100755 index 036edc9289..0000000000 --- a/tests/bugs/modalg/bug23367_11 +++ /dev/null @@ -1,23 +0,0 @@ -puts "============" -puts "CR23367" -puts "============" -puts "" -########################################################################################################## -# New functionality restoring the middle path of pipe-like shape -########################################################################################################## - -restore [locate_data_file bug23367_pipe1.brep] a -explode a e -wire w1 a_2 -wire w2 a_6 -donly a w1 w2 -fit -middlepath result a w2 w1 - -set length 1386.13 - -set 2dviewer 1 - - - - diff --git a/tests/bugs/modalg/bug23367_12 b/tests/bugs/modalg/bug23367_12 deleted file mode 100755 index a59f0ff806..0000000000 --- a/tests/bugs/modalg/bug23367_12 +++ /dev/null @@ -1,23 +0,0 @@ -puts "============" -puts "CR23367" -puts "============" -puts "" -########################################################################################################## -# New functionality restoring the middle path of pipe-like shape -########################################################################################################## - -restore [locate_data_file bug23367_aa.brep] a -explode a e -wire w1 a_57 a_73 a_54 a_71 -wire w2 a_133 a_148 a_130 a_146 -donly a w1 w2 -fit -middlepath result a w2 w1 - -set length 3.46311 - -set 2dviewer 1 - - - - diff --git a/tests/bugs/modalg/bug23367_13 b/tests/bugs/modalg/bug23367_13 deleted file mode 100755 index 41cfdf4752..0000000000 --- a/tests/bugs/modalg/bug23367_13 +++ /dev/null @@ -1,27 +0,0 @@ -puts "============" -puts "CR23367" -puts "============" -puts "" -########################################################################################################## -# New functionality restoring the middle path of pipe-like shape -########################################################################################################## - -polyline pp 0 0 0 10 0 0 20 10 0 20 20 0 -polyline sp 0 0 0 0 0 100 -50 50 200 -100 100 100 -mksweep sp -addsweep pp -buildsweep a -R -explode a e -wire w1 a_2 a_5 a_8 -wire w2 a_24 a_27 a_30 -donly a w1 w2 -fit -middlepath result a w1 w2 - -set length 352.512 - -set 2dviewer 1 - - - - diff --git a/tests/bugs/modalg/bug23367_14 b/tests/bugs/modalg/bug23367_14 deleted file mode 100755 index 5471106110..0000000000 --- a/tests/bugs/modalg/bug23367_14 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "CR23367" -puts "============" -puts "" -########################################################################################################## -# New functionality restoring the middle path of pipe-like shape -########################################################################################################## - -polyline pp 0 0 0 10 -10 0 20 0 0 10 10 0 0 0 0 -polyline sp 0 0 0 0 0 50 -100 0 0 -50 0 -50 0 0 0 -mksweep sp -addsweep pp -buildsweep a -R -explode a e -wire ww a_11 a_8 a_5 a_2 -donly a ww -fit -middlepath result a ww ww - -set length 365.161 - -set 2dviewer 1 - - - - diff --git a/tests/bugs/modalg/bug23367_15 b/tests/bugs/modalg/bug23367_15 deleted file mode 100755 index 60c127003f..0000000000 --- a/tests/bugs/modalg/bug23367_15 +++ /dev/null @@ -1,27 +0,0 @@ -puts "============" -puts "CR23367" -puts "============" -puts "" -########################################################################################################## -# New functionality restoring the middle path of pipe-like shape -########################################################################################################## - -polyline pp 0 0 0 10 -10 0 20 0 0 10 10 0 0 0 0 -polyline sp 0 0 0 0 0 50 -100 0 0 -50 0 -50 -mksweep sp -addsweep pp -buildsweep a -R -explode a e -wire w1 a_11 a_8 a_5 a_2 -wire w2 a_34 a_36 a_28 a_31 -donly a w1 w2 -fit -middlepath result a w1 w2 - -set length 270.149 - -set 2dviewer 1 - - - - diff --git a/tests/bugs/modalg/bug23367_2 b/tests/bugs/modalg/bug23367_2 deleted file mode 100755 index 35864df619..0000000000 --- a/tests/bugs/modalg/bug23367_2 +++ /dev/null @@ -1,20 +0,0 @@ -puts "============" -puts "CR23367" -puts "============" -puts "" -########################################################################################################## -# New functionality restoring the middle path of pipe-like shape -########################################################################################################## - -pcylinder a 10 30 180 -explode a f -donly a a_2 a_3 -fit -middlepath result a a_2 a_3 - -set length 30.0036 - -set 2dviewer 1 - - - diff --git a/tests/bugs/modalg/bug23367_3 b/tests/bugs/modalg/bug23367_3 deleted file mode 100755 index 63b5c6d63f..0000000000 --- a/tests/bugs/modalg/bug23367_3 +++ /dev/null @@ -1,22 +0,0 @@ -puts "============" -puts "CR23367" -puts "============" -puts "" -########################################################################################################## -# New functionality restoring the middle path of pipe-like shape -########################################################################################################## - -polyline pp 0 0 0 5 0 0 10 0 0 10 10 0 0 10 0 0 0 0 -mkplane ff pp -prism a ff 0 0 50 -explode a f -donly a a_6 a_7 -fit -middlepath result a a_6 a_7 - -set length 50. - -set 2dviewer 1 - - - diff --git a/tests/bugs/modalg/bug23367_4 b/tests/bugs/modalg/bug23367_4 deleted file mode 100755 index 91f38404ea..0000000000 --- a/tests/bugs/modalg/bug23367_4 +++ /dev/null @@ -1,21 +0,0 @@ -puts "============" -puts "CR23367" -puts "============" -puts "" -########################################################################################################## -# New functionality restoring the middle path of pipe-like shape -########################################################################################################## - -ptorus a 50 10 -explode a e -wire ww a_2 -donly a ww -fit -middlepath result a ww ww - -set length 314.159 - -set 2dviewer 1 - - - diff --git a/tests/bugs/modalg/bug23367_5 b/tests/bugs/modalg/bug23367_5 deleted file mode 100755 index f02c1b79a4..0000000000 --- a/tests/bugs/modalg/bug23367_5 +++ /dev/null @@ -1,21 +0,0 @@ -puts "============" -puts "CR23367" -puts "============" -puts "" -########################################################################################################## -# New functionality restoring the middle path of pipe-like shape -########################################################################################################## - -pcylinder a 10 50 -explode a f -donly a a_2 a_3 -fit -middlepath result a a_2 a_3 - -set length 50. - -set 2dviewer 1 - - - - diff --git a/tests/bugs/modalg/bug23367_6 b/tests/bugs/modalg/bug23367_6 deleted file mode 100755 index 24f19e6689..0000000000 --- a/tests/bugs/modalg/bug23367_6 +++ /dev/null @@ -1,22 +0,0 @@ -puts "============" -puts "CR23367" -puts "============" -puts "" -########################################################################################################## -# New functionality restoring the middle path of pipe-like shape -########################################################################################################## - -restore [locate_data_file bug23367_pipe1.brep] a -explode a e -wire w1 a_2 -wire w2 a_6 -donly a w1 w2 -fit -middlepath result a w1 w2 - -set length 1386.13 - -set 2dviewer 1 - - - diff --git a/tests/bugs/modalg/bug23367_7 b/tests/bugs/modalg/bug23367_7 deleted file mode 100755 index b6df910357..0000000000 --- a/tests/bugs/modalg/bug23367_7 +++ /dev/null @@ -1,22 +0,0 @@ -puts "============" -puts "CR23367" -puts "============" -puts "" -########################################################################################################## -# New functionality restoring the middle path of pipe-like shape -########################################################################################################## - -restore [locate_data_file bug23367_aa.brep] a -explode a e -wire w1 a_57 a_73 a_54 a_71 -wire w2 a_133 a_148 a_130 a_146 -donly a w1 w2 -fit -middlepath result a w1 w2 - -set length 3.46311 - -set 2dviewer 1 - - - diff --git a/tests/bugs/modalg/bug23367_8 b/tests/bugs/modalg/bug23367_8 deleted file mode 100755 index c2432001f7..0000000000 --- a/tests/bugs/modalg/bug23367_8 +++ /dev/null @@ -1,22 +0,0 @@ -puts "============" -puts "CR23367" -puts "============" -puts "" -########################################################################################################## -# New functionality restoring the middle path of pipe-like shape -########################################################################################################## - -restore [locate_data_file bug23367_bb.brep] b -explode b e -wire w1 b_1 b_29 b_60 b_27 -wire w2 b_11 b_23 b_56 b_33 -donly b w1 w2 -fit -middlepath result b w1 w2 - -set length 1.94244 - -set 2dviewer 1 - - - diff --git a/tests/bugs/modalg/bug23367_9 b/tests/bugs/modalg/bug23367_9 deleted file mode 100755 index fdec1ac748..0000000000 --- a/tests/bugs/modalg/bug23367_9 +++ /dev/null @@ -1,25 +0,0 @@ -puts "============" -puts "CR23367" -puts "============" -puts "" -########################################################################################################## -# New functionality restoring the middle path of pipe-like shape -########################################################################################################## - -ptorus a 50 10 0 180 -explode a f -shape b Sh -add a_1 b -explode b e -wire ww b_2 -donly b ww -fit -middlepath result b ww ww - -set length 314.159 - -set 2dviewer 1 - - - - diff --git a/tests/bugs/modalg/bug23394 b/tests/bugs/modalg/bug23394 deleted file mode 100755 index d099a3d9c3..0000000000 --- a/tests/bugs/modalg/bug23394 +++ /dev/null @@ -1,15 +0,0 @@ -puts "============" -puts "CR23394" -puts "============" -puts "" -########################################################################################################## -# Problem with BRepOffset_MakeOffset on a cylindrical face -########################################################################################################## - -restore [locate_data_file bug23394_Circular_tube.brep] sh1 - -thickshell result sh1 5 - -set square 128648 - -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug234 b/tests/bugs/modalg/bug234 deleted file mode 100755 index 8cd171d1dc..0000000000 --- a/tests/bugs/modalg/bug234 +++ /dev/null @@ -1,26 +0,0 @@ -puts "========" -puts "OCC234" -puts "========" - -###################################################################### -##I believe that attached shape is OK but checkshape finds out some problems (Bad Orientation of Subshape). -###################################################################### - -restore [locate_data_file OCC234.brep] result - -set che [checkshape result r] -if { [regexp {OK} $che] != 1 } { - puts "Faulty OCC234 (checkshape) : Checkshape command works wrongly" -} else { - puts "OCC234 OK (checkshape) : Checkshape command works properly" -} - -set che [checkshape result] -if { [regexp {Faulty} $che] == 1 } { - puts "Faulty OCC234 (checkshape) : Checkshape command works wrongly" -} else { - puts "OCC234 OK (checkshape) : Checkshape command works properly" -} - -set square 2464.17 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug23429 b/tests/bugs/modalg/bug23429 deleted file mode 100755 index aa7428ca28..0000000000 --- a/tests/bugs/modalg/bug23429 +++ /dev/null @@ -1,24 +0,0 @@ -puts "============" -puts "CR23429" -puts "============" -puts "" -########################################################################################################## -# BRepFeat_SplitShape algorithm misses some section edges while building result from customer's shape -########################################################################################################## -pload QAcommands - -restore [locate_data_file OCC23388-Shape1.brep] a -restore [locate_data_file CR23429-Shape3.brep] b - -OCC23429 result a b - -set square 1120.52 - -set 2dviewer 1 - - - - - - - diff --git a/tests/bugs/modalg/bug23436 b/tests/bugs/modalg/bug23436 deleted file mode 100755 index 291ea7f381..0000000000 --- a/tests/bugs/modalg/bug23436 +++ /dev/null @@ -1,13 +0,0 @@ -puts "============" -puts "CR23436" -puts "============" -puts "" -###################################################### -# BRepOffsetAPI_ThruSections crashes when lofting through identical profiles -###################################################### - -restore [locate_data_file bug23436_myloft.brep] s - -explode s - -thrusections result 0 0 s_1 s_2 s_3 diff --git a/tests/bugs/modalg/bug23470 b/tests/bugs/modalg/bug23470 deleted file mode 100755 index 1b5405bf91..0000000000 --- a/tests/bugs/modalg/bug23470 +++ /dev/null @@ -1,23 +0,0 @@ -puts "============" -puts "CR23470" -puts "============" -puts "" -########################################################################################################## -# Boolean Fuse between two edges fails -########################################################################################################## - -restore [locate_data_file bug23470_qe.brep] qe -explode qe -bop qe_1 qe_2 -bopfuse result - -set nb_v_good 2 -set nb_e_good 1 -set nb_w_good 1 -set nb_shape_good 5 -set length 48.4459 -set command bopfuse - -set 2dviewer 1 - - diff --git a/tests/bugs/modalg/bug23472 b/tests/bugs/modalg/bug23472 deleted file mode 100755 index 396c439e76..0000000000 --- a/tests/bugs/modalg/bug23472 +++ /dev/null @@ -1,22 +0,0 @@ -puts "============" -puts "CR23472" -puts "============" -puts "" -########################################################################################################## -# BRepAlgoAPI_Section algorithm fails with exception while intersecting two faces -########################################################################################################## - -restore [locate_data_file bug23472_f1.brep] f1 -restore [locate_data_file bug23472_f2.brep] f2 - -bsection result f1 f2 -2d - -regexp {Mass +: +([-0-9.+eE]+)} [lprops result] full l - -if { $l != 0} { - puts "Error : The bsection is not valid" -} - -# Service parameters -set mass -0.1 -set m -0.1 diff --git a/tests/bugs/modalg/bug23530 b/tests/bugs/modalg/bug23530 deleted file mode 100755 index ae2158e407..0000000000 --- a/tests/bugs/modalg/bug23530 +++ /dev/null @@ -1,18 +0,0 @@ -puts "========" -puts "CR23530" -puts "========" -puts "" -################################################## -## Error in Draw command "checkshape": invalid face is not recognized -################################################## - -restore [locate_data_file bug23530_BadFace.brep] result -pcurve result - -decho off -set CheckLog [checkshape result] -decho on - -if { [regexp "BRepCheck_UnorientableShape" ${CheckLog}] != 1 } { - puts "CR23530: Error" -} diff --git a/tests/bugs/modalg/bug23606 b/tests/bugs/modalg/bug23606 deleted file mode 100755 index 2df9c9f47a..0000000000 --- a/tests/bugs/modalg/bug23606 +++ /dev/null @@ -1,19 +0,0 @@ -puts "============" -puts "OCC23606" -puts "============" -puts "" -####################################################################### -# Invalid result of pipe operation -####################################################################### - -restore [locate_data_file bug23606_base.brep] sh -restore [locate_data_file bug23606_path.brep] w -pipe result w sh -set n [llength [explode result f]] -if { ${n} != 10 } { - puts "Error : bad number of faces" -} - -# Service parameters -set mass -0.1 -set m -0.1 diff --git a/tests/bugs/modalg/bug23651_1 b/tests/bugs/modalg/bug23651_1 deleted file mode 100755 index 84593c5053..0000000000 --- a/tests/bugs/modalg/bug23651_1 +++ /dev/null @@ -1,13 +0,0 @@ -puts "============" -puts "CR23651" -puts "============" -puts "" -############################### -## Exception on fillet construction between NURBS and surface of revolution -############################### - -restore [locate_data_file bug23651_turbine_shell_one_edge.brep] s -explode s e -blend result s 1 s_4 - -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug23651_2 b/tests/bugs/modalg/bug23651_2 deleted file mode 100755 index 2c4fa32649..0000000000 --- a/tests/bugs/modalg/bug23651_2 +++ /dev/null @@ -1,16 +0,0 @@ -puts "============" -puts "CR23651" -puts "============" -puts "" -############################### -## Exception on fillet construction between NURBS and surface of revolution -############################### - -restore [locate_data_file bug23651_turbine_shell_one_edge.brep ] a -explode a e - -mkevol result a -updatevol a_4 0. 1.5 0.05 1 0.45 1 0.5 1.5 0.55 2 0.95 2 1. 1.5 -buildevol - -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug23676 b/tests/bugs/modalg/bug23676 deleted file mode 100755 index 0edbcb8f42..0000000000 --- a/tests/bugs/modalg/bug23676 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "CR23676" -puts "============" -puts "" -######################################################### -## Intersection between edge and a face produces extra vertex -######################################################### - -restore [locate_data_file bug23676_q1.brep] b1 - -explode b1 -copy b1_1 b1 -copy b1_3 b2 - -bop b1 b2 -bopcut result - -set nb_v_good 2 -set nb_e_good 1 -set nb_w_good 1 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 5 diff --git a/tests/bugs/modalg/bug23699 b/tests/bugs/modalg/bug23699 deleted file mode 100755 index f89bff9f89..0000000000 --- a/tests/bugs/modalg/bug23699 +++ /dev/null @@ -1,18 +0,0 @@ -puts "=========" -puts "CR23699" -puts "=========" -puts "" -############################### -## Exception reaised during intersection between two surfaces -############################### - -restore [locate_data_file bug23699_Compound_sigsegv.brep] b1 - -explode b1 f - -mksurface s1 b1_1 -mksurface s2 b1_2 - -intersect result s1 s2 - -set 2dviewer 1 diff --git a/tests/bugs/modalg/bug23711 b/tests/bugs/modalg/bug23711 deleted file mode 100755 index 0765851aa9..0000000000 --- a/tests/bugs/modalg/bug23711 +++ /dev/null @@ -1,15 +0,0 @@ -puts "========" -puts "CR23711" -puts "========" -######################################################## -## Incorrect result done by fuse operation -######################################################## - -restore [locate_data_file bug23711_sph1.brep] b1 -restore [locate_data_file bug23711_sph2.brep] b2 - -bop b1 b2 -bopfuse result - -set square 1256.63 -set 2dviewer 1 diff --git a/tests/bugs/modalg/bug23716 b/tests/bugs/modalg/bug23716 deleted file mode 100755 index 720ebab897..0000000000 --- a/tests/bugs/modalg/bug23716 +++ /dev/null @@ -1,16 +0,0 @@ -puts "========" -puts "CR23716" -puts "========" -######################################################## -## Boolean Fuse between two faces fails -######################################################## - -restore [locate_data_file bug23716_qf.brep] b -explode b - -bop b_1 b_3 -bopfuse result - -set square 45605.9 - -set 2dviewer 1 diff --git a/tests/bugs/modalg/bug23732 b/tests/bugs/modalg/bug23732 deleted file mode 100755 index e9a3564921..0000000000 --- a/tests/bugs/modalg/bug23732 +++ /dev/null @@ -1,17 +0,0 @@ -puts "=========" -puts "CR23722" -puts "=========" -puts "" -############################### -## Exception reaised during intersection between two surfaces -############################### - -restore [locate_data_file bug23732_fx1.brep] b1 -restore [locate_data_file bug23732_fx2.brep] b2 - -mksurface s1 b1 -mksurface s2 b1 - -intersect result s1 s2 - -set 2dviewer 1 diff --git a/tests/bugs/modalg/bug238_1 b/tests/bugs/modalg/bug238_1 deleted file mode 100755 index cdfd9d737c..0000000000 --- a/tests/bugs/modalg/bug238_1 +++ /dev/null @@ -1,29 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty : Result shape is WRONG !!!" -puts "TODO OCC12345 ALL: Error : The length of result shape is" -puts "========================" -puts " OCC238 " -puts "========================" - -################################################# -## puts " BOPCOMMON case_2_solid.brep and case_2_edge1.brep" -################################################# -puts " " -puts [restore [locate_data_file OCC238a.brep] a] -puts [restore [locate_data_file case_2_edge1.brep] b] -puts [bop a b] -puts [bopcommon result b a] - -explode result v -explode a e -distmini di result_1 a_3 -regexp {([-0-9.+eE]+)$} [dump $di_val] full dis -if { [expr $dis > 1.e-5] } { - puts "Faulty : Result shape is WRONG !!!" -} else { - puts " Result shape is COMPLITE" -} - -set nb_v_good 14 -set nb_e_good 7 -set length 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug238_2 b/tests/bugs/modalg/bug238_2 deleted file mode 100755 index e92fd4bb6f..0000000000 --- a/tests/bugs/modalg/bug238_2 +++ /dev/null @@ -1,29 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty : Result shape is WRONG !!!" -puts "TODO OCC12345 ALL: Error : The length of result shape is" -puts "========================" -puts " OCC238 " -puts "========================" - -################################################# -## puts " BOPTUC case_2_solid.brep from case_2_edge1.brep" -################################################# -puts " " -puts [restore [locate_data_file OCC238a.brep] a] -puts [restore [locate_data_file case_2_edge1.brep] b] -puts [bop a b] -puts [boptuc result b a] - -explode result v -explode a e -distmini di result_2 a_3 -regexp {([-0-9.+eE]+)$} [dump $di_val] full dis -if { [expr $dis > 1.e-5] } { - puts "Faulty : Result shape is WRONG !!!" -} else { - puts " Result shape is COMPLITE" -} - -set nb_v_good 14 -set nb_e_good 7 -set length 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug239_1 b/tests/bugs/modalg/bug239_1 deleted file mode 100755 index cca3f2e937..0000000000 --- a/tests/bugs/modalg/bug239_1 +++ /dev/null @@ -1,21 +0,0 @@ -puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must contain" -puts "TODO OCC12345 ALL: Error : The length of result shape is" - -puts "========================" -puts " OCC239 " -puts "========================" - -################################################# -## puts " BOPCOMMON case_2_solid.brep and case_2_wire1.brep" -################################################# - puts " " -restore [locate_data_file OCC238a.brep] a -restore [locate_data_file case_2_wire1.brep] b -puts [bop a b] -puts [bopcommon result] - -set nb_v_good 18 -set nb_e_good 10 -set length 0 -set 2dviewer 0 - \ No newline at end of file diff --git a/tests/bugs/modalg/bug239_2 b/tests/bugs/modalg/bug239_2 deleted file mode 100755 index ddacd399c9..0000000000 --- a/tests/bugs/modalg/bug239_2 +++ /dev/null @@ -1,19 +0,0 @@ - -puts "========================" -puts " OCC239 " -puts "========================" - -################################################# -## puts " BOPTUC case_2_solid.brep and case_2_wire1.brep" -################################################# - puts " " -restore [locate_data_file OCC238a.brep] a -restore [locate_data_file case_2_wire1.brep] b -puts [bop a b] -puts [boptuc result] - -set nb_v_good 18 -set nb_e_good 11 -set length 2481.26 -set 2dviewer 0 - \ No newline at end of file diff --git a/tests/bugs/modalg/bug240_1 b/tests/bugs/modalg/bug240_1 deleted file mode 100755 index 9761aa14e7..0000000000 --- a/tests/bugs/modalg/bug240_1 +++ /dev/null @@ -1,21 +0,0 @@ -puts "TODO OCC12345 ALL: Error : The command is not valid" -puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must" - -puts "========================" -puts " OCC240 " -puts "========================" - -################################################# -## puts " BOPCOMMON case_2_shell.brep and case_2_edge2.brep" -################################################# - puts " " -restore [locate_data_file OCC240a.brep] a -restore [locate_data_file case_2_edge2.brep] b -puts [bop a b] -puts [bopcommon result] - -set nb_v_good 14 -set nb_e_good 6 -set length 0 -set 2dviewer 0 - \ No newline at end of file diff --git a/tests/bugs/modalg/bug240_2 b/tests/bugs/modalg/bug240_2 deleted file mode 100755 index 189f358a1e..0000000000 --- a/tests/bugs/modalg/bug240_2 +++ /dev/null @@ -1,21 +0,0 @@ -puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must" -puts "TODO OCC12345 ALL: Error : The length of result shape is" - -puts "========================" -puts " OCC240 " -puts "========================" - -################################################# -## puts " BOPTUC case_2_shell.brep and case_2_edge2.brep" -################################################# - puts " " -restore [locate_data_file OCC240a.brep] a -restore [locate_data_file case_2_edge2.brep] b -puts [bop a b] -puts [boptuc result] - -set nb_v_good 14 -set nb_e_good 7 -set length 0 -set 2dviewer 0 - \ No newline at end of file diff --git a/tests/bugs/modalg/bug241_1 b/tests/bugs/modalg/bug241_1 deleted file mode 100755 index c29342aa5b..0000000000 --- a/tests/bugs/modalg/bug241_1 +++ /dev/null @@ -1,21 +0,0 @@ -puts "TODO OCC12345 ALL: Error : The command is not valid" -puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must" - -puts "========================" -puts " OCC241 " -puts "========================" - -################################################# -## puts " BOPCOMMON case_2_shell.brep and case_2_edge3.brep" -################################################# - puts " " -restore [locate_data_file OCC240a.brep] a -restore [locate_data_file case_2_edge3.brep] b -puts [bop a b] -puts [bopcommon result] - -set nb_v_good 6 -set nb_e_good 3 -set length 0 -set 2dviewer 0 - \ No newline at end of file diff --git a/tests/bugs/modalg/bug241_2 b/tests/bugs/modalg/bug241_2 deleted file mode 100755 index 0aecc6e2e9..0000000000 --- a/tests/bugs/modalg/bug241_2 +++ /dev/null @@ -1,21 +0,0 @@ -puts "TODO OCC12345 ALL: Error : The length of result shape is" -puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must" - -puts "========================" -puts " OCC241 " -puts "========================" - -################################################# -## puts " BOPTUC case_2_shell.brep and case_2_edge3.brep" -################################################# - puts " " -restore [locate_data_file OCC240a.brep] a -restore [locate_data_file case_2_edge3.brep] b -puts [bop a b] -puts [boptuc result] - -set nb_v_good 6 -set nb_e_good 3 -set length 0 -set 2dviewer 0 - \ No newline at end of file diff --git a/tests/bugs/modalg/bug242_1 b/tests/bugs/modalg/bug242_1 deleted file mode 100755 index 1e6dab42f1..0000000000 --- a/tests/bugs/modalg/bug242_1 +++ /dev/null @@ -1,21 +0,0 @@ -puts "TODO OCC12345 ALL: Error : The command is not valid" -puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must" - -puts "========================" -puts " OCC242 " -puts "========================" - -################################################# -## puts " BOPCOMMON case_2_shell.brep and case_2_wire1.brep" -################################################# - puts " " -restore [locate_data_file OCC240a.brep] a -restore [locate_data_file case_2_wire1.brep] b -puts [bop a b] -puts [bopcommon result] - -set nb_v_good 18 -set nb_e_good 9 -set length 0 -set 2dviewer 0 - \ No newline at end of file diff --git a/tests/bugs/modalg/bug242_2 b/tests/bugs/modalg/bug242_2 deleted file mode 100755 index 1304e72e5f..0000000000 --- a/tests/bugs/modalg/bug242_2 +++ /dev/null @@ -1,21 +0,0 @@ -puts "TODO OCC12345 ALL: Error : The length of result shape is" -puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must" - -puts "========================" -puts " OCC242 " -puts "========================" - -################################################# -## puts " BOPTUC case_2_shell.brep and case_2_wire1.brep" -################################################# - puts " " -restore [locate_data_file OCC240a.brep] a -restore [locate_data_file case_2_wire1.brep] b -puts [bop a b] -puts [boptuc result] - -set nb_v_good 18 -set nb_e_good 13 -set length 0 -set 2dviewer 0 - \ No newline at end of file diff --git a/tests/bugs/modalg/bug243_1 b/tests/bugs/modalg/bug243_1 deleted file mode 100755 index 6cca505a5a..0000000000 --- a/tests/bugs/modalg/bug243_1 +++ /dev/null @@ -1,19 +0,0 @@ - -puts "========================" -puts " OCC243 " -puts "========================" - -################################################# -## puts " BOPCOMMON case_4_shell.brep and case_4_wire3.brep" -################################################# - puts " " -restore [locate_data_file case_4_shell.brep] a -restore [locate_data_file case_4_wire3.brep] b -puts [bop a b] -puts [bopcommon result] - -set nb_v_good 15 -set nb_e_good 10 -set length 1150.78 -set 2dviewer 0 - \ No newline at end of file diff --git a/tests/bugs/modalg/bug243_2 b/tests/bugs/modalg/bug243_2 deleted file mode 100755 index d7613a902a..0000000000 --- a/tests/bugs/modalg/bug243_2 +++ /dev/null @@ -1,19 +0,0 @@ - -puts "========================" -puts " OCC243 " -puts "========================" - -################################################# -## puts " BOPTUC case_4_shell.brep and case_4_wire3.brep" -################################################# - puts " " -restore [locate_data_file case_4_shell.brep] a -restore [locate_data_file case_4_wire3.brep] b -puts [bop a b] -puts [boptuc result] - -set nb_v_good 16 -set nb_e_good 11 -set length 929.278 -set 2dviewer 1 - \ No newline at end of file diff --git a/tests/bugs/modalg/bug244 b/tests/bugs/modalg/bug244 deleted file mode 100755 index 8b24b1e4a8..0000000000 --- a/tests/bugs/modalg/bug244 +++ /dev/null @@ -1,19 +0,0 @@ - -puts "========================" -puts " OCC244 " -puts "========================" - -################################################# -## puts " BOPCOMMON case_5_solid.brep and case_5_wire3.brep" -################################################# - puts " " -restore [locate_data_file case_5_solid.brep] a -restore [locate_data_file case_4_wire3.brep] b - puts [bop a b] - puts [bopcommon result] - - set nb_v_good 12 - set nb_e_good 11 - set length 1808.02 - set 2dviewer 0 - \ No newline at end of file diff --git a/tests/bugs/modalg/bug245_1 b/tests/bugs/modalg/bug245_1 deleted file mode 100755 index ad7f598092..0000000000 --- a/tests/bugs/modalg/bug245_1 +++ /dev/null @@ -1,19 +0,0 @@ - -puts "========================" -puts " OCC245 " -puts "========================" - -################################################# -## puts " BOPCOMMON case_5_shell.brep and case_5_wire3.brep" -################################################# - puts " " -restore [locate_data_file case_5_shell.brep] a -restore [locate_data_file case_4_wire3.brep] b -puts [bop a b] -puts [bopcommon result] - -set nb_v_good 12 -set nb_e_good 11 -set length 1808.02 -set 2dviewer 0 - \ No newline at end of file diff --git a/tests/bugs/modalg/bug245_2 b/tests/bugs/modalg/bug245_2 deleted file mode 100755 index ceda3cdb65..0000000000 --- a/tests/bugs/modalg/bug245_2 +++ /dev/null @@ -1,19 +0,0 @@ - -puts "========================" -puts " OCC245 " -puts "========================" - -################################################# -## puts " BOPTUC case_5_shell.brep and case_5_wire3.brep" -################################################# - puts " " -restore [locate_data_file case_5_shell.brep] a -restore [locate_data_file case_4_wire3.brep] b -puts [bop a b] -puts [boptuc result] - -set nb_v_good 3 -set nb_e_good 2 -set length 272.04 -set 2dviewer 0 - \ No newline at end of file diff --git a/tests/bugs/modalg/bug246 b/tests/bugs/modalg/bug246 deleted file mode 100755 index dd1ea1d268..0000000000 --- a/tests/bugs/modalg/bug246 +++ /dev/null @@ -1,20 +0,0 @@ -puts "TODO OCC12345 ALL: Error : The length of result shape is" -puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must contains" - -puts "========================" -puts " OCC246 " -puts "========================" - -################################################# -## puts " BOPCOMMON case_1_solid.brep and case_1_wire1.brep" -################################################# - puts " " -restore [locate_data_file OCC246a.brep] a -restore [locate_data_file case_1_wire1.brep] b -puts [bop a b] -puts [bopcommon result] - -set nb_v_good 5 -set nb_e_good 2 -set length 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug248_1 b/tests/bugs/modalg/bug248_1 deleted file mode 100755 index 19bd2cfb01..0000000000 --- a/tests/bugs/modalg/bug248_1 +++ /dev/null @@ -1,21 +0,0 @@ -puts "TODO OCC12345 ALL: Error : The command is not valid. The length is" -puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must contains" - -puts "========================" -puts " OCC248 " -puts "========================" - -################################################# -## puts " BOPCOMMON case_8_solid.brep and case_8_wire6.brep" -################################################# - puts " " -restore [locate_data_file OCC247a.brep] a -restore [locate_data_file OCC248b.brep] b -puts [bop a b] -puts [bopcommon result] - -set nb_v_good 1 -set nb_e_good 0 -set length 0 -set 2dviewer 0 - \ No newline at end of file diff --git a/tests/bugs/modalg/bug248_2 b/tests/bugs/modalg/bug248_2 deleted file mode 100755 index 86644ae15d..0000000000 --- a/tests/bugs/modalg/bug248_2 +++ /dev/null @@ -1,21 +0,0 @@ -puts "TODO OCC12345 ALL: Error : The length of result shape is" -puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must contains" - -puts "========================" -puts " OCC248 " -puts "========================" - -################################################# -## puts " BOPTUC case_8_solid.brep and case_8_wire6.brep" -################################################# - puts " " -restore [locate_data_file OCC247a.brep] a -restore [locate_data_file OCC248b.brep] b -puts [bop a b] -puts [boptuc result] - -set nb_v_good 8 -set nb_e_good 8 -set length 0 -set 2dviewer 0 - \ No newline at end of file diff --git a/tests/bugs/modalg/bug249_1 b/tests/bugs/modalg/bug249_1 deleted file mode 100755 index 718f83c9a7..0000000000 --- a/tests/bugs/modalg/bug249_1 +++ /dev/null @@ -1,21 +0,0 @@ -puts "TODO OCC12345 ALL: Error : The command is not valid. The length is" -puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must contains" - -puts "========================" -puts " OCC249 " -puts "========================" - -################################################# -## puts " BOPCOMMON case_9_wire_a.brep and case_9_edge3.brep" -################################################# - puts " " -restore [locate_data_file case_9_wire_a.brep] a -restore [locate_data_file case_9_edge3.brep] b -puts [bop a b] -puts [bopcommon result] - -set nb_v_good 2 -set nb_e_good 1 -set length 0 -set 2dviewer 0 - \ No newline at end of file diff --git a/tests/bugs/modalg/bug249_2 b/tests/bugs/modalg/bug249_2 deleted file mode 100755 index 3831479d5b..0000000000 --- a/tests/bugs/modalg/bug249_2 +++ /dev/null @@ -1,22 +0,0 @@ -puts "TODO OCC12345 ALL: Error : The length of result shape is" -puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must contains" - -puts "========================" -puts " OCC249 " -puts "========================" - -################################################# -## puts " BOPTUC case_9_wire_a.brep and case_9_edge3.brep" -################################################# - puts " " -restore [locate_data_file case_9_wire_a.brep] a -restore [locate_data_file case_9_edge3.brep] b -puts [bop a b] -puts [boptuc result] - -set nb_v_good 4 -set nb_e_good 2 -set length 0 -set 2dviewer 0 - - \ No newline at end of file diff --git a/tests/bugs/modalg/bug249_3 b/tests/bugs/modalg/bug249_3 deleted file mode 100755 index eb6acc1aa0..0000000000 --- a/tests/bugs/modalg/bug249_3 +++ /dev/null @@ -1,21 +0,0 @@ -puts "TODO OCC12345 ALL: Error : The length of result shape is" -puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must contains" - -puts "========================" -puts " OCC249 " -puts "========================" - -################################################# -## puts " BOPCUT case_9_wire_a.brep and case_9_edge3.brep" -################################################# - puts " " -restore [locate_data_file case_9_wire_a.brep] a -restore [locate_data_file case_9_edge3.brep] b -puts [bop a b] -puts [bopcut result] - -set nb_v_good 4 -set nb_e_good 2 -set length 0 -set 2dviewer 0 - \ No newline at end of file diff --git a/tests/bugs/modalg/bug249_4 b/tests/bugs/modalg/bug249_4 deleted file mode 100755 index 75e0d9cc29..0000000000 --- a/tests/bugs/modalg/bug249_4 +++ /dev/null @@ -1,21 +0,0 @@ -puts "TODO OCC12345 ALL: Error : The length of result shape is" -puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must contains" - -puts "========================" -puts " OCC249 " -puts "========================" - -################################################# -## puts " BOPFUSE case_9_wire_a.brep and case_9_edge3.brep" -################################################# - puts " " -restore [locate_data_file case_9_wire_a.brep] a -restore [locate_data_file case_9_edge3.brep] b -puts [bop a b] -puts [bopfuse result] - -set nb_v_good 6 -set nb_e_good 5 -set length 0 -set 2dviewer 2 - \ No newline at end of file diff --git a/tests/bugs/modalg/bug250_1 b/tests/bugs/modalg/bug250_1 deleted file mode 100755 index f45bec692e..0000000000 --- a/tests/bugs/modalg/bug250_1 +++ /dev/null @@ -1,21 +0,0 @@ -puts "TODO OCC12345 ALL: Error : The command is not valid. The length is" -puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must contains" - -puts "========================" -puts " OCC250 " -puts "========================" - -################################################# -## puts " BOPCOMMON case_9_wire_a.brep and case_9_wire2.brep" -################################################# - puts " " -restore [locate_data_file case_9_wire_a.brep] a -restore [locate_data_file case_9_wire2.brep] b -puts [bop a b] -puts [bopcommon result] - -set nb_v_good 2 -set nb_e_good 1 -set length 0 -set 2dviewer 0 - \ No newline at end of file diff --git a/tests/bugs/modalg/bug250_2 b/tests/bugs/modalg/bug250_2 deleted file mode 100755 index 4e98480501..0000000000 --- a/tests/bugs/modalg/bug250_2 +++ /dev/null @@ -1,21 +0,0 @@ -puts "TODO OCC12345 ALL: Error : The length of result shape is" -puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must contains" - -puts "========================" -puts " OCC250 " -puts "========================" - -################################################# -## puts " BOPTUC case_9_wire_a.brep and case_9_wire2.brep" -################################################# - puts " " -restore [locate_data_file case_9_wire_a.brep] a -restore [locate_data_file case_9_wire2.brep] b -puts [bop a b] -puts [boptuc result] - -set nb_v_good 7 -set nb_e_good 6 -set length 0 -set 2dviewer 0 - \ No newline at end of file diff --git a/tests/bugs/modalg/bug250_3 b/tests/bugs/modalg/bug250_3 deleted file mode 100755 index 5d94ebaa81..0000000000 --- a/tests/bugs/modalg/bug250_3 +++ /dev/null @@ -1,21 +0,0 @@ -puts "TODO OCC12345 ALL: Error : The length of result shape is" -puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must contains" - -puts "========================" -puts " OCC250 " -puts "========================" - -################################################# -## puts " BOPCUT case_9_wire_a.brep and case_9_wire2.brep" -################################################# - puts " " -restore [locate_data_file case_9_wire_a.brep] a -restore [locate_data_file case_9_wire2.brep] b -puts [bop a b] -puts [bopcut result] - -set nb_v_good 4 -set nb_e_good 2 -set length 0 -set 2dviewer 0 - \ No newline at end of file diff --git a/tests/bugs/modalg/bug250_4 b/tests/bugs/modalg/bug250_4 deleted file mode 100755 index 18a06125f4..0000000000 --- a/tests/bugs/modalg/bug250_4 +++ /dev/null @@ -1,20 +0,0 @@ -puts "TODO OCC12345 ALL: Error : The length of result shape is" -puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must contains" - -puts "========================" -puts " OCC250 " -puts "========================" - -################################################# -## puts " BOPFUSE case_9_wire_a.brep and case_9_wire2.brep" -################################################# - puts " " -restore [locate_data_file case_9_wire_a.brep] a -restore [locate_data_file case_9_wire2.brep] b -puts [bop a b] -puts [bopfuse result] - -set nb_v_good 9 -set nb_e_good 9 -set length 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug251_1 b/tests/bugs/modalg/bug251_1 deleted file mode 100755 index 938d0534a9..0000000000 --- a/tests/bugs/modalg/bug251_1 +++ /dev/null @@ -1,33 +0,0 @@ -pload QAcommands - -puts "================" -puts "OCC251" -puts "================" -puts "" -########################################################### -## Section of two faces f1 and f2 depends on order of arguments: section r1 f1 f2 and -## section r2 f2 f1 give different results, one of result is invalid - overlapped edges. -########################################################### - -restore [locate_data_file OCC251.brep] f -explode f -checkshape f_1 -checkshape f_2 - -bsection result f_1 f_2 -explode result - -set status [OCC333 result_1 result_2] -if {[llength ${status}] < 1} { - puts "OCC251 ERROR" -} else { - regexp {([-0-9.+eE]+)} $status full code - if { ${code} == 3 || ${code} == 2} { - puts "OCC251 OK (case 1) : Section command works properly" - } else { - puts "Faulty OCC251 (case 1): Section was made WRONGLY" - } -} - -set length 1. -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug251_2 b/tests/bugs/modalg/bug251_2 deleted file mode 100755 index cf75ceb13f..0000000000 --- a/tests/bugs/modalg/bug251_2 +++ /dev/null @@ -1,33 +0,0 @@ -pload QAcommands - -puts "================" -puts "OCC251" -puts "================" -puts "" -########################################################### -## Section of two faces f1 and f2 depends on order of arguments: section r1 f1 f2 and -## section r2 f2 f1 give different results, one of result is invalid - overlapped edges. -########################################################### - -restore [locate_data_file OCC251.brep] f -explode f -checkshape f_1 -checkshape f_2 - -bsection result f_2 f_1 -explode result - -set status [OCC333 result_1 result_2] -if {[llength ${status}] < 1} { - puts "OCC251 ERROR" -} else { - regexp {([-0-9.+eE]+)} $status full code - if { ${code} == 3 || ${code} == 2 } { - puts "OCC251 OK (case 2) : Section command works properly" - } else { - puts "Faulty OCC251 (case 2): Section was made WRONGLY" - } -} - -set length 1. -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug260 b/tests/bugs/modalg/bug260 deleted file mode 100644 index bdb003566c..0000000000 --- a/tests/bugs/modalg/bug260 +++ /dev/null @@ -1,20 +0,0 @@ -#INTERFACE IGES -puts "========" -puts "OCC260" -puts "========" - -pload XDE - -if { [catch { igesbrep [locate_data_file OCC260.igs] a * } catch_result] } { - puts "OCC260: Error: there is reading problem" -} else { - regexp {([-0-9.+eE]+) Shape\(s\) listed} [tpcompound result] full ShapeNumber - if {${ShapeNumber} > 0} { - puts "OCC260: OK" - } else { - puts "OCC260: Error" - } -} - -set length 4.41928 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug263 b/tests/bugs/modalg/bug263 deleted file mode 100644 index 35d5f52d13..0000000000 --- a/tests/bugs/modalg/bug263 +++ /dev/null @@ -1,30 +0,0 @@ -puts "TODO OCC11111 ALL: Faulty OCC263: here is shading problem" -puts "TODO OCC11111 ALL: Error : The square of result shape is" - -puts "========" -puts "OCC263" -puts "========" - -restore [locate_data_file OCC263.brep] result - -isos result 0 -tclean result - -#Creating mesh -incmesh result 0.01 - -#View the result of mesh -triangles result - -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -if { $tri != 989 && $nod != 535 } { - puts "Faulty OCC263: here is shading problem" -} else { - puts "Shading of OCC263 is OK" -} - -set square 0 -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug264_0 b/tests/bugs/modalg/bug264_0 deleted file mode 100755 index 91e2a859f6..0000000000 --- a/tests/bugs/modalg/bug264_0 +++ /dev/null @@ -1,29 +0,0 @@ - -puts "========" -puts "OCC264" -puts " (case 0)" -puts "========" - -restore [locate_data_file OCC264_00.rle] result -checkshape result - -tclean result -vinit -vdisplay result -vclear - -isos result 0 -triangles result - -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -if { $tri != 6 && $nod != 8 } { - puts "Faulty OCC264_0: here is shading problem" -} else { - puts "Shading of OCC264_0 is OK" -} - -set square 1.3135 -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug264_1 b/tests/bugs/modalg/bug264_1 deleted file mode 100755 index 83974cb1b2..0000000000 --- a/tests/bugs/modalg/bug264_1 +++ /dev/null @@ -1,31 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty OCC264_1: here is shading problem" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -puts "========" -puts "OCC264" -puts " (case 1)" -puts "========" - -restore [locate_data_file OCC264_01.brep] result -checkshape result - -tclean result -vinit -vdisplay result -vclear - -isos result 0 -triangles result - -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -if { $tri != 26 && $nod != 28 } { - puts "Faulty OCC264_1: here is shading problem" -} else { - puts "Shading of OCC264_1 is OK" -} - -set square 0 -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug264_10 b/tests/bugs/modalg/bug264_10 deleted file mode 100755 index 452842d098..0000000000 --- a/tests/bugs/modalg/bug264_10 +++ /dev/null @@ -1,32 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty OCC264_10: here is shading problem" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -puts "========" -puts "OCC264" -puts " (case 10)" -puts "========" - -restore [locate_data_file OCC264_10.brep] result -checkshape result - -tclean result -vinit -vdisplay result -vclear - -isos result 0 -triangles result - -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -if { $tri != 8 && $nod != 10 } { - puts "Faulty OCC264_10: here is shading problem" -} else { - puts "Shading of OCC264_10 is OK" -} - -set square 0 -set 3dviewer 0 - diff --git a/tests/bugs/modalg/bug264_11 b/tests/bugs/modalg/bug264_11 deleted file mode 100755 index 0d0348eb7a..0000000000 --- a/tests/bugs/modalg/bug264_11 +++ /dev/null @@ -1,32 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty OCC264_11: here is shading problem" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -puts "========" -puts "OCC264" -puts " (case 11)" -puts "========" - -restore [locate_data_file OCC264_11.brep] result -checkshape result - -tclean result -vinit -vdisplay result -vclear - -isos result 0 -triangles result - -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -if { $tri != 32 && $nod != 28 } { - puts "Faulty OCC264_11: here is shading problem" -} else { - puts "Shading of OCC264_11 is OK" -} - -set square 0 -set 3dviewer 0 - diff --git a/tests/bugs/modalg/bug264_12 b/tests/bugs/modalg/bug264_12 deleted file mode 100644 index ce6cf1a364..0000000000 --- a/tests/bugs/modalg/bug264_12 +++ /dev/null @@ -1,33 +0,0 @@ -puts "TODO OCC11111 ALL: Faulty OCC264_12: here is shading problem" -puts "TODO OCC11111 ALL: Error : The square of result shape is" - -puts "========" -puts "OCC264" -puts " (case 12)" -puts "========" - -restore [locate_data_file OCC264_12.brep] result - -tclean result -vinit -vdisplay result -vclear - -isos res 0 -triangles result - -#smallview -#fit - -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -if { $tri != 19 && $nod != 21 } { - puts "Faulty OCC264_12: here is shading problem" -} else { - puts "Shading of OCC264_12 is OK" -} - -set square 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug264_2 b/tests/bugs/modalg/bug264_2 deleted file mode 100755 index 89ac94994e..0000000000 --- a/tests/bugs/modalg/bug264_2 +++ /dev/null @@ -1,35 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty OCC264_2: here is shading problem" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -puts "========" -puts "OCC264" -puts " (case 2)" -puts "========" - -restore [locate_data_file OCC264_02.brep] result -checkshape result - -tclean result -vinit -vdisplay result -vclear - -isos result 0 -triangles result - -smallview -fit - -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -if { $tri != 10 && $nod != 12 } { - puts "Faulty OCC264_2: here is shading problem" -} else { - puts "Shading of OCC264_2 is OK" -} - -set square 0 -set 3dviewer 0 - diff --git a/tests/bugs/modalg/bug264_3 b/tests/bugs/modalg/bug264_3 deleted file mode 100755 index 08ab1a75a9..0000000000 --- a/tests/bugs/modalg/bug264_3 +++ /dev/null @@ -1,35 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty OCC264_3: here is shading problem" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -puts "========" -puts "OCC264" -puts " (case 3)" -puts "========" - -restore [locate_data_file OCC264_03.brep] result -checkshape result - -tclean result -vinit -vdisplay result -vclear - -isos result 0 -triangles result - -#smallview -#fit - -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -if { $tri != 13 && $nod != 15 } { - puts "Faulty OCC264_3: here is shading problem" -} else { - puts "Shading of OCC264_3 is OK" -} - -set square 0 -set 3dviewer 0 - diff --git a/tests/bugs/modalg/bug264_4 b/tests/bugs/modalg/bug264_4 deleted file mode 100755 index 397dc2a181..0000000000 --- a/tests/bugs/modalg/bug264_4 +++ /dev/null @@ -1,35 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty OCC264_4: here is shading problem" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -puts "========" -puts "OCC264" -puts " (case 4)" -puts "========" - -restore [locate_data_file OCC264_04.brep] result -checkshape result - -tclean result -vinit -vdisplay result -vclear - -isos result 0 -triangles result - -#smallview -#fit - -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -if { $tri != 13 && $nod != 15 } { - puts "Faulty OCC264_4: here is shading problem" -} else { - puts "Shading of OCC264_4 is OK" -} - -set square 0 -set 3dviewer 0 - diff --git a/tests/bugs/modalg/bug264_5 b/tests/bugs/modalg/bug264_5 deleted file mode 100755 index 3b9ca4cbde..0000000000 --- a/tests/bugs/modalg/bug264_5 +++ /dev/null @@ -1,35 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty OCC264_5: here is shading problem" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -puts "========" -puts "OCC264" -puts " (case 5)" -puts "========" - -restore [locate_data_file OCC264_05.brep] result -checkshape result - -tclean result -vinit -vdisplay result -vclear - -isos result 0 -triangles result - -#smallview -#fit - -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -if { $tri != 85 && $nod != 87 } { - puts "Faulty OCC264_5: here is shading problem" -} else { - puts "Shading of OCC264_5 is OK" -} - -set square 0 -set 3dviewer 0 - diff --git a/tests/bugs/modalg/bug264_6 b/tests/bugs/modalg/bug264_6 deleted file mode 100755 index 94b6954c33..0000000000 --- a/tests/bugs/modalg/bug264_6 +++ /dev/null @@ -1,32 +0,0 @@ - -puts "========" -puts "OCC264" -puts " (case 6)" -puts "========" - -restore [locate_data_file OCC264_06.brep] result -checkshape result - -tclean result -vinit -vdisplay result -vclear - -isos result 0 -triangles result - -#smallview -#fit - -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -if { $tri != 18 && $nod != 20 } { - puts "Faulty OCC264_6: here is shading problem" -} else { - puts "Shading of OCC264_6 is OK" -} - -set square 19.2399 -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug264_7 b/tests/bugs/modalg/bug264_7 deleted file mode 100755 index f129ed91c0..0000000000 --- a/tests/bugs/modalg/bug264_7 +++ /dev/null @@ -1,33 +0,0 @@ - -puts "========" -puts "OCC264" -puts " (case 7)" -puts "========" - -restore [locate_data_file OCC264_07.brep] result -checkshape result - -tclean result -vinit -vdisplay result -vclear - -isos result 0 -triangles result - -#smallview -#fit - -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -if { ($tri != 114 && $nod != 116) && ($tri != 116 && $nod != 118) } { - puts "Shady OCC264_7: here may be shading problem" -} else { - puts "Shading of OCC264_7 is OK" -} - -set square 150.283 -set 3dviewer 0 - diff --git a/tests/bugs/modalg/bug264_8 b/tests/bugs/modalg/bug264_8 deleted file mode 100755 index 0c5dada804..0000000000 --- a/tests/bugs/modalg/bug264_8 +++ /dev/null @@ -1,34 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty OCC264_8: here is shading problem" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -puts "========" -puts "OCC264" -puts " (case 8)" -puts "========" - -restore [locate_data_file OCC264_08.brep] result -checkshape result - -tclean result -vinit -vdisplay result -vclear - -isos result 0 -triangles result - -#smallview -#fit - -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -if { $tri != 19 && $nod != 21 } { - puts "Faulty OCC264_8: here is shading problem" -} else { - puts "Shading of OCC264_8 is OK" -} - -set square 0 -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug264_9 b/tests/bugs/modalg/bug264_9 deleted file mode 100755 index 7aafec0e74..0000000000 --- a/tests/bugs/modalg/bug264_9 +++ /dev/null @@ -1,34 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty OCC264_9: here is shading problem" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -puts "========" -puts "OCC264" -puts " (case 9)" -puts "========" - -restore [locate_data_file OCC264_09.brep] result -checkshape result - -tclean result -vinit -vdisplay result -vclear - -isos result 0 -triangles result - -#smallview -#fit - -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -if { $tri != 19 && $nod != 21 } { - puts "Faulty OCC264_9: here is shading problem" -} else { - puts "Shading of OCC264_9 is OK" -} - -set square 0 -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug269_1 b/tests/bugs/modalg/bug269_1 deleted file mode 100755 index db76719f71..0000000000 --- a/tests/bugs/modalg/bug269_1 +++ /dev/null @@ -1,26 +0,0 @@ - -puts "======== OCC269 ========" - -restore [locate_data_file OCC269-1.brep] result -checkshape result -isos result 0 -tclean result - -#Creating mesh -incmesh result 0.01 - -#View the result of mesh -triangles result - -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -#$tri != 8091 && $nod != 4121,aki251103 -if { $tri != 5853 && $nod != 2999 } { - puts "Shady OCC269: shading problem may be, nb tri & nod changed" -} else { - puts "Shading of OCC269 is OK" -} -set square 32.9479 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug269_2 b/tests/bugs/modalg/bug269_2 deleted file mode 100755 index f56d53058e..0000000000 --- a/tests/bugs/modalg/bug269_2 +++ /dev/null @@ -1,26 +0,0 @@ - -puts "======== OCC269 ========" - -restore [locate_data_file OCC269-2.brep] result -checkshape result -isos result 0 -tclean result - -#Creating mesh -incmesh result 0.01 - -#View the result of mesh -triangles result - -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -# $tri != 7627 && $nod != 3888,aki251103 -if { $tri != 6849 && $nod != 3498 } { - puts "Shady OCC269: shading problem may be" -} else { - puts "Shading of OCC269 is OK" -} -set square 32.9479 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug269_3 b/tests/bugs/modalg/bug269_3 deleted file mode 100755 index 0c73a2ee92..0000000000 --- a/tests/bugs/modalg/bug269_3 +++ /dev/null @@ -1,27 +0,0 @@ - -puts "======== OCC269 ========" - -restore [locate_data_file OCC269-3.brep] result -checkshape result -isos result 0 -tclean result - -#Creating mesh -incmesh result 0.01 - -#View the result of mesh -triangles result - -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -# $tri != 7524 && $nod != 3840,aki251103 -if { $tri != 6302 && $nod != 3226 } { - puts "Shady OCC269: shading problem may be, nb tri & nod changed" -} else { - puts "Shading of OCC269 is OK" -} -set square 36.4284 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug269_4 b/tests/bugs/modalg/bug269_4 deleted file mode 100755 index 434633696c..0000000000 --- a/tests/bugs/modalg/bug269_4 +++ /dev/null @@ -1,26 +0,0 @@ - -puts "======== OCC269 ========" - -restore [locate_data_file OCC269-4.brep] result -checkshape result -isos result 0 -tclean result - -#Creating mesh -incmesh result 0.01 - -#View the result of mesh -triangles result - -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -# $tri != 8362 && $nod != 4257 -if { $tri != 7218 && $nod != 3685 } { - puts "Shady OCC269: shading problem may be, nb tri & nod changed" -} else { - puts "Shading of OCC269 is OK" -} -set square 36.4284 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug2785_1 b/tests/bugs/modalg/bug2785_1 deleted file mode 100644 index 42b70ffee3..0000000000 --- a/tests/bugs/modalg/bug2785_1 +++ /dev/null @@ -1,42 +0,0 @@ -puts "============" -puts "OCC2785" -puts "============" -puts "" -###################################################### -# Cut and fuse operations for two faces that share same domain give invalid result -###################################################### -# Cut and fuse operations for two faces that share same domain gives invalid -# result, if one face has a hole and other face touches a boundary of this hole. -###################################################### -## (new topology) -## (bcut) -## (bop) -## (boptuc) -## (bfuse) -###################################################### - -############# data ############# -pcylinder c1 2 10 -pcylinder c2 2 2 -explode c1 f -explode c2 f -mksurface gs c2_1 -trim trgs gs 1 2 2 4 -mkface ff trgs -trim trgs gs 0 1 2 4 -mkface ff2 trgs - -bcut rcut1 c1_1 ff -checkshape rcut1 - -bop ff2 rcut1 -boptuc rcut2 -checkshape rcut2 - -bfuse fuse1 rcut2 ff2 -checkshape fuse1 - -bfuse result fuse1 ff - -set square 125.664 -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug2785_2 b/tests/bugs/modalg/bug2785_2 deleted file mode 100644 index 93a13db1b3..0000000000 --- a/tests/bugs/modalg/bug2785_2 +++ /dev/null @@ -1,40 +0,0 @@ -puts "============" -puts "OCC2785" -puts "============" -puts "" -###################################################### -# Cut and fuse operations for two faces that share same domain give invalid result -###################################################### -# Cut and fuse operations for two faces that share same domain gives invalid -# result, if one face has a hole and other face touches a boundary of this hole. -###################################################### -## (old topology) -## (cut) -## (fuse) -###################################################### - -############# data ############# -pcylinder c1 2 10 -pcylinder c2 2 2 -explode c1 f -explode c2 f -mksurface gs c2_1 -trim trgs gs 1 2 2 4 -mkface ff trgs -trim trgs gs 0 1 2 4 -mkface ff2 trgs - -bcut rcut1 c1_1 ff -checkshape rcut1 - -bcut rcut2 rcut1 ff2 -checkshape rcut2 - -bfuse fuse1 rcut2 ff2 -checkshape fuse1 - -bfuse result fuse1 ff - -set square 125.664 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug287 b/tests/bugs/modalg/bug287 deleted file mode 100755 index e7d41ac308..0000000000 --- a/tests/bugs/modalg/bug287 +++ /dev/null @@ -1,40 +0,0 @@ -puts "TODO OCC12345 ALL: Error : The square of result shape is" -puts "TODO OCC12345 ALL: OCC287 : Faulty" - -puts "========================" -puts " OCC287 " -puts "========================" - -restore [locate_data_file shading_170.brep] result -checkshape result - -tclean result -isos result 0 -incmesh result .1 -triangles result - -# set 3dviewer 1 - -set tri 0 -set nod 0 - -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -if { $tri != 604 && $nod != 363} { - puts " Warning: OCC287 looks like OK, but visual checking is required !!!!" -} else { - puts "OCC287 : Faulty" -} - -puts "" -puts "Besides, it is impossible to load this shape in 3D Viewer" -vinit -vdisplay result -vfit -vsetdispmode result 1 - -set square 0 -set 3dviewer 0 - diff --git a/tests/bugs/modalg/bug291 b/tests/bugs/modalg/bug291 deleted file mode 100755 index e73a69e18a..0000000000 --- a/tests/bugs/modalg/bug291 +++ /dev/null @@ -1,35 +0,0 @@ - -puts "================= OCC291 ===================" - -################################################################# -## Some triangles of shading mesh are outside of shape boundaries. (See attached shape). -################################################################# - -restore [locate_data_file shading_171.brep] result -checkshape result - -tclean result -vinit -vdisplay result -vsetdispmode result 1 -vfit - -isos result 0 -triangles result - - set tri 0 - set nod 0 -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -#$tri == 395 && $nod == 350,aki251103. -if { $tri == 382 && $nod == 343 } { - puts " Warning: OCC291 looks like OK, but visual checking is required !" -} else { - puts " Shady OCC291 : nb tri & nod changed" -} - -set square 376.873 -set only_screen 1 - diff --git a/tests/bugs/modalg/bug292 b/tests/bugs/modalg/bug292 deleted file mode 100755 index e9b2f8a58b..0000000000 --- a/tests/bugs/modalg/bug292 +++ /dev/null @@ -1,36 +0,0 @@ - -puts "========================" -puts " OCC292 " -puts "========================" -puts "" -################################################################# -## Attached face looks as unclosed but command "checkshape" concludes that it is valid. Inspite of that, -## mesh for shading is not creating on this face. -################################################################# - -restore [locate_data_file OCC292.brep] result -checkshape result - -tclean result -vinit -vdisplay result -vsetdispmode result 1 - -isos result 0 -triangles result - - set tri 0 - set nod 0 -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod -if { $tri ==6 && $nod == 8} { - puts " Warning: OCC292 looks like OK, but visual checking is required !!!!" -} else { - puts " OCC292 : Faulty" -} - -set square 1.3135 -set 3dviewer 1 - - diff --git a/tests/bugs/modalg/bug293 b/tests/bugs/modalg/bug293 deleted file mode 100755 index 692dba4e36..0000000000 --- a/tests/bugs/modalg/bug293 +++ /dev/null @@ -1,69 +0,0 @@ -#by apn on master-master 03.12.2012 -#puts "TODO OCC12345 ALL: An exception was caught" -#puts "TODO OCC12345 ALL: \\*\\* Exception *\\*\\*.*" -#puts "TODO OCC12345 ALL: TEST INCOMPLETE" - -puts "================" -puts "OCC293" -puts "================" -puts "" - -restore [locate_data_file OCC293.brep] a -tclean a -checkshape a - -vinit -#vdisplay a -#vfit - -renamevar a edge -explode edge e - -renamevar edge face -explode face f - -chamf result1 face edge_26 face_5 A 1 45 -checkshape result1 - -chamf result2 face edge_30 face_5 A 1 45 -checkshape result2 - -chamf result3 face edge_34 face_5 A 1 45 -checkshape result3 - -chamf result4 face edge_39 face_5 A 1 45 -checkshape result4 - -chamf result5 face edge_35 face_5 A 1 45 -checkshape result5 - -chamf result6 face edge_31 face_5 A 1 45 -checkshape result6 - -chamf result7 face edge_27 face_5 A 1 45 -checkshape result7 - -chamf result8 face edge_24 face_5 A 1 45 -checkshape result8 - -# all contour is : -#chamf result face edge_26 face_5 A 1 45 edge_28 face_5 A 1 45 edge_30 face_5 A 1 45 edge_32 face_5 A 1 45 edge_34 face_5 A 1 45 edge_36 face_5 A 1 45 edge_38 face_5 A 1 45 edge_40 face_5 A 1 45 edge_13 face_5 A 1 45 edge_14 face_5 A 1 45 edge_39 face_5 A 1 45 edge_37 face_5 A 1 45 edge_35 face_5 A 1 45 edge_33 face_5 A 1 45 edge_31 face_5 A 1 45 edge_29 face_5 A 1 45 edge_27 face_5 A 1 45 edge_6 face_5 A 1 45 edge_4 face_5 A 1 45 edge_19 face_5 A 1 45 edge_22 face_5 A 1 45 edge_23 face_5 A 1 45 edge_24 face_5 A 1 45 edge_25 face_5 A 1 45 edge_26 face_5 A 1 45 - -#checkshape result - -vclear - -#vdisplay result1 -#vdisplay result2 -#vdisplay result3 -#vdisplay result4 -#vdisplay result5 -#vdisplay result6 -#vdisplay result7 -#vdisplay result8 -compound result1 result2 result3 result4 result5 result6 result7 result8 result -vdisplay result -vfit - -set square 9.80214e+06 -set only_screen 1 diff --git a/tests/bugs/modalg/bug295 b/tests/bugs/modalg/bug295 deleted file mode 100755 index 8c3b82f5e4..0000000000 --- a/tests/bugs/modalg/bug295 +++ /dev/null @@ -1,36 +0,0 @@ -pload QAcommands - -puts "================" -puts "OCC295" -puts "================" -puts "" -############################################################## -## Exception is raised in the GeomConvert_CompCurveToBSplineCurve -##Exception "Run-time exception error -## current exception: xalloc. No handler for exception. -## " is raised during merging to edges in DRAW with command "merge re e1 e2". -############################################################## - -restore [locate_data_file OCC295-1.brep] e1 - -set che [checkshape e1] -if { [regexp {Faulty} $che] == 1} { - puts "Faulty OCC295 (shape1): Source shape is invalid. It was detected by Checkshape command" - puts "Body of the script was NOT executed" - renamevar e1 result -} else { - puts "OCC295 OK (shape1): Source shape is valid" - restore [locate_data_file OCC295-2.brep] e2 - set che [checkshape e2] - if { [regexp {Faulty} $che] == 1} { - puts "Faulty OCC295 (shape2): Source shape is invalid. It was detected by Checkshape command" - puts "Body of the script was NOT executed" - renamevar e2 result - } else { - puts "OCC295 OK (shape2): Source shape is valid" - OCC295 result e1 e2 - } -} - -set length 19.5611 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug297_1 b/tests/bugs/modalg/bug297_1 deleted file mode 100755 index 6eeb933b57..0000000000 --- a/tests/bugs/modalg/bug297_1 +++ /dev/null @@ -1,34 +0,0 @@ - -puts "========" -puts "OCC297" -puts "========" - -vertex v1 250 250 0 -vertex v2 -250 250 0 -vertex v3 -250 -250 0 -vertex v4 250 -250 0 - -edge e1 v1 v2 -edge e2 v2 v3 -edge e3 v3 v4 -edge e4 v4 v1 - -wire w1 e1 e2 e3 e4 - -mkplane f w1 - -set x 0 -set y 0 - -set Zpoint -100 -set Zbox -30 - -halfspace hs f $x $y $Zpoint - -box b 0 0 $Zbox 150 200 200 - -bcut result b hs - -set square 179000 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug297_2 b/tests/bugs/modalg/bug297_2 deleted file mode 100755 index 9545811e51..0000000000 --- a/tests/bugs/modalg/bug297_2 +++ /dev/null @@ -1,33 +0,0 @@ - -puts "========" -puts "OCC297" -puts "========" - -vertex v1 250 250 0 -vertex v2 -250 250 0 -vertex v3 -250 -250 0 -vertex v4 250 -250 0 - -edge e1 v1 v2 -edge e2 v2 v3 -edge e3 v3 v4 -edge e4 v4 v1 - -wire w1 e1 e2 e3 e4 - -mkplane f w1 - -set x 0 -set y 0 - -set Zpoint 100 -set Zbox -30 - -halfspace hs f $x $y $Zpoint - -box b 0 0 $Zbox 150 200 200 - -bcut result b hs -set square 81000 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug297_3 b/tests/bugs/modalg/bug297_3 deleted file mode 100755 index 95b0b951f4..0000000000 --- a/tests/bugs/modalg/bug297_3 +++ /dev/null @@ -1,32 +0,0 @@ - -puts "========" -puts "OCC297" -puts "========" - -vertex v1 250 250 0 -vertex v2 -250 250 0 -vertex v3 -250 -250 0 -vertex v4 250 -250 0 - -edge e1 v1 v2 -edge e2 v2 v3 -edge e3 v3 v4 -edge e4 v4 v1 - -wire w1 e1 e2 e3 e4 - -mkplane f w1 - -set x 0 -set y 0 - -set Zpoint -100 -set Zbox -80 - -halfspace hs f $x $y $Zpoint - -box b 0 0 $Zbox 150 200 200 - -bcut result b hs -set square 144000 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug297_4 b/tests/bugs/modalg/bug297_4 deleted file mode 100755 index 9c39fd882d..0000000000 --- a/tests/bugs/modalg/bug297_4 +++ /dev/null @@ -1,32 +0,0 @@ - -puts "========" -puts "OCC297" -puts "========" - -vertex v1 250 250 0 -vertex v2 -250 250 0 -vertex v3 -250 -250 0 -vertex v4 250 -250 0 - -edge e1 v1 v2 -edge e2 v2 v3 -edge e3 v3 v4 -edge e4 v4 v1 - -wire w1 e1 e2 e3 e4 - -mkplane f w1 - -set x 0 -set y 0 - -set Zpoint 100 -set Zbox -80 - -halfspace hs f $x $y $Zpoint - -box b 0 0 $Zbox 150 200 200 - -bcut result b hs -set square 116000 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug298 b/tests/bugs/modalg/bug298 deleted file mode 100755 index 75d0e848b3..0000000000 --- a/tests/bugs/modalg/bug298 +++ /dev/null @@ -1,21 +0,0 @@ - -puts "========================" -puts " OCC298 " -puts "========================" -puts "" -################################################################# -## Exception during "tcopy" command -################################################################# - -restore [locate_data_file OCC298.brep] result -checkshape result - -if [catch {tcopy result a } result] { - puts "Faulty OCC298: function TCOPY works wrongly" -} else { - puts "OCC298 OK: function TCOPY works properly" -} - -set square 8e+100 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug2986_1 b/tests/bugs/modalg/bug2986_1 deleted file mode 100644 index 4201444734..0000000000 --- a/tests/bugs/modalg/bug2986_1 +++ /dev/null @@ -1,30 +0,0 @@ -puts "============" -puts "OCC2986" -puts "============" -puts "" -###################################################### -# Cut&fuse oprs. for 2 toroidal faces, sharing the same domain give invalid result -###################################################### -## (new topology) -## (bop) -## (bopcut) -## (bfuse) -###################################################### - -############# data ############# -ptorus p1 10 4 -explode p1 f -mksurface gs p1_1 -trim trgs gs 1 2 1 2 -mkface ff trgs -############# testing faces are: p1_1 ff ############# - -bop p1_1 ff -bopcut rcut1 -checkshape rcut1 - -bfuse result rcut1 ff - -set square 1579.81 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug2986_2 b/tests/bugs/modalg/bug2986_2 deleted file mode 100644 index a1f56647c8..0000000000 --- a/tests/bugs/modalg/bug2986_2 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC2986" -puts "============" -puts "" -###################################################### -# Cut&fuse oprs. for 2 toroidal faces, sharing the same domain give invalid result -###################################################### -## (old topology) -## (cut) -## (fuse) -###################################################### - -############# data ############# -ptorus p1 10 4 -explode p1 f -mksurface gs p1_1 -trim trgs gs 1 2 1 2 -mkface ff trgs - -bcut rcut1 p1_1 ff -checkshape rcut1 - -bfuse result rcut1 ff - -set square 1579.81 -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug300 b/tests/bugs/modalg/bug300 deleted file mode 100755 index 127517613a..0000000000 --- a/tests/bugs/modalg/bug300 +++ /dev/null @@ -1,37 +0,0 @@ - -puts "================" -puts "OCC300" -puts "================" -puts "" -################################################# -## Compsolids have no volume. #2432(SAM1380) -################################################# - -restore [locate_data_file OCC300.brep] result - -set che [checkshape result] -if { [regexp {Faulty} $che] == 1 } { - puts "Faulty OCC300: Source shape is invalid. It was detected by Checkshape command" - puts "Body of the script was NOT executed" -} else { - puts "OCC300 OK: Source shape is valid" - - set props [vprops result] - set list [split ${props}] - set listLength [llength ${list}] - if { ${listLength} < 5 } { - puts "OCC300 - Error : listLength= ${listLength}" - } - - regexp {Mass +: +([-0-9.+eE]+)} $props full volume - set maxdelta 0.000001 - if { ${volume} < ${maxdelta} } then { - puts "OCC300 - Error " - } else { - puts "OCC300 - OK" - } - puts "Volume = ${volume}" -} - -set square 750 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug302_1 b/tests/bugs/modalg/bug302_1 deleted file mode 100755 index 6ebe5393e8..0000000000 --- a/tests/bugs/modalg/bug302_1 +++ /dev/null @@ -1,21 +0,0 @@ -puts "========================" -puts " OCC302 " -puts "(case 1)" -puts "========================" -puts "" -################################################################# -## After performing command "checkbrep" to attached face I receive "Bad Orientation of Subshape" -## but I believe that orientation of this face is correct. -################################################################# - -restore [locate_data_file OCC302a.brep] result - -set che [checkshape result r] -if { [regexp {OK} $che] != 1} { - puts "Faulty OCC302 (case 1): command checkbrep works wrongly" -} else { - puts "OCC302 OK (case 1) : command checkbrep works properly" -} - -set square 271.611 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug302_2 b/tests/bugs/modalg/bug302_2 deleted file mode 100755 index c6af1775e0..0000000000 --- a/tests/bugs/modalg/bug302_2 +++ /dev/null @@ -1,21 +0,0 @@ -puts "========================" -puts " OCC302 " -puts "(case 2)" -puts "========================" -puts "" -################################################################# -## After performing command "checkbrep" to attached face I receive "Bad Orientation of Subshape" -## but I believe that orientation of this face is correct. -################################################################# - -restore [locate_data_file OCC302b.brep] result - -set che [checkshape result r] -if { [regexp {OK} $che] != 1} { - puts "Faulty OCC302 (case 2): command checkbrep works wrongly" -} else { - puts "OCC302 OK (case 2) : command checkbrep works properly" -} - -set square 1.93998 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug302_3 b/tests/bugs/modalg/bug302_3 deleted file mode 100755 index cc6d332634..0000000000 --- a/tests/bugs/modalg/bug302_3 +++ /dev/null @@ -1,21 +0,0 @@ -puts "========================" -puts " OCC302 " -puts "(case 3)" -puts "========================" -puts "" -################################################################# -## After performing command "checkshape" to attached face I receive "Bad Orientation of Subshape" -## but I believe that orientation of this face is correct. -################################################################# - -restore [locate_data_file OCC302c.brep] result - -set che [checkshape result r] -if { [regexp {OK} $che] !=1 } { - puts "Faulty OCC302 (case 3): command checkshape works wrongly" -} else { - puts "OCC302 OK (case 3) : command checkshape works properly" -} - -set square 23240.8 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug305 b/tests/bugs/modalg/bug305 deleted file mode 100755 index 18958b02e2..0000000000 --- a/tests/bugs/modalg/bug305 +++ /dev/null @@ -1,83 +0,0 @@ -puts "TODO OCC12345 ALL: Tcl Exception: result is not a topological shape!!!" -puts "TODO OCC12345 ALL: TEST INCOMPLETE" - -puts "========" -puts "OCC305" -puts "========" -puts "" -###################################################### -# BRepOffsetAPI_MakeOffset: problem with offsetting a wire -###################################################### - -puts "" -puts "Bug's attributes" -puts "################" -puts "" -puts "Customer : Telco" -puts "Channel : External" -puts "Version : 4.0" -puts "OS : IRIX" -puts "Urgency : High" -puts "Type : BUG" -puts "" -puts "Summary: BRepOffsetAPI_MakeOffset: problem with offsetting a wire" -puts "" -puts "Description:" -puts "I am attaching the brep file of a curve, obtained from intersection with a" -puts "plane. Its a planer curve and we want to offset it by the amount which" -puts "is feasible. after trying with all options we were not able to offset it." -puts "But the same wire when we read inside EUCLID3 as well as CATIA it does" -puts "the offset correctly." -puts "" -puts "" -puts "Bug's advancement" -puts "#################" -puts "" -puts "Customer version Development version" -puts "Status : CLOSED Status : CLOSED" -puts "Resolution : NOT Resolution : NOT" -puts "Leave as CLOSED NOT Leave as CLOSED NOT" -puts "" -puts "" -puts "Bug's history" -puts "#############" -puts "" -puts "------- Additional Comments From Igor NAZAROV-BUGMASTER 2002-04-19 16:21 -------" -puts "Dear Sergey," - -puts "Below you will find conclusion of JGV about thia bug" -puts "Bugmaster" -puts " This case can not be done by existing algorithm. It is mathematical" -puts "limitation: the offset may be performed only from at least C1-continuous" -puts "curve, but all the 12 edges of initial wire are based on C0-continuous" -puts "curves." -puts " I may modify the algorithm so that it splits initial edges into" -puts "C1-continuous curves, but then resulting wire will consist of too many" -puts "small edges (in our case the number of edges will increase about 100" -puts "times)." -puts " But user may obtain initial wire more smooth: when he intersects" -puts "something with a plane by command \"section\", he can add the key \"-a\"" -puts "(force approximation)." -puts "" -puts "" - -catch {pload XDE} - -restore [locate_data_file OCC305.brep] a -checkshape a - -if [catch {mkoffset result a 1 0.5 } catch_result] { - puts "Faulty OCC305 : function MKOFFSET works wrongly" -} else { - decho off - set che [checkshape result] - decho on - if { [regexp {This shape seems to be valid} $che] == 1} { - puts "OCC305 OK" - } else { - puts "Faulty OCC305" - } -} -set square 0 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug307_1 b/tests/bugs/modalg/bug307_1 deleted file mode 100755 index 2e9110ce2c..0000000000 --- a/tests/bugs/modalg/bug307_1 +++ /dev/null @@ -1,36 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_1" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -pload QAcommands - -puts "================" -puts "OCC307" -puts "SAM1265" -puts "================" -puts "" - -restore [locate_data_file OCC307.brep] f - -set che [checkshape f] -if { [regexp {Faulty} $che ] == 1} { - puts "Warning OCC307: Source shape is invalid. It was detected by Checkshape command" -} else { - puts "OCC307 OK: Source shape is valid" -} - -explode f f - -renamevar f w - -explode w w - -OCC307 result1 f_4 w_6 0 -OCC307 result2 f_5 result1 0 - -checkshape result1 -renamevar result2 result - -set square 0 -set 2dviewer 0 - - diff --git a/tests/bugs/modalg/bug307_2 b/tests/bugs/modalg/bug307_2 deleted file mode 100755 index 98fa95a354..0000000000 --- a/tests/bugs/modalg/bug307_2 +++ /dev/null @@ -1,34 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_1" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -pload QAcommands - -puts "================" -puts "OCC307" -puts "SAM1265" -puts "================" -puts "" - -restore [locate_data_file OCC307.brep] f - -set che [checkshape f] -if { [regexp {Faulty} $che] == 1} { - puts "Warning OCC307: Source shape is invalid. It was detected by Checkshape command" -} else { - puts "OCC307 OK: Source shape is valid" -} - -explode f f - -renamevar f w - -explode w w - -OCC307 result1 f_4 w_6 1 -OCC307 result2 f_5 result1 1 - -checkshape result1 -renamevar result2 result - -set square 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug315 b/tests/bugs/modalg/bug315 deleted file mode 100755 index 411b1818db..0000000000 --- a/tests/bugs/modalg/bug315 +++ /dev/null @@ -1,15 +0,0 @@ - -puts "================" -puts "OCC315" -puts "================" -puts "" - -restore [locate_data_file OCC315-1.brep] f1 -restore [locate_data_file OCC315-2.brep] f2 -checkshape f1 -checkshape f2 - -bcut result f1 f2 - -set square 58584.1 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug317 b/tests/bugs/modalg/bug317 deleted file mode 100755 index 964366bb2c..0000000000 --- a/tests/bugs/modalg/bug317 +++ /dev/null @@ -1,36 +0,0 @@ -puts "========================" -puts " OCC317 " -puts "========================" -puts "" -################################################## -## A Solid "so" is valid, whereas wire "so_5" from the solid is not valid. -################################################## - -restore [locate_data_file OCC317.brep] result - -set che [checkshape result] -if { [regexp {Faulty} $che] == 1} { - puts "Faulty OCC317: Source shape is invalid. It was detected by Checkshape command" - puts "Body of the script was NOT executed" -} else { - puts "OCC317 OK: Source shape is valid" - explode result w - - set che [checkshape result_5] - if { [regexp {Faulty} $che] == 1} { - puts "Faulty OCC317: Wire is invalid. It was detected by Checkshape command" - } else { - puts "OCC317 OK : Wire is valid." - } - - set che [checkshape result r] - if { [regexp {OK} $che] != 1 } { - puts "Faulty OCC317: Wire is invalid. It was detected by Checkshape command" - } else { - puts "OCC317 OK : Wire is valid." - } -} - -set square 2104.21 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug318 b/tests/bugs/modalg/bug318 deleted file mode 100755 index 07e02d1a59..0000000000 --- a/tests/bugs/modalg/bug318 +++ /dev/null @@ -1,22 +0,0 @@ - -puts "========================" -puts " OCC318 " -puts "========================" -puts "" -################################################## -## Checkshape works wrong with Semi-Infinite Prism (s) -################################################## - -box mb -0.5 -0.5 -0.5 1 1 1 -explode mb F -prism result mb_1 1 0 0 SemiInf - -set che [checkshape result] -if { [regexp {Faulty} $che] == 1} { - puts "Faulty OCC318: Result shape is invalid. It was detected by Checkshape command" -} else { - puts "OCC318 OK: Result shape is valid" -} - -set square 8e+100 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug322 b/tests/bugs/modalg/bug322 deleted file mode 100755 index e8e39e022d..0000000000 --- a/tests/bugs/modalg/bug322 +++ /dev/null @@ -1,29 +0,0 @@ -puts "================" -puts "OCC322" -puts "================" -puts "" - -pload QAcommands - -restore [locate_data_file OCC322.brep] a -checkshape a - -sewing result a - -vinit -vdisplay result -vfit - -set x_coord 204 -set y_coord 297 - -checkcolor $x_coord $y_coord 1 1 0 - -set x_coord 251 -set y_coord 232 - -checkcolor $x_coord $y_coord 1 1 0 - -set square 20000 -set only_screen 1 - diff --git a/tests/bugs/modalg/bug323 b/tests/bugs/modalg/bug323 deleted file mode 100755 index a2b10acc70..0000000000 --- a/tests/bugs/modalg/bug323 +++ /dev/null @@ -1,51 +0,0 @@ - -puts "================" -puts "OCC323" -puts "OCC229" -puts "================" -puts "" - -restore [locate_data_file OCC323.brep] f -explode f - -decho off -set che [checkshape f_1] -decho on - -if { [regexp {Faulty} $che ] == 1 } { - puts "Warning OCC323 (shape1): Source shape is NOT correct. It was detected by Checkshape command" -} else { - puts "OCC323 OK (shape1): Source shape is valid" -} - -decho off -set che [checkshape f_2] -decho on - -if { [regexp {Faulty} $che ] == 1 } { - puts "Warning OCC323 (shape2): Source shape is NOT correct. It was detected by Checkshape command" -} else { - puts "OCC323 OK (shape2): Source shape is valid" -} - -bsection r f_1 f_2 -checkshape r -puts [checksection r] - -decho off -set che [checkshape f_3] -decho on - -if { [regexp {Faulty} $che ] == 1 } { - puts "Warning OCC323 (shape3): Source shape is invalid. It was detected by Checkshape command" -} else { - puts "OCC323 OK (shape3): Source shape is valid" -} - -bsection result f_1 f_3 - -set length 1 -set 2dviewer 0 - - - diff --git a/tests/bugs/modalg/bug327_1 b/tests/bugs/modalg/bug327_1 deleted file mode 100755 index 6f8b0d5407..0000000000 --- a/tests/bugs/modalg/bug327_1 +++ /dev/null @@ -1,17 +0,0 @@ -puts "========================" -puts " OCC327 " -puts " case 1 " -puts "========================" - -restore [locate_data_file OCC327a.brep] result - -set che [checkshape result r] -if { [regexp {OK} $che] == 1 } { - puts " OCC327 case 1: OK" -} else { - puts " OCC327 case 1: Faulty" -} - -set square 1477.93 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug327_2 b/tests/bugs/modalg/bug327_2 deleted file mode 100755 index efc3284861..0000000000 --- a/tests/bugs/modalg/bug327_2 +++ /dev/null @@ -1,16 +0,0 @@ -puts "========================" -puts " OCC327 " -puts " case 2 " -puts "========================" - -restore [locate_data_file OCC327b.brep] result - -set che [checkshape result r] -if { [regexp {OK} $che] == 1 } { - puts " OCC327 case 2: OK" -} else { - puts " OCC327 case 2: Faulty" -} - -set square 5674.84 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug327_3 b/tests/bugs/modalg/bug327_3 deleted file mode 100755 index 4ddda576c2..0000000000 --- a/tests/bugs/modalg/bug327_3 +++ /dev/null @@ -1,16 +0,0 @@ -puts "========================" -puts " OCC327 " -puts " case 3 " -puts "========================" - -restore [locate_data_file OCC327c.brep] result - -set che [checkshape result r] -if { [regexp {OK} $che] == 1 } { - puts " OCC327 case 3: OK" -} else { - puts " OCC327 case 3: Faulty" -} - -set square 61013.8 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug327_4 b/tests/bugs/modalg/bug327_4 deleted file mode 100755 index 348483639c..0000000000 --- a/tests/bugs/modalg/bug327_4 +++ /dev/null @@ -1,18 +0,0 @@ -puts "========================" -puts " OCC327 " -puts " case 4 " -puts "========================" - -restore [locate_data_file OCC327d.brep] result - -set che [checkshape result r] -if { [regexp {OK} $che] == 1 } { - puts " OCC327 case 4: OK" -} else { - puts " OCC327 case 4: Faulty" -} - -set square 7793.26 -set 2dviewer 0 - - diff --git a/tests/bugs/modalg/bug330 b/tests/bugs/modalg/bug330 deleted file mode 100755 index bdf17c6aff..0000000000 --- a/tests/bugs/modalg/bug330 +++ /dev/null @@ -1,25 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty OCC330: Checkshape command works wrongly" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -puts "========================" -puts " OCC330 " -puts "========================" -puts "" -################################################## -## checkshape command consider the shape with incorrect order of tolerance as valid. -################################################## - -restore [locate_data_file OCC330.brep] result - -decho off -set che [checkshape result] -decho on - -if { [regexp {Faulty} $che ] != 1 } { - puts "Faulty OCC330: Checkshape command works wrongly" -} else { - puts "OCC330 OK : Checkshape command works properly" -} - -set square 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug334 b/tests/bugs/modalg/bug334 deleted file mode 100755 index 42f6932ba7..0000000000 --- a/tests/bugs/modalg/bug334 +++ /dev/null @@ -1,17 +0,0 @@ - -puts "============" -puts "BUC60928" -puts "OCC334" -puts "============" - -restore [locate_data_file BUC60928.brep] a - -explode a -checkshape a_1 -checkshape a_2 - -bcut result a_2 a_1 - -set square 358258 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug335 b/tests/bugs/modalg/bug335 deleted file mode 100755 index cd19995f86..0000000000 --- a/tests/bugs/modalg/bug335 +++ /dev/null @@ -1,20 +0,0 @@ - -puts "============" -puts "BUC60931" -puts "OCC335" -puts "============" -puts "" -################################################################################# -## It's impossible to make boolean operations (common)for the two solids in the file attached. Samcef Modeler project bug -################################################################################# - -restore [locate_data_file BUC60931.brep] a - -explode a -checkshape a_1 -checkshape a_2 - -bcommon result a_1 a_2 - -set square 22715.9 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug336 b/tests/bugs/modalg/bug336 deleted file mode 100755 index a61d42abae..0000000000 --- a/tests/bugs/modalg/bug336 +++ /dev/null @@ -1,16 +0,0 @@ - -puts "============" -puts "BUC60939" -puts "OCC336" -puts "============" - -restore [locate_data_file BUC60939.brep] a - -explode a -checkshape a_1 -checkshape a_2 - -bfuse result a_1 a_2 - -set square 32903.1 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug337 b/tests/bugs/modalg/bug337 deleted file mode 100755 index 0d821463b4..0000000000 --- a/tests/bugs/modalg/bug337 +++ /dev/null @@ -1,37 +0,0 @@ - -puts "================" -puts "OCC337" -puts "================" -puts "" -############################################ -## It's impossible to fuse two solids in the file attached. -############################################ - -restore [locate_data_file OCC337_clone1.brep] a -explode a - -set che [checkshape a_1] - -if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty OCC337 (shape 1): Source shape is invalid. It was detected by Checkshape command" - puts "Body of the script was NOT executed" - renamevar a_1 result -} else { - puts "OCC337 OK (shape 1): Source shape is valid" - set che [checkshape a_2] - if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty OCC337 (shape 2): Source shape is invalid. It was detected by Checkshape command" - puts "Body of the script was NOT executed" - renamevar a_2 result - } else { - puts "OCC337 OK (shape 2): Source shape is valid" - bfuse result a_1 a_2 - } -} - -set square 35009.9 -set 2dviewer 0 - - - - diff --git a/tests/bugs/modalg/bug338 b/tests/bugs/modalg/bug338 deleted file mode 100755 index 6531b2f515..0000000000 --- a/tests/bugs/modalg/bug338 +++ /dev/null @@ -1,18 +0,0 @@ - -puts "========" -puts "BUC60996" -puts "OCC338" -puts "========" -puts "" - -restore [locate_data_file buc60996.brep] b -explode b -checkshape b_1 -checkshape b_2 - -bfuse f1 b_1 b_2 -checkshape f1 -bfuse result b_2 b_1 - -set square 73561.9 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug340 b/tests/bugs/modalg/bug340 deleted file mode 100755 index 1ed717a5d3..0000000000 --- a/tests/bugs/modalg/bug340 +++ /dev/null @@ -1,13 +0,0 @@ - -puts "========" -puts "BUC61005" -puts "OCC340" -puts "========" -puts "" - -restore [locate_data_file buc61005.brep] w -checkshape w -revol result w 0 0 0 0 0 1 360 1 - -set square 55795.4 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug341 b/tests/bugs/modalg/bug341 deleted file mode 100755 index 12cf04e767..0000000000 --- a/tests/bugs/modalg/bug341 +++ /dev/null @@ -1,15 +0,0 @@ - -puts "========" -puts "BUC61008" -puts "OCC341" -puts "========" -puts "" - -restore [locate_data_file buc61008.brep] w -checkshape w - -mkplane f w -prism result f 0 0 100 - -set square 24991 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug345 b/tests/bugs/modalg/bug345 deleted file mode 100755 index 0098a5c926..0000000000 --- a/tests/bugs/modalg/bug345 +++ /dev/null @@ -1,16 +0,0 @@ - -puts "================" -puts "BUC61048" -puts "OCC345" -puts "================" -puts "" -############################################ -## Command sameparametr in DRAW hangs on attached edge. -############################################ - -restore [locate_data_file OCC345.brep] result - -sameparameter result -set length 3.89067 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug347_1 b/tests/bugs/modalg/bug347_1 deleted file mode 100755 index 3471512529..0000000000 --- a/tests/bugs/modalg/bug347_1 +++ /dev/null @@ -1,31 +0,0 @@ - -puts "========================" -puts " BUC60959 " -puts " OCC347 " -puts " (case 1) " -puts "========================" - -restore [locate_data_file OCC347a.brep] result -checkshape result - -tclean result -vinit -vdisplay result -vfit -vsetdispmode result 1 -set 3dviewer 1 - -set tri 0 -set nod 0 -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -if { $tri == 72 && $nod == 74} { - puts " OCC347 case 1: OK" -} else { - puts " OCC347 case 1: Faulty" -} - -set square 314.159 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug347_2 b/tests/bugs/modalg/bug347_2 deleted file mode 100755 index 635521d079..0000000000 --- a/tests/bugs/modalg/bug347_2 +++ /dev/null @@ -1,32 +0,0 @@ - -puts "========================" -puts " BUC60959 " -puts " OCC347 " -puts " (case 2) " -puts "========================" - -restore [locate_data_file OCC347b.brep] result -checkshape result - -tclean result -vinit -vdisplay result -vfit -vsetdispmode result 1 -set 3dviewer 1 - -set tri 0 -set nod 0 -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -if { $tri == 71 && $nod == 73} { - puts " OCC347 case 2: OK" -} else { - puts " OCC347 case 2: Faulty" -} - -set square 100.531 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug356 b/tests/bugs/modalg/bug356 deleted file mode 100755 index 86563ed5d4..0000000000 --- a/tests/bugs/modalg/bug356 +++ /dev/null @@ -1,36 +0,0 @@ - -puts "================" -puts "OCC356" -puts "================" -puts "" -####################################################### -## The Draw command "wexplo" gives one edge instead of 6 for the face. -####################################################### - -restore [locate_data_file OCC356.brep] result -checkshape result - -explode result w - -wexplo result_1 result - -set nom 0 -set j 1 -repeat 10 { - set err "" - regexp { is a shape ([A-Z]+)} [whatis WEDGE_$j] full err - if { $err != "EDGE"} { - break - } else { - set nom [expr $nom + 1] - } - incr j -} -if { $nom != 6} { - puts "Faulty OCC356 : Command WEXPLO works WRONGLY" -} else { - puts "OCC356 OK : Command WEXPLO works properly" -} - -set square 6207.83 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug357 b/tests/bugs/modalg/bug357 deleted file mode 100755 index 6477a5567c..0000000000 --- a/tests/bugs/modalg/bug357 +++ /dev/null @@ -1,20 +0,0 @@ - -puts "========" -puts "OCC357" -puts "BUC60970" -puts "========" - -restore [locate_data_file buc60970a.brep] a -checkshape a -## small/brep/OCC358a.brep - second shape -restore [locate_data_file OCC358a.brep] b -checkshape b - -if { [catch { pipe result a b } catch_result] } { - puts "$catch_result" -} - -set square 44761.1 -set 2dviewer 0 - - diff --git a/tests/bugs/modalg/bug358 b/tests/bugs/modalg/bug358 deleted file mode 100755 index 086df9f7b2..0000000000 --- a/tests/bugs/modalg/bug358 +++ /dev/null @@ -1,40 +0,0 @@ -puts "========================" -puts " BUC60977 " -puts " OCC358 " -puts "========================" -##### -puts "The helical pipe is not shaded in AISViewer" -##### - -restore [locate_data_file OCC358a.brep] f -checkshape f - -restore [locate_data_file OCC358b.brep] w -checkshape w - -pipe result w f - -vinit -vdisplay result -vfit -vsetdispmode result 1 -# checkshape res -# maxtolerance res - -set tri 0 -set nod 0 - -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -if { $tri == 12966 && $nod == 6896} { - puts " OCC358 looks like OK" -} else { - puts [format " tri= %s nod= %s " $tri $nod] - puts " OCC358 : Shady (bad shading)" -} - -set square 24861.2 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug369 b/tests/bugs/modalg/bug369 deleted file mode 100644 index c514c42830..0000000000 --- a/tests/bugs/modalg/bug369 +++ /dev/null @@ -1,20 +0,0 @@ -pload QAcommands - -puts "========" -puts "OCC369" -puts "BUC61031" -puts "========" -puts "" -################################################################# -## BndLib_Add3dCurve raised an exception on edges which range is out of the domain of the curve. -################################################################# - -restore [locate_data_file OCC369.brep] result -OCC369 result - -set square 0.077223 -set 2dviewer 0 - - - - diff --git a/tests/bugs/modalg/bug395 b/tests/bugs/modalg/bug395 deleted file mode 100755 index 338806cbe7..0000000000 --- a/tests/bugs/modalg/bug395 +++ /dev/null @@ -1,37 +0,0 @@ -pload QAcommands - -puts "================" -puts "OCC395" -puts "SAM1296" -puts "================" -puts "" -############################################################## -## After merge two edges with help GeomConvert_CompCurveToBSplineCurve result is bad. -############################################################## - -restore [locate_data_file OCC395-1.brep] e1 - -set che [checkshape e1] -if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty OCC395: Source shape is invalid. It was detected by Checkshape command" - puts "Body of the script was NOT executed" - renamevar e1 result -} else { - puts "OCC395 OK: Source shape is valid" - - restore [locate_data_file OCC395-2.brep] e2 - set che [checkshape e2] - if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty OCC395: Source shape is invalid. It was detected by Checkshape command" - puts "Body of the script was NOT executed" - renamevar e2 result - } else { - puts "OCC395 OK: Source shape is valid" - OCC395 result e1 e2 - } -} - -set length 34.9073 -set 2dviewer 0 - - diff --git a/tests/bugs/modalg/bug397 b/tests/bugs/modalg/bug397 deleted file mode 100755 index 63aed4de49..0000000000 --- a/tests/bugs/modalg/bug397 +++ /dev/null @@ -1,33 +0,0 @@ -puts "========================" -puts " OCC397 " -puts "========================" - -pload QAcommands - -restore [locate_data_file OCC397.brep] a -checkshape a - -tclean a -explode a f -renamevar a_55 result - -vinit -vdisplay result -vfit -vsetdispmode result 1 - -set x_coord 235 -set y_coord 180 - -checkcolor $x_coord $y_coord 0.5 0.35 0.05 - -if { ${stat} != 1 } { - puts "Error : Shading is missing in 3D Viewer" -} - -vselect 220 170 - -set square 92.9029 -set only_screen 1 - - diff --git a/tests/bugs/modalg/bug397_1 b/tests/bugs/modalg/bug397_1 deleted file mode 100755 index 2df65432f6..0000000000 --- a/tests/bugs/modalg/bug397_1 +++ /dev/null @@ -1,37 +0,0 @@ -puts "TODO OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO OCC11111 ALL: Error : Result shape is WRONG" -puts "TODO OCC11111 ALL: Error : The square of result shape is" - -puts "================" -puts "OCC397" -puts "================" -puts "" -####################################################################################### -# One face from IGES is not shaded -###################################################################################### - -set BugNumber OCC8370 - -catch { pload XDE } - -igesread [locate_data_file Amino_komatsu.igs] result * - -set square 25310.8 - -set nb_v_good 5060 -set nb_e_good 5105 -set nb_w_good 416 -set nb_f_good 399 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 10981 - -vinit -tclean result -vsetdispmode 1 -vdisplay result -vfit - -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug398 b/tests/bugs/modalg/bug398 deleted file mode 100755 index 829c95cb9e..0000000000 --- a/tests/bugs/modalg/bug398 +++ /dev/null @@ -1,24 +0,0 @@ -#INTERFACE IGES -puts "========" -puts "OCC398" -puts "========" -puts "" -############################################################# -## ShapeHealing modification 1:1 increases number of unique shapes in compound structure. -############################################################# - -pload XDE - -restore [locate_data_file OCC398.brep] a -#statsh a -#nbshapes a -#Statshape should give 3 solids -#Nbshape should return 1 solid - -scaleshape result a 10 - -#statsh res - -set nb_sol_good 1 -set square 180000. -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug399 b/tests/bugs/modalg/bug399 deleted file mode 100755 index 1a4f9fc8b0..0000000000 --- a/tests/bugs/modalg/bug399 +++ /dev/null @@ -1,29 +0,0 @@ -if { [array get env os_type] != "" } { - set os $env(os_type) -} -if { [string compare $os "windows"] != 0 } { - puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_2" - puts "TODO OCC12345 ALL: Faulty OCC399: Command checkshape works wrongly: Source shape is invalid but this shape must be OK" -### by apn master 16.12.2012 -### puts "TODO OCC12345 ALL: Error : The square of result shape is" -} - -puts "========" -puts "OCC399" -puts "========" -puts "" -######################################### -## Checkshape gives wrong result for valid face -######################################### - -restore [locate_data_file OCC399.brep] result - -set che [checkshape result] -if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty OCC399: Command checkshape works wrongly: Source shape is invalid but this shape must be OK" -} else { - puts "OCC399 OK : Source shape is valid. Command checkshape works properly." -} - -set square 4558.53 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug400 b/tests/bugs/modalg/bug400 deleted file mode 100644 index fcdc4131a4..0000000000 --- a/tests/bugs/modalg/bug400 +++ /dev/null @@ -1,31 +0,0 @@ -puts "TODO OCC11111 ALL: OCC358 : Faulty" -puts "TODO OCC11111 ALL: Error : The square of result shape is" - -puts "========================" -puts " OCC400 " -puts "========================" - -restore [locate_data_file OCC400.brep] result - -tclean result -isos result 0 - -vinit -vdisplay result -vfit -vsetdispmode result 1 - -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -if { $tri == 66 && $nod ==70} { - puts " Warning: OCC358 looks like OK, but visual checking is required !!!!" -} else { - puts "OCC358 : Faulty , but visual checking is required !!!!" -} - -set square 0 -set 3dviewer 1 - - diff --git a/tests/bugs/modalg/bug400_1 b/tests/bugs/modalg/bug400_1 deleted file mode 100755 index 7b3819a08a..0000000000 --- a/tests/bugs/modalg/bug400_1 +++ /dev/null @@ -1,31 +0,0 @@ -puts "========================" -puts "OCC400" -puts "========================" -puts "" -####################################################################### -# Wrong triangulation of faces -####################################################################### - -set BugNumber OCC400 - -restore [locate_data_file OCC400.brep] result - -set square 6607.38 - -set nb_v_good 26 -set nb_e_good 26 -set nb_w_good 2 -set nb_f_good 2 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 57 - -vinit -tclean result -vsetdispmode 1 -vdisplay result -vfit - -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug405 b/tests/bugs/modalg/bug405 deleted file mode 100644 index 612f2ba75c..0000000000 --- a/tests/bugs/modalg/bug405 +++ /dev/null @@ -1,27 +0,0 @@ -pload QAcommands - -puts "================" -puts "OCC405" -puts "OCC435" -puts "SAM1296" -puts "================" -puts "" - -restore [locate_data_file OCC395-1.brep] e1 -restore [locate_data_file OCC405-2.brep] e2 - -checkshape e1 -checkshape e2 - -OCC405 result e1 e2 - -regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection result] full num - -if { $num == 2 } { - puts "OCC405 OK : Result shape is CORRECT !!! " -} else { - puts " Faulty OCC405: Result shape is INcorrect !!! " -} - -set length 17.5348 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug406 b/tests/bugs/modalg/bug406 deleted file mode 100755 index 57f14706c3..0000000000 --- a/tests/bugs/modalg/bug406 +++ /dev/null @@ -1,23 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty OCC406: Command checkshape works wrongly: Source shape looks invalid" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -puts "========" -puts "OCC406" -puts "========" -puts "" -######################################### -## Checkshape says face is Ok, but it looks invalid -######################################### - -restore [locate_data_file OCC406.brep] result - -set che [checkshape result] - -if { [regexp {Faulty} $che ] != 1 } { - puts "Faulty OCC406: Command checkshape works wrongly: Source shape looks invalid" -} else { - puts "OCC406 OK : Source shape is invalid. Command checkshape works properly." -} - -set square 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug407_1 b/tests/bugs/modalg/bug407_1 deleted file mode 100755 index 17da337994..0000000000 --- a/tests/bugs/modalg/bug407_1 +++ /dev/null @@ -1,18 +0,0 @@ - -puts "========================" -puts " OCC407 " -puts "(case 1)" -puts "========================" -puts "" - -pcylinder b1 1 4 -pcylinder b2 1 4 -trotate b2 0 0 2 1 0 0 90 -trotate b2 0 0 2 0 1 0 60 - -bfuse result b2 b1 -checkshape -top result - -set square 46.8319 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug407_2 b/tests/bugs/modalg/bug407_2 deleted file mode 100755 index 3d925fce6b..0000000000 --- a/tests/bugs/modalg/bug407_2 +++ /dev/null @@ -1,18 +0,0 @@ - -puts "========================" -puts " OCC407 " -puts "(case 2)" -puts "========================" -puts "" - -pcylinder b1 1 4 -pcylinder b2 1 4 -trotate b2 0 0 2 1 0 0 90 -trotate b2 0 0 2 0 1 0 60 - -bcut result b2 b1 -checkshape -top result - -set square 31.4159 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug409 b/tests/bugs/modalg/bug409 deleted file mode 100755 index f7e42168cf..0000000000 --- a/tests/bugs/modalg/bug409 +++ /dev/null @@ -1,16 +0,0 @@ - -puts "========================" -puts " OCC409 " -puts "========================" -puts "" - -restore [locate_data_file f2] b1 -checkshape b1 - -restore [locate_data_file f6] b2 -checkshape b2 - -bcommon result b1 b2 - -set square 45.5929 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug410_1 b/tests/bugs/modalg/bug410_1 deleted file mode 100755 index 80d03e0dc2..0000000000 --- a/tests/bugs/modalg/bug410_1 +++ /dev/null @@ -1,17 +0,0 @@ - -puts "========================" -puts " OCC410 " -puts "(case 1)" -puts "========================" -puts "" - -restore [locate_data_file f7] b1 -checkshape b1 - -restore [locate_data_file f3] b2 -checkshape b2 - -bcommon result b1 b2 - -set square 63.4508 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug410_2 b/tests/bugs/modalg/bug410_2 deleted file mode 100755 index 3e4a1d3bda..0000000000 --- a/tests/bugs/modalg/bug410_2 +++ /dev/null @@ -1,18 +0,0 @@ - -puts "========================" -puts " OCC410 " -puts "(case 2)" -puts "========================" -puts "" - -restore [locate_data_file f7] b1 -checkshape b1 - -restore [locate_data_file f3] b2 -checkshape b2 - -bfuse result b1 b2 - -set square 172.169 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug410_3 b/tests/bugs/modalg/bug410_3 deleted file mode 100755 index 15426fb5a4..0000000000 --- a/tests/bugs/modalg/bug410_3 +++ /dev/null @@ -1,17 +0,0 @@ - -puts "========================" -puts " OCC410 " -puts "(case 3)" -puts "========================" -puts "" - -restore [locate_data_file f7] b1 -checkshape b1 - -restore [locate_data_file f3] b2 -checkshape b2 - -bcut result b1 b2 - -set square 15.0891 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug410_4 b/tests/bugs/modalg/bug410_4 deleted file mode 100755 index 7e71d71212..0000000000 --- a/tests/bugs/modalg/bug410_4 +++ /dev/null @@ -1,22 +0,0 @@ - -puts "========================" -puts " OCC410 " -puts "(case 4)" -puts "========================" -puts "" - -restore [locate_data_file f7] b1 -checkshape b1 - -restore [locate_data_file f3] b2 -checkshape b2 - - -if [catch {bcut result b2 b1 } result] { - puts "Faulty OCC410: function CUT works wrongly" -} else { - puts " OCC410 OK: function CUT works properly" -} - -set square 93.6289 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug411 b/tests/bugs/modalg/bug411 deleted file mode 100755 index f409769c0f..0000000000 --- a/tests/bugs/modalg/bug411 +++ /dev/null @@ -1,16 +0,0 @@ - -puts "========================" -puts " OCC411 " -puts "========================" -puts "" - -restore [locate_data_file f4] b1 -checkshape b1 - -restore [locate_data_file f5] b2 -checkshape b2 - -bfuse result b1 b2 - -set square 314.159 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug412 b/tests/bugs/modalg/bug412 deleted file mode 100755 index 613ffa282a..0000000000 --- a/tests/bugs/modalg/bug412 +++ /dev/null @@ -1,16 +0,0 @@ - -puts "========================" -puts " OCC412 " -puts "========================" -puts "" - -restore [locate_data_file f2] b1 -checkshape b1 - -restore [locate_data_file f3] b2 -checkshape b2 - -bcut result b1 b2 - -set square 43.6332 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug413_1 b/tests/bugs/modalg/bug413_1 deleted file mode 100755 index 1d86ff3986..0000000000 --- a/tests/bugs/modalg/bug413_1 +++ /dev/null @@ -1,17 +0,0 @@ - -puts "========================" -puts " OCC413 " -puts "(case 1)" -puts "========================" -puts "" - -restore [locate_data_file so1] b1 -checkshape b1 - -restore [locate_data_file so4] b2 -checkshape b2 - -bcommon result b1 b2 - -set square 549.779 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug413_2 b/tests/bugs/modalg/bug413_2 deleted file mode 100755 index 09c35acdfc..0000000000 --- a/tests/bugs/modalg/bug413_2 +++ /dev/null @@ -1,17 +0,0 @@ - -puts "========================" -puts " OCC413 " -puts "(case 2)" -puts "========================" -puts "" - -restore [locate_data_file so1] b1 -checkshape b1 - -restore [locate_data_file so4] b2 -checkshape b2 - -bcut result b1 b2 - -set square 863.938 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug415 b/tests/bugs/modalg/bug415 deleted file mode 100755 index ed71398f33..0000000000 --- a/tests/bugs/modalg/bug415 +++ /dev/null @@ -1,32 +0,0 @@ - -puts "========================" -puts " OCC415 " -puts "PRO5557" -puts "========================" -puts "" - -restore [locate_data_file pro5557_revol.brep] revol1 -checkshape revol1 -restore [locate_data_file pro5557_bsurf.brep] bsurf2 -checkshape bsurf2 - -zoom 660 -normals bsurf2 0.27 -point pnt1 0 -0.3 0 -halfspace space2 bsurf2 0 -0.3 0 - -bcut result revol1 space2 - -set testinfos(info) \ - "pro5557 : cut a cylinder by an infinite surface extrusion" -set testinfos(infoX) -0.2 -set testinfos(infoY) -0.2 -set testinfos(infoZ) -0.34 -set testinfos(infoZ2) -0.3 - -checkshape -top result - -set square 0.402138 -set 2dviewer 0 - - diff --git a/tests/bugs/modalg/bug416 b/tests/bugs/modalg/bug416 deleted file mode 100755 index 82e9091d50..0000000000 --- a/tests/bugs/modalg/bug416 +++ /dev/null @@ -1,21 +0,0 @@ - -puts "========================" -puts " OCC416 " -puts "CTS19305" -puts "========================" -puts "" - -restore [locate_data_file CTO900_cts19305-part.rle] part -checkshape part - -restore [locate_data_file CTO900_cts19305-tool.rle] tool -checkshape tool - -bcut result part tool - -checkshape -top result - -set square 76632.9 -set 2dviewer 0 - - diff --git a/tests/bugs/modalg/bug417 b/tests/bugs/modalg/bug417 deleted file mode 100755 index 4fc8bbce44..0000000000 --- a/tests/bugs/modalg/bug417 +++ /dev/null @@ -1,17 +0,0 @@ - -puts "========================" -puts " OCC417 " -puts "CTS21128" -puts "========================" -puts "" - -restore [locate_data_file cts21128c.rle] c -checkshape c - -restore [locate_data_file cts21128d.rle] d -checkshape d - -bcut result c d - -set square 2814.01 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug418_1 b/tests/bugs/modalg/bug418_1 deleted file mode 100755 index 5eca381a1a..0000000000 --- a/tests/bugs/modalg/bug418_1 +++ /dev/null @@ -1,22 +0,0 @@ - -puts "========================" -puts " OCC418 " -puts "CTS20370" -puts "(case 1)" -puts "========================" -puts "" - -restore [locate_data_file CTO904_cts20370-part.rle] part -checkshape part - -restore [locate_data_file cts20370-tool.rle] tool -checkshape tool - -bsection sec part tool -checkshape -top sec - -bcut result part tool -checkshape -top result - -set square 273365. -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug418_2 b/tests/bugs/modalg/bug418_2 deleted file mode 100755 index 4ddd04b4c8..0000000000 --- a/tests/bugs/modalg/bug418_2 +++ /dev/null @@ -1,22 +0,0 @@ - -puts "========================" -puts " OCC418 " -puts "CTS20370" -puts "(case 2)" -puts "========================" -puts "" - -restore [locate_data_file CTO904_cts20370-part.rle] a -checkshape a - -restore [locate_data_file cts20370-tool.rle] b -checkshape b - -bsection sec a b - -bfuse result a b -checkshape -top result - -set square 261265. -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug419 b/tests/bugs/modalg/bug419 deleted file mode 100755 index dc8e9d4a15..0000000000 --- a/tests/bugs/modalg/bug419 +++ /dev/null @@ -1,22 +0,0 @@ -# Original bug : - -puts "========================" -puts " OCC419 " -puts "FRA50047" -puts "========================" -puts "" - -restore [locate_data_file CTO904_fra50047a.rle] a -checkshape a - -restore [locate_data_file fra50047b.rle] b -checkshape b - -bsection sec a b -checkshape -top sec - -bfuse result a b -checkshape -top result - -set square 508496. -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug420 b/tests/bugs/modalg/bug420 deleted file mode 100755 index 580852589e..0000000000 --- a/tests/bugs/modalg/bug420 +++ /dev/null @@ -1,25 +0,0 @@ -puts "TODO OCC12345 ALL: Error : The square of result shape is" -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" - -puts "========================" -puts " OCC420 " -puts "PRO12473" -puts "========================" -puts "" - -restore [locate_data_file CTO909_objects.brep] a -checkshape a - -restore [locate_data_file CTO909_tool_4.brep] b -checkshape b - -bsection sec a b -puts [checksection sec] -checkshape sec -explode a so -renamevar a_1 a - -bcut result a b - -set square 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug421 b/tests/bugs/modalg/bug421 deleted file mode 100755 index b8be0ec45c..0000000000 --- a/tests/bugs/modalg/bug421 +++ /dev/null @@ -1,18 +0,0 @@ - -puts "========================" -puts " OCC421 " -puts "========================" -puts "" - -profile p c 5 180 l 5 t 0 5 d -1 0 c 5 180 l 5 -polyline w 0 0 0 0 0 10 -pipe p w p -nexplode p f - -depouille result p 0 0 1 p_1 5 0 0 0 0 0 1 \ -p_7 1 0 0 0 0 0 1 \ -p_8 5 0 0 0 0 0 1 \ -p_2 1 0 0 0 0 0 1 - -set square 659.647 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug422_1 b/tests/bugs/modalg/bug422_1 deleted file mode 100755 index e7cb936edb..0000000000 --- a/tests/bugs/modalg/bug422_1 +++ /dev/null @@ -1,19 +0,0 @@ - -puts "========================" -puts " OCC422 " -puts "(case 1)" -puts "========================" -puts "" - -plane p 0 0 0 0 0 1 -1 0 0 -psphere p p 20 0 90 -#profile pf o -4 -4 1 l 8 d 0 1 l 8 d -1 0 l 8 -profile pf o -4 -4 1 l 8 c 2 90 l 8 d -1 0 l 8 -prism p2 pf 0 0 40 -bfuse f p p2 -nexplode f f - -depouille result f 0 0 1 f_7 5 0 0 40 0 0 1 - -set square 4630.78 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug422_2 b/tests/bugs/modalg/bug422_2 deleted file mode 100755 index f5a230891d..0000000000 --- a/tests/bugs/modalg/bug422_2 +++ /dev/null @@ -1,19 +0,0 @@ - -puts "========================" -puts " OCC422 " -puts "(case 2)" -puts "========================" -puts "" - -plane ps 10 -3 0 1 0 0 0 .2 1 -psphere ps ps 20 -profile pf o 5 1 5 l 10 c 2 90 l 5 d -1 0 \ -l 14 d 0 -1 l 5 c 2 90 -prism pr pf 0 0 30 -bfuse f ps pr -nexplode f f - -depouille result f 0 0 1 f_4 4 0 0 30 0 0 1 - -set square 5719.09 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug423_1 b/tests/bugs/modalg/bug423_1 deleted file mode 100755 index be5b56e832..0000000000 --- a/tests/bugs/modalg/bug423_1 +++ /dev/null @@ -1,27 +0,0 @@ - -puts "========================" -puts " OCC423 " -puts "(case 1)" -puts "========================" -puts "" - -restore [locate_data_file cylindre.rle] cyl -checkshape cyl - -restore [locate_data_file contour.rle] cont -checkshape cont - -mkplane cont cont -nexplode cyl F - -ttranslate cont 0 200 0 -featdprism cyl cont cont 10 1 1 - -if [catch {featperformval dprism result 55 cyl_3 } catch_result] { - puts "Faulty OCC423 (case 1): function FEATPERFORMVAL works wrongly" -} else { - puts "OCC423 OK (case 1): function FEATPERFORMVAL works properly" -} - -set square 94944.4 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug423_2 b/tests/bugs/modalg/bug423_2 deleted file mode 100755 index b56c0977d0..0000000000 --- a/tests/bugs/modalg/bug423_2 +++ /dev/null @@ -1,23 +0,0 @@ - -puts "========================" -puts " OCC423 " -puts "(case 2)" -puts "========================" -puts "" - -restore [locate_data_file pro15515_base.rle] base -checkshape base - -restore [locate_data_file pro15515_face.rle] cont -checkshape cont - -explode base face -copy base_4 ffrom -copy base_3 funtil - -### From Until -featrevol base cont cont 54.06494140625 70.2841796875 0 0 0 1 1 1 -featperform revol result funtil ffrom - -set square 560028. -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug424_1 b/tests/bugs/modalg/bug424_1 deleted file mode 100755 index 81ed440127..0000000000 --- a/tests/bugs/modalg/bug424_1 +++ /dev/null @@ -1,21 +0,0 @@ - -puts "========================" -puts " OCC424 " -puts "(case 1)" -puts "========================" -puts "" - -restore [locate_data_file CFE_e_lonfzx.rle] E -nexplode E f - -profile cont S E_10 F 50 -100 X 50 Y -100 X -50 -featdprism E cont E_10 10 1 1 - -if [catch {featperform dprism result E_5 E_6 } catch_result] { - puts "Faulty OCC424 (case 1): function FEATPERFORM works wrongly" -} else { - puts "OCC424 OK (case 1): function FEATPERFORM works properly" -} - -set square 978236. -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug424_2 b/tests/bugs/modalg/bug424_2 deleted file mode 100755 index 4c46214524..0000000000 --- a/tests/bugs/modalg/bug424_2 +++ /dev/null @@ -1,21 +0,0 @@ - -puts "========================" -puts " OCC424 " -puts "(case 2)" -puts "========================" -puts "" - -restore [locate_data_file CFE_e_lonfzx.rle] E -nexplode E f - -profile cont S E_10 F 50 -100 X 50 Y -100 X -50 -featdprism E cont E_10 10 1 1 - -if [catch {featperform dprism result } catch_result] { - puts "Faulty OCC424 (case 2): function FEATPERFORM works wrongly" -} else { - puts "OCC424 OK (case 2): function FEATPERFORM works properly" -} - -set square 978236. -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug426 b/tests/bugs/modalg/bug426 deleted file mode 100755 index 7f335447f8..0000000000 --- a/tests/bugs/modalg/bug426 +++ /dev/null @@ -1,34 +0,0 @@ -if {[array get env os_type] != ""} { - set os $env(os_type) -} -if {[string compare $os "windows"] != 0 } { - puts "TODO OCC12345 ALL: Exception" - puts "TODO OCC12345 ALL: An exception was caught" - puts "TODO OCC12345 ALL: TEST INCOMPLETE" -} - -pload QAcommands - -puts "========" -puts "OCC426" -puts "OCC50" -puts "========" -############################################################################# -## The result of fuse operation is invalid -############################################################################# -## BRepFilletAPI_MakeFillet presents a bug on fillet computation (build()) -############################################################################# -## (old topology) -############################################################################# - -OCC426 result rs1 rs2 rs3 fuse32 fuse321 0 - -checkshape rs1 -checkshape rs2 -checkshape rs3 -checkshape fuse32 -checkshape fuse321 - -set square 7507.61 -set 2dviewer 1 - diff --git a/tests/bugs/modalg/bug426_1 b/tests/bugs/modalg/bug426_1 deleted file mode 100644 index a6b43d1b9f..0000000000 --- a/tests/bugs/modalg/bug426_1 +++ /dev/null @@ -1,26 +0,0 @@ -puts "TODO OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO OCC11111 ALL: Error : The square of result shape is" - -pload QAcommands - -puts "========" -puts "OCC426" -puts "OCC50" -puts "========" -############################################################################# -## The result of fuse operation is invalid -############################################################################# -## BRepFilletAPI_MakeFillet presents a bug on fillet computation (build()) -############################################################################# - -OCC426 result rs1 rs2 rs3 fuse32 fuse321 - -checkshape rs1 -checkshape rs2 -checkshape rs3 -checkshape fuse32 -checkshape fuse321 - -set square 7507.61 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug427_1 b/tests/bugs/modalg/bug427_1 deleted file mode 100755 index 3366b36c8f..0000000000 --- a/tests/bugs/modalg/bug427_1 +++ /dev/null @@ -1,26 +0,0 @@ - -puts "=========" -puts " OCC427 " -puts "(case 1)" -puts "=========" -puts "" -cpulimit 1200 -proc OFFSETSHAPE {distance faces calcul type} { - uplevel #0 explode s f - uplevel #0 offsetparameter 1e-7 $calcul $type - uplevel #0 offsetload s $distance $faces - uplevel #0 offsetperform result -} - -#Shell no rough and rounded mode - -set calcul "c" -set type "i" - -pcone s 9 4 15 90 -trotate s 0 0 0 0 0 1 90 - -OFFSETSHAPE 1 {} $calcul $type - -set square 671.382 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug427_2 b/tests/bugs/modalg/bug427_2 deleted file mode 100755 index 785a8dd3dd..0000000000 --- a/tests/bugs/modalg/bug427_2 +++ /dev/null @@ -1,26 +0,0 @@ - -puts "========================" -puts " OCC427 " -puts "(case 2)" -puts "========================" -puts "" -cpulimit 1200 -proc OFFSETSHAPE {distance faces calcul type} { - uplevel #0 explode s f - uplevel #0 offsetparameter 1e-7 $calcul $type - uplevel #0 offsetload s $distance $faces - uplevel #0 offsetperform result -} - -#Shell no rough and rounded mode - -set calcul "c" -set type "i" - -pcone s 9 4 15 90 -trotate s 0 0 0 0 0 1 90 - -OFFSETSHAPE 1 {s_5} $calcul $type - -set square 858.167 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug427_3 b/tests/bugs/modalg/bug427_3 deleted file mode 100755 index e260fb5023..0000000000 --- a/tests/bugs/modalg/bug427_3 +++ /dev/null @@ -1,26 +0,0 @@ - -puts "========================" -puts " OCC427 " -puts "(case 3)" -puts "========================" -puts "" -cpulimit 1200 -proc OFFSETSHAPE {distance faces calcul type} { - uplevel #0 explode s f - uplevel #0 offsetparameter 1e-7 $calcul $type - uplevel #0 offsetload s $distance $faces - uplevel #0 offsetperform result -} - -#Shell no rough and rounded mode - -set calcul "c" -set type "i" - -pcone s 9 4 15 90 -trotate s 0 0 0 0 0 1 90 - -OFFSETSHAPE 1 {s_2 s_3} $calcul $type - -set square 885.688 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug427_4 b/tests/bugs/modalg/bug427_4 deleted file mode 100755 index 010e2aa3ed..0000000000 --- a/tests/bugs/modalg/bug427_4 +++ /dev/null @@ -1,30 +0,0 @@ - -puts "========================" -puts " OCC427 " -puts "(case 4)" -puts "========================" -puts "" -cpulimit 1200 -proc OFFSETSHAPE {distance faces calcul type} { - uplevel #0 explode s f - uplevel #0 offsetparameter 1e-7 $calcul $type - uplevel #0 offsetload s $distance $faces - uplevel #0 offsetperform result -} - -#Shell no rough and rounded mode - -set calcul "c" -set type "i" - -circle w -20 0 0 20 -mkedge w w 0 pi*2/5 -wire w w -polyline profile 0 0 0 10 0 0 5 0 5 0 0 0 -mkplane profile profile -pipe s w profile - -OFFSETSHAPE 1 {} $calcul $type - -set square 1306.3 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug427_5 b/tests/bugs/modalg/bug427_5 deleted file mode 100755 index d469afa53a..0000000000 --- a/tests/bugs/modalg/bug427_5 +++ /dev/null @@ -1,30 +0,0 @@ - -puts "========================" -puts " OCC427 " -puts "(case 5)" -puts "========================" -puts "" -cpulimit 1200 -proc OFFSETSHAPE {distance faces calcul type} { - uplevel #0 explode s f - uplevel #0 offsetparameter 1e-7 $calcul $type - uplevel #0 offsetload s $distance $faces - uplevel #0 offsetperform result -} - -#Shell no rough and rounded mode - -set calcul "c" -set type "i" - -circle w -20 0 0 20 -mkedge w w 0 pi*2/5 -wire w w -polyline profile 0 0 0 10 0 0 5 0 5 0 0 0 -mkplane profile profile -pipe s w profile - -OFFSETSHAPE 1 {s_2} $calcul $type - -set square 1297.39 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug427_6 b/tests/bugs/modalg/bug427_6 deleted file mode 100755 index 5065de996a..0000000000 --- a/tests/bugs/modalg/bug427_6 +++ /dev/null @@ -1,30 +0,0 @@ - -puts "========================" -puts " OCC427 " -puts "(case 6)" -puts "========================" -puts "" -cpulimit 1200 -proc OFFSETSHAPE {distance faces calcul type} { - uplevel #0 explode s f - uplevel #0 offsetparameter 1e-7 $calcul $type - uplevel #0 offsetload s $distance $faces - uplevel #0 offsetperform result -} - -#Shell no rough and rounded mode - -set calcul "c" -set type "i" - -circle w -20 0 0 20 -mkedge w w 0 pi*2/5 -wire w w -polyline profile 0 0 0 10 0 0 5 0 5 0 0 0 -mkplane profile profile -pipe s w profile - -OFFSETSHAPE 1 {s_4 s_5} $calcul $type - -set square 808.448 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug434 b/tests/bugs/modalg/bug434 deleted file mode 100644 index 65aa2e1b5a..0000000000 --- a/tests/bugs/modalg/bug434 +++ /dev/null @@ -1,29 +0,0 @@ -pload QAcommands - -puts "================" -puts "OCC434" -puts "SAM1296" -puts "================" -puts "" - -######################################################## -## Exception is raised on NT, SUN in the GeomConvert_CompCurveToBSplineCurve -######################################################## - -restore [locate_data_file OCC434.brep] e -checkshape e -explode e e - -OCC405 result e_1 e_2 - -regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection result] full num - -if { $num == 2 } { - puts "OCC434 OK : Result shape is CORRECT !!! " -} else { - puts " Faulty OCC434: Result shape is INcorrect !!! " -} - -set length 8.74616 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug435 b/tests/bugs/modalg/bug435 deleted file mode 100644 index 2b126e957a..0000000000 --- a/tests/bugs/modalg/bug435 +++ /dev/null @@ -1,28 +0,0 @@ -pload QAcommands - -#INTERFACE IGES -puts "========================" -puts " OCC435 " -puts " OCC405 " -puts "========================" -puts "" -############################################################### -## Exception Standard_ConstructuionError is rased in DRAW in the -## GeomConvert_CompCurveToBSplineCurve on the attached shapes during command merge -############################################################### - -restore [locate_data_file OCC435a.brep] a -explode a -set j 1 -repeat 8 { - explode a_$j - if { [catch {OCC405 result a_${j}_1 a_${j}_2} catch_result] } { - puts "Faulty OCC435 : merge operation was made incorrect" - } else { - puts " OCC435 OK: merge operation was made properly" - } - incr j -} - -set length 17.2848 -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug437 b/tests/bugs/modalg/bug437 deleted file mode 100755 index 513c9e6675..0000000000 --- a/tests/bugs/modalg/bug437 +++ /dev/null @@ -1,20 +0,0 @@ -puts "========================" -puts " OCC437 " -puts "========================" -puts "" -########################################## -## different checkshape result under ros and rosdeb in KAS:dev. -########################################## - -restore [locate_data_file OCC437.brep] result - -set che [checkshape result r] - -if { [regexp {OK} $che] != 1 } { - puts " Faulty OCC437: function CHECKSHAPE works wrongly" -} else { - puts " OCC437 OK: function CHECKSHAPE works properly" -} - -set square 0.000201234 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug439 b/tests/bugs/modalg/bug439 deleted file mode 100755 index 91c43ffc1b..0000000000 --- a/tests/bugs/modalg/bug439 +++ /dev/null @@ -1,26 +0,0 @@ - -puts "========================" -puts " OCC439 " -puts "========================" -puts "" -##################################################### -## Cut operation produces NOT Valid result on attached shapes -##################################################### - -restore [locate_data_file OCC439.brep] a -explode a - -checkshape a_1 -checkshape a_2 - -bcut result a_1 a_2 - -set che [checkshape result] -if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty OCC134: Resulte shape is invalid. It was detected by Checkshape command" -} else { - puts "OCC134 OK: Result shape is valid" -} - -set square 247000 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug442 b/tests/bugs/modalg/bug442 deleted file mode 100755 index 6007de9782..0000000000 --- a/tests/bugs/modalg/bug442 +++ /dev/null @@ -1,33 +0,0 @@ - -puts "========" -puts "OCC442" -puts "========" -puts "" -######################################################## -## The Revolution Algo produces result, but during check using IsValid method from -## BRepAlgoAPI the exception is raised -######################################################## - -restore [locate_data_file OCC442.brep] a -checkshape a - -explode a v - -mkpoint p_1 a_1 -mkpoint p_2 a_3 -coord p_1 x1 y1 z1 -coord p_2 x2 y2 z2 -set ax [dval x1] -set ay [dval y1] -set az [dval z1] -set bx [dval x2] -set by [dval y2] -set bz [dval z2] -set dx [expr $ax - $bx] -set dy [expr $ay - $by] -set dz [expr $az - $bz] - -revol result a $ax $ay $az $dx $dy $dz 360 - -set square 692942 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug446_1 b/tests/bugs/modalg/bug446_1 deleted file mode 100755 index 8dc81ddc22..0000000000 --- a/tests/bugs/modalg/bug446_1 +++ /dev/null @@ -1,25 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_2" -puts "TODO OCC12345 ALL: Faulty OCC446" -###puts "TODO OCC12345 ALL: Error : The square of result shape is" - -puts "========" -puts "OCC446" -puts "OCC447" -puts "(case 1)" -puts "========" -puts "" -###################################### -## As result I have fail on shape that it is not closed. -###################################### - -restore [locate_data_file OCC446a.brep] result - -set che [checkshape result] -if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty OCC446 (case 1): Source shape is NotClosed" -} else { - puts "OCC446 OK (case 1): Source shape is Closed" -} -set square 108.845 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug446_2 b/tests/bugs/modalg/bug446_2 deleted file mode 100755 index f6fcfd0ebf..0000000000 --- a/tests/bugs/modalg/bug446_2 +++ /dev/null @@ -1,22 +0,0 @@ - -puts "========" -puts "OCC446" -puts "OCC447" -puts "(case 2)" -puts "========" -puts "" -###################################### -## As result I have fail on shape that it is not closed. -###################################### - -restore [locate_data_file OCC446b.brep] result - -set che [checkshape result] -if { [regexp {Faulty} $che ] == 1} { - puts "Faulty OCC446 (case 2): Source shape is NotClosed" -} else { - puts "OCC446 OK (case 2): Source shape is Closed" -} -set square 24272.8 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug446_3 b/tests/bugs/modalg/bug446_3 deleted file mode 100755 index cf1efa8ae9..0000000000 --- a/tests/bugs/modalg/bug446_3 +++ /dev/null @@ -1,23 +0,0 @@ - -puts "========" -puts "OCC446" -puts "OCC447" -puts "(case 3)" -puts "========" -puts "" -###################################### -## As result I have fail on shape that it is not closed. -###################################### - -restore [locate_data_file OCC446c.brep] result - -set che [checkshape result] -if { [regexp {Faulty} $che ] == 1} { - puts "Faulty OCC446 (case 3): Source shape is NotClosed" -} else { - puts "OCC446 OK (case 3): Source shape is Closed" -} -set square 13694.6 -set 2dviewer 0 - - diff --git a/tests/bugs/modalg/bug446_4 b/tests/bugs/modalg/bug446_4 deleted file mode 100755 index d4f43df460..0000000000 --- a/tests/bugs/modalg/bug446_4 +++ /dev/null @@ -1,22 +0,0 @@ - -puts "========" -puts "OCC446" -puts "OCC447" -puts "(case 4)" -puts "========" -puts "" -###################################### -## As result I have fail on shape that it is not closed. -###################################### - -restore [locate_data_file OCC446d.brep] result - -set che [checkshape result] -if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty OCC446 (case 4): Source shape is NotClosed" -} else { - puts "OCC446 OK (case 4): Source shape is Closed" -} -set square 629.347 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug449 b/tests/bugs/modalg/bug449 deleted file mode 100755 index fab38a52da..0000000000 --- a/tests/bugs/modalg/bug449 +++ /dev/null @@ -1,19 +0,0 @@ - -puts "========================" -puts " OCC449 " -puts "========================" -puts "" -####################### -## Invalid cut result -####################### - -restore [locate_data_file OCC449a.brep] b1 -checkshape b1 - -restore [locate_data_file OCC449b.brep] b2 -checkshape b2 - -bcut result b1 b2 - -set square 43401.5 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug452_1 b/tests/bugs/modalg/bug452_1 deleted file mode 100755 index b5a7745c49..0000000000 --- a/tests/bugs/modalg/bug452_1 +++ /dev/null @@ -1,30 +0,0 @@ - -puts "========" -puts "OCC452" -puts "(case 1)" -puts "========" -puts "" - -pcone pc 10 0 20 -explode pc f - -prism pcy pc_2 0 0 10 - -dchrono h2 reset -dchrono h2 start - -bcut result pc pcy - -dchrono h2 stop -set q2 [ dchrono h2 show ] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $q2 full z2 -puts "$z2" -if { $z2 > 3 } { - puts "Elapsed time is more then 3 seconds - Faulty" -} else { - puts "Elapsed time is less then 3 seconds - OK" -} - -set square 254.16 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug452_2 b/tests/bugs/modalg/bug452_2 deleted file mode 100755 index a938728c05..0000000000 --- a/tests/bugs/modalg/bug452_2 +++ /dev/null @@ -1,58 +0,0 @@ - -puts "========" -puts "GER60239" -puts "OCC452" -puts "(case 2)" -puts "========" -puts "" - -restore [locate_data_file mds-part1.rle] a -set che [checkshape a] -if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty OCC452 (shape 1): Source shape is invalid. It was detected by Checkshape command" -} else { - puts "OCC452 OK (shape 1): Source shape is valid" -} - -restore [locate_data_file mds-part2.rle] b -set che [checkshape b] -if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty OCC452 (shape 2): Source shape is invalid. It was detected by Checkshape command" -} else { - puts "OCC452 OK (shape 2): Source shape is valid" -} - -restore [locate_data_file CTO900_ger60239a.rle] c -set che [checkshape c] -if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty OCC452 (shape 3): Source shape is invalid. It was detected by Checkshape command" -} else { - puts "OCC452 OK (shape 3): Source shape is valid" -} - -restore [locate_data_file CTO900_ger60239b.rle] d -set che [checkshape d] -if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty OCC452 (shape 4): Source shape is invalid. It was detected by Checkshape command" -} else { - puts "OCC452 OK (shape 4): Source shape is valid" -} -dchrono h2 reset -dchrono h2 start - -bfuse r a b -#checkshape r - -bfuse result c d - -dchrono h2 stop -set q2 [ dchrono h2 show ] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $q2 full z2 -puts "$z2" -if { $z2 > 60 } { - puts "Elapsed time is more then 60 seconds - Faulty" -} else { - puts "Elapsed time is less then 60 seconds - OK" -} -set square 3468.6 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug452_3 b/tests/bugs/modalg/bug452_3 deleted file mode 100755 index 3ec86b68f2..0000000000 --- a/tests/bugs/modalg/bug452_3 +++ /dev/null @@ -1,43 +0,0 @@ - -puts "========" -puts "GER60239" -puts "OCC452" -puts "(case 3)" -puts "========" -puts "" - -restore [locate_data_file CTO900_ger60239a.rle] a -set che [checkshape a] -if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty OCC452 (shape 5): Source shape is invalid. It was detected by Checkshape command" -} else { - puts "OCC452 OK (shape 5): Source shape is valid" -} - -restore [locate_data_file CTO900_ger60239b.rle] b -set che [checkshape b] -if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty OCC452 (shape 6): Source shape is invalid. It was detected by Checkshape command" -} else { - puts "OCC452 OK (shape 6): Source shape is valid" -} - -dchrono h2 reset -dchrono h2 start - -bfuse result a b -#checkshape -top res - -dchrono h2 stop -set q2 [ dchrono h2 show ] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $q2 full z2 -puts "$z2" -if { $z2 > 50 } { - puts "Elapsed time is more then 50 seconds - Faulty" -} else { - puts "Elapsed time is less then 50 seconds - OK" -} -set square 3468.6 -set 2dviewer 0 - - diff --git a/tests/bugs/modalg/bug452_4 b/tests/bugs/modalg/bug452_4 deleted file mode 100755 index 0a03e60b0e..0000000000 --- a/tests/bugs/modalg/bug452_4 +++ /dev/null @@ -1,44 +0,0 @@ - -puts "========" -puts "PRO7934" -puts "OCC452" -puts "(case 4)" -puts "========" -puts "" - -restore [locate_data_file CTO900_pro7934a.rle] a -set che [checkshape a] -if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty OCC452 (shape 7): Source shape is invalid. It was detected by Checkshape command" -} else { - puts "OCC452 OK (shape 7): Source shape is valid" -} - -restore [locate_data_file CTO900_pro7934b.rle] b -set che [checkshape b] -if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty OCC452 (shape 8): Source shape is invalid. It was detected by Checkshape command" -} else { - puts "OCC452 OK (shape 8): Source shape is valid" -} - -dchrono h2 reset -dchrono h2 start - -bfuse result a b -#checkshape -top res - -dchrono h2 stop -set q2 [ dchrono h2 show ] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $q2 full z2 -puts "$z2" -if { $z2 > 5 } { - puts "Elapsed time is more then 5 seconds - Faulty" -} else { - puts "Elapsed time is less then 5 seconds - OK" -} -set square 201978 -set 2dviewer 0 - - - diff --git a/tests/bugs/modalg/bug453_1 b/tests/bugs/modalg/bug453_1 deleted file mode 100755 index 9a7c28bd75..0000000000 --- a/tests/bugs/modalg/bug453_1 +++ /dev/null @@ -1,35 +0,0 @@ - -puts "========" -puts "OCC453" -puts "(case 1)" -puts "========" -puts "" - -dchrono h2 reset -dchrono h2 start - -set make_print_out 0 - -dset SCALE 1000. -dset SCALE1 5 -tolblend 0.01 1e-04 1e-05 1e-03 - -restore [locate_data_file CFI_5_f12fgk.rle] s -tscale s 0 0 0 SCALE1 -explode s E - -blend result s 0.5*SCALE1 s_1 0.5*SCALE1 s_4 0.5*SCALE1 s_12 0.5*SCALE1 s_8 0.5*SCALE1 s_6 -explode result sh -tcopy result_1 result - -dchrono h2 stop -set q2 [ dchrono h2 show ] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $q2 full z2 -puts "$z2" -if { $z2 > 50 } { - puts "Elapsed time is more then 50 seconds - Faulty" -} else { - puts "Elapsed time is less then 50 seconds - OK" -} -set square 6021.51 -set 2dviewer 1 diff --git a/tests/bugs/modalg/bug453_2 b/tests/bugs/modalg/bug453_2 deleted file mode 100755 index da70eca5d0..0000000000 --- a/tests/bugs/modalg/bug453_2 +++ /dev/null @@ -1,36 +0,0 @@ - -puts "========" -puts "OCC453" -puts "(case 2)" -puts "========" -puts "" - -dchrono h2 reset -dchrono h2 start - -set make_print_out 0 - -dset SCALE 1000. -dset SCALE1 5 -tolblend 0.01 1e-04 1e-05 1e-03 - -restore [locate_data_file shading_137.brep] s -tscale s 0 0 0 SCALE1 -explode s E - - blend result s 4.5*SCALE1 s_2 4.5*SCALE1 s_1 4.5*SCALE1 s_6 4.5*SCALE1 s_8 4.5*SCALE1 s_10 4.5*SCALE1 s_14 4.5*SCALE1 s_4 4.5*SCALE1 s_5 4.5*SCALE1 s_16 4.5*SCALE1 s_11 4.5*SCALE1 s_19 4.5*SCALE1 s_13 - explode result So - tcopy result_1 result - -dchrono h2 stop -set q2 [ dchrono h2 show ] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $q2 full z2 -puts "$z2" -if { $z2 > 110 } { - puts "Elapsed time is more then 110 seconds - Faulty" -} else { - puts "Elapsed time is less then 110 seconds - OK" -} - -set square 3.65777e+06 -set 2dviewer 1 diff --git a/tests/bugs/modalg/bug465 b/tests/bugs/modalg/bug465 deleted file mode 100755 index ff96cf53a1..0000000000 --- a/tests/bugs/modalg/bug465 +++ /dev/null @@ -1,21 +0,0 @@ - -puts "========" -puts "OCC465" -puts "========" -puts "" - -restore [locate_data_file OCC465.brep] result - -set dum [dump result] - -regexp {PCurve : 1 on surface 1, range : ([-0-9.+eE]+) ([-0-9.+eE]+)} $dum full err1 err2 -regexp {Curve 3D : 1, range : ([-0-9.+eE]+) ([-0-9.+eE]+)} $dum full err3 err4 - -if { $err1== $err3 && $err2 == $err4 } { - puts "Faulty OCC465: it is reset the PCurve range by range of Curve3d after restoring Curve3d" -} else { - puts "OCC465 OK" -} - -set length 4.21716 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug4717_1 b/tests/bugs/modalg/bug4717_1 deleted file mode 100755 index 77f6b34cc7..0000000000 --- a/tests/bugs/modalg/bug4717_1 +++ /dev/null @@ -1,43 +0,0 @@ -puts "TODO OCC12345 ALL: Error : Result shape is WRONG" - -puts "============" -puts "OCC4717" -puts "============" -puts "" -###################################################### -# A regression of new Boolean Operations -# (cfi/002/H3) -###################################################### - -dset SCALE1 10 -protect SCALE1 - -box b -20 -20 -20 40 40 20 -ellipse w1 0 0 0 15 10 -mkedge w1 w1 -pi/2 pi/2 -trotate w1 0 0 0 1 0 0 90 -wire w w1 -revol r w 0 0 0 0 0 1 360 -shape s So -add r s -trotate s b 0 0 0 1 1 0 -40 -trotate s b 0 0 0 0 0 1 -10 -tscale b 0 0 0 SCALE1 -tscale s 0 0 0 SCALE1 - -bop s b -bopfuse result - -set square 680565 - -set nb_v_good 11 -set nb_e_good 16 -set nb_w_good 8 -set nb_f_good 7 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 45 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug4717_2 b/tests/bugs/modalg/bug4717_2 deleted file mode 100755 index edf0106c58..0000000000 --- a/tests/bugs/modalg/bug4717_2 +++ /dev/null @@ -1,43 +0,0 @@ -puts "TODO OCC12345 ALL: Error : Result shape is WRONG" - -puts "============" -puts "OCC4717" -puts "============" -puts "" -###################################################### -# A regression of new Boolean Operations -# (cfi/002/H3) -###################################################### - -dset SCALE1 10 -protect SCALE1 - -box b -20 -20 -20 40 40 20 -ellipse w1 0 0 0 15 10 -mkedge w1 w1 -pi/2 pi/2 -trotate w1 0 0 0 1 0 0 90 -wire w w1 -revol r w 0 0 0 0 0 1 360 -shape s So -add r s -trotate s b 0 0 0 1 1 0 -40 -trotate s b 0 0 0 0 0 1 -10 -tscale b 0 0 0 SCALE1 -tscale s 0 0 0 SCALE1 - -bop b s -bopfuse result - -set square 680565 - -set nb_v_good 11 -set nb_e_good 16 -set nb_w_good 8 -set nb_f_good 7 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 45 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug4717_3 b/tests/bugs/modalg/bug4717_3 deleted file mode 100755 index 185f5885b4..0000000000 --- a/tests/bugs/modalg/bug4717_3 +++ /dev/null @@ -1,43 +0,0 @@ -puts "TODO OCC12345 ALL: Error : Result shape is WRONG" - -puts "============" -puts "OCC4717" -puts "============" -puts "" -###################################################### -# A regression of new Boolean Operations -# (cfi/002/H3) -###################################################### - -dset SCALE1 10 -protect SCALE1 - -box b -20 -20 -20 40 40 20 -ellipse w1 0 0 0 15 10 -mkedge w1 w1 -pi/2 pi/2 -trotate w1 0 0 0 1 0 0 90 -wire w w1 -revol r w 0 0 0 0 0 1 360 -shape s So -add r s -trotate s b 0 0 0 1 1 0 -40 -trotate s b 0 0 0 0 0 1 -10 -tscale b 0 0 0 SCALE1 -tscale s 0 0 0 SCALE1 - -bop s b -bopcut result - -set square 181937 - -set nb_v_good 3 -set nb_e_good 4 -set nb_w_good 2 -set nb_f_good 2 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 14 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug4717_4 b/tests/bugs/modalg/bug4717_4 deleted file mode 100755 index c68768ed24..0000000000 --- a/tests/bugs/modalg/bug4717_4 +++ /dev/null @@ -1,43 +0,0 @@ -puts "TODO OCC12345 ALL: Error : Result shape is WRONG" - -puts "============" -puts "OCC4717" -puts "============" -puts "" -###################################################### -# A regression of new Boolean Operations -# (cfi/002/H3) -###################################################### - -dset SCALE1 10 -protect SCALE1 - -box b -20 -20 -20 40 40 20 -ellipse w1 0 0 0 15 10 -mkedge w1 w1 -pi/2 pi/2 -trotate w1 0 0 0 1 0 0 90 -wire w w1 -revol r w 0 0 0 0 0 1 360 -shape s So -add r s -trotate s b 0 0 0 1 1 0 -40 -trotate s b 0 0 0 0 0 1 -10 -tscale b 0 0 0 SCALE1 -tscale s 0 0 0 SCALE1 - -bop b s -bopcut result - -set square 680565 - -set nb_v_good 11 -set nb_e_good 16 -set nb_w_good 8 -set nb_f_good 7 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 45 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug4717_5 b/tests/bugs/modalg/bug4717_5 deleted file mode 100755 index 8eae8fa6fc..0000000000 --- a/tests/bugs/modalg/bug4717_5 +++ /dev/null @@ -1,43 +0,0 @@ -puts "TODO OCC12345 ALL: Error : Result shape is WRONG" - -puts "============" -puts "OCC4717" -puts "============" -puts "" -###################################################### -# A regression of new Boolean Operations -# (cfi/002/H3) -###################################################### - -dset SCALE1 10 -protect SCALE1 - -box b -20 -20 -20 40 40 20 -ellipse w1 0 0 0 15 10 -mkedge w1 w1 -pi/2 pi/2 -trotate w1 0 0 0 1 0 0 90 -wire w w1 -revol r w 0 0 0 0 0 1 360 -shape s So -add r s -trotate s b 0 0 0 1 1 0 -40 -trotate s b 0 0 0 0 0 1 -10 -tscale b 0 0 0 SCALE1 -tscale s 0 0 0 SCALE1 - -bop s b -boptuc result - -set square 680565 - -set nb_v_good 11 -set nb_e_good 16 -set nb_w_good 8 -set nb_f_good 7 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 45 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug4717_6 b/tests/bugs/modalg/bug4717_6 deleted file mode 100755 index dab4307691..0000000000 --- a/tests/bugs/modalg/bug4717_6 +++ /dev/null @@ -1,43 +0,0 @@ -puts "TODO OCC12345 ALL: Error : Result shape is WRONG" - -puts "============" -puts "OCC4717" -puts "============" -puts "" -###################################################### -# A regression of new Boolean Operations -# (cfi/002/H3) -###################################################### - -dset SCALE1 10 -protect SCALE1 - -box b -20 -20 -20 40 40 20 -ellipse w1 0 0 0 15 10 -mkedge w1 w1 -pi/2 pi/2 -trotate w1 0 0 0 1 0 0 90 -wire w w1 -revol r w 0 0 0 0 0 1 360 -shape s So -add r s -trotate s b 0 0 0 1 1 0 -40 -trotate s b 0 0 0 0 0 1 -10 -tscale b 0 0 0 SCALE1 -tscale s 0 0 0 SCALE1 - -bop b s -boptuc result - -set square 181937 - -set nb_v_good 3 -set nb_e_good 4 -set nb_w_good 2 -set nb_f_good 2 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 14 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug4717_7 b/tests/bugs/modalg/bug4717_7 deleted file mode 100755 index 804091e634..0000000000 --- a/tests/bugs/modalg/bug4717_7 +++ /dev/null @@ -1,43 +0,0 @@ -puts "TODO OCC12345 ALL: Error : Result shape is WRONG" - -puts "============" -puts "OCC4717" -puts "============" -puts "" -###################################################### -# A regression of new Boolean Operations -# (cfi/002/H3) -###################################################### - -dset SCALE1 10 -protect SCALE1 - -box b -20 -20 -20 40 40 20 -ellipse w1 0 0 0 15 10 -mkedge w1 w1 -pi/2 pi/2 -trotate w1 0 0 0 1 0 0 90 -wire w w1 -revol r w 0 0 0 0 0 1 360 -shape s So -add r s -trotate s b 0 0 0 1 1 0 -40 -trotate s b 0 0 0 0 0 1 -10 -tscale b 0 0 0 SCALE1 -tscale s 0 0 0 SCALE1 - -bop s b -bopcommon result - -set square 181937 - -set nb_v_good 3 -set nb_e_good 4 -set nb_w_good 2 -set nb_f_good 2 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 14 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug4717_8 b/tests/bugs/modalg/bug4717_8 deleted file mode 100755 index 40fe4fa6c6..0000000000 --- a/tests/bugs/modalg/bug4717_8 +++ /dev/null @@ -1,43 +0,0 @@ -puts "TODO OCC12345 ALL: Error : Result shape is WRONG" - -puts "============" -puts "OCC4717" -puts "============" -puts "" -###################################################### -# A regression of new Boolean Operations -# (cfi/002/H3) -###################################################### - -dset SCALE1 10 -protect SCALE1 - -box b -20 -20 -20 40 40 20 -ellipse w1 0 0 0 15 10 -mkedge w1 w1 -pi/2 pi/2 -trotate w1 0 0 0 1 0 0 90 -wire w w1 -revol r w 0 0 0 0 0 1 360 -shape s So -add r s -trotate s b 0 0 0 1 1 0 -40 -trotate s b 0 0 0 0 0 1 -10 -tscale b 0 0 0 SCALE1 -tscale s 0 0 0 SCALE1 - -bop b s -bopcommon result - -set square 181937 - -set nb_v_good 3 -set nb_e_good 4 -set nb_w_good 2 -set nb_f_good 2 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 14 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug472_1 b/tests/bugs/modalg/bug472_1 deleted file mode 100755 index bc835520cf..0000000000 --- a/tests/bugs/modalg/bug472_1 +++ /dev/null @@ -1,22 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -puts "========================" -puts " OCC472 " -puts "(case 1)" -puts "========================" -puts "" -##################################################### -## Bad result of Fuse Operation (Cut&Common - bad too). SAM1470 (#2634) -##################################################### - -restore [locate_data_file OCC472a.brep] b1 -checkshape b1 - -restore [locate_data_file OCC472b.brep] b2 -checkshape b2 - -bcut result b1 b2 - -set square 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug472_2 b/tests/bugs/modalg/bug472_2 deleted file mode 100755 index 4e79ff3a0d..0000000000 --- a/tests/bugs/modalg/bug472_2 +++ /dev/null @@ -1,22 +0,0 @@ -puts "TODO OCC12345 ALL: Error : The square of result shape is" -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" - -puts "========================" -puts " OCC472 " -puts "(case 2)" -puts "========================" -puts "" -##################################################### -## Bad result of Fuse Operation (Cut&Common - bad too). SAM1470 (#2634) -##################################################### - -restore [locate_data_file OCC472a.brep] b1 -checkshape b1 - -restore [locate_data_file OCC472b.brep] b2 -checkshape b2 - -bcommon result b1 b2 - -set square 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug472_3 b/tests/bugs/modalg/bug472_3 deleted file mode 100755 index 903b34f5d5..0000000000 --- a/tests/bugs/modalg/bug472_3 +++ /dev/null @@ -1,26 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO OCC12345 ALL: Error : The square of result shape is" -puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must contains 5 vertexes instead of 6" - -puts "========================" -puts " OCC472 " -puts "(case 3)" -puts "========================" -puts "" -##################################################### -## Bad result of Fuse Operation (Cut&Common - bad too). SAM1470 (#2634) -##################################################### - -restore [locate_data_file OCC472a.brep] b1 -checkshape b1 - -restore [locate_data_file OCC472b.brep] b2 -checkshape b2 - -bfuse result b1 b2 - -set nb_v_good 5 -set nb_e_edge 7 -set square 0 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug474 b/tests/bugs/modalg/bug474 deleted file mode 100755 index 8c2f82d460..0000000000 --- a/tests/bugs/modalg/bug474 +++ /dev/null @@ -1,17 +0,0 @@ - -puts "========================" -puts " OCC474 " -puts "========================" -puts "" -################################################## -## impossible to put a fillet to none of 5 edges sharing one vertrex -################################################## - -restore [locate_data_file OCC474.brep] s - -explode s e - -blend result s 100 s_16 - -set square 1.54883e+06 -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug476_1 b/tests/bugs/modalg/bug476_1 deleted file mode 100755 index e05d8c9dc0..0000000000 --- a/tests/bugs/modalg/bug476_1 +++ /dev/null @@ -1,29 +0,0 @@ -puts "============" -puts "OCC476" -puts "============" -puts "" -###################################################### -# Regression on reading e3i files with respect of OCC30 and OCC40 -###################################################### - -restore [locate_data_file OCC485b.brep] s1 -restore [locate_data_file OCC485a.brep] s2 - -checkshape s1 -checkshape s2 - -bop s1 s2 -bopfuse result - -set square 9333.96 -set nb_v_good 16 -set nb_e_good 26 -set nb_w_good 11 -set nb_f_good 11 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 67 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug476_2 b/tests/bugs/modalg/bug476_2 deleted file mode 100755 index 892685e680..0000000000 --- a/tests/bugs/modalg/bug476_2 +++ /dev/null @@ -1,30 +0,0 @@ -puts "============" -puts "OCC476" -puts "============" -puts "" -###################################################### -# Regression on reading e3i files with respect of OCC30 and OCC40 -###################################################### - -restore [locate_data_file OCC485b.brep] s1 -restore [locate_data_file OCC485a.brep] s2 - -checkshape s1 -checkshape s2 - -bop s2 s1 -bopfuse result - -set square 9333.96 -set nb_v_good 16 -set nb_e_good 26 -set nb_w_good 11 -set nb_f_good 11 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 67 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug476_3 b/tests/bugs/modalg/bug476_3 deleted file mode 100755 index ef5d6ff58b..0000000000 --- a/tests/bugs/modalg/bug476_3 +++ /dev/null @@ -1,30 +0,0 @@ -puts "============" -puts "OCC476" -puts "============" -puts "" -###################################################### -# Regression on reading e3i files with respect of OCC30 and OCC40 -###################################################### - -restore [locate_data_file OCC485b.brep] s1 -restore [locate_data_file OCC485a.brep] s2 - -checkshape s1 -checkshape s2 - -bop s1 s2 -bopcut result - -set square 99.5159 -set nb_v_good 12 -set nb_e_good 19 -set nb_w_good 9 -set nb_f_good 9 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 52 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug476_4 b/tests/bugs/modalg/bug476_4 deleted file mode 100755 index 55739ac89c..0000000000 --- a/tests/bugs/modalg/bug476_4 +++ /dev/null @@ -1,29 +0,0 @@ -puts "============" -puts "OCC476" -puts "============" -puts "" -###################################################### -# Regression on reading e3i files with respect of OCC30 and OCC40 -###################################################### - -restore [locate_data_file OCC485b.brep] s1 -restore [locate_data_file OCC485a.brep] s2 - -checkshape s1 -checkshape s2 - -bop s2 s1 -bopcut result - -set square 9340.03 -set nb_v_good 19 -set nb_e_good 33 -set nb_w_good 14 -set nb_f_good 14 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 83 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug476_5 b/tests/bugs/modalg/bug476_5 deleted file mode 100755 index b7a375c85a..0000000000 --- a/tests/bugs/modalg/bug476_5 +++ /dev/null @@ -1,29 +0,0 @@ -puts "============" -puts "OCC476" -puts "============" -puts "" -###################################################### -# Regression on reading e3i files with respect of OCC30 and OCC40 -###################################################### - -restore [locate_data_file OCC485b.brep] s1 -restore [locate_data_file OCC485a.brep] s2 - -checkshape s1 -checkshape s2 - -bop s1 s2 -boptuc result - -set square 9340.03 -set nb_v_good 19 -set nb_e_good 33 -set nb_w_good 14 -set nb_f_good 14 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 83 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug476_6 b/tests/bugs/modalg/bug476_6 deleted file mode 100755 index a43243998f..0000000000 --- a/tests/bugs/modalg/bug476_6 +++ /dev/null @@ -1,29 +0,0 @@ -puts "============" -puts "OCC476" -puts "============" -puts "" -###################################################### -# Regression on reading e3i files with respect of OCC30 and OCC40 -###################################################### - -restore [locate_data_file OCC485b.brep] s1 -restore [locate_data_file OCC485a.brep] s2 - -checkshape s1 -checkshape s2 - -bop s2 s1 -boptuc result - -set square 99.5159 -set nb_v_good 12 -set nb_e_good 19 -set nb_w_good 9 -set nb_f_good 9 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 52 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug476_7 b/tests/bugs/modalg/bug476_7 deleted file mode 100755 index e8c9a7efb9..0000000000 --- a/tests/bugs/modalg/bug476_7 +++ /dev/null @@ -1,29 +0,0 @@ -puts "============" -puts "OCC476" -puts "============" -puts "" -###################################################### -# Regression on reading e3i files with respect of OCC30 and OCC40 -###################################################### - -restore [locate_data_file OCC485b.brep] s1 -restore [locate_data_file OCC485a.brep] s2 - -checkshape s1 -checkshape s2 - -bop s1 s2 -bopcommon result - -set square 105.587 -set nb_v_good 15 -set nb_e_good 26 -set nb_w_good 12 -set nb_f_good 12 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 68 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug476_8 b/tests/bugs/modalg/bug476_8 deleted file mode 100755 index f519b5abb6..0000000000 --- a/tests/bugs/modalg/bug476_8 +++ /dev/null @@ -1,29 +0,0 @@ -puts "============" -puts "OCC476" -puts "============" -puts "" -###################################################### -# Regression on reading e3i files with respect of OCC30 and OCC40 -###################################################### - -restore [locate_data_file OCC485b.brep] s1 -restore [locate_data_file OCC485a.brep] s2 - -checkshape s1 -checkshape s2 - -bop s2 s1 -bopcommon result - -set square 105.587 -set nb_v_good 15 -set nb_e_good 26 -set nb_w_good 12 -set nb_f_good 12 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 68 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug481 b/tests/bugs/modalg/bug481 deleted file mode 100755 index 367af52bcb..0000000000 --- a/tests/bugs/modalg/bug481 +++ /dev/null @@ -1,33 +0,0 @@ - -puts "========================" -puts " OCC481 " -puts "========================" -puts "" -########################################## -##Attached shape could not be displayed in the Shading mode. -########################################## - -restore [locate_data_file OCC481.rle] result -checkshape result - -tclean result -vinit -vdisplay result -vfit -vsetdispmode result 1 - -set tri 0 -set nod 0 - -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -if { $tri == 72 && $nod == 74 } { - puts " OCC481 : OK" -} else { - puts " OCC481 : Faulty" -} - -set square 314.159 -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug485 b/tests/bugs/modalg/bug485 deleted file mode 100755 index b33b0806cb..0000000000 --- a/tests/bugs/modalg/bug485 +++ /dev/null @@ -1,24 +0,0 @@ - -puts "=========" -puts " OCC485 " -puts "=========" -puts "" -####################################### -## Draw hangs up during performing fuse operation -####################################### - -restore [locate_data_file OCC485a.brep] a_1 -checkshape a_1 - -restore [locate_data_file OCC485a.brep] a_2 -checkshape a_2 - -if [catch {bfuse result a_1 a_2 } result] { - puts "Faulty OCC485: Draw hangs up during performing fuse operation" -} else { - puts "OCC485 OK: function FUSE works without Draw hangs up " -} - -set square 9291.88 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug487 b/tests/bugs/modalg/bug487 deleted file mode 100755 index d5303d28a6..0000000000 --- a/tests/bugs/modalg/bug487 +++ /dev/null @@ -1,30 +0,0 @@ - -puts "========================" -puts " OCC487 " -puts "========================" -####################################################### -## Regression on KAS:dev:ros with respect to OCC4.0 -## Case cfi 900 N3. -## Fillets are created on OCC4.0 -####################################################### - -restore [locate_data_file CFI_pro15441.rle] m -explode m e - -if [catch {blend result m 2 m_36 2 m_21 } result] { - puts "Faulty OCC485: function BLEND works wrongly" -} else { - puts "OCC485 OK: function BLEND works properly " -} - -explode result sh - -renamevar result_1 result - -set square 6265.68 -set 3dviewer 1 - - - - - diff --git a/tests/bugs/modalg/bug488 b/tests/bugs/modalg/bug488 deleted file mode 100755 index 35bc7540f7..0000000000 --- a/tests/bugs/modalg/bug488 +++ /dev/null @@ -1,22 +0,0 @@ - -puts "=========" -puts " OCC488 " -puts "=========" -puts "" -######################################################## -## Boolean operation returns invalid result, it lead to regression on test cfe/002/C1 -######################################################## - -restore [locate_data_file OCC488a.brep] a_1 -checkshape a_1 - -restore [locate_data_file OCC488b.brep] a_2 -checkshape a_2 - -if [catch {bcommon result a_1 a_2 } catch_result] { - puts "Faulty OCC488: command COMMON works wrongly" -} else { - puts "OCC488 OK: function COMMON works properly " -} -set square 92466.8 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug490 b/tests/bugs/modalg/bug490 deleted file mode 100755 index 85939f2845..0000000000 --- a/tests/bugs/modalg/bug490 +++ /dev/null @@ -1,22 +0,0 @@ - -puts "=========" -puts " OCC490 " -puts "=========" -puts "" -######################################################## -## Result of fuse operation is faulty shape although arguments are valid -######################################################## - -restore [locate_data_file OCC490a.brep] a_1 -checkshape a_1 - -restore [locate_data_file OCC490b.brep] a_2 -checkshape a_2 - -if [catch {bfuse result a_1 a_2 } catch_result] { - puts "Faulty OCC490: command FUSE works wrongly" -} else { - puts "OCC490 : function FUSE works without hangs up " -} -set square 2744.08 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug492 b/tests/bugs/modalg/bug492 deleted file mode 100755 index 0bf4415746..0000000000 --- a/tests/bugs/modalg/bug492 +++ /dev/null @@ -1,22 +0,0 @@ - -puts "=========" -puts " OCC492 " -puts "=========" -puts "" -############################## -## Exception occurs during fuse operation -############################## - -restore [locate_data_file OCC492a.brep] a_1 -checkshape a_1 - -restore [locate_data_file OCC492b.brep] a_2 -checkshape a_2 - -if [catch {bfuse result a_1 a_2 } catch_result] { - puts "Faulty OCC492: command FUSE works wrongly" -} else { - puts "OCC492 : function FUSE works without hangs up " -} -set square 64.2386 -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug497_1 b/tests/bugs/modalg/bug497_1 deleted file mode 100755 index 86d8acdc94..0000000000 --- a/tests/bugs/modalg/bug497_1 +++ /dev/null @@ -1,25 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_3" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -puts "=========" -puts " OCC497 " -puts "(case 1)" -puts "=========" -puts "" -######################################################## -## Result of cut and fuse operation are faulty shapes although arguments are valid. -######################################################## - -restore [locate_data_file OCC497a.brep] a_1 -checkshape a_1 - -restore [locate_data_file OCC497b.brep] a_2 -checkshape a_2 - -if [catch {bcut result a_1 a_2 } catch_result] { - puts "Faulty OCC497:function CUT works wrongly " -} else { - puts "OCC497 : function CUT works without hangs up " -} -set square 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug497_2 b/tests/bugs/modalg/bug497_2 deleted file mode 100755 index f899ff8174..0000000000 --- a/tests/bugs/modalg/bug497_2 +++ /dev/null @@ -1,23 +0,0 @@ - -puts "=========" -puts " OCC497 " -puts "(case 2)" -puts "=========" -puts "" -######################################################## -## Result of cut and fuse operation are faulty shapes although arguments are valid. -######################################################## - -restore [locate_data_file OCC497c.brep] a_1 -checkshape a_1 - -restore [locate_data_file OCC497d.brep] a_2 -checkshape a_2 - -if [catch {bcut result a_1 a_2 } catch_result] { - puts "Faulty OCC497:function CUT works wrongly " -} else { - puts "OCC497 : function CUT works without hangs up " -} -set square 2225.65 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug497_3 b/tests/bugs/modalg/bug497_3 deleted file mode 100755 index b42ce3a8ce..0000000000 --- a/tests/bugs/modalg/bug497_3 +++ /dev/null @@ -1,22 +0,0 @@ -puts "TODO OCC12345 ALL: result is not a topological shape!!!" -puts "TODO OCC12345 ALL: TEST INCOMPLETE" - -puts "=========" -puts " OCC497 " -puts "(case 3)" -puts "=========" -puts "" -######################################################## -## Result of cut and fuse operation are faulty shapes although arguments are valid. -######################################################## - -restore [locate_data_file OCC497e.brep] a_1 -checkshape a_1 - -restore [locate_data_file OCC497f.brep] a_2 -checkshape a_2 - -bcut result a_1 a_2 - -set square 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug497_4 b/tests/bugs/modalg/bug497_4 deleted file mode 100755 index fd8c384917..0000000000 --- a/tests/bugs/modalg/bug497_4 +++ /dev/null @@ -1,23 +0,0 @@ - -puts "=========" -puts " OCC497 " -puts "(case 4)" -puts "=========" -puts "" -######################################################## -## Result of cut and fuse operation are faulty shapes although arguments are valid. -######################################################## - -restore [locate_data_file OCC497g.brep] a_1 -checkshape a_1 - -restore [locate_data_file OCC497h.brep] a_2 -checkshape a_2 - -if [catch {bfuse result a_1 a_2 } catch_result] { - puts "Faulty OCC497:function FUSE works wrongly " -} else { - puts "OCC497 : function FUSE works without hangs up " -} -set square 8710.56 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug497_5 b/tests/bugs/modalg/bug497_5 deleted file mode 100755 index 26fb1892c9..0000000000 --- a/tests/bugs/modalg/bug497_5 +++ /dev/null @@ -1,23 +0,0 @@ - -puts "=========" -puts " OCC497 " -puts "(case 5)" -puts "=========" -puts "" -######################################################## -## Result of cut and fuse operation are faulty shapes although arguments are valid. -######################################################## - -restore [locate_data_file OCC497i.brep] a_1 -checkshape a_1 - -restore [locate_data_file OCC497j.brep] a_2 -checkshape a_2 - -if [catch {bfuse result a_1 a_2 } catch_result] { - puts "Faulty OCC497:function FUSE works wrongly " -} else { - puts "OCC497 : function FUSE works without hangs up " -} -set square 3233.42 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug4993_1 b/tests/bugs/modalg/bug4993_1 deleted file mode 100755 index 5641abff35..0000000000 --- a/tests/bugs/modalg/bug4993_1 +++ /dev/null @@ -1,31 +0,0 @@ -puts "============" -puts "OCC4993" -puts "============" -puts "" -###################################################### -# Problem in boolean fusion -# (new topology) -###################################################### - -restore [locate_data_file OCC4993-s1.brep] s1 -restore [locate_data_file OCC4993-s2.brep] s2 - -checkshape s1 -checkshape s2 - -bop s1 s2 -bopfuse result - -set square 4854.51 - -set nb_v_good 40 -set nb_e_good 64 -set nb_w_good 24 -set nb_f_good 24 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 155 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug4993_2 b/tests/bugs/modalg/bug4993_2 deleted file mode 100755 index 7c5ff166b5..0000000000 --- a/tests/bugs/modalg/bug4993_2 +++ /dev/null @@ -1,31 +0,0 @@ -puts "============" -puts "OCC4993" -puts "============" -puts "" -###################################################### -# Problem in boolean fusion -# (new topology) -###################################################### - -restore [locate_data_file OCC4993-s1.brep] s1 -restore [locate_data_file OCC4993-s2.brep] s2 - -checkshape s1 -checkshape s2 - -bop s2 s1 -bopfuse result - -set square 4854.51 - -set nb_v_good 40 -set nb_e_good 64 -set nb_w_good 24 -set nb_f_good 24 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 155 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug500 b/tests/bugs/modalg/bug500 deleted file mode 100755 index c5b845234c..0000000000 --- a/tests/bugs/modalg/bug500 +++ /dev/null @@ -1,22 +0,0 @@ - -puts "=========" -puts " OCC500 " -puts "=========" -puts "" -############################### -## Result of pipe command of Draw is faulty -############################### - -restore [locate_data_file OCC500a.brep] a_1 -checkshape a_1 - -restore [locate_data_file OCC500b.brep] a_2 -checkshape a_2 - -if [catch {pipe result a_1 a_2 } catch_result] { - puts "Faulty OCC500 : function PIPE works wrongly " -} else { - puts "OCC500 : function PIPE works without hangs up " -} -set square 1246.13 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug501 b/tests/bugs/modalg/bug501 deleted file mode 100755 index 9a0ab7775a..0000000000 --- a/tests/bugs/modalg/bug501 +++ /dev/null @@ -1,18 +0,0 @@ - -puts "=========" -puts " OCC501 " -puts "=========" -puts "" -################################################## -## Exception during tcopy command (only in 3.0fix), SAM1339 (#2137) -################################################### - -restore [locate_data_file OCC501.brep] result - -if [catch {tcopy result b } catch_result] { - puts "Faulty OCC501 : function TCOPY works wrongly " -} else { - puts "OCC501 OK: function TCOPY works without hangs up " -} -set square 121895 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5157_1 b/tests/bugs/modalg/bug5157_1 deleted file mode 100644 index c34d06e902..0000000000 --- a/tests/bugs/modalg/bug5157_1 +++ /dev/null @@ -1,27 +0,0 @@ -puts "============" -puts "OCC5157" -puts "============" -puts "" -###################################################### -# DRAW commands vprops and sprops with tolerance 1.e-6 hange on attached shape. -###################################################### - -cpulimit 3500 -#dchrono h reset; dchrono h start - -catch { pload XDE } - -set BugNumber OCC5157 - -set status 0 -if {[catch { stepread [locate_data_file OCC5157.stp] a * } catch_result] } { - puts "Faulty ${BugNumber} : here is reading problem" -} else { - tpcompound result -} - -set tol_square 1.e-6 -set square 35273.9 -set 2dviewer 0 - - diff --git a/tests/bugs/modalg/bug5157_2 b/tests/bugs/modalg/bug5157_2 deleted file mode 100644 index 63b1821fab..0000000000 --- a/tests/bugs/modalg/bug5157_2 +++ /dev/null @@ -1,24 +0,0 @@ -puts "============" -puts "OCC5157" -puts "============" -puts "" -###################################################### -# DRAW commands vprops and sprops with tolerance 1.e-6 hange on attached shape. -###################################################### - -cpulimit 3500 -#dchrono h reset; dchrono h start - -catch { pload XDE } - -set BugNumber OCC5157 - -if { [catch { stepread [locate_data_file OCC5157.stp] a * } catch_result] } { - puts "Faulty ${BugNumber} : here is reading problem" -} else { - tpcompound result -} -set tol_square 1.e-6 -set square 35362.3 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug516 b/tests/bugs/modalg/bug516 deleted file mode 100755 index a260ef015b..0000000000 --- a/tests/bugs/modalg/bug516 +++ /dev/null @@ -1,23 +0,0 @@ - -puts "========" -puts "OCC516" -puts "========" -puts "" -######################################### -## Wrong classification of the 3D-point with the Solid . -######################################### - -point p 14.99999878745701 5.52319672860377e-07 7.78393041 -vertex v 14.99999878745701 5.52319672860377e-07 7.78393041 -restore [locate_data_file OCC516.brep] result - -set cls [bclassify result p] - -if { [regexp {OUT} $cls] } { - puts "Faulty : Wrong classification of the 3D-point with the Solid" -} else { - puts "CORRECT classification of the 3D-point with the Solid" -} - -set square 7752.98 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug526 b/tests/bugs/modalg/bug526 deleted file mode 100755 index 44ea80917a..0000000000 --- a/tests/bugs/modalg/bug526 +++ /dev/null @@ -1,32 +0,0 @@ -#INTERFACE IGES -puts "========" -puts "OCC526" -puts "========" -puts "" -################################################ -## BRepAlgoAPI_Section fails to build planar sections on some faces -################################################ - -pload XDE - -restore [locate_data_file OCC592.brep] a - -set Z 67.599311020481764 -plane p 0 0 $Z -psection r1 a p -if ![regexp VERTEX [statshape r1]] {puts [format "OCC526 FAULTY Z=%f" $Z ] } - -set Z 66.599311020481764 -plane p 0 0 $Z -psection r2 a p -if ![regexp VERTEX [statshape r2]] {puts [format "OCC526 FAULTY Z=%f" $Z ] } - -set Z 65.599311020481764 -plane p 0 0 $Z -psection result a p -if ![regexp VERTEX [statshape result]] {puts [format "OCC526 FAULTY Z=%f" $Z ] } - -set length 27.8021 -set 2dviewer 1 - - diff --git a/tests/bugs/modalg/bug527 b/tests/bugs/modalg/bug527 deleted file mode 100755 index 135d9479fb..0000000000 --- a/tests/bugs/modalg/bug527 +++ /dev/null @@ -1,16 +0,0 @@ -pload QAcommands - -puts "========" -puts "OCC527" -puts "========" -puts "" -##################################################### -## BRepAlgoAPI_Section creates very distant geometry on some planar sections -##################################################### - -cpulimit 3600 -restore [locate_data_file OCC527.brep] result -OCC527 result - -set square 3774.42 -set 2dviewer 1 diff --git a/tests/bugs/modalg/bug528 b/tests/bugs/modalg/bug528 deleted file mode 100755 index 4d11a8cb59..0000000000 --- a/tests/bugs/modalg/bug528 +++ /dev/null @@ -1,23 +0,0 @@ - -puts "========================" -puts "OCC528" -puts "========================" -puts "" -############################################## -## Result of bcut command is faulty although arguments are valid -############################################## - -restore [locate_data_file OCC528_1.brep] c1 -checkshape c1 - -restore [locate_data_file OCC528_2.brep] c2 -checkshape c2 - -if { [catch { bcut result c1 c2 } catch_result] } { - puts "OCC528 Faulty: function BCUT works wrongly" -} else { - puts "OCC528 OK:function BCUT works properly" -} - -set square 124.092 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug530 b/tests/bugs/modalg/bug530 deleted file mode 100755 index d2f9ef0601..0000000000 --- a/tests/bugs/modalg/bug530 +++ /dev/null @@ -1,29 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -puts "=======" -puts "OCC530" -puts "=======" -puts "" -#################################### -## Draw hungs up during performing bfuse operation -#################################### - -cpulimit 3000 - -restore [locate_data_file OCC530_1.brep] c1 -checkshape c1 - -restore [locate_data_file OCC530_2.brep] c2 -checkshape c2 - -if { [catch { bfuse result c1 c2 } catch_result] } { - puts "Faulty OCC530 : function BFUSE works wrongly" -} else { - puts "OCC530 OK: function BFUSE works properly" -} - -set square 0 -set 2dviewer 0 - - diff --git a/tests/bugs/modalg/bug534_1 b/tests/bugs/modalg/bug534_1 deleted file mode 100755 index 6eab05b4d7..0000000000 --- a/tests/bugs/modalg/bug534_1 +++ /dev/null @@ -1,27 +0,0 @@ - -puts "========================" -puts " OCC534 " -puts " case 1 " -puts "========================" -puts "" - -hyperbola hyperbola 0 0 0 30 10 -extsurf es_hyperbola hyperbola 0 0 1 -offset es_hyperbola_of es_hyperbola 5 -mkface result es_hyperbola_of 0 3 0 40 - - -set tolerance [maxtolerance result] -regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxFaceTolerance -regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxEdgeTolerance -regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxVertexTolerance - -if { $MaxFaceTolerance > 1 || $MaxEdgeTolerance > 1 || $MaxVertexTolerance > 1 } { - puts "Faulty : Tolerance of shape is more then 1.0" -} else { - puts "Tolerance is OK" -} - -set square 11451.2 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug534_2 b/tests/bugs/modalg/bug534_2 deleted file mode 100755 index 7a326cce0e..0000000000 --- a/tests/bugs/modalg/bug534_2 +++ /dev/null @@ -1,29 +0,0 @@ - -puts "========================" -puts " OCC534 " -puts " case 2 " -puts "========================" -puts "" - -hyperbola hyperbola 0 0 0 30 10 -extsurf es_hyperbola hyperbola 0 0 1 -offset es_hyperbola_of es_hyperbola 5 -offset es_hyperbola_of_of es_hyperbola_of 5 -mkface result es_hyperbola_of_of 0 3 0 40 - -set tolerance [maxtolerance result] -regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxFaceTolerance -regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxEdgeTolerance -regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxVertexTolerance - -if { $MaxFaceTolerance > 1 || $MaxEdgeTolerance > 1 || $MaxVertexTolerance > 1 } { - puts "Faulty : Tolerance of shape is more then 1.0" -} else { - puts "Tolerance is OK" -} - -set square 11460.7 -set 2dviewer 0 - - - diff --git a/tests/bugs/modalg/bug534_3 b/tests/bugs/modalg/bug534_3 deleted file mode 100755 index 57d84c3831..0000000000 --- a/tests/bugs/modalg/bug534_3 +++ /dev/null @@ -1,26 +0,0 @@ - -puts "========================" -puts " OCC534 " -puts " case 3 " -puts "========================" -puts "" - -hyperbola hyperbola 0 0 0 30 10 -revsurf rs_hyperbola hyperbola 0 400 0 1 0 0 -offset rs_hyperbola_of rs_hyperbola 5 -mkface result rs_hyperbola_of .3 .5 .3 .5 - -set tolerance [maxtolerance result] -regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxFaceTolerance -regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxEdgeTolerance -regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxVertexTolerance - -if { $MaxFaceTolerance > 1 || $MaxEdgeTolerance > 1 || $MaxVertexTolerance > 1 } { - puts "Faulty : Tolerance of shape is more then 1.0" -} else { - puts "Tolerance is OK" -} - -set square 171.992 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug534_4 b/tests/bugs/modalg/bug534_4 deleted file mode 100755 index c15d7e0201..0000000000 --- a/tests/bugs/modalg/bug534_4 +++ /dev/null @@ -1,26 +0,0 @@ - -puts "========================" -puts " OCC534 " -puts " case 4 " -puts "========================" -puts "" - -hyperbola hyperbola 0 0 0 30 10 -revsurf rs_hyperbola hyperbola 0 400 0 1 0 0 -offset rs_hyperbola_of rs_hyperbola 5 -offset rs_hyperbola_of_of rs_hyperbola_of 5 -mkface result rs_hyperbola_of_of .3 .5 .3 .5 - -set tolerance [maxtolerance result] -regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxFaceTolerance -regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxEdgeTolerance -regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxVertexTolerance - -if { $MaxFaceTolerance > 1 || $MaxEdgeTolerance > 1 || $MaxVertexTolerance > 1 } { - puts "Faulty : Tolerance of shape is more then 1.0" -} else { - puts "Tolerance is OK" -} - -set square 84.8861 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug534_5 b/tests/bugs/modalg/bug534_5 deleted file mode 100755 index 1b73981893..0000000000 --- a/tests/bugs/modalg/bug534_5 +++ /dev/null @@ -1,25 +0,0 @@ - -puts "========================" -puts " OCC534 " -puts " case 5 " -puts "========================" -puts "" - -parabola parabola 0 0 0 30 -revsurf rs_parabola parabola 0 400 0 1 0 0 -offset rs_parabola_of rs_parabola 10 -mkface result rs_parabola_of .3 .5 .3 .5 - -set tolerance [maxtolerance result] -regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxFaceTolerance -regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxEdgeTolerance -regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxVertexTolerance - -if { $MaxFaceTolerance > 1 || $MaxEdgeTolerance > 1 || $MaxVertexTolerance > 1 } { - puts "Faulty : Tolerance of shape is more then 1.0" -} else { - puts "Tolerance is OK" -} - -set square 13.3227 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug534_6 b/tests/bugs/modalg/bug534_6 deleted file mode 100755 index a8bef01df9..0000000000 --- a/tests/bugs/modalg/bug534_6 +++ /dev/null @@ -1,27 +0,0 @@ - -puts "========================" -puts " OCC534 " -puts " case 6 " -puts "========================" -puts "" - -parabola parabola 0 0 0 30 -revsurf rs_parabola parabola 0 400 0 1 0 0 -offset rs_parabola_of rs_parabola 10 -offset rs_parabola_of_of rs_parabola_of 5 -mkface result rs_parabola_of_of .3 .5 .3 .5 - -set tolerance [maxtolerance result] -regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxFaceTolerance -regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxEdgeTolerance -regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxVertexTolerance - -if { $MaxFaceTolerance > 1 || $MaxEdgeTolerance > 1 || $MaxVertexTolerance > 1 } { - puts "Faulty : Tolerance of shape is more then 1.0" -} else { - puts "Tolerance is OK" -} - -set square 11.9915 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug535 b/tests/bugs/modalg/bug535 deleted file mode 100755 index 54bc654f96..0000000000 --- a/tests/bugs/modalg/bug535 +++ /dev/null @@ -1,34 +0,0 @@ -#INTERFACE IGES -puts "=======" -puts "OCC535" -puts "=======" -puts "" -############################################################# -## After command "fixshape" in DRAW on attached shape quantity of shapes obtained -## with help command "nbs" is increased. -############################################################# - -pload XDE - -restore [locate_data_file OCC535.brep] a - -set nb_info_a [nbshapes a] -regexp {SHAPE +: +([-0-9.+eE]+)} $nb_info_a full r1 - -fixshape result a - -set nb_info_res [nbshapes result] -regexp {SHAPE +: +([-0-9.+eE]+)} $nb_info_res full r2 - -puts "" -puts [format "before Shapes = %s after Shapes = %s" $r1 $r2] -puts "" - -if { $r1 == $r2 } { - puts "OCC535 OK" -} else { - puts "OCC535 Faulty" -} - -set square 3554.31 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug539_1 b/tests/bugs/modalg/bug539_1 deleted file mode 100755 index 5c3493849c..0000000000 --- a/tests/bugs/modalg/bug539_1 +++ /dev/null @@ -1,21 +0,0 @@ - -puts "========================" -puts " OCC539 " -puts "(case 1)" -puts "========================" -puts "" - - puts "===========================================" - puts " BOPCOMMON case_4_shell.brep and case_4_wire3.brep" - puts "===========================================" - puts " " - -restore [locate_data_file case_4_shell.brep] a -restore [locate_data_file case_4_wire3.brep] b -bop a b -bopcommon result - -set nb_v_good 15 -set nb_e_good 10 -set length 1150.78 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug539_2 b/tests/bugs/modalg/bug539_2 deleted file mode 100755 index dc31058c43..0000000000 --- a/tests/bugs/modalg/bug539_2 +++ /dev/null @@ -1,22 +0,0 @@ - -puts "========================" -puts " OCC539 " -puts "(case 2)" -puts "========================" -puts "" - - puts "============================================" - puts " BOPTUC case_4_shell.brep and case_4_wire3.brep" - puts "============================================" - puts " " - -restore [locate_data_file case_4_shell.brep] a -restore [locate_data_file case_4_wire3.brep] b -bop a b -boptuc result - -set nb_v_good 16 -set nb_e_good 11 -set length 929.278 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug548 b/tests/bugs/modalg/bug548 deleted file mode 100755 index b301f73ed9..0000000000 --- a/tests/bugs/modalg/bug548 +++ /dev/null @@ -1,30 +0,0 @@ -puts "========" -puts "OCC548" -puts "OCC628" -puts "========" -puts "" -################################################################## -# Function BRepTool::IsClosed returns Standard_True although argument is open shell -# Incorrect work of BRepCheck -################################################################## - -pload XDE - -restore [locate_data_file CTO908_topo103-t.brep] a - -decho off - -checkshape a -checkshape a b - -decho on - -fixshape result a 0.001 - -set che [checkshape result c] -if { [regexp {problems} $che] } { - puts "Faulty OCC628" -} - -set square 119630 -set 2dviewer 2 diff --git a/tests/bugs/modalg/bug570 b/tests/bugs/modalg/bug570 deleted file mode 100644 index 6066927281..0000000000 --- a/tests/bugs/modalg/bug570 +++ /dev/null @@ -1,11 +0,0 @@ -pload QAcommands - -puts "========" -puts "OCC570" -puts "========" -puts "" - -OCC570 result - -set square 58500 -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug571_1 b/tests/bugs/modalg/bug571_1 deleted file mode 100755 index ad320cbd6e..0000000000 --- a/tests/bugs/modalg/bug571_1 +++ /dev/null @@ -1,22 +0,0 @@ -puts "========" -puts "OCC571" -puts "========" -puts "" -########################## -## Fillet operation fails on given shape -########################## -## LIMITATION: Builds fillet with 0.03<=r<=1.2 -########################## - -restore [locate_data_file OCC571.brep] a -checkshape a -explode a - -if [catch {fillet result a_1 1.2 a_2 } catch_result] { - puts "Faulty OCC571 exception (case 1): Fillet operation fails on given shape " -} else { - puts " OCC571 (case 1) OK: Fillet operation was made" -} - -set square 21118.1 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug571_2 b/tests/bugs/modalg/bug571_2 deleted file mode 100755 index 99c38bbb00..0000000000 --- a/tests/bugs/modalg/bug571_2 +++ /dev/null @@ -1,22 +0,0 @@ -puts "========" -puts "OCC571" -puts "========" -puts "" -########################## -## Fillet operation fails on given shape -########################## -## LIMITATION: Builds fillet with 0.03<=r<=1.2 -########################## - -restore [locate_data_file OCC571.brep] a -checkshape a -explode a - -if [catch {fillet result a_1 0.03 a_2 } catch_result] { - puts "Faulty OCC571 exception (case 2): Fillet operation fails on given shape " -} else { - puts " OCC571 (case 2) OK: Fillet operation was made" -} - -set square 21209.9 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5729 b/tests/bugs/modalg/bug5729 deleted file mode 100644 index a594ca7460..0000000000 --- a/tests/bugs/modalg/bug5729 +++ /dev/null @@ -1,41 +0,0 @@ -puts "============" -puts "OCC5729" -puts "============" -puts "" -###################################################### -# Regression on case cfe 900 K5 -###################################################### - -set BugNumber OCC5729 - -restore [locate_data_file OCC5729-f1.brep] f1 -restore [locate_data_file OCC5729-f2.brep] f2 - -decho off -set che_1 [checkshape f1] -decho on -if { [regexp {Faulty} $che_1] } { - puts "Faulty ${BugNumber} : checkshape is wrong for f1" -} - -decho off -set che_2 [checkshape f2] -decho on -if { [regexp {Faulty} $che_2] } { - puts "Faulty ${BugNumber} : checkshape is wrong for f2" -} - -bfuse result f1 f2 - -set square 28559.8 - -set nb_v_good 13 -set nb_e_good 22 -set nb_w_good 15 -set nb_f_good 13 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 66 - diff --git a/tests/bugs/modalg/bug578_1 b/tests/bugs/modalg/bug578_1 deleted file mode 100644 index 3993d65e01..0000000000 --- a/tests/bugs/modalg/bug578_1 +++ /dev/null @@ -1,25 +0,0 @@ -puts "================" -puts "OCC578" -puts "OCC584" -puts "================" -puts "" - -restore [locate_data_file OCC578_w1.brep] w1 -checkshape w1 - -restore [locate_data_file OCC578_w2.brep] w2 -checkshape w2 - -set x 1 -set y 1 -set z 0.5 -box b ${x} ${y} ${z} -checkshape b - -bfuse res1 w1 w2 -checkshape res1 - -bcut result b res1 - -set square 4.84596 -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug578_2 b/tests/bugs/modalg/bug578_2 deleted file mode 100644 index 89e192879a..0000000000 --- a/tests/bugs/modalg/bug578_2 +++ /dev/null @@ -1,27 +0,0 @@ -puts "================" -puts "OCC578" -puts "OCC582" -puts "OCC583" -puts "================" -puts "" - -restore [locate_data_file OCC578_w1.brep] w1 -checkshape w1 - -restore [locate_data_file OCC578_w2.brep] w2 -checkshape w2 - -set x 1 -set y 1 -set z 0.5 -box b ${x} ${y} ${z} -checkshape b - -bfuse res1 w1 w2 -checkshape res1 - -bop b res1 -bopcut result - -set square 4.84596 -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug57_1 b/tests/bugs/modalg/bug57_1 deleted file mode 100755 index aa41a12a20..0000000000 --- a/tests/bugs/modalg/bug57_1 +++ /dev/null @@ -1,15 +0,0 @@ - -puts "================" -puts "BUC60974 " -puts " OCC57" -puts "================" -puts "" - -restore [locate_data_file BUC60974.brep] a -explode a -checkshape a_1 -checkshape a_2 - -bfuse result a_1 a_2 -set square 191388 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug57_2 b/tests/bugs/modalg/bug57_2 deleted file mode 100755 index 0774f01fae..0000000000 --- a/tests/bugs/modalg/bug57_2 +++ /dev/null @@ -1,15 +0,0 @@ - -puts "================" -puts "BUC60974 " -puts " OCC57" -puts "================" -puts "" - -restore [locate_data_file BUC60974.brep] a -explode a -checkshape a_1 -checkshape a_2 - -bfuse result a_2 a_1 -set square 191388 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_1 b/tests/bugs/modalg/bug5805_1 deleted file mode 100644 index ccde342639..0000000000 --- a/tests/bugs/modalg/bug5805_1 +++ /dev/null @@ -1,59 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" -puts "" -###################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -###################################################### - -set BugNumber OCC5805 - -puts "demonstration of pipes and hollowing for GTISoft" -puts "" -puts "Scenario 2A: Hollowed elliptical cylinder - ThroughSection and MakeThickSolid (work-around: ellipse is split into 2)" - - -ellipse e 10 60 0 1 0 0 5 3 -trim e1 e 0 pi -trim e2 e pi 2*pi -mkedge ee1 e1 -mkedge ee2 e2 -wire w1 ee1 ee2 -copy w1 w2 -ttranslate w2 -20 0 0 - -if { [catch { thrusections rthru2 1 1 w1 w2 } catch_result] } { - puts "Faulty ${BugNumber} : thrusections is wrong" -} - -explode rthru2 f - -if { [catch { offsetshape result rthru2 -0.5 rthru2_3 rthru2_4 } catch_result] } { - puts "Faulty ${BugNumber} : offsetshape is wrong" -} - -if { [catch { set tolmaxres [tolmax result] } catch_result] } { - puts "Faulty ${BugNumber} : tolmax is wrong" -} - -regexp {max tol = ([-0-9.+eE]+)} $tolmaxres full maxtolerance -if { [catch { expr $maxtolerance } result] } { - puts "Faulty ${BugNumber} : maxtolerance is wrong (1)." -} -if { $maxtolerance > 1. } { - puts "Faulty ${BugNumber} : maxtolerance is wrong (2)." -} - -set square 981.941 - -set nb_v_good 6 -set nb_e_good 10 -set nb_w_good 8 -set nb_f_good 6 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 32 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_10 b/tests/bugs/modalg/bug5805_10 deleted file mode 100755 index 45b8520436..0000000000 --- a/tests/bugs/modalg/bug5805_10 +++ /dev/null @@ -1,58 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -# ellipse1 -ellipse ell 10 0 0 1 0 0 5 3 -mkedge ee1 ell -wire UpCover ee1 - -# ellipse2 -copy ee1 ee2 -ttranslate ee2 -20 0 0 -wire BottomCover ee2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {s_2} $calcul $type } - - -set square 1041.35 - -set nb_v_good 3 -set nb_e_good 5 -set nb_w_good 6 -set nb_f_good 5 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 21 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_11 b/tests/bugs/modalg/bug5805_11 deleted file mode 100755 index 9bc05c78a6..0000000000 --- a/tests/bugs/modalg/bug5805_11 +++ /dev/null @@ -1,57 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 -cpulimit 1400 -# ellipse1 -ellipse ell 10 0 0 1 0 0 5 3 -mkedge ee1 ell -wire UpCover ee1 - -# ellipse2 -copy ee1 ee2 -ttranslate ee2 -20 0 0 -wire BottomCover ee2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {s_3} $calcul $type } - - -set square 1041.35 - -set nb_v_good 3 -set nb_e_good 5 -set nb_w_good 6 -set nb_f_good 5 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 21 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_12 b/tests/bugs/modalg/bug5805_12 deleted file mode 100755 index 417a4b2c68..0000000000 --- a/tests/bugs/modalg/bug5805_12 +++ /dev/null @@ -1,58 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -# ellipse1 -ellipse ell 10 0 0 1 0 0 5 3 -mkedge ee1 ell -wire UpCover ee1 - -# ellipse2 -copy ee1 ee2 -ttranslate ee2 -20 0 0 -wire BottomCover ee2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {s_2 s_3} $calcul $type } - - -set square 982.254 - -set nb_v_good 3 -set nb_e_good 5 -set nb_w_good 6 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 20 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_13 b/tests/bugs/modalg/bug5805_13 deleted file mode 100755 index 208f29e5c8..0000000000 --- a/tests/bugs/modalg/bug5805_13 +++ /dev/null @@ -1,74 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -# -# v12 v11 -# *---------------------* -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# *---------------------* -# v13 v14 -# - -set z1 5 -set z2 -5 - -# quadrangle1 -polyline UpCover 0 0 ${z1} 5 0 ${z1} 5 5 ${z1} 0 5 ${z1} 0 0 ${z1} - -# quadrangle2 -polyline BottomCover 0 0 ${z2} 5 0 ${z2} 5 5 ${z2} 0 5 ${z2} 0 0 ${z2} - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {} $calcul $type } - - -set square 176 - -set nb_v_good 8 -set nb_e_good 12 -set nb_w_good 6 -set nb_f_good 6 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 34 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_14 b/tests/bugs/modalg/bug5805_14 deleted file mode 100755 index 88bb8d91d5..0000000000 --- a/tests/bugs/modalg/bug5805_14 +++ /dev/null @@ -1,74 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -# -# v12 v11 -# *---------------------* -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# *---------------------* -# v13 v14 -# - -set z1 5 -set z2 -5 - -# quadrangle1 -polyline UpCover 0 0 ${z1} 5 0 ${z1} 5 5 ${z1} 0 5 ${z1} 0 0 ${z1} - -# quadrangle2 -polyline BottomCover 0 0 ${z2} 5 0 ${z2} 5 5 ${z2} 0 5 ${z2} 0 0 ${z2} - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {s_5} $calcul $type } - - -set square 402 - -set nb_v_good 16 -set nb_e_good 24 -set nb_w_good 12 -set nb_f_good 11 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 65 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_15 b/tests/bugs/modalg/bug5805_15 deleted file mode 100755 index e01daaa059..0000000000 --- a/tests/bugs/modalg/bug5805_15 +++ /dev/null @@ -1,74 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -# -# v12 v11 -# *---------------------* -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# *---------------------* -# v13 v14 -# - -set z1 5 -set z2 -5 - -# quadrangle1 -polyline UpCover 0 0 ${z1} 5 0 ${z1} 5 5 ${z1} 0 5 ${z1} 0 0 ${z1} - -# quadrangle2 -polyline BottomCover 0 0 ${z2} 5 0 ${z2} 5 5 ${z2} 0 5 ${z2} 0 0 ${z2} - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {s_6} $calcul $type } - - -set square 402 - -set nb_v_good 16 -set nb_e_good 24 -set nb_w_good 12 -set nb_f_good 11 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 65 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_16 b/tests/bugs/modalg/bug5805_16 deleted file mode 100755 index 07fa432809..0000000000 --- a/tests/bugs/modalg/bug5805_16 +++ /dev/null @@ -1,74 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -# -# v12 v11 -# *---------------------* -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# *---------------------* -# v13 v14 -# - -set z1 5 -set z2 -5 - -# quadrangle1 -polyline UpCover 0 0 ${z1} 5 0 ${z1} 5 5 ${z1} 0 5 ${z1} 0 0 ${z1} - -# quadrangle2 -polyline BottomCover 0 0 ${z2} 5 0 ${z2} 5 5 ${z2} 0 5 ${z2} 0 0 ${z2} - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {s_5 s_6} $calcul $type } - - -set square 378 - -set nb_v_good 16 -set nb_e_good 24 -set nb_w_good 12 -set nb_f_good 10 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 64 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_17 b/tests/bugs/modalg/bug5805_17 deleted file mode 100755 index a64f73a1b6..0000000000 --- a/tests/bugs/modalg/bug5805_17 +++ /dev/null @@ -1,67 +0,0 @@ -puts "TODO OCC11111 ALL: Error : Result shape is WRONG" -puts "TODO ?OCC11111 ALL: Error : The square of result shape is" -puts "TODO ?OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO ?OCC11111 ALL: Faulty OCC5805 : result is not Closed shape" -puts "TODO ?OCC11111 ALL: Error : The command is not valid." -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -set z1 5 -set z2 -5 - -# beziercurve1 -beziercurve bc1 5 5 5 ${z1} 5 -5 ${z1} -5 -5 ${z1} -5 5 ${z1} 5 5 ${z1} -mkedge e1 bc1 -wire UpCover e1 - -# beziercurve2 -copy e1 e2 -ttranslate e2 0 0 ${z2} -wire BottomCover e2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.001 -catch { OFFSETSHAPE $distance {} $calcul $type } -# Null result - - -set square 495.635 - -set nb_v_good 2 -set nb_e_good 3 -set nb_w_good 3 -set nb_f_good 3 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 13 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_18 b/tests/bugs/modalg/bug5805_18 deleted file mode 100755 index 0bcf401b6a..0000000000 --- a/tests/bugs/modalg/bug5805_18 +++ /dev/null @@ -1,65 +0,0 @@ -puts "TODO OCC11111 ALL: Error : Result shape is WRONG" -puts "TODO OCC11111 ALL: Error : The square of result shape is" - -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -set z1 5 -set z2 -5 - -# beziercurve1 -beziercurve bc1 5 5 5 ${z1} 5 -5 ${z1} -5 -5 ${z1} -5 5 ${z1} 5 5 ${z1} -mkedge e1 bc1 -wire UpCover e1 - -# beziercurve2 -copy e1 e2 -ttranslate e2 0 0 ${z2} -wire BottomCover e2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.001 -catch { OFFSETSHAPE $distance {s_2} $calcul $type } -# Bad result - - -set square 495.635 - -set nb_v_good 2 -set nb_e_good 3 -set nb_w_good 3 -set nb_f_good 3 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 13 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_19 b/tests/bugs/modalg/bug5805_19 deleted file mode 100755 index ea4c692378..0000000000 --- a/tests/bugs/modalg/bug5805_19 +++ /dev/null @@ -1,66 +0,0 @@ -puts "TODO ?OCC11111 ALL: Error : Result shape is WRONG" -puts "TODO ?OCC11111 ALL: Error : The square of result shape is" -puts "TODO ?OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" - -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -set z1 5 -set z2 -5 - -# beziercurve1 -beziercurve bc1 5 5 5 ${z1} 5 -5 ${z1} -5 -5 ${z1} -5 5 ${z1} 5 5 ${z1} -mkedge e1 bc1 -wire UpCover e1 - -# beziercurve2 -copy e1 e2 -ttranslate e2 0 0 ${z2} -wire BottomCover e2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.001 -catch { OFFSETSHAPE $distance {s_3} $calcul $type } -# Bad result - - -set square 495.635 - -set nb_v_good 2 -set nb_e_good 3 -set nb_w_good 3 -set nb_f_good 3 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 13 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_2 b/tests/bugs/modalg/bug5805_2 deleted file mode 100644 index b9739e9327..0000000000 --- a/tests/bugs/modalg/bug5805_2 +++ /dev/null @@ -1,54 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" -puts "" -###################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -###################################################### - -set BugNumber OCC5805 - -puts "demonstration of pipes and hollowing for GTISoft" -puts "" -puts "Scenario 2A: Hollowed elliptical cylinder - ThroughSection and MakeThickSolid" - -ellipse e 10 60 0 1 0 0 5 3 -mkedge ee e -wire w1 ee -copy w1 w2 -ttranslate w2 -20 0 0 - -if { [catch { thrusections rthru2 1 1 w1 w2 } catch_result] } { - puts "Faulty ${BugNumber} : thrusections is wrong" -} - -explode rthru2 f - -if { [catch { offsetshape result rthru2 -0.5 rthru2_2 rthru2_3 } catch_result] } { - puts "Faulty ${BugNumber} : offsetshape is wrong" -} - -if { [catch { set tolmaxres [tolmax result] } catch_result] } { - puts "Faulty ${BugNumber} : tolmax is wrong" -} -regexp {max tol = ([-0-9.+eE]+)} $tolmaxres full maxtolerance -if { [catch { expr $maxtolerance } catch_result] } { - puts "Faulty ${BugNumber} : maxtolerance is wrong (1)." -} -if { $maxtolerance > 1. } { - puts "Faulty ${BugNumber} : maxtolerance is wrong (2)." -} - -set square 982.254 - -set nb_v_good 3 -set nb_e_good 5 -set nb_w_good 6 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 20 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_20 b/tests/bugs/modalg/bug5805_20 deleted file mode 100755 index 6634ab1936..0000000000 --- a/tests/bugs/modalg/bug5805_20 +++ /dev/null @@ -1,65 +0,0 @@ -puts "TODO OCC11111 ALL: Error : Result shape is WRONG" -puts "TODO OCC11111 ALL: Error : The square of result shape is" - -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -set z1 5 -set z2 -5 - -# beziercurve1 -beziercurve bc1 5 5 5 ${z1} 5 -5 ${z1} -5 -5 ${z1} -5 5 ${z1} 5 5 ${z1} -mkedge e1 bc1 -wire UpCover e1 - -# beziercurve2 -copy e1 e2 -ttranslate e2 0 0 ${z2} -wire BottomCover e2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.001 -catch { OFFSETSHAPE $distance {s_2 s_3} $calcul $type } -# Bad result - - -set square 495.635 - -set nb_v_good 2 -set nb_e_good 3 -set nb_w_good 3 -set nb_f_good 3 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 13 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_21 b/tests/bugs/modalg/bug5805_21 deleted file mode 100755 index d3d4fb9cb3..0000000000 --- a/tests/bugs/modalg/bug5805_21 +++ /dev/null @@ -1,60 +0,0 @@ -puts "TODO ?OCC11111 ALL: Error : The square of result shape is" - -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -# pbsplinecurve1 -pbsplinecurve pbc1 3 9 0 1 1 1 2 1 3 1 4 1 5 1 6 1 7 1 8 1 -1 0 0 1 -2 2 0 1 0 1 0 1 2 2 0 1 1 0 0 1 2 -2 0 1 0 -1 0 1 -2 -2 0 1 -mkedge e1 pbc1 -wire UpCover e1 - -# pbsplinecurve1 -copy e1 e2 -ttranslate e2 0 0 20 -wire BottomCover e2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.1 -catch { OFFSETSHAPE $distance {} $calcul $type } - - -set square 236.013 - -set nb_v_good 2 -set nb_e_good 3 -set nb_w_good 3 -set nb_f_good 3 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 13 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_22 b/tests/bugs/modalg/bug5805_22 deleted file mode 100755 index 20d01407a6..0000000000 --- a/tests/bugs/modalg/bug5805_22 +++ /dev/null @@ -1,60 +0,0 @@ -puts "TODO ?OCC11111 ALL: Error : The square of result shape is" - -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -# pbsplinecurve1 -pbsplinecurve pbc1 3 9 0 1 1 1 2 1 3 1 4 1 5 1 6 1 7 1 8 1 -1 0 0 1 -2 2 0 1 0 1 0 1 2 2 0 1 1 0 0 1 2 -2 0 1 0 -1 0 1 -2 -2 0 1 -mkedge e1 pbc1 -wire UpCover e1 - -# pbsplinecurve1 -copy e1 e2 -ttranslate e2 0 0 20 -wire BottomCover e2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.1 -catch { OFFSETSHAPE $distance {s_3} $calcul $type } - - -set square 484.846 - -set nb_v_good 3 -set nb_e_good 5 -set nb_w_good 6 -set nb_f_good 5 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 21 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_23 b/tests/bugs/modalg/bug5805_23 deleted file mode 100755 index 0995e525e2..0000000000 --- a/tests/bugs/modalg/bug5805_23 +++ /dev/null @@ -1,60 +0,0 @@ -puts "TODO ?OCC11111 ALL: Error : The square of result shape is" - -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -# pbsplinecurve1 -pbsplinecurve pbc1 3 9 0 1 1 1 2 1 3 1 4 1 5 1 6 1 7 1 8 1 -1 0 0 1 -2 2 0 1 0 1 0 1 2 2 0 1 1 0 0 1 2 -2 0 1 0 -1 0 1 -2 -2 0 1 -mkedge e1 pbc1 -wire UpCover e1 - -# pbsplinecurve1 -copy e1 e2 -ttranslate e2 0 0 20 -wire BottomCover e2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.1 -catch { OFFSETSHAPE $distance {s_2} $calcul $type } - - -set square 484.846 - -set nb_v_good 3 -set nb_e_good 5 -set nb_w_good 6 -set nb_f_good 5 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 21 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_24 b/tests/bugs/modalg/bug5805_24 deleted file mode 100755 index d3c2632ab9..0000000000 --- a/tests/bugs/modalg/bug5805_24 +++ /dev/null @@ -1,60 +0,0 @@ -puts "TODO ?OCC11111 ALL: Error : The square of result shape is" - -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -# pbsplinecurve1 -pbsplinecurve pbc1 3 9 0 1 1 1 2 1 3 1 4 1 5 1 6 1 7 1 8 1 -1 0 0 1 -2 2 0 1 0 1 0 1 2 2 0 1 1 0 0 1 2 -2 0 1 0 -1 0 1 -2 -2 0 1 -mkedge e1 pbc1 -wire UpCover e1 - -# pbsplinecurve1 -copy e1 e2 -ttranslate e2 0 0 20 -wire BottomCover e2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.1 -catch { OFFSETSHAPE $distance {s_3 s_2} $calcul $type } - - -set square 472.222 - -set nb_v_good 3 -set nb_e_good 5 -set nb_w_good 6 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 20 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_25 b/tests/bugs/modalg/bug5805_25 deleted file mode 100755 index 5f50d97c53..0000000000 --- a/tests/bugs/modalg/bug5805_25 +++ /dev/null @@ -1,85 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -# -# * -# | \ -# | \ -# | \ -# | \ -# | \ -# | \ -# | * v3 \ -# | | \ \ -# | | \ \ -# | | \ \ -# | | \ \ -# | | /* v2 * -# | | / / -# | | / / -# | | / / -# | * / -# | v1 / -# | / -# | / -# | / -# | / -# | / -# |/ -# * -# -cpulimit 1400 -set z1 10 -set z2 -10 - -# triangle1 -polyline UpCover 0 0 ${z1} 5 5 ${z1} 0 10 ${z1} 0 0 ${z1} - -# triangle2 -polyline BottomCover -5 -5 ${z2} 10 10 ${z2} -5 20 ${z2} -5 -5 ${z2} - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {} $calcul $type } - - -set square 914.876 - -set nb_v_good 6 -set nb_e_good 9 -set nb_w_good 5 -set nb_f_good 5 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 27 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_26 b/tests/bugs/modalg/bug5805_26 deleted file mode 100755 index dbdbc167b3..0000000000 --- a/tests/bugs/modalg/bug5805_26 +++ /dev/null @@ -1,85 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -# -# * -# | \ -# | \ -# | \ -# | \ -# | \ -# | \ -# | * v3 \ -# | | \ \ -# | | \ \ -# | | \ \ -# | | \ \ -# | | /* v2 * -# | | / / -# | | / / -# | | / / -# | * / -# | v1 / -# | / -# | / -# | / -# | / -# | / -# |/ -# * -# - -set z1 10 -set z2 -10 - -# triangle1 -polyline UpCover 0 0 ${z1} 5 5 ${z1} 0 10 ${z1} 0 0 ${z1} - -# triangle2 -polyline BottomCover -5 -5 ${z2} 10 10 ${z2} -5 20 ${z2} -5 -5 ${z2} - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {s_4} $calcul $type } - - -set square 2011.91 - -set nb_v_good 12 -set nb_e_good 18 -set nb_w_good 10 -set nb_f_good 9 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 51 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_27 b/tests/bugs/modalg/bug5805_27 deleted file mode 100755 index 909933b8a6..0000000000 --- a/tests/bugs/modalg/bug5805_27 +++ /dev/null @@ -1,85 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -# -# * -# | \ -# | \ -# | \ -# | \ -# | \ -# | \ -# | * v3 \ -# | | \ \ -# | | \ \ -# | | \ \ -# | | \ \ -# | | /* v2 * -# | | / / -# | | / / -# | | / / -# | * / -# | v1 / -# | / -# | / -# | / -# | / -# | / -# |/ -# * -# - -set z1 10 -set z2 -10 - -# triangle1 -polyline UpCover 0 0 ${z1} 5 5 ${z1} 0 10 ${z1} 0 0 ${z1} - -# triangle2 -polyline BottomCover -5 -5 ${z2} 10 10 ${z2} -5 20 ${z2} -5 -5 ${z2} - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {s_5} $calcul $type } - - -set square 1755.54 - -set nb_v_good 12 -set nb_e_good 18 -set nb_w_good 10 -set nb_f_good 9 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 51 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_28 b/tests/bugs/modalg/bug5805_28 deleted file mode 100755 index 19fa61abad..0000000000 --- a/tests/bugs/modalg/bug5805_28 +++ /dev/null @@ -1,85 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -# -# * -# | \ -# | \ -# | \ -# | \ -# | \ -# | \ -# | * v3 \ -# | | \ \ -# | | \ \ -# | | \ \ -# | | \ \ -# | | /* v2 * -# | | / / -# | | / / -# | | / / -# | * / -# | v1 / -# | / -# | / -# | / -# | / -# | / -# |/ -# * -# - -set z1 10 -set z2 -10 - -# triangle1 -polyline UpCover 0 0 ${z1} 5 5 ${z1} 0 10 ${z1} 0 0 ${z1} - -# triangle2 -polyline BottomCover -5 -5 ${z2} 10 10 ${z2} -5 20 ${z2} -5 -5 ${z2} - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {s_4 s_5} $calcul $type } - - -set square 1735.06 - -set nb_v_good 12 -set nb_e_good 18 -set nb_w_good 10 -set nb_f_good 8 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 50 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_29 b/tests/bugs/modalg/bug5805_29 deleted file mode 100755 index 41dfb04a52..0000000000 --- a/tests/bugs/modalg/bug5805_29 +++ /dev/null @@ -1,63 +0,0 @@ -puts "============" -puts "OCC5805" -puts "OCC7582" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### -# Bad result of offset operation -####################################################################### - -set BugNumber OCC5805 - -set z1 10 -set z2 -10 - -# circle1 -circle c1 0 0 ${z1} 5 -mkedge ec1 c1 -wire UpCover ec1 - -# circle2 -circle c2 0 0 ${z2} 30 -mkedge ec2 c2 -wire BottomCover ec2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {} $calcul $type } - - -set square 5829.59 - -set nb_v_good 2 -set nb_e_good 3 -set nb_w_good 3 -set nb_f_good 3 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 13 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_3 b/tests/bugs/modalg/bug5805_3 deleted file mode 100644 index 44313f3355..0000000000 --- a/tests/bugs/modalg/bug5805_3 +++ /dev/null @@ -1,50 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" -puts "" -###################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -###################################################### - -set BugNumber OCC5805 - -restore [locate_data_file OCC5805.brep] a - -decho off -set che_a [checkshape a] -decho on -if { [regexp {Faulty} $che_a] } { - puts "Faulty ${BugNumber} : checkshape is wrong for a" -} - -explode a f - -if { [catch { offsetshape result a -1 a_6 } catch_result] } { - puts "Faulty ${BugNumber} : offsetshape is wrong" -} - -if { [catch { set tolmaxres [tolmax result] } catch_result] } { - puts "Faulty ${BugNumber} : tolmax is wrong" -} - -regexp {max tol = ([-0-9.+eE]+)} $tolmaxres full maxtolerance -if { [catch { expr $maxtolerance } catch_result] } { - puts "Faulty ${BugNumber} : maxtolerance is wrong (1)." -} -if { $maxtolerance > 1. } { - puts "Faulty ${BugNumber} : maxtolerance is wrong (2)." -} - -set square 1185.03 - -set nb_v_good 10 -set nb_e_good 15 -set nb_w_good 7 -set nb_f_good 7 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 41 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_30 b/tests/bugs/modalg/bug5805_30 deleted file mode 100755 index 07c9a551c0..0000000000 --- a/tests/bugs/modalg/bug5805_30 +++ /dev/null @@ -1,63 +0,0 @@ -puts "TODO OCC11111 ALL: Error : The square of result shape is" - -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -set z1 10 -set z2 -10 - -# circle1 -circle c1 0 0 ${z1} 5 -mkedge ec1 c1 -wire UpCover ec1 - -# circle2 -circle c2 0 0 ${z2} 30 -mkedge ec2 c2 -wire BottomCover ec2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {s_2} $calcul $type } - - -set square 1336.75 - -set nb_v_good 4 -set nb_e_good 6 -set nb_w_good 6 -set nb_f_good 5 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 23 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_31 b/tests/bugs/modalg/bug5805_31 deleted file mode 100755 index 033e89c38f..0000000000 --- a/tests/bugs/modalg/bug5805_31 +++ /dev/null @@ -1,61 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -set z1 10 -set z2 -10 - -# circle1 -circle c1 0 0 ${z1} 5 -mkedge ec1 c1 -wire UpCover ec1 - -# circle2 -circle c2 0 0 ${z2} 30 -mkedge ec2 c2 -wire BottomCover ec2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {s_3} $calcul $type } - - -set square 7157.43 - -set nb_v_good 4 -set nb_e_good 6 -set nb_w_good 6 -set nb_f_good 5 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 23 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_32 b/tests/bugs/modalg/bug5805_32 deleted file mode 100755 index fce6ed8ef9..0000000000 --- a/tests/bugs/modalg/bug5805_32 +++ /dev/null @@ -1,66 +0,0 @@ -puts "TODO OCC11111 ALL: Error : The square of result shape is" - -puts "============" -puts "OCC5805" -puts "OCC7582" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### -# Bad result of offset operation -####################################################################### - -set BugNumber OCC5805 - -set z1 10 -set z2 -10 - -# circle1 -circle c1 0 0 ${z1} 5 -mkedge ec1 c1 -wire UpCover ec1 - -# circle2 -circle c2 0 0 ${z2} 30 -mkedge ec2 c2 -wire BottomCover ec2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {s_2 s_3} $calcul $type } - - -set square 1223.65 - -set nb_v_good 4 -set nb_e_good 6 -set nb_w_good 6 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 22 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_33 b/tests/bugs/modalg/bug5805_33 deleted file mode 100755 index b256334149..0000000000 --- a/tests/bugs/modalg/bug5805_33 +++ /dev/null @@ -1,61 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -set x1 10 -set x2 -10 - -# ellipse1 -ellipse ell1 ${x1} 0 0 1 0 0 5 3 -mkedge ee1 ell1 -wire UpCover ee1 - -# ellipse2 -ellipse ell2 ${x2} 0 0 1 0 0 4 2 -mkedge ee2 ell2 -wire BottomCover ee2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {} $calcul $type } - - -set square 418.388 - -set nb_v_good 2 -set nb_e_good 3 -set nb_w_good 3 -set nb_f_good 3 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 13 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_34 b/tests/bugs/modalg/bug5805_34 deleted file mode 100755 index 4077edd1b7..0000000000 --- a/tests/bugs/modalg/bug5805_34 +++ /dev/null @@ -1,61 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -set x1 10 -set x2 -10 - -# ellipse1 -ellipse ell1 ${x1} 0 0 1 0 0 5 3 -mkedge ee1 ell1 -wire UpCover ee1 - -# ellipse2 -ellipse ell2 ${x2} 0 0 1 0 0 4 2 -mkedge ee2 ell2 -wire BottomCover ee2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {s_2} $calcul $type } - - -set square 881.591 - -set nb_v_good 4 -set nb_e_good 6 -set nb_w_good 6 -set nb_f_good 5 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 23 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_35 b/tests/bugs/modalg/bug5805_35 deleted file mode 100755 index 5cc0100ec5..0000000000 --- a/tests/bugs/modalg/bug5805_35 +++ /dev/null @@ -1,61 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -set x1 10 -set x2 -10 - -# ellipse1 -ellipse ell1 ${x1} 0 0 1 0 0 5 3 -mkedge ee1 ell1 -wire UpCover ee1 - -# ellipse2 -ellipse ell2 ${x2} 0 0 1 0 0 4 2 -mkedge ee2 ell2 -wire BottomCover ee2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {s_3} $calcul $type } - - -set square 915.469 - -set nb_v_good 4 -set nb_e_good 6 -set nb_w_good 6 -set nb_f_good 5 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 23 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_36 b/tests/bugs/modalg/bug5805_36 deleted file mode 100755 index f2722cc973..0000000000 --- a/tests/bugs/modalg/bug5805_36 +++ /dev/null @@ -1,61 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -set x1 10 -set x2 -10 - -# ellipse1 -ellipse ell1 ${x1} 0 0 1 0 0 5 3 -mkedge ee1 ell1 -wire UpCover ee1 - -# ellipse2 -ellipse ell2 ${x2} 0 0 1 0 0 4 2 -mkedge ee2 ell2 -wire BottomCover ee2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {s_2 s_3} $calcul $type } - - -set square 856.92 - -set nb_v_good 4 -set nb_e_good 6 -set nb_w_good 6 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 22 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_37 b/tests/bugs/modalg/bug5805_37 deleted file mode 100755 index 20716b3ed3..0000000000 --- a/tests/bugs/modalg/bug5805_37 +++ /dev/null @@ -1,74 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -# -# v12 v11 -# *---------------------* -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# *---------------------* -# v13 v14 -# - -set z1 5 -set z2 -5 - -# quadrangle1 -polyline UpCover 0 0 ${z1} 6 0 ${z1} 6 6 ${z1} 0 6 ${z1} 0 0 ${z1} - -# quadrangle2 -polyline BottomCover 3 -2 ${z2} 8 3 ${z2} 3 8 ${z2} -2 3 ${z2} 3 -2 ${z2} - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {} $calcul $type } - - -set square 246.821 - -set nb_v_good 8 -set nb_e_good 12 -set nb_w_good 6 -set nb_f_good 6 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 34 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_38 b/tests/bugs/modalg/bug5805_38 deleted file mode 100755 index 2d746c58d3..0000000000 --- a/tests/bugs/modalg/bug5805_38 +++ /dev/null @@ -1,74 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -# -# v12 v11 -# *---------------------* -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# *---------------------* -# v13 v14 -# - -set z1 5 -set z2 -5 - -# quadrangle1 -polyline UpCover 0 0 ${z1} 6 0 ${z1} 6 6 ${z1} 0 6 ${z1} 0 0 ${z1} - -# quadrangle2 -polyline BottomCover 3 -2 ${z2} 8 3 ${z2} 3 8 ${z2} -2 3 ${z2} 3 -2 ${z2} - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {s_5} $calcul $type } - - -set square 544.931 - -set nb_v_good 16 -set nb_e_good 24 -set nb_w_good 12 -set nb_f_good 11 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 65 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_39 b/tests/bugs/modalg/bug5805_39 deleted file mode 100755 index 73bfe2d737..0000000000 --- a/tests/bugs/modalg/bug5805_39 +++ /dev/null @@ -1,74 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -# -# v12 v11 -# *---------------------* -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# *---------------------* -# v13 v14 -# - -set z1 5 -set z2 -5 - -# quadrangle1 -polyline UpCover 0 0 ${z1} 6 0 ${z1} 6 6 ${z1} 0 6 ${z1} 0 0 ${z1} - -# quadrangle2 -polyline BottomCover 3 -2 ${z2} 8 3 ${z2} 3 8 ${z2} -2 3 ${z2} 3 -2 ${z2} - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {s_6} $calcul $type } - - -set square 524.758 - -set nb_v_good 16 -set nb_e_good 24 -set nb_w_good 12 -set nb_f_good 11 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 65 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_4 b/tests/bugs/modalg/bug5805_4 deleted file mode 100644 index c5a54e1e87..0000000000 --- a/tests/bugs/modalg/bug5805_4 +++ /dev/null @@ -1,53 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" -puts "" -###################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -###################################################### - -set BugNumber OCC5805 - -restore [locate_data_file OCC5805.brep] a - -decho off -set che_a [checkshape a] -decho on - -if { [regexp {Faulty} $che_a] } { - puts "Faulty ${BugNumber} : checkshape is wrong for a" -} - -explode a f - -offsetparameter 1e-7 c a -offsetload a -1 a_6 - -if { [catch { offsetperform result } catch_result] } { - puts "Faulty ${BugNumber} : offsetshape is wrong" -} - -if { [catch { set tolmaxres [tolmax result] } catch_result] } { - puts "Faulty ${BugNumber} : tolmax is wrong" -} -regexp {max tol = ([-0-9.+eE]+)} $tolmaxres full maxtolerance -if { [catch { expr $maxtolerance } catch_result] } { - puts "Faulty ${BugNumber} : maxtolerance is wrong (1)." -} -if { $maxtolerance > 1. } { - puts "Faulty ${BugNumber} : maxtolerance is wrong (2)." -} - -set square 1185.03 - -set nb_v_good 10 -set nb_e_good 15 -set nb_w_good 7 -set nb_f_good 7 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 41 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_40 b/tests/bugs/modalg/bug5805_40 deleted file mode 100755 index 881e0039de..0000000000 --- a/tests/bugs/modalg/bug5805_40 +++ /dev/null @@ -1,74 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -# -# v12 v11 -# *---------------------* -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# | | -# *---------------------* -# v13 v14 -# - -set z1 5 -set z2 -5 - -# quadrangle1 -polyline UpCover 0 0 ${z1} 6 0 ${z1} 6 6 ${z1} 0 6 ${z1} 0 0 ${z1} - -# quadrangle2 -polyline BottomCover 3 -2 ${z2} 8 3 ${z2} 3 8 ${z2} -2 3 ${z2} 3 -2 ${z2} - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {s_5 s_6} $calcul $type } - - -set square 485.358 - -set nb_v_good 16 -set nb_e_good 24 -set nb_w_good 12 -set nb_f_good 10 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 64 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_41 b/tests/bugs/modalg/bug5805_41 deleted file mode 100755 index 5621340848..0000000000 --- a/tests/bugs/modalg/bug5805_41 +++ /dev/null @@ -1,66 +0,0 @@ -puts "TODO OCC11111 ALL: Error : Result shape is WRONG" -puts "TODO OCC11111 ALL: Error : The square of result shape is" -puts "TODO ?OCC11111 ALL: Faulty OCC5805 : result is not Closed shape" -puts "TODO ?OCC11111 ALL: Error : The command is not valid" -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -set z1 5 -set z2 -5 - -# beziercurve1 -beziercurve bc1 5 5 5 ${z1} 5 -5 ${z1} -5 -5 ${z1} -5 5 ${z1} 5 5 ${z1} -mkedge e1 bc1 -wire UpCover e1 - -# beziercurve2 -beziercurve bc2 5 4 4 ${z2} 4 -4 ${z2} -4 -4 ${z2} -4 4 ${z2} 4 4 ${z2} -mkedge e2 bc2 -wire BottomCover e2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.001 -catch { OFFSETSHAPE $distance {} $calcul $type } -# Null result - - -set square 495.635 - -set nb_v_good 2 -set nb_e_good 3 -set nb_w_good 3 -set nb_f_good 3 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 13 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_42 b/tests/bugs/modalg/bug5805_42 deleted file mode 100755 index cfb897ca1c..0000000000 --- a/tests/bugs/modalg/bug5805_42 +++ /dev/null @@ -1,67 +0,0 @@ -puts "TODO ?OCC11111 ALL: Error : Result shape is WRONG" -puts "TODO ?OCC11111 ALL: Faulty OCC5805 : result is not Closed shape" -puts "TODO ?OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO ?OCC11111 ALL: Error : The command is not valid." -puts "TODO ?OCC11111 ALL: Error : The square of result shape is" -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -set z1 5 -set z2 -5 - -# beziercurve1 -beziercurve bc1 5 5 5 ${z1} 5 -5 ${z1} -5 -5 ${z1} -5 5 ${z1} 5 5 ${z1} -mkedge e1 bc1 -wire UpCover e1 - -# beziercurve2 -beziercurve bc2 5 4 4 ${z2} 4 -4 ${z2} -4 -4 ${z2} -4 4 ${z2} 4 4 ${z2} -mkedge e2 bc2 -wire BottomCover e2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.001 -catch { OFFSETSHAPE $distance {s_2} $calcul $type } -# Bad result - - -set square 495.635 - -set nb_v_good 2 -set nb_e_good 3 -set nb_w_good 3 -set nb_f_good 3 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 13 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_43 b/tests/bugs/modalg/bug5805_43 deleted file mode 100755 index f44273aa75..0000000000 --- a/tests/bugs/modalg/bug5805_43 +++ /dev/null @@ -1,68 +0,0 @@ -puts "TODO OCC11111 ALL: Error : The square of result shape is" -puts "TODO ?OCC11111 ALL: Error : Result shape is WRONG" -puts "TODO ?OCC11111 ALL: Faulty OCC5805 : result is not Closed shape" -puts "TODO ?OCC11111 ALL: Error : The command is not valid." -puts "TODO ?OCC11111 ALL: Error : The square of result shape is" -puts "TODO ?OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -set z1 5 -set z2 -5 - -# beziercurve1 -beziercurve bc1 5 5 5 ${z1} 5 -5 ${z1} -5 -5 ${z1} -5 5 ${z1} 5 5 ${z1} -mkedge e1 bc1 -wire UpCover e1 - -# beziercurve2 -beziercurve bc2 5 4 4 ${z2} 4 -4 ${z2} -4 -4 ${z2} -4 4 ${z2} 4 4 ${z2} -mkedge e2 bc2 -wire BottomCover e2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.001 -catch { OFFSETSHAPE $distance {s_3} $calcul $type } -# Bad result - - -set square 495.635 - -set nb_v_good 2 -set nb_e_good 3 -set nb_w_good 3 -set nb_f_good 3 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 13 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_44 b/tests/bugs/modalg/bug5805_44 deleted file mode 100755 index 93484c7bcf..0000000000 --- a/tests/bugs/modalg/bug5805_44 +++ /dev/null @@ -1,64 +0,0 @@ -puts "TODO OCC11111 ALL: Error : The square of result shape is" - -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -set z1 5 -set z2 -5 - -# beziercurve1 -beziercurve bc1 5 5 5 ${z1} 5 -5 ${z1} -5 -5 ${z1} -5 5 ${z1} 5 5 ${z1} -mkedge e1 bc1 -wire UpCover e1 - -# beziercurve2 -beziercurve bc2 5 4 4 ${z2} 4 -4 ${z2} -4 -4 ${z2} -4 4 ${z2} 4 4 ${z2} -mkedge e2 bc2 -wire BottomCover e2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.001 -catch { OFFSETSHAPE $distance {s_2 s_3} $calcul $type } -# Bad result - - -set square 495.635 - -set nb_v_good 2 -set nb_e_good 3 -set nb_w_good 3 -set nb_f_good 3 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 13 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_45 b/tests/bugs/modalg/bug5805_45 deleted file mode 100755 index e85305a1cd..0000000000 --- a/tests/bugs/modalg/bug5805_45 +++ /dev/null @@ -1,59 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -# pbsplinecurve1 -pbsplinecurve pbc1 3 9 0 1 1 1 2 1 3 1 4 1 5 1 6 1 7 1 8 1 -1 0 0 1 -2 2 0 1 0 1 0 1 2 2 0 1 1 0 0 1 2 -2 0 1 0 -1 0 1 -2 -2 0 1 -mkedge e1 pbc1 -wire UpCover e1 - -# pbsplinecurve1 -copy e1 e2 -ttranslate e2 0 0 20 -tscale e2 0 0 0 2 -wire BottomCover e2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.1 -catch { OFFSETSHAPE $distance {} $calcul $type } - - -set square 754.039 - -set nb_v_good 2 -set nb_e_good 3 -set nb_w_good 3 -set nb_f_good 3 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 13 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_46 b/tests/bugs/modalg/bug5805_46 deleted file mode 100755 index b93c41c113..0000000000 --- a/tests/bugs/modalg/bug5805_46 +++ /dev/null @@ -1,59 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -# pbsplinecurve1 -pbsplinecurve pbc1 3 9 0 1 1 1 2 1 3 1 4 1 5 1 6 1 7 1 8 1 -1 0 0 1 -2 2 0 1 0 1 0 1 2 2 0 1 1 0 0 1 2 -2 0 1 0 -1 0 1 -2 -2 0 1 -mkedge e1 pbc1 -wire UpCover e1 - -# pbsplinecurve1 -copy e1 e2 -ttranslate e2 0 0 20 -tscale e2 0 0 0 2 -wire BottomCover e2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.1 -catch { OFFSETSHAPE $distance {s_3} $calcul $type } - - -set square 1470.32 - -set nb_v_good 4 -set nb_e_good 6 -set nb_w_good 6 -set nb_f_good 5 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 23 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_47 b/tests/bugs/modalg/bug5805_47 deleted file mode 100755 index 7d985b55fb..0000000000 --- a/tests/bugs/modalg/bug5805_47 +++ /dev/null @@ -1,60 +0,0 @@ -puts "TODO ?OCC11111 ALL: Error : The square of result shape is" - -puts "============" -puts "OCC5805" -puts "============" -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### -cpulimit 8000 -set BugNumber OCC5805 - -# pbsplinecurve1 -pbsplinecurve pbc1 3 9 0 1 1 1 2 1 3 1 4 1 5 1 6 1 7 1 8 1 -1 0 0 1 -2 2 0 1 0 1 0 1 2 2 0 1 1 0 0 1 2 -2 0 1 0 -1 0 1 -2 -2 0 1 -mkedge e1 pbc1 -wire UpCover e1 - -# pbsplinecurve1 -copy e1 e2 -ttranslate e2 0 0 20 -tscale e2 0 0 0 2 -wire BottomCover e2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.1 -catch { OFFSETSHAPE $distance {s_2} $calcul $type } - - -set square 1511.4 - -set nb_v_good 4 -set nb_e_good 6 -set nb_w_good 6 -set nb_f_good 5 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 23 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_48 b/tests/bugs/modalg/bug5805_48 deleted file mode 100755 index 267c6571c0..0000000000 --- a/tests/bugs/modalg/bug5805_48 +++ /dev/null @@ -1,60 +0,0 @@ -puts "TODO ?OCC11111 ALL: Error : The square of result shape is" - -puts "============" -puts "OCC5805" -puts "============" -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### -cpulimit 8000 -set BugNumber OCC5805 - -# pbsplinecurve1 -pbsplinecurve pbc1 3 9 0 1 1 1 2 1 3 1 4 1 5 1 6 1 7 1 8 1 -1 0 0 1 -2 2 0 1 0 1 0 1 2 2 0 1 1 0 0 1 2 -2 0 1 0 -1 0 1 -2 -2 0 1 -mkedge e1 pbc1 -wire UpCover e1 - -# pbsplinecurve1 -copy e1 e2 -ttranslate e2 0 0 20 -tscale e2 0 0 0 2 -wire BottomCover e2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.1 -catch { OFFSETSHAPE $distance {s_3 s_2} $calcul $type } - - -set square 1451.05 - -set nb_v_good 4 -set nb_e_good 6 -set nb_w_good 6 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 22 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_49 b/tests/bugs/modalg/bug5805_49 deleted file mode 100755 index a9287d3391..0000000000 --- a/tests/bugs/modalg/bug5805_49 +++ /dev/null @@ -1,44 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -# pcone -pcone s 30 5 20 - -set distance -0.5 -catch { OFFSETSHAPE $distance {} $calcul $type } - - -set square 5829.59 - -set nb_v_good 2 -set nb_e_good 3 -set nb_w_good 3 -set nb_f_good 3 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 13 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_5 b/tests/bugs/modalg/bug5805_5 deleted file mode 100644 index 341e0c0308..0000000000 --- a/tests/bugs/modalg/bug5805_5 +++ /dev/null @@ -1,52 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" -puts "" -###################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -###################################################### - -set BugNumber OCC5805 - -restore [locate_data_file OCC5805.brep] a - -decho off -set che_a [checkshape a] -decho on -if { [regexp {Faulty} $che_a] } { - puts "Faulty ${BugNumber} : checkshape is wrong for a" -} - -explode a f - -offsetparameter 1e-7 c a -offsetload a -1 - -if { [catch { offsetperform result } catch_result] } { - puts "Faulty ${BugNumber} : offsetshape is wrong" -} - -if { [catch { set tolmaxres [tolmax result] } catch_result]} { - puts "Faulty ${BugNumber} : tolmax is wrong" -} -regexp {max tol = ([-0-9.+eE]+)} $tolmaxres full maxtolerance -if { [catch { expr $maxtolerance } catch_result] } { - puts "Faulty ${BugNumber} : maxtolerance is wrong (1)." -} -if { $maxtolerance > 1. } { - puts "Faulty ${BugNumber} : maxtolerance is wrong (2)." -} - -set square 876.584 - -set nb_v_good 10 -set nb_e_good 15 -set nb_w_good 7 -set nb_f_good 7 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 41 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_50 b/tests/bugs/modalg/bug5805_50 deleted file mode 100755 index 53dbd0e1e3..0000000000 --- a/tests/bugs/modalg/bug5805_50 +++ /dev/null @@ -1,44 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -# pcone -pcone s 30 5 20 - -set distance -0.5 -catch { OFFSETSHAPE $distance {s_2} $calcul $type } - - -set square 12150 - -set nb_v_good 4 -set nb_e_good 6 -set nb_w_good 6 -set nb_f_good 5 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 23 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_51 b/tests/bugs/modalg/bug5805_51 deleted file mode 100755 index 10e2c0bd31..0000000000 --- a/tests/bugs/modalg/bug5805_51 +++ /dev/null @@ -1,44 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -# pcone -pcone s 30 5 20 - -set distance -0.5 -catch { OFFSETSHAPE $distance {s_3} $calcul $type } - - -set square 7157.43 - -set nb_v_good 4 -set nb_e_good 6 -set nb_w_good 6 -set nb_f_good 5 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 23 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_52 b/tests/bugs/modalg/bug5805_52 deleted file mode 100755 index b18bfd9a63..0000000000 --- a/tests/bugs/modalg/bug5805_52 +++ /dev/null @@ -1,44 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -# pcone -pcone s 30 5 20 - -set distance -0.5 -catch { OFFSETSHAPE $distance {s_2 s_3} $calcul $type } - - -set square 7051.59 - -set nb_v_good 4 -set nb_e_good 6 -set nb_w_good 6 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 22 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_53 b/tests/bugs/modalg/bug5805_53 deleted file mode 100755 index c777675d1b..0000000000 --- a/tests/bugs/modalg/bug5805_53 +++ /dev/null @@ -1,71 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -# -# * v3 -# | \ -# | \ -# | \ -# | \ -# | /* v2 -# | / -# | / -# | / -# * -# v1 -# - -set z1 10 -set z2 -10 - -# triangle1 -polyline UpCover 0 0 ${z1} 5 5 ${z1} 0 10 ${z1} 0 0 ${z1} - -# triangle2 -polyline BottomCover 0 0 ${z2} 5 5 ${z2} 0 10 ${z2} 0 0 ${z2} - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {s_4} $calcul $type } - - -set square 889.96 - -set nb_v_good 12 -set nb_e_good 18 -set nb_w_good 10 -set nb_f_good 9 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 51 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_54 b/tests/bugs/modalg/bug5805_54 deleted file mode 100755 index d2ff51c9e3..0000000000 --- a/tests/bugs/modalg/bug5805_54 +++ /dev/null @@ -1,71 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -# -# * v3 -# | \ -# | \ -# | \ -# | \ -# | /* v2 -# | / -# | / -# | / -# * -# v1 -# - -set z1 10 -set z2 -10 - -# triangle1 -polyline UpCover 0 0 ${z1} 5 5 ${z1} 0 10 ${z1} 0 0 ${z1} - -# triangle2 -polyline BottomCover 0 0 ${z2} 5 5 ${z2} 0 10 ${z2} 0 0 ${z2} - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {} $calcul $type } - - -set square 376.733 - -set nb_v_good 6 -set nb_e_good 9 -set nb_w_good 5 -set nb_f_good 5 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 27 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_55 b/tests/bugs/modalg/bug5805_55 deleted file mode 100755 index 23ee9cd730..0000000000 --- a/tests/bugs/modalg/bug5805_55 +++ /dev/null @@ -1,71 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -# -# * v3 -# | \ -# | \ -# | \ -# | \ -# | /* v2 -# | / -# | / -# | / -# * -# v1 -# - -set z1 10 -set z2 -10 - -# triangle1 -polyline UpCover 0 0 ${z1} 5 5 ${z1} 0 10 ${z1} 0 0 ${z1} - -# triangle2 -polyline BottomCover 0 0 ${z2} 5 5 ${z2} 0 10 ${z2} 0 0 ${z2} - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {s_5} $calcul $type } - - -set square 889.96 - -set nb_v_good 12 -set nb_e_good 18 -set nb_w_good 10 -set nb_f_good 9 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 51 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_56 b/tests/bugs/modalg/bug5805_56 deleted file mode 100755 index 9bd61633ab..0000000000 --- a/tests/bugs/modalg/bug5805_56 +++ /dev/null @@ -1,71 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -# -# * v3 -# | \ -# | \ -# | \ -# | \ -# | /* v2 -# | / -# | / -# | / -# * -# v1 -# - -set z1 10 -set z2 -10 - -# triangle1 -polyline UpCover 0 0 ${z1} 5 5 ${z1} 0 10 ${z1} 0 0 ${z1} - -# triangle2 -polyline BottomCover 0 0 ${z2} 5 5 ${z2} 0 10 ${z2} 0 0 ${z2} - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {s_4 s_5} $calcul $type } - - -set square 870.345 - -set nb_v_good 12 -set nb_e_good 18 -set nb_w_good 10 -set nb_f_good 8 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 50 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_57 b/tests/bugs/modalg/bug5805_57 deleted file mode 100755 index 7cb0549c39..0000000000 --- a/tests/bugs/modalg/bug5805_57 +++ /dev/null @@ -1,61 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -set z1 10 -set z2 -10 - -# circle1 -circle c1 0 0 ${z1} 5 -mkedge ec1 c1 -wire UpCover ec1 - -# circle2 -circle c2 0 0 ${z2} 5 -mkedge ec2 c2 -wire BottomCover ec2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {} $calcul $type } - - -set square 664.447 - -set nb_v_good 2 -set nb_e_good 3 -set nb_w_good 3 -set nb_f_good 3 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 13 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_58 b/tests/bugs/modalg/bug5805_58 deleted file mode 100755 index 1ed9814539..0000000000 --- a/tests/bugs/modalg/bug5805_58 +++ /dev/null @@ -1,61 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -set z1 10 -set z2 -10 - -# circle1 -circle c1 0 0 ${z1} 5 -mkedge ec1 c1 -wire UpCover ec1 - -# circle2 -circle c2 0 0 ${z2} 5 -mkedge ec2 c2 -wire BottomCover ec2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {s_2} $calcul $type } - - -set square 1336.75 - -set nb_v_good 4 -set nb_e_good 6 -set nb_w_good 6 -set nb_f_good 5 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 23 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_6 b/tests/bugs/modalg/bug5805_6 deleted file mode 100644 index 44e88f523d..0000000000 --- a/tests/bugs/modalg/bug5805_6 +++ /dev/null @@ -1,47 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" -puts "" -###################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -###################################################### - -set BugNumber OCC5805 - -restore [locate_data_file OCC5805.brep] a - -decho off -set che_a [checkshape a] -decho on -if { [regexp {Faulty} $che_a] } { - puts "Faulty ${BugNumber} : checkshape is wrong for a" -} - -if { [catch { offsetshape result a -1 } catch_result] } { - puts "Faulty ${BugNumber} : offsetshape is wrong" -} - -if { [catch { set tolmaxres [tolmax result] } catch_result] } { - puts "Faulty ${BugNumber} : tolmax is wrong" -} -regexp {max tol = ([-0-9.+eE]+)} $tolmaxres full maxtolerance -if { [catch { expr $maxtolerance } catch_result] } { - puts "Faulty ${BugNumber} : maxtolerance is wrong (1)." -} -if { $maxtolerance > 1. } { - puts "Faulty ${BugNumber} : maxtolerance is wrong (2)" -} - -set square 876.584 - -set nb_v_good 10 -set nb_e_good 15 -set nb_w_good 7 -set nb_f_good 7 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 41 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_7 b/tests/bugs/modalg/bug5805_7 deleted file mode 100755 index 12d0c00629..0000000000 --- a/tests/bugs/modalg/bug5805_7 +++ /dev/null @@ -1,61 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -set z1 10 -set z2 -10 - -# circle1 -circle c1 0 0 ${z1} 5 -mkedge ec1 c1 -wire UpCover ec1 - -# circle2 -circle c2 0 0 ${z2} 5 -mkedge ec2 c2 -wire BottomCover ec2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {s_3} $calcul $type } - - -set square 1336.75 - -set nb_v_good 4 -set nb_e_good 6 -set nb_w_good 6 -set nb_f_good 5 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 23 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_8 b/tests/bugs/modalg/bug5805_8 deleted file mode 100755 index 06b73e67f9..0000000000 --- a/tests/bugs/modalg/bug5805_8 +++ /dev/null @@ -1,61 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -set z1 10 -set z2 -10 - -# circle1 -circle c1 0 0 ${z1} 5 -mkedge ec1 c1 -wire UpCover ec1 - -# circle2 -circle c2 0 0 ${z2} 5 -mkedge ec2 c2 -wire BottomCover ec2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {s_2 s_3} $calcul $type } - - -set square 1223.65 - -set nb_v_good 4 -set nb_e_good 6 -set nb_w_good 6 -set nb_f_good 4 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 22 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5805_9 b/tests/bugs/modalg/bug5805_9 deleted file mode 100755 index b320e42e4a..0000000000 --- a/tests/bugs/modalg/bug5805_9 +++ /dev/null @@ -1,58 +0,0 @@ -puts "============" -puts "OCC5805" -puts "============" - -####################################################################### -# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. -####################################################################### - -set BugNumber OCC5805 - -# ellipse1 -ellipse ell 10 0 0 1 0 0 5 3 -mkedge ee1 ell -wire UpCover ee1 - -# ellipse2 -copy ee1 ee2 -ttranslate ee2 -20 0 0 -wire BottomCover ee2 - -set issolid 1 -set isruled 1 -if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { - puts "Faulty ${BugNumber} : thrusections is wrong" - -} - -set distance -0.5 -catch { OFFSETSHAPE $distance {} $calcul $type } - - -set square 495.635 - -set nb_v_good 2 -set nb_e_good 3 -set nb_w_good 3 -set nb_f_good 3 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 13 - - -set index [lsearch [whatis s] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : s is not Closed shape" - -} - -set index [lsearch [whatis result] Closed] -if {$index == -1} { - puts "Faulty ${BugNumber} : result is not Closed shape" - -} - - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug5806 b/tests/bugs/modalg/bug5806 deleted file mode 100644 index 16eec40e7a..0000000000 --- a/tests/bugs/modalg/bug5806 +++ /dev/null @@ -1,54 +0,0 @@ -puts "============" -puts "OCC5806" -puts "============" -puts "" -###################################################### -# BRepOffsetAPI_MakeThickSolid fails to build a result -###################################################### - -set BugNumber OCC5806 - -puts "demonstration of pipes and hollowing for GTISoft" -puts "" -puts "Scenario 3A: Hollowed general pipe - ThroughSection with following shell reconstruction" - -circle c 0 100 0 1 0 0 5 -mkedge ec c -wire wc ec -polyline pl 10 90 -10 10 90 10 10 110 10 10 110 -10 10 90 -10 - -if { [catch { thrusections resthru 1 1 wc pl } catch_result] } { - puts "Faulty ${BugNumber} : thrusections is wrong" -} - -# straighforward hollowing will fail due to problems in the algorithm -explode resthru f - -if { [catch { offsetshape result resthru -0.5 resthru_6 resthru_7 } catch_result] } { - puts "Faulty ${BugNumber} : offsetshape is wrong" -} - -if { [catch { set tolmaxres [tolmax result] } catch_result] } { - puts "Faulty ${BugNumber} : tolmax is wrong" -} -regexp {max tol = ([-0-9.+eE]+)} $tolmaxres full maxtolerance -if { [catch { expr $maxtolerance } catch_result] } { - puts "Faulty ${BugNumber} : maxtolerance is wrong (1)." -} -if { $maxtolerance > 1. } { - puts "Faulty ${BugNumber} : maxtolerance is wrong (2)." -} - -set square 1116.06 - -set nb_v_good 10 -set nb_e_good 15 -set nb_w_good 7 -set nb_f_good 7 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 41 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug594 b/tests/bugs/modalg/bug594 deleted file mode 100755 index 625301ed9f..0000000000 --- a/tests/bugs/modalg/bug594 +++ /dev/null @@ -1,26 +0,0 @@ - -puts "========================" -puts " SAL594 " -puts "========================" -puts "" -################################### -## It is impossible to put correct fillets on the shape -################################### - -restore [locate_data_file SAL594.brep] a -explode a e - -if [catch {blend result1 a 20 a_23 20 a_25 20 a_26 20 a_28} catch_result] { - puts "Faulty SAL594 (case 1): function BLEND works wrongly" -} else { - puts "SAL594 OK (case 1): function BLEND works OK" -} - -if [catch {blend result result1 2.5 a_15 2.5 a_12 2.5 a_4} catch_result] { - puts "Faulty SAL594 (case 2): function BLEND works wrongly." -} else { - puts "SAL594 OK (case 2): function BLEND works OK" -} - -set square 60513.1 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug59_1 b/tests/bugs/modalg/bug59_1 deleted file mode 100755 index 76a81bb97b..0000000000 --- a/tests/bugs/modalg/bug59_1 +++ /dev/null @@ -1,15 +0,0 @@ - -puts "================" -puts "BUC60975 " -puts " OCC59" -puts "================" -puts "" - -restore [locate_data_file BUC60975.brep] a -explode a -checkshape a_1 -checkshape a_2 - -bfuse result a_1 a_2 -set square 241843 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug59_2 b/tests/bugs/modalg/bug59_2 deleted file mode 100755 index ea17b72811..0000000000 --- a/tests/bugs/modalg/bug59_2 +++ /dev/null @@ -1,15 +0,0 @@ - -puts "================" -puts "BUC60975 " -puts " OCC59" -puts "================" -puts "" - -restore [locate_data_file BUC60975.brep] a -explode a -checkshape a_1 -checkshape a_2 - -bfuse result a_2 a_1 -set square 241843 -set 2dviewer 1 diff --git a/tests/bugs/modalg/bug600 b/tests/bugs/modalg/bug600 deleted file mode 100755 index 4c1f33453b..0000000000 --- a/tests/bugs/modalg/bug600 +++ /dev/null @@ -1,19 +0,0 @@ -puts "TODO ?OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO ?OCC12345 ALL: Error : The square of result shape is" - -puts "========================" -puts " OCC600" -puts "========================" -## Result of BOPCOMMON operation is unclosed shape inspite of source solids are valid -############################################################ -cpulimit 5000 -restore [locate_data_file OCC600_1.brep] a -checkshape a -restore [locate_data_file OCC600_2.brep] b -checkshape b -bop b a - -bopcommon result - -set square 41970.8 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug602 b/tests/bugs/modalg/bug602 deleted file mode 100755 index 0245268c17..0000000000 --- a/tests/bugs/modalg/bug602 +++ /dev/null @@ -1,24 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -puts "========================" -puts " OCC602 " -puts "========================" -puts "" -########################################### -## Exception during filet creation if it cross samedge of cylinder. -########################################### - -restore [locate_data_file OCC602.brep] a -checkshape a - -explode a e - -if [catch {blend result a 20 a_9 } catch_result] { - puts "Faulty OCC602: function BLEND works wrongly" -} else { - puts "OCC602 OK: function BLEND works OK" -} - -set square 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug605 b/tests/bugs/modalg/bug605 deleted file mode 100755 index d6aa6f1934..0000000000 --- a/tests/bugs/modalg/bug605 +++ /dev/null @@ -1,37 +0,0 @@ - -puts "========================" -puts " OCC605" -puts "========================" -puts "" -############################## -## No any faces in result of pipe command. -############################## - -restore [locate_data_file OCC605a.brep] w1 -checkshape w1 -restore [locate_data_file OCC605b.brep] w2 -checkshape w2 - -if { [catch {pipe result w2 w1 } catch_result] } { - puts "Faulty OCC605: function PIPE works with exception." -} else { - explode result f - set nom 0 - set j 1 - repeat 20 { - if { [regexp {FACE} [whatis result_$j]] != 1 } { - break - } else { - set nom [expr $nom + 1] - } - incr j - } - if { $nom == 0 } { - puts " Faulty OCC605: Result of PIPE operation is incorrect !!! " - } else { - puts "OCC605 OK : Result of PIPE operation is NOT empty shell!!! " - } -} - -set square 20.6253 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug6063 b/tests/bugs/modalg/bug6063 deleted file mode 100644 index d397d8c667..0000000000 --- a/tests/bugs/modalg/bug6063 +++ /dev/null @@ -1,24 +0,0 @@ -puts "============" -puts "OCC6063" -puts "============" -puts "" -###################################################### -# Exception is raised during command "sprops" in DRAW on attached shape. -###################################################### - -set BugNumber OCC6063 -cpulimit 2000 - -restore [locate_data_file OCC6063-2.brep] result - -decho off -set che_res [checkshape result] -decho on -if { [regexp {Faulty} $che_res] } { - puts "Faulty ${BugNumber} : checkshape is wrong for res" -} - -set tol_square 1.e-6 -set square 2465.96 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug6063_1 b/tests/bugs/modalg/bug6063_1 deleted file mode 100644 index a29cf8ec6a..0000000000 --- a/tests/bugs/modalg/bug6063_1 +++ /dev/null @@ -1,19 +0,0 @@ -puts "============" -puts "OCC6063" -puts "============" -puts "" -###################################################### -# Exception is raised during command "sprops" in DRAW on attached shape. -###################################################### - -set BugNumber OCC6063 - -restore [locate_data_file OCC6063.brep] result - -checkshape result - -set tol_square 1.e-6 -set square 413318 -set 3dviewer 1 - - diff --git a/tests/bugs/modalg/bug606_1 b/tests/bugs/modalg/bug606_1 deleted file mode 100644 index c8a50d5b93..0000000000 --- a/tests/bugs/modalg/bug606_1 +++ /dev/null @@ -1,14 +0,0 @@ -pload QAcommands - -puts "================" -puts "OCC606" -puts "================" -puts "" - -restore [locate_data_file OCC606_2.brep] w2 -checkshape w2 - -OCC606 result w2 -t - -set square 508.243 -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug606_2 b/tests/bugs/modalg/bug606_2 deleted file mode 100644 index 4fabb19701..0000000000 --- a/tests/bugs/modalg/bug606_2 +++ /dev/null @@ -1,14 +0,0 @@ -pload QAcommands - -puts "================" -puts "OCC606" -puts "================" -puts "" - -restore [locate_data_file OCC606_10.brep] w10 -checkshape w10 - -OCC606 result w10 -t - -set square 522.56 -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug615 b/tests/bugs/modalg/bug615 deleted file mode 100755 index 2229d67268..0000000000 --- a/tests/bugs/modalg/bug615 +++ /dev/null @@ -1,22 +0,0 @@ -puts "TODO ?OCC12345 ALL: Error : The square of result shape is" - -puts "========================" -puts " OCC615" -puts "========================" -puts "" -############################# -## Wrong resultat of BLEND operation -############################# - -restore [locate_data_file OCC615.brep] a -checkshape a -explode a e - -if [catch {blend result a 9 a_15 } catch_result] { - puts "Faulty OCC615: function BLEND works with exception" -} else { - puts "OCC615 OK: function CHAMF works OK" -} - -set square 197055. -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug616 b/tests/bugs/modalg/bug616 deleted file mode 100755 index 386833ecc1..0000000000 --- a/tests/bugs/modalg/bug616 +++ /dev/null @@ -1,22 +0,0 @@ - -puts "========================" -puts " OCC616" -puts "========================" -puts "" -######################################## -## Function MKOFFSET gives exception for attached face -######################################## - -restore [locate_data_file OCC616.brep] a -checkshape a - -if { [catch {mkoffset result a 5 -2} catch_result] } { - puts "Faulty OCC616: function MKOFFSET works with exception" -} else { - renamevar result_1 result - checkshape result - puts "OCC616 OK: function MKOFFSET works OK" -} - -set length 1062.78 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug6181 b/tests/bugs/modalg/bug6181 deleted file mode 100644 index 5a5667d9e1..0000000000 --- a/tests/bugs/modalg/bug6181 +++ /dev/null @@ -1,40 +0,0 @@ -puts "============" -puts "OCC6181" -puts "============" -puts "" -###################################################### -# Incorrect result of boolean cut -###################################################### - -set BugNumber OCC6181 - -restore [locate_data_file OCC6181_A.brep] s1 -restore [locate_data_file OCC6181_B.brep] s2 - -decho off -set che_s1 [checkshape s1] -set che_s2 [checkshape s2] -decho on -if { [regexp {Faulty} $che_s1] } { - puts "Faulty ${BugNumber} : checkshape is wrong for s1" -} - -if { [regexp {Faulty} $che_s2] } { - puts "Faulty ${BugNumber} : checkshape is wrong for s2" -} - -bcut result s1 s2 - -set square 151691 - -set nb_v_good 14 -set nb_e_good 21 -set nb_w_good 9 -set nb_f_good 9 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 56 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug6182 b/tests/bugs/modalg/bug6182 deleted file mode 100644 index f0b12771a4..0000000000 --- a/tests/bugs/modalg/bug6182 +++ /dev/null @@ -1,39 +0,0 @@ -puts "============" -puts "OCC6182" -puts "============" -puts "" -###################################################### -# Incorrect result of boolean cut -###################################################### - -set BugNumber OCC6182 - -restore [locate_data_file OCC6182_A.brep] s1 -restore [locate_data_file OCC6182_B.brep] s2 - -decho off -set che_s1 [checkshape s1] -set che_s2 [checkshape s2] -decho on -if { [regexp {Faulty} $che_s1] } { - puts "Faulty ${BugNumber} : checkshape is wrong for s1" -} -if { [regexp {Faulty} $che_s2] } { - puts "Faulty ${BugNumber} : checkshape is wrong for s2" -} - -bcut result s1 s2 - -set square 318709 - -set nb_v_good 316 -set nb_e_good 502 -set nb_w_good 185 -set nb_f_good 181 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 1187 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug62 b/tests/bugs/modalg/bug62 deleted file mode 100755 index 1f2d8d52ac..0000000000 --- a/tests/bugs/modalg/bug62 +++ /dev/null @@ -1,34 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_4" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -puts "================" -puts "OCC62" -puts "BUC61001" -puts "================" - -cpulimit 1400 -restore [locate_data_file OCC62.brep] sh - -explode sh -checkshape sh - -bfuse res1 sh_1 sh_3 -checkshape res1 - -bfuse res2 res1 sh_2 -checkshape res2 - -bfuse res3 res2 sh_6 -checkshape res3 - -bfuse res4 res3 sh_4 -checkshape res4 - -bfuse res5 res4 sh_5 -checkshape res5 - -renamevar res5 result - -set square 0 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug620_1 b/tests/bugs/modalg/bug620_1 deleted file mode 100755 index cdf6464683..0000000000 --- a/tests/bugs/modalg/bug620_1 +++ /dev/null @@ -1,24 +0,0 @@ - -puts "========================" -puts "OCC620" -puts "========================" -puts "" -############################ -## No possibility to cut the shapes. -############################ - -restore [locate_data_file OCC620a.brep] a -checkshape a -restore [locate_data_file OCC620b.brep] b -checkshape b - -bop a b - -if [catch { bopcut result } catch_result] { - puts "Faulty OCC620 : BOPCUT operation was made wrongly" -} else { - puts "OCC620 OK: BOPCUT operation works OK" -} - -set square 314742. -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug620_2 b/tests/bugs/modalg/bug620_2 deleted file mode 100755 index 94eb0c211b..0000000000 --- a/tests/bugs/modalg/bug620_2 +++ /dev/null @@ -1,24 +0,0 @@ - -puts "========================" -puts "OCC620" -puts "========================" -puts "" -############################ -## No possibility to cut the shapes. -############################ - -restore [locate_data_file OCC620a.brep] a -checkshape a -restore [locate_data_file OCC620b.brep] b -checkshape b - -bop a b - -if [catch { boptuc result } catch_result] { - puts "Faulty OCC620 : BOPTUC operation was made wrongly" -} else { - puts "OCC620 OK: BOPTUC operation works OK" -} - -set square 1.15562e+06 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug625 b/tests/bugs/modalg/bug625 deleted file mode 100755 index ddb3607f67..0000000000 --- a/tests/bugs/modalg/bug625 +++ /dev/null @@ -1,33 +0,0 @@ -puts "========================" -puts "OCC625" -puts "========================" -puts "" -############################################################################### -## Created filler looks strange (see attached picture) inspite of checkshapes told about correct source and result shapes. -############################################################################### - -pload QAcommands - -restore [locate_data_file OCC625.brep] a -checkshape a - -vinit -tclean a -explode a e - -blend res1 a 10 a_22 10 a_14 -blend result res1 10 a_17 10 a_4 -checkshape result - -vinit -vdisplay result -vfit -vsetdispmode result 1 - -set x_coord 116 -set y_coord 252 - -checkcolor $x_coord $y_coord 0.82 0.58 0.09 - -set square 19977 -set 3dviewer 1 \ No newline at end of file diff --git a/tests/bugs/modalg/bug6272_1 b/tests/bugs/modalg/bug6272_1 deleted file mode 100644 index c162845bee..0000000000 --- a/tests/bugs/modalg/bug6272_1 +++ /dev/null @@ -1,22 +0,0 @@ -puts "TODO OCC111111 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO OCC111111 ALL: Error : The square of result shape is" -pload QAcommands - -puts "============" -puts "OCC6272" -puts "============" -puts "" -###################################################### -# Incorrect results of gluing operation -###################################################### - -set BugNumber OCC6272 - -restore [locate_data_file OCC6272_bridge2.brep] a1 -restore [locate_data_file OCC6272_revolution.brep] a2 - -OCC307 result a1 a2 0 - -set square 0 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug6272_2 b/tests/bugs/modalg/bug6272_2 deleted file mode 100644 index 0d527f44d0..0000000000 --- a/tests/bugs/modalg/bug6272_2 +++ /dev/null @@ -1,22 +0,0 @@ -puts "TODO OCC111111 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO OCC111111 ALL: Error : The square of result shape is" - -pload QAcommands - -puts "============" -puts "OCC6272" -puts "============" -puts "" -###################################################### -# Incorrect results of gluing operation -###################################################### - -set BugNumber OCC6272 - -restore [locate_data_file OCC6272_bridge2.brep] a1 -restore [locate_data_file OCC6272_revolution.brep] a2 - -OCC307 result a1 a2 1 - -set square 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug6272_3 b/tests/bugs/modalg/bug6272_3 deleted file mode 100644 index d4b9253e82..0000000000 --- a/tests/bugs/modalg/bug6272_3 +++ /dev/null @@ -1,23 +0,0 @@ -puts "TODO OCC111111 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO OCC111111 ALL: Error : The square of result shape is" - -pload QAcommands - -puts "============" -puts "OCC6272" -puts "============" -puts "" -###################################################### -# Incorrect results of gluing operation -###################################################### - -set BugNumber OCC6272 - -restore [locate_data_file OCC6272_bridge2.brep] a1 - -explode a1 -OCC307 result a1_1 a1_2 0 - -set square 0 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug6272_4 b/tests/bugs/modalg/bug6272_4 deleted file mode 100644 index 99883aabb7..0000000000 --- a/tests/bugs/modalg/bug6272_4 +++ /dev/null @@ -1,22 +0,0 @@ -puts "TODO OCC111111 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO OCC111111 ALL: Error : The square of result shape is" - -pload QAcommands - -puts "============" -puts "OCC6272" -puts "============" -puts "" -###################################################### -# Incorrect results of gluing operation -###################################################### - -set BugNumber OCC6272 - -restore [locate_data_file OCC6272_bridge2.brep] a1 - -explode a1 -OCC307 result a1_1 a1_2 1 - -set square 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug6272_5 b/tests/bugs/modalg/bug6272_5 deleted file mode 100644 index fc46efeeb1..0000000000 --- a/tests/bugs/modalg/bug6272_5 +++ /dev/null @@ -1,33 +0,0 @@ -puts "============" -puts "OCC6272" -puts "============" -puts "" -###################################################### -# Incorrect results of gluing operation -###################################################### - -set BugNumber OCC6272 - -restore [locate_data_file OCC6272_bridge2.brep] a1 - -explode a1 - -bop a1_1 a1_2 -bopfuse result - -set square 6552.67 - -# Analysis of "nbshapes res" -set nb_v_good 116 -set nb_e_good 176 -set nb_w_good 72 -set nb_f_good 70 -set nb_sh_good 5 -set nb_sol_good 5 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 445 - -set 2dviewer 0 - - diff --git a/tests/bugs/modalg/bug6272_6 b/tests/bugs/modalg/bug6272_6 deleted file mode 100644 index 2d85e74eaf..0000000000 --- a/tests/bugs/modalg/bug6272_6 +++ /dev/null @@ -1,35 +0,0 @@ -puts "TODO OCC11111 ALL: Error : The square of result shape is" - -puts "============" -puts "OCC6272" -puts "============" -puts "" -###################################################### -# Incorrect results of gluing operation -###################################################### - -set BugNumber OCC6272 - -restore [locate_data_file OCC6272_bridge2.brep] a1 -restore [locate_data_file OCC6272_revolution.brep] a2 - -bop a1 a2 -bopfuse result - -# puts "See result in the viewer!!!" - -set square 8979.70 - -# Analysis of "nbshapes res" -set nb_v_good 60 -set nb_e_good 90 -set nb_w_good 42 -set nb_f_good 40 -set nb_sh_good 5 -set nb_sol_good 5 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 243 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug6272_71 b/tests/bugs/modalg/bug6272_71 deleted file mode 100644 index 8bb8228ab7..0000000000 --- a/tests/bugs/modalg/bug6272_71 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC6272" -puts "============" -puts "" -###################################################### -# Incorrect results of gluing operation -###################################################### - -set BugNumber OCC6272 - -restore [locate_data_file OCC6272_bridge2.brep] a1 - -# -# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids -# - -explode a1 so - -bop a1_3 a1_5 -if { [catch { bopfuse result } ] } { - puts "Faulty ${BugNumber}" -} - -set square 730.993 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug6272_710 b/tests/bugs/modalg/bug6272_710 deleted file mode 100644 index 12b3ca8ffb..0000000000 --- a/tests/bugs/modalg/bug6272_710 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC6272" -puts "============" -puts "" -###################################################### -# Incorrect results of gluing operation -###################################################### - -set BugNumber OCC6272 - -restore [locate_data_file OCC6272_bridge2.brep] a1 - -# -# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids -# - -explode a1 so - -bop a1_6 a1_4 -if { [catch { bopfuse result } ] } { - puts "Faulty ${BugNumber}" -} - -set square 3387.54 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug6272_72 b/tests/bugs/modalg/bug6272_72 deleted file mode 100644 index 7b05acbb54..0000000000 --- a/tests/bugs/modalg/bug6272_72 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC6272" -puts "============" -puts "" -###################################################### -# Incorrect results of gluing operation -###################################################### - -set BugNumber OCC6272 - -restore [locate_data_file OCC6272_bridge2.brep] a1 - -# -# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids -# - -explode a1 so - -bop a1_5 a1_3 -if { [catch { bopfuse result } ] } { - puts "Faulty ${BugNumber}" -} - -set square 730.993 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug6272_73 b/tests/bugs/modalg/bug6272_73 deleted file mode 100644 index d9f34046bf..0000000000 --- a/tests/bugs/modalg/bug6272_73 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC6272" -puts "============" -puts "" -###################################################### -# Incorrect results of gluing operation -###################################################### - -set BugNumber OCC6272 - -restore [locate_data_file OCC6272_bridge2.brep] a1 - -# -# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids -# - -explode a1 so - -bop a1_5 a1_1 -if { [catch { bopfuse result } ] } { - puts "Faulty ${BugNumber}" -} - -set square 2037.7 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug6272_74 b/tests/bugs/modalg/bug6272_74 deleted file mode 100644 index f9e0dfc319..0000000000 --- a/tests/bugs/modalg/bug6272_74 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC6272" -puts "============" -puts "" -###################################################### -# Incorrect results of gluing operation -###################################################### - -set BugNumber OCC6272 - -restore [locate_data_file OCC6272_bridge2.brep] a1 - -# -# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids -# - -explode a1 so - -bop a1_1 a1_5 -if { [catch { bopfuse result } ] } { - puts "Faulty ${BugNumber}" -} - -set square 2037.7 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug6272_75 b/tests/bugs/modalg/bug6272_75 deleted file mode 100644 index 8306731bd7..0000000000 --- a/tests/bugs/modalg/bug6272_75 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC6272" -puts "============" -puts "" -###################################################### -# Incorrect results of gluing operation -###################################################### - -set BugNumber OCC6272 - -restore [locate_data_file OCC6272_bridge2.brep] a1 - -# -# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids -# - -explode a1 so - -bop a1_1 a1_2 -if { [catch { bopfuse result } ] } { - puts "Faulty ${BugNumber}" -} - -set square 2314.14 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug6272_76 b/tests/bugs/modalg/bug6272_76 deleted file mode 100644 index a0dc833fb0..0000000000 --- a/tests/bugs/modalg/bug6272_76 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC6272" -puts "============" -puts "" -###################################################### -# Incorrect results of gluing operation -###################################################### - -set BugNumber OCC6272 - -restore [locate_data_file OCC6272_bridge2.brep] a1 - -# -# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids -# - -explode a1 so - -bop a1_2 a1_1 -if { [catch { bopfuse result } ] } { - puts "Faulty ${BugNumber}" -} - -set square 2314.14 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug6272_77 b/tests/bugs/modalg/bug6272_77 deleted file mode 100644 index 05d7c48819..0000000000 --- a/tests/bugs/modalg/bug6272_77 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC6272" -puts "============" -puts "" -###################################################### -# Incorrect results of gluing operation -###################################################### - -set BugNumber OCC6272 - -restore [locate_data_file OCC6272_bridge2.brep] a1 - -# -# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids -# - -explode a1 so - -bop a1_2 a1_4 -if { [catch { bopfuse result } ] } { - puts "Faulty ${BugNumber}" -} - -set square 922.7 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug6272_78 b/tests/bugs/modalg/bug6272_78 deleted file mode 100644 index 7ed242a4f8..0000000000 --- a/tests/bugs/modalg/bug6272_78 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC6272" -puts "============" -puts "" -###################################################### -# Incorrect results of gluing operation -###################################################### - -set BugNumber OCC6272 - -restore [locate_data_file OCC6272_bridge2.brep] a1 - -# -# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids -# - -explode a1 so - -bop a1_4 a1_2 -if { [catch { bopfuse result } ] } { - puts "Faulty ${BugNumber}" -} - -set square 922.7 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug6272_79 b/tests/bugs/modalg/bug6272_79 deleted file mode 100644 index 987aa25e56..0000000000 --- a/tests/bugs/modalg/bug6272_79 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC6272" -puts "============" -puts "" -###################################################### -# Incorrect results of gluing operation -###################################################### - -set BugNumber OCC6272 - -restore [locate_data_file OCC6272_bridge2.brep] a1 - -# -# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids -# - -explode a1 so - -bop a1_4 a1_6 -if { [catch { bopfuse result } ] } { - puts "Faulty ${BugNumber}" -} - -set square 3387.54 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug6272_81 b/tests/bugs/modalg/bug6272_81 deleted file mode 100644 index 959fac2093..0000000000 --- a/tests/bugs/modalg/bug6272_81 +++ /dev/null @@ -1,25 +0,0 @@ -puts "============" -puts "OCC6272" -puts "============" -puts "" -###################################################### -# Incorrect results of gluing operation -###################################################### - -set BugNumber OCC6272 - -restore [locate_data_file OCC6272_bridge2.brep] a1 - -# -# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids -# - -explode a1 so - -bop a1_3 a1_5 -if { [catch { bopsection result } ] } { - puts "Faulty ${BugNumber}" -} - -set length 36 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug6272_810 b/tests/bugs/modalg/bug6272_810 deleted file mode 100644 index bfa564e265..0000000000 --- a/tests/bugs/modalg/bug6272_810 +++ /dev/null @@ -1,25 +0,0 @@ -puts "============" -puts "OCC6272" -puts "============" -puts "" -###################################################### -# Incorrect results of gluing operation -###################################################### - -set BugNumber OCC6272 - -restore [locate_data_file OCC6272_bridge2.brep] a1 - -# -# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids -# - -explode a1 so - -bop a1_6 a1_4 -if { [catch { bopsection result } ] } { - puts "Faulty ${BugNumber}" -} - -set length 57.3941 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug6272_82 b/tests/bugs/modalg/bug6272_82 deleted file mode 100644 index 690c798a1a..0000000000 --- a/tests/bugs/modalg/bug6272_82 +++ /dev/null @@ -1,25 +0,0 @@ -puts "============" -puts "OCC6272" -puts "============" -puts "" -###################################################### -# Incorrect results of gluing operation -###################################################### - -set BugNumber OCC6272 - -restore [locate_data_file OCC6272_bridge2.brep] a1 - -# -# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids -# - -explode a1 so - -bop a1_5 a1_3 -if { [catch { bopsection result } ] } { - puts "Faulty ${BugNumber}" -} - -set length 36 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug6272_83 b/tests/bugs/modalg/bug6272_83 deleted file mode 100644 index 08c2deb590..0000000000 --- a/tests/bugs/modalg/bug6272_83 +++ /dev/null @@ -1,25 +0,0 @@ -puts "============" -puts "OCC6272" -puts "============" -puts "" -###################################################### -# Incorrect results of gluing operation -###################################################### - -set BugNumber OCC6272 - -restore [locate_data_file OCC6272_bridge2.brep] a1 - -# -# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids -# - -explode a1 so - -bop a1_5 a1_1 -if { [catch { bopsection result } ] } { - puts "Faulty ${BugNumber}" -} - -set length 32 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug6272_84 b/tests/bugs/modalg/bug6272_84 deleted file mode 100644 index 1519b34c5d..0000000000 --- a/tests/bugs/modalg/bug6272_84 +++ /dev/null @@ -1,25 +0,0 @@ -puts "============" -puts "OCC6272" -puts "============" -puts "" -###################################################### -# Incorrect results of gluing operation -###################################################### - -set BugNumber OCC6272 - -restore [locate_data_file OCC6272_bridge2.brep] a1 - -# -# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids -# - -explode a1 so - -bop a1_1 a1_5 -if { [catch { bopsection result } ] } { - puts "Faulty ${BugNumber}" -} - -set length 32 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug6272_85 b/tests/bugs/modalg/bug6272_85 deleted file mode 100644 index a35fd9446e..0000000000 --- a/tests/bugs/modalg/bug6272_85 +++ /dev/null @@ -1,25 +0,0 @@ -puts "============" -puts "OCC6272" -puts "============" -puts "" -###################################################### -# Incorrect results of gluing operation -###################################################### - -set BugNumber OCC6272 - -restore [locate_data_file OCC6272_bridge2.brep] a1 - -# -# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids -# - -explode a1 so - -bop a1_1 a1_2 -if { [catch { bopsection result } ] } { - puts "Faulty ${BugNumber}" -} - -set length 32 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug6272_86 b/tests/bugs/modalg/bug6272_86 deleted file mode 100644 index 1c64b335b6..0000000000 --- a/tests/bugs/modalg/bug6272_86 +++ /dev/null @@ -1,25 +0,0 @@ -puts "============" -puts "OCC6272" -puts "============" -puts "" -###################################################### -# Incorrect results of gluing operation -###################################################### - -set BugNumber OCC6272 - -restore [locate_data_file OCC6272_bridge2.brep] a1 - -# -# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids -# - -explode a1 so - -bop a1_2 a1_1 -if { [catch { bopsection result } ] } { - puts "Faulty ${BugNumber}" -} - -set length 32 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug6272_87 b/tests/bugs/modalg/bug6272_87 deleted file mode 100644 index 809b9371b9..0000000000 --- a/tests/bugs/modalg/bug6272_87 +++ /dev/null @@ -1,25 +0,0 @@ -puts "============" -puts "OCC6272" -puts "============" -puts "" -###################################################### -# Incorrect results of gluing operation -###################################################### - -set BugNumber OCC6272 - -restore [locate_data_file OCC6272_bridge2.brep] a1 - -# -# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids -# - -explode a1 so - -bop a1_2 a1_4 -if { [catch { bopsection result } ] } { - puts "Faulty ${BugNumber}" -} - -set length 32.1528 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug6272_88 b/tests/bugs/modalg/bug6272_88 deleted file mode 100644 index 9418190d0e..0000000000 --- a/tests/bugs/modalg/bug6272_88 +++ /dev/null @@ -1,25 +0,0 @@ -puts "============" -puts "OCC6272" -puts "============" -puts "" -###################################################### -# Incorrect results of gluing operation -###################################################### - -set BugNumber OCC6272 - -restore [locate_data_file OCC6272_bridge2.brep] a1 - -# -# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids -# - -explode a1 so - -bop a1_4 a1_2 -if { [catch { bopsection result } ] } { - puts "Faulty ${BugNumber}" -} - -set length 32.1528 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug6272_89 b/tests/bugs/modalg/bug6272_89 deleted file mode 100644 index 8aeefc7cf9..0000000000 --- a/tests/bugs/modalg/bug6272_89 +++ /dev/null @@ -1,25 +0,0 @@ -puts "============" -puts "OCC6272" -puts "============" -puts "" -###################################################### -# Incorrect results of gluing operation -###################################################### - -set BugNumber OCC6272 - -restore [locate_data_file OCC6272_bridge2.brep] a1 - -# -# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids -# - -explode a1 so - -bop a1_4 a1_6 -if { [catch { bopsection result } ] } { - puts "Faulty ${BugNumber}" -} - -set length 57.3941 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug6277 b/tests/bugs/modalg/bug6277 deleted file mode 100644 index fcc3558b47..0000000000 --- a/tests/bugs/modalg/bug6277 +++ /dev/null @@ -1,43 +0,0 @@ -puts "TODO OCC11111 ALL: Error : Result shape is WRONG" - -puts "============" -puts "OCC6277" -puts "============" -puts "" -###################################################### -# Cut operation does not produce any result -###################################################### - -set BugNumber OCC6277 - -restore [locate_data_file OCC6277_A.brep] s1 -restore [locate_data_file OCC6277_B.brep] s2 - -decho off -set che_s1 [checkshape s1] -set che_s2 [checkshape s2] -decho on -if { [regexp {Faulty} $che_s1] } { - puts "Faulty ${BugNumber} : checkshape is wrong for s1" -} - -if { [regexp {Faulty} $che_s2] } { - puts "Faulty ${BugNumber} : checkshape is wrong for s2" -} - -bcut result s1 s2 - -set square 40084.9 - -set nb_v_good 23 -set nb_e_good 34 -set nb_w_good 19 -set nb_f_good 14 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 93 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug6289 b/tests/bugs/modalg/bug6289 deleted file mode 100644 index 2697f7fcb8..0000000000 --- a/tests/bugs/modalg/bug6289 +++ /dev/null @@ -1,29 +0,0 @@ -#INTERFACE STEP -puts "============" -puts "OCC6289" -puts "============" -puts "" -###################################################### -# Internal error (code 101) in Section computation -###################################################### - -catch { pload XDE } - -set BugNumber OCC6289 - -if { [catch { stepread [locate_data_file OCC6289.stp] a * } catch_result] } { - puts "Faulty ${BugNumber} : here is reading problem" -} else { - tpcompound comp - - plane pl 0 0 28 0 0 1 - mkface f pl - - if { [catch { bsection result comp f } catch_result] } { - puts "Faulty ${BugNumber}" - } -} - -set length 453.679 -set 3dviewer 0 - diff --git a/tests/bugs/modalg/bug629 b/tests/bugs/modalg/bug629 deleted file mode 100755 index 79ae742341..0000000000 --- a/tests/bugs/modalg/bug629 +++ /dev/null @@ -1,25 +0,0 @@ -puts "TODO OCC12345 ALL: Error : The square of result shape is" -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" - -puts "================" -puts "OCC629" -puts "================" -puts "" -########################################## -## Exception during attempt to create solid by command PIPE -########################################## - -restore [locate_data_file OCC629a.brep] a -checkshape a - -restore [locate_data_file OCC629b.brep] b -checkshape b - -if [catch {pipe result a b } catch_result] { - puts "Faulty OCC629: function PIPE works wrongly" -} else { - puts "OCC629 OK: function PIPE works properly" -} - -set square 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug6334 b/tests/bugs/modalg/bug6334 deleted file mode 100644 index b90cd69b7e..0000000000 --- a/tests/bugs/modalg/bug6334 +++ /dev/null @@ -1,69 +0,0 @@ -puts "TODO OCC11111 ALL: Error : Result shape is WRONG" - -puts "============" -puts "OCC6334" -puts "============" -puts "" -###################################################### -# Invalid result of MakeCylindricalHole when input solid is REVERSED -###################################################### - -set BugNumber OCC6334 - -# 1. Make box -box b 100 100 100 - -subshape b f 1 -offsetshape t b 10 b_1 - -decho off -set che_t [checkshape t] -decho on - -if {[regexp {Faulty} $che_t]} { - puts "Faulty ${BugNumber} : checkshape is wrong for t" -} - -set bnd_t [bounding t] -set ori [lindex [dtyp t] 2] -puts "Orientation of thick solid is $ori" - -# 3. Make hole -hole h t 110 50 50 1 0 0 10 - -set che [checkshape h] -if { [regexp {Faulty} $che] } { - puts "Faulty ${BugNumber} : checkshape is wrong for h" -} - -set bnd_h [bounding h] - -renamevar h result - -set square 117509 - -set nb_v_good 32 -set nb_e_good 53 -set nb_w_good 27 -set nb_f_good 24 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 139 - - -# 4. Check thickness of box and hole -set dx_t [expr [lindex $bnd_t 3] - [lindex $bnd_t 0]] -set dx_h [expr [lindex $bnd_h 3] - [lindex $bnd_h 0]] - -if { [expr abs($dx_h - $dx_t)] > 1e-5 } { - puts "Thickness of solid = $dx_t" - puts "Thickness of solid with hole = $dx_h" - puts "Invalid result of making a hole" - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug636 b/tests/bugs/modalg/bug636 deleted file mode 100755 index 88f5cf23c3..0000000000 --- a/tests/bugs/modalg/bug636 +++ /dev/null @@ -1,31 +0,0 @@ - -puts "================" -puts "OCC636" -puts "================" -puts "" -##################################### -## BRepOffsetAPI_MakePipeShell builds twisted pipe -##################################### - -restore [locate_data_file OCC636a.brep] s -checkshape s - -restore [locate_data_file OCC636b.brep] s1 -checkshape s1 - -restore [locate_data_file OCC636c.brep] s2 -checkshape s2 - -mksweep s -addsweep s1 -addsweep s2 - -if [catch { buildsweep result } catch_result] { - puts "Faulty OCC636: function buildsweep works wrongly" -} else { - puts "OCC636 OK: function buildsweep works properly" -} - -set square 3836.92 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug637_1 b/tests/bugs/modalg/bug637_1 deleted file mode 100755 index 5e528f146b..0000000000 --- a/tests/bugs/modalg/bug637_1 +++ /dev/null @@ -1,29 +0,0 @@ - -puts "================" -puts "OCC637" -puts "(case 1)" -puts "================" -puts "" -########################################## -## BRepOffsetAPI_MakePipeShell crashes with fatal exception -########################################## - -restore [locate_data_file OCC637a.brep] s -checkshape s - -restore [locate_data_file OCC636c.brep] s1 -checkshape s1 - -restore [locate_data_file OCC637c.brep] s2 -checkshape s2 - -mksweep s -addsweep s1 -addsweep s2 - -if [catch { buildsweep result } catch_result] { - puts "Faulty OCC637 (case 1): function buildsweep works wrongly" -} - -set square 1675.58 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug637_2 b/tests/bugs/modalg/bug637_2 deleted file mode 100755 index 75c5fc6568..0000000000 --- a/tests/bugs/modalg/bug637_2 +++ /dev/null @@ -1,30 +0,0 @@ - -puts "================" -puts "OCC637" -puts "(case 2)" -puts "================" -puts "" -########################################## -## BRepOffsetAPI_MakePipeShell crashes with fatal exception -########################################## - -restore [locate_data_file OCC637d.brep] s -checkshape s - -restore [locate_data_file OCC637c.brep] s1 -checkshape s1 - -restore [locate_data_file OCC637f.brep] s2 -checkshape s2 - -mksweep s -addsweep s1 -addsweep s2 - -if [catch {buildsweep result } catch_result] { - puts "Faulty OCC637 (case 2): function buildsweep works wrongly" -} - -set square 1090.91 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug6502 b/tests/bugs/modalg/bug6502 deleted file mode 100644 index 0a7a2f6796..0000000000 --- a/tests/bugs/modalg/bug6502 +++ /dev/null @@ -1,21 +0,0 @@ -puts "================" -puts "OCC6502" -puts "================" -puts "" -####################################################################################### -# Failure calculation of ShrunkRange resulting to failure of boolean operation -####################################################################################### - -set BugNumber OCC6502 - - -restore [locate_data_file OCC6502.brep] a -plane pl 100 0 0 1 0 0 -mkface f pl - -if { [catch { bsection result a f -a } catch_result] } { - puts "Faulty ${BugNumber}" -} - -set length 37.7831 -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug6538 b/tests/bugs/modalg/bug6538 deleted file mode 100644 index dec5dfa13e..0000000000 --- a/tests/bugs/modalg/bug6538 +++ /dev/null @@ -1,42 +0,0 @@ -puts "============" -puts "OCC6538" -puts "============" -puts "" -###################################################### -# Empty result obtained by operation "common" for couple of faces -###################################################### - -set BugNumber OCC6538 - -restore [locate_data_file OCC6538-f1.brep] s1 -restore [locate_data_file OCC6538-f2.brep] s2 - -decho off -set che_s1 [checkshape s1] -set che_s2 [checkshape s2] -decho on -if { [regexp {Faulty} $che_s1] } { - puts "Faulty ${BugNumber} : checkshape is wrong for s1" -} - -if { [regexp {Faulty} $che_s2] } { - puts "Faulty ${BugNumber} : checkshape is wrong for s2" -} - - -bop s1 s2 -bopcommon result - -set square 18.695 - -set nb_v_good 16 -set nb_e_good 16 -set nb_w_good 1 -set nb_f_good 1 -set nb_sh_good 1 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 36 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug6554 b/tests/bugs/modalg/bug6554 deleted file mode 100644 index b5cd3b1087..0000000000 --- a/tests/bugs/modalg/bug6554 +++ /dev/null @@ -1,39 +0,0 @@ -puts "============" -puts "OCC6554" -puts "============" -puts "" -###################################################### -# Intersection shell-plane gives a disconnected set of edges -###################################################### - -set BugNumber OCC6554 - -restore [locate_data_file OCC6554-shell.brep] sh -restore [locate_data_file OCC6554-face.brep] f - -decho off -set che_sh [checkshape sh] -set che_f [checkshape f] -decho on -if { [regexp {Faulty} $che_sh] } { - puts "Faulty ${BugNumber} : checkshape is wrong for sh" -} - -if { [regexp {Faulty} $che_f] } { - puts "Faulty ${BugNumber} : checkshape is wrong for f" -} - -bsection result sh f -a - -regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection result] full Vertices - -set good_Vertices 2 - -if { ${Vertices} != ${good_Vertices} } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -set length 110.045 -set 2dviewer 2 diff --git a/tests/bugs/modalg/bug67 b/tests/bugs/modalg/bug67 deleted file mode 100755 index 73a7ae195c..0000000000 --- a/tests/bugs/modalg/bug67 +++ /dev/null @@ -1,16 +0,0 @@ - -puts "================" -puts "BUC61052" -puts "OCC67" -puts "================" -puts "" - -restore [locate_data_file OCC67.brep] sh -checkshape sh - -explode sh e - -fillet result sh 5 sh_18 - -set square 64281.8 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug6725 b/tests/bugs/modalg/bug6725 deleted file mode 100755 index fba7ee5aba..0000000000 --- a/tests/bugs/modalg/bug6725 +++ /dev/null @@ -1,46 +0,0 @@ -puts "============" -puts "OCC6725" -puts "============" -puts "" -###################################################### -# Application crashed with "Segmentation Fault" message. Red Hat Linux 8.0 -###################################################### - -set BugNumber OCC6725 - -restore [locate_data_file OCC6725.brep] result - -set text [incmesh result 0.01] -set last [lindex $text end] -set r [string compare $last Failure] - -set status1 0 -if {$r == 0} { - set status1 1 -} - -set square 624989 - -set nb_v_good 3806 -set nb_e_good 3808 -set nb_w_good 756 -set nb_f_good 730 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 9101 - -if { ${status1} != 0} { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -vinit -tclean result -vsetdispmode 1 -vdisplay result -vfit - -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug673 b/tests/bugs/modalg/bug673 deleted file mode 100755 index 8aa9494d1e..0000000000 --- a/tests/bugs/modalg/bug673 +++ /dev/null @@ -1,26 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty OCC673: function SPLITSHAPE works wrongly" - -puts "================" -puts "OCC673" -puts "================" -puts "" -####################################################### -## Exception is raised during splitting face by a wire laying on the face boundary. -####################################################### - -restore [locate_data_file OCC673a.brep] a -checkshape a - -restore [locate_data_file OCC673b.brep] b -checkshape b - -if [catch {spliteshape result a a b} catch_result] { - puts "Faulty OCC673: function SPLITSHAPE works wrongly" -} else { - puts "OCC673 OK : function SPLITSHAPE works OK" - set square 0 - set 2dviewer 0 -} - - - diff --git a/tests/bugs/modalg/bug6766_1 b/tests/bugs/modalg/bug6766_1 deleted file mode 100644 index 6f6222a947..0000000000 --- a/tests/bugs/modalg/bug6766_1 +++ /dev/null @@ -1,38 +0,0 @@ -puts "================" -puts "OCC6766" -puts "================" -puts "" -####################################################################################### -# Invalid result of intersection of a bspline face with a plane -####################################################################################### - -set BugNumber OCC6766 - -restore [locate_data_file OCC6766.brep] a - -decho off -set che_a [checkshape a] -decho on -if { [regexp {Faulty} $che_a] } { - puts "Faulty ${BugNumber} : checkshape is wrong for s1" -} - -set Y 4 -plane pl 0 ${Y} 0 0 1 0 -mkface f pl -bsection result a f -2d -a - - - -set nb_v_good 4 -set nb_e_good 3 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 8 - -set length 138.474 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug6766_2 b/tests/bugs/modalg/bug6766_2 deleted file mode 100644 index d0e28edac3..0000000000 --- a/tests/bugs/modalg/bug6766_2 +++ /dev/null @@ -1,38 +0,0 @@ -puts "================" -puts "OCC6766" -puts "================" -puts "" -####################################################################################### -# Invalid result of intersection of a bspline face with a plane -####################################################################################### - -set BugNumber OCC6766 - -restore [locate_data_file OCC6766.brep] a - -decho off -set che_a [checkshape a] -decho on -if { [regexp {Faulty} $che_a] } { - puts "Faulty ${BugNumber} : checkshape is wrong for a" -} - -set Y 4 -plane pl 0 ${Y} 0 0 1 0 -mkface f pl -bop a f -bopsection result - - -set nb_v_good 4 -set nb_e_good 3 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 8 - -set length 138.474 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug6766_3 b/tests/bugs/modalg/bug6766_3 deleted file mode 100644 index 610bb604ed..0000000000 --- a/tests/bugs/modalg/bug6766_3 +++ /dev/null @@ -1,37 +0,0 @@ -puts "================" -puts "OCC6766" -puts "================" -puts "" -####################################################################################### -# Invalid result of intersection of a bspline face with a plane -####################################################################################### - -set BugNumber OCC6766 - -restore [locate_data_file OCC6766.brep] a - -decho off -set che_a [checkshape a] -decho on -if { [regexp {Faulty} $che_a] } { - puts "Faulty ${BugNumber} : checkshape is wrong for a" -} - -set Y 6 -plane pl 0 ${Y} 0 0 1 0 -mkface f pl -bsection result a f -2d -a - - -set nb_v_good 4 -set nb_e_good 3 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 8 - -set length 126.138 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug6766_4 b/tests/bugs/modalg/bug6766_4 deleted file mode 100644 index 21479c806d..0000000000 --- a/tests/bugs/modalg/bug6766_4 +++ /dev/null @@ -1,37 +0,0 @@ -puts "================" -puts "OCC6766" -puts "================" -puts "" -####################################################################################### -# Invalid result of intersection of a bspline face with a plane -####################################################################################### - -set BugNumber OCC6766 - -restore [locate_data_file OCC6766.brep] a -decho off -set che_a [checkshape a] -decho on -if { [regexp {Faulty} $che_a] } { - puts "Faulty ${BugNumber} : checkshape is wrong for a" -} - -set Y 6 -plane pl 0 ${Y} 0 0 1 0 -mkface f pl -bop a f -bopsection result - - -set nb_v_good 4 -set nb_e_good 3 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 8 - -set length 126.138 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug6811 b/tests/bugs/modalg/bug6811 deleted file mode 100644 index bcbe7e35a0..0000000000 --- a/tests/bugs/modalg/bug6811 +++ /dev/null @@ -1,32 +0,0 @@ -#INTERFACE STEP -puts "================" -puts "OCC6811" -puts "================" -puts "" -####################################################################################### -# Unstable work of the checkshape on the attached file. -####################################################################################### - -catch { pload XDE } - -set BugNumber OCC6811 - -if { [catch { stepread [locate_data_file trj12_b3-tu-203.stp] a * } catch_result] } { - puts "Faulty ${BugNumber} : here is reading problem" -} else { - decho off - set che_a_1 [checkshape a_1 f] - set che_a_2 [checkshape a_1 f] - decho on - if { [regexp {Faulty} $che_a_1] } { - puts "Faulty ${BugNumber} : checkshape 1 is wrong for a" - } - if { [regexp {Faulty} $che_a_2] } { - puts "Faulty ${BugNumber} : checkshape 2 is wrong for a" - } - - renamevar a_1 result -} - -set square 1.48021e+06 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug68_1 b/tests/bugs/modalg/bug68_1 deleted file mode 100755 index c262ce645b..0000000000 --- a/tests/bugs/modalg/bug68_1 +++ /dev/null @@ -1,17 +0,0 @@ - -puts "================" -puts "BUC61053" -puts "OCC68" -puts "================" -puts "" - -restore [locate_data_file OCC68.brep] sh -checkshape sh - -explode sh - -bfuse result sh_1 sh_2 - -set square 3675.77 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug68_2 b/tests/bugs/modalg/bug68_2 deleted file mode 100755 index d65312a182..0000000000 --- a/tests/bugs/modalg/bug68_2 +++ /dev/null @@ -1,18 +0,0 @@ - -puts "================" -puts "BUC61053" -puts "OCC68" -puts "================" -puts "" - -restore [locate_data_file OCC68.brep] sh -checkshape sh - -explode sh - -bfuse result sh_2 sh_1 -set square 3675.77 -set 2dviewer 0 - - - diff --git a/tests/bugs/modalg/bug693 b/tests/bugs/modalg/bug693 deleted file mode 100755 index ec4a96a3c1..0000000000 --- a/tests/bugs/modalg/bug693 +++ /dev/null @@ -1,79 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO OCC12345 ALL: Error : The square of result shape is " - -puts "================" -puts "OCC693" -puts "================" -puts "" -################################################### -## The boolean operations give incorrect result if one of shapes is compound -## consisting of several adjoint solids -#################################################### - -box h1 234 52 0 41 98 40 -box v1 241 136 20 31 31 15 -box h3 215 120 20 78 15 15 - -#mu4 -#fit - -compound h1 c1 -compound v1 c2 - -tcopy c1 cc1 -tcopy c2 cc2 -bcommon int1 cc1 cc2 -##########checkshape -top int1 -checkshape -top int1 - -tcopy c1 cc1 -tcopy c2 cc2 -bcut cut1 cc1 cc2 -checkshape -top cut1 - -tcopy c1 cc1 -tcopy c2 cc2 -bcut cut2 cc2 cc1 -##########checkshape -top cut2 -checkshape -top cut2 - -compound int1 cut1 cut2 comp3 -##########checkshape -top comp3 -checkshape -top comp3 -#donly comp3 - -tcopy comp3 ccomp3 -tcopy h3 ch3 -bcommon int2 ccomp3 ch3 -##########checkshape -top int2 -checkshape -top int2 -#donly int2 - -tcopy comp3 ccomp3 -tcopy h3 ch3 -bcut cut3 ccomp3 ch3 -##########checkshape -top cut3 -checkshape -top cut3 -#donly cut3 - -tcopy comp3 ccomp3 -tcopy h3 ch3 -bcut cut4 ch3 ccomp3 -##########checkshape -top cut4 -checkshape -top cut4 - -compound int2 cut3 cut4 result -##########checkshape -top res -checkshape -top result - -##########set che [checkshape -top res] -########## -##########set err [lindex $che [expr [llength $che] - 7]] -##########if { $err == "Faulty"} { -########## puts "Faulty OCC693" -##########} else { -########## puts "OCC693 OK " -##########} - -set square 33196 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug693_1 b/tests/bugs/modalg/bug693_1 deleted file mode 100755 index 51bacabb5d..0000000000 --- a/tests/bugs/modalg/bug693_1 +++ /dev/null @@ -1,78 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -puts "================" -puts "OCC693" -puts "================" -puts "" -################################################### -## The boolean operations give incorrect result if one of shapes is compound -## consisting of several adjoint solids -#################################################### - -box h1 234 52 0 41 98 40 -box v1 241 136 20 31 31 15 -box h3 215 120 20 78 15 15 - -compound h1 c1 -compound v1 c2 - -tcopy c1 cc1 -tcopy c2 cc2 - -bop cc1 cc2 -bopcommon int1 - -checkshape -top int1 - -tcopy c1 cc1 -tcopy c2 cc2 - -bop cc1 cc2 -bopcut cut1 - -checkshape -top cut1 - -tcopy c1 cc1 -tcopy c2 cc2 - -bop cc2 cc1 -bopcut cut2 - -checkshape -top cut2 - -compound int1 cut1 cut2 comp3 - -checkshape -top comp3 - -tcopy comp3 ccomp3 -tcopy h3 ch3 - -bop ccomp3 ch3 -bopcommon int2 - -checkshape -top int2 - -tcopy comp3 ccomp3 -tcopy h3 ch3 - -bop ccomp3 ch3 -bopcut cut3 - -checkshape -top cut3 - -tcopy comp3 ccomp3 -tcopy h3 ch3 - -bop ch3 ccomp3 -bopcut cut4 - -checkshape -top cut4 - -compound int2 cut3 cut4 result - -checkshape -top result - -set square 33196 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug697_1 b/tests/bugs/modalg/bug697_1 deleted file mode 100755 index e499447515..0000000000 --- a/tests/bugs/modalg/bug697_1 +++ /dev/null @@ -1,25 +0,0 @@ -puts "============" -puts "OCC697" -puts "============" -puts "" -###################################################### -# Fuse operation does not work -###################################################### -## (old topology) -## (fuse) -###################################################### - -restore [locate_data_file OCC697_1.brep] b1 -restore [locate_data_file OCC697_2.brep] b2 - -checkshape b1 -checkshape b2 -############################################## -if { [catch {bfuse result b1 b2} catch_result] } { -############################################## - puts "Faulty : an exception was caught" -} - -set square 8879.41 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug697_2 b/tests/bugs/modalg/bug697_2 deleted file mode 100755 index 5c97f8eb92..0000000000 --- a/tests/bugs/modalg/bug697_2 +++ /dev/null @@ -1,29 +0,0 @@ -puts "============" -puts "OCC697" -puts "============" -puts "" -###################################################### -# Fuse operation does not work -###################################################### -## (old topology) -## (fuse) -###################################################### - -puts "#" -puts "Non stable test case on Linux. MKV. 28.04.2010" -puts "#" - -restore [locate_data_file OCC697_2.brep] b2 -restore [locate_data_file OCC697_3.brep] b3 - -checkshape b2 -checkshape b3 -############################################## -if { [catch {bfuse result b2 b3} catch_result] } { -############################################## - puts "Faulty : an exception was caught" -} - -set square 25357.5 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug697_3 b/tests/bugs/modalg/bug697_3 deleted file mode 100755 index 062a87919f..0000000000 --- a/tests/bugs/modalg/bug697_3 +++ /dev/null @@ -1,23 +0,0 @@ -puts "============" -puts "OCC697" -puts "============" -puts "" -###################################################### -# Fuse operation does not work -###################################################### -## (new topology) -## (bfuse) -###################################################### - -restore [locate_data_file OCC697_1.brep] b1 -restore [locate_data_file OCC697_2.brep] b2 - -checkshape b1 -checkshape b2 - -if { [catch {bfuse result b2 b1} catch_result] } { - puts "Faulty OCC697" -} - -set square 8879.41 -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug697_4 b/tests/bugs/modalg/bug697_4 deleted file mode 100755 index 69adc12578..0000000000 --- a/tests/bugs/modalg/bug697_4 +++ /dev/null @@ -1,23 +0,0 @@ -puts "============" -puts "OCC697" -puts "============" -puts "" -###################################################### -# Fuse operation does not work -###################################################### -## (new topology) -## (bfuse) -###################################################### - -restore [locate_data_file OCC697_2.brep] b2 -restore [locate_data_file OCC697_3.brep] b3 - -checkshape b2 -checkshape b3 - -if { [catch {bfuse result b3 b2} catch_result] } { - puts "Faulty OCC697" -} -set square 25357.5 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug697_5 b/tests/bugs/modalg/bug697_5 deleted file mode 100755 index c9c5e67dad..0000000000 --- a/tests/bugs/modalg/bug697_5 +++ /dev/null @@ -1,24 +0,0 @@ -puts "============" -puts "OCC697" -puts "============" -puts "" -###################################################### -# Fuse operation does not work -###################################################### -## (new topology) -## (bopfuse) -###################################################### - -restore [locate_data_file OCC697_1.brep] b1 -restore [locate_data_file OCC697_2.brep] b2 - -checkshape b1 -checkshape b2 - -bop b1 b2 -if { [catch {bopfuse result} catch_result] } { - puts "Faulty OCC697" -} -set square 8879.41 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug697_6 b/tests/bugs/modalg/bug697_6 deleted file mode 100755 index 2188a19a5d..0000000000 --- a/tests/bugs/modalg/bug697_6 +++ /dev/null @@ -1,24 +0,0 @@ -puts "============" -puts "OCC697" -puts "============" -puts "" -###################################################### -# Fuse operation does not work -###################################################### -## (new topology) -## (bopfuse) -###################################################### - -restore [locate_data_file OCC697_1.brep] b1 -restore [locate_data_file OCC697_2.brep] b2 - -checkshape b1 -checkshape b2 - -bop b2 b1 -if { [catch {bopfuse result} catch_result] } { - puts "Faulty OCC697" -} -set square 8879.41 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug697_7 b/tests/bugs/modalg/bug697_7 deleted file mode 100755 index c897130e3d..0000000000 --- a/tests/bugs/modalg/bug697_7 +++ /dev/null @@ -1,24 +0,0 @@ -puts "============" -puts "OCC697" -puts "============" -puts "" -###################################################### -# Fuse operation does not work -###################################################### -## (new topology) -## (bopfuse) -###################################################### - -restore [locate_data_file OCC697_2.brep] b2 -restore [locate_data_file OCC697_3.brep] b3 - -checkshape b2 -checkshape b3 - -bop b2 b3 -if { [catch {bopfuse result} catch_result] } { - puts "Faulty OCC697 " -} -set square 25357.5 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug697_8 b/tests/bugs/modalg/bug697_8 deleted file mode 100755 index fe0095349e..0000000000 --- a/tests/bugs/modalg/bug697_8 +++ /dev/null @@ -1,24 +0,0 @@ -puts "============" -puts "OCC697" -puts "============" -puts "" -###################################################### -# Fuse operation does not work -###################################################### -## (new topology) -## (bopfuse) -###################################################### - -restore [locate_data_file OCC697_2.brep] b2 -restore [locate_data_file OCC697_3.brep] b3 - -checkshape b2 -checkshape b3 - -bop b3 b2 -if { [catch {bopfuse result} catch_result] } { - puts "Faulty OCC697" -} -set square 25357.5 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug698 b/tests/bugs/modalg/bug698 deleted file mode 100755 index cd9a6275dc..0000000000 --- a/tests/bugs/modalg/bug698 +++ /dev/null @@ -1,16 +0,0 @@ - -puts "======= OCC698 =======" -###################################### -## Cut operation produces bad result on attached shapes -###################################### -cpulimit 10000 -restore [locate_data_file OCC698_1.brep] b4 -checkshape b4 -restore [locate_data_file OCC698_2.brep] b5 -checkshape b5 - -bcut result b5 b4 - -set square 19048.2 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug702 b/tests/bugs/modalg/bug702 deleted file mode 100755 index 5339ae46d0..0000000000 --- a/tests/bugs/modalg/bug702 +++ /dev/null @@ -1,25 +0,0 @@ - -puts "=======" -puts "OCC702" -puts "SAM1541" -puts "=======" -puts "" -######################## -## No possibility to make a prism. -######################## - -restore [locate_data_file OCC702.brep] a - -if [ catch { prism result a 100 100 100 } catch_result ] { - puts "Faulty OCC702 (case 1)" -} else { - regexp {Mass +: +([-0-9.+eE]+)} [sprops result] full sq - if { $sq <= 0. } { - puts "Faulty OCC702 (case 2)" - } else { - puts "OCC702 OK" - } -} - -set square 308957. -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug712_1 b/tests/bugs/modalg/bug712_1 deleted file mode 100755 index 87ed25a6e6..0000000000 --- a/tests/bugs/modalg/bug712_1 +++ /dev/null @@ -1,23 +0,0 @@ - -puts "========" -puts "OCC712" -puts "========" -puts "" -######################################################### -## Exeption is raised in DRAW during building draft with help command "depouille" -## on face in the attached shape. -######################################################### - -restore [locate_data_file OCC712.brep] a -checkshape a - -explode a f - -if [catch {depouille result a 0 0 1 a_2 10 0 39.6875 0 0. 0. -1 } catch_result] { - puts "Faulty OCC712" -} else { - puts "OCC712 OK" -} - -set square 41956.4 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug714 b/tests/bugs/modalg/bug714 deleted file mode 100755 index 41152a8658..0000000000 --- a/tests/bugs/modalg/bug714 +++ /dev/null @@ -1,34 +0,0 @@ -#INTERFACE IGES -puts "========" -puts "OCC714" -puts "========" -puts "" -#################################################### -## After command sew in DRAW on attached shape free wires are disappeared. -#################################################### - -restore [locate_data_file OCC714.brep] a -checkshape a - -set nb_info1 [nbshapes a] -regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info1 full ve1 -regexp {EDGE +: +([-0-9.+eE]+)} $nb_info1 full ed1 -regexp {WIRE +: +([-0-9.+eE]+)} $nb_info1 full we1 - -sewing result 0.1 a - -set nb_info2 [nbshapes a] -regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info2 full ve2 -regexp {EDGE +: +([-0-9.+eE]+)} $nb_info2 full ed2 -regexp {WIRE +: +([-0-9.+eE]+)} $nb_info2 full we2 - -if { $ve1 != $ve2 || $ed1 != $ed2 || $we1 != $we2} { - puts [format "Faulty OCC714 : SEWING operation was made WRONGLY: vertexes before %s, edges before %s, wires before %s" $ve1 $ed1 $we1] - puts [format " vertexes after %s, edges after %s, wires after %s" $ve1 $ed1 $we1] -} else { - puts "OK OCC714: SEWING operation was made PROPERLY" -} - -set square 12917.1 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug715 b/tests/bugs/modalg/bug715 deleted file mode 100755 index fa53cc6391..0000000000 --- a/tests/bugs/modalg/bug715 +++ /dev/null @@ -1,28 +0,0 @@ - -puts "========" -puts "OCC715" -puts "SAM1582" -puts "========" -puts "" -########################################## -## section of two faces produces wrong number of section edges -########################################## - -restore [locate_data_file OCC715_2.brep] f2 -restore [locate_data_file OCC715_3.brep] f3 - -bsection result f2 f3 - -set expl [explode result] - -set length [llength $expl] -puts "Result is $length section edge" - -if {$length != 3} { - puts "Faulty OCC715" -} else { - puts "OCC715 OK" -} - -set length 100. -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug726_1 b/tests/bugs/modalg/bug726_1 deleted file mode 100755 index 74a941b321..0000000000 --- a/tests/bugs/modalg/bug726_1 +++ /dev/null @@ -1,21 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -puts "========" -puts "OCC726" -puts "SAM1594" -puts "========" -puts "" -###################################### -## Boolean operations are impossible on the attachment. -###################################### - -restore [locate_data_file OCC726.brep] a -explode a -checkshape a_1 -checkshape a_2 - -bcommon result a_1 a_2 - -set square 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug726_2 b/tests/bugs/modalg/bug726_2 deleted file mode 100755 index 2104c3475b..0000000000 --- a/tests/bugs/modalg/bug726_2 +++ /dev/null @@ -1,21 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -puts "========" -puts "OCC726" -puts "SAM1594" -puts "========" -puts "" -###################################### -## Boolean operations are impossible on the attachment. -###################################### - -restore [locate_data_file OCC726.brep] a -explode a -checkshape a_1 -checkshape a_2 - -bcut result a_1 a_2 - -set square 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug726_3 b/tests/bugs/modalg/bug726_3 deleted file mode 100755 index 58dbf30ab2..0000000000 --- a/tests/bugs/modalg/bug726_3 +++ /dev/null @@ -1,21 +0,0 @@ -puts "TODO OCC12345 ALL: Tcl Exception: result is not a topological shape!!!" -puts "TODO OCC12345 ALL: TEST INCOMPLETE" - -puts "========" -puts "OCC726" -puts "SAM1594" -puts "========" -puts "" -###################################### -## Boolean operations are impossible on the attachment. -###################################### - -restore [locate_data_file OCC726.brep] a -explode a -checkshape a_1 -checkshape a_2 - -bcut result a_2 a_1 - -set square 10 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug743 b/tests/bugs/modalg/bug743 deleted file mode 100755 index 1742d89715..0000000000 --- a/tests/bugs/modalg/bug743 +++ /dev/null @@ -1,42 +0,0 @@ - -puts "========" -puts "OCC743" -puts "========" -puts "" -####################################### -## The result of offset operation on a planar wire is wrong -####################################### - -restore [locate_data_file OCC743_corr2.brep] a -checkshape a - -if { [catch { mkoffset result a 1 -15 } status] } { - puts "Faulty OCC743" -} else { - renamevar result_1 result - set nb_info [nbshapes result] - regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve - puts [format "Result shape result contains %s vertexes" $ve] - if { $ve == 0 } { - puts [format "Faulty : Result shape is NULL shape"] - } else { - regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi - if {$wi > 1 } { - set ll [explode result w] - set num [llength $ll] - puts [format "Faulty : Result shape result is COMPOUND and contains %s wires" $num] - foreach {k} $ll { - checkshape $k - regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection $k] full cs - if { $cs != 0 } { - puts [format "Faulty : Result shape is UNclosed wire !!! " $k] - } else { - puts [format "OK: Result shape is CLOSED wire !!! "] - } - } - } - } -} - -set length 3533.52 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug745_1 b/tests/bugs/modalg/bug745_1 deleted file mode 100755 index 812b587770..0000000000 --- a/tests/bugs/modalg/bug745_1 +++ /dev/null @@ -1,44 +0,0 @@ - -puts "========" -puts "OCC745" -puts "========" -puts "" -####################################################### -## There are several cases where the offset algo works wrong for various reasons -## for wires containing only linear segments and arcs of circle. -####################################################### - -restore [locate_data_file OCC745_1.brep] a -checkshape a - -if { [catch { mkoffset result a 1 -10 } status] } { - puts "Faulty : an exception was caught" -} else { - renamevar result_1 result - set nb_info [nbshapes result] - regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve - puts [format "Result shape result contains %s vertexes" $ve] - if { $ve == 0 } { - puts [format "Faulty : Result shape is NULL shape"] - } else { - regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi - if {$wi > 1 } { - set ll [explode result w] - set num [llength $ll] - puts [format "Faulty : Result shape result is COMPOUND and contains %s wires" $num] - foreach {k} $ll { - checkshape $k - regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection $k] full cs - if { $cs != 0 } { - puts [format "Faulty : Result shape is UNclosed wire !!! " $k] - } else { - puts [format "OK: Result shape is CLOSED wire !!! "] - } - } - } - } -} - -set length 932.825 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug745_10 b/tests/bugs/modalg/bug745_10 deleted file mode 100755 index 95ac508628..0000000000 --- a/tests/bugs/modalg/bug745_10 +++ /dev/null @@ -1,27 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty OCC745" -puts "TODO OCC12345 ALL: Error : The length of result shape is" - -puts "========" -puts "OCC745" -puts "========" -puts "" -############################################# -# Negative offset parameter leads to positive offset and vise -# versa. Result of the offset represent an edge instead of wire. -############################################# - -restore [locate_data_file OCC745_nb1.brep] w -mkoffset result w 1 -1 - -set list [whatis result_1] - -if { [regexp {WIRE} $list] == 0 } { - puts "Faulty OCC745" -} else { - puts "OCC745 OK" -} - -renamevar result_1 result - -set length 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug745_11 b/tests/bugs/modalg/bug745_11 deleted file mode 100755 index 143e2acb1f..0000000000 --- a/tests/bugs/modalg/bug745_11 +++ /dev/null @@ -1,52 +0,0 @@ - -puts "========" -puts "OCC745" -puts "========" -puts "" -######################### -# Not correct creation of bisector loci. -######################### - -restore [locate_data_file OCC745_nb2.brep] w -mkplane f w -topoload f -drawcont - -mat -result - -################################################## -#Exception thrown: Standard_ConstructionError: Offset wire is not closed. -################################################## - -if { [catch { mkoffset result w 10 -7 } status] } { - puts "Faulty OCC745" -} else { - renamevar result_1 result - set nb_info [nbshapes result] - regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve - puts [format "Result shape result contains %s vertexes" $ve] - if { $ve == 0 } { - puts [format "Faulty : Result shape is NULL shape"] - } else { - regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi - if {$wi > 1 } { - set ll [explode result w] - set num [llength $ll] - puts [format "Faulty : Result shape result is COMPOUND and contains %s wires" $num] - foreach {k} $ll { - checkshape $k - regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection $k] full cs - if { $cs != 0 } { - puts [format "Faulty : Result shape is UNclosed wire !!! " $k] - } else { - puts [format "OK: Result shape is CLOSED wire !!! "] - } - } - } - } -} - -set length 1930.99 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug745_12 b/tests/bugs/modalg/bug745_12 deleted file mode 100755 index 99e6796b5b..0000000000 --- a/tests/bugs/modalg/bug745_12 +++ /dev/null @@ -1,44 +0,0 @@ -puts "TODO OCC12345 ALL: An exception was caught" -puts "TODO OCC12345 ALL: Exception " -puts "TODO OCC12345 ALL: Faulty OCC745" - -puts "========" -puts "OCC745" -puts "========" -puts "" -################################################## -# Exception thrown: Standard_ConstructionError: Offset wire is not closed. -################################################## - -restore [locate_data_file OCC745_nb3.brep] w -checkshape w - -if { [catch { mkoffset result w 1 10 } status] } { - puts "Faulty OCC745" -} else { - renamevar result_1 result - set nb_info [nbshapes result] - regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve - puts [format "Result shape result contains %s vertexes" $ve] - if { $ve == 0 } { - puts [format "Faulty : Result shape is NULL shape"] - } else { - regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi - if {$wi > 1 } { - set ll [explode result w] - set num [llength $ll] - puts [format "Faulty : Result shape result is COMPOUND and contains %s wires" $num] - foreach {k} $ll { - checkshape $k - regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection $k] full cs - if { $cs != 0 } { - puts [format "Faulty : Result shape is UNclosed wire !!! " $k] - } else { - puts [format "OK: Result shape is CLOSED wire !!! "] - } - } - } - } - set length 0 - set 2dviewer 0 -} diff --git a/tests/bugs/modalg/bug745_13 b/tests/bugs/modalg/bug745_13 deleted file mode 100755 index 50769b4131..0000000000 --- a/tests/bugs/modalg/bug745_13 +++ /dev/null @@ -1,25 +0,0 @@ - -puts "========" -puts "OCC745" -puts "========" -puts "" -################################# -# Infinite loop during bisector loci calculation. -################################# - -restore [locate_data_file OCC745_nb5.brep] w -checkshape w -mkplane result w -topoload result -drawcont - -cpulimit 600 - -mat - -result - -puts "OCC745 OK" - -set square 5844.54 -set 2dviewer 1 diff --git a/tests/bugs/modalg/bug745_2 b/tests/bugs/modalg/bug745_2 deleted file mode 100755 index d8d60d5215..0000000000 --- a/tests/bugs/modalg/bug745_2 +++ /dev/null @@ -1,26 +0,0 @@ - -puts "========" -puts "OCC745" -puts "========" -puts "" -################################################## -## This test does not terminate due to infinite loop in bissector calculation -################################################## - -restore [locate_data_file OCC745_2.brep] a -checkshape a -mkplane pl a -topoload pl -drawcont -smallview -2D- -2dfit - -set min 30 -cpulimit [expr 60 * $min] - -mat -puts "OCC745 OK" - -renamevar pl result -set square 5844.55 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug745_3 b/tests/bugs/modalg/bug745_3 deleted file mode 100755 index b153bec444..0000000000 --- a/tests/bugs/modalg/bug745_3 +++ /dev/null @@ -1,29 +0,0 @@ - -puts "========" -puts "OCC745" -puts "========" -puts "" -########################### -## Incorrect MAT (map of bissectors) -########################### - -puts "#" -puts "Non stable test case on Linux. MKV. 04.02.2011" -puts " ( Gif )" -puts "#" - -restore [locate_data_file OCC745_ellipse.brep] w -checkshape w -mkplane result w -topoload result -drawcont - -smallview -2D- -2dfit - -mat -#result - -set square 8357.41 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug745_4 b/tests/bugs/modalg/bug745_4 deleted file mode 100755 index a4b335ef56..0000000000 --- a/tests/bugs/modalg/bug745_4 +++ /dev/null @@ -1,49 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty : Result shape is NULL shape" -puts "TODO OCC12345 ALL: Exception: result is not a topological shape!!!" -puts "TODO OCC12345 ALL: TEST INCOMPLETE" - -pload QAcommands - -puts "========" -puts "OCC745" -puts "========" -puts "" -########################################### -# Exception Standard_NullValue while performing the offset: -########################################### - -restore [locate_data_file OCC745_pocket1.brep] a -checkshape a - -if { [catch { mkoffset result a 1 -10 } status] } { - puts "Faulty OCC745" -} else { - renamevar result_1 result - set nb_info [nbshapes result] - set ve 0 - regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve - puts [format "Result shape result contains %s vertexes" $ve] - if { $ve == 0 } { - puts [format "Faulty : Result shape is NULL shape"] - } else { - regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi - if {$wi > 1 } { - set ll [explode result w] - set num [llength $ll] - puts [format "Faulty : Result shape result is COMPOUND and contains %s wires" $num] - foreach {k} $ll { - checkshape $k - regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection $k] full cs - if { $cs != 0 } { - puts [format "Faulty : Result shape is UNclosed wire !!! " $k] - } else { - puts [format "OK: Result shape is CLOSED wire !!! "] - } - } - } - } -} - -set length 0 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug745_5 b/tests/bugs/modalg/bug745_5 deleted file mode 100755 index 0365d3761f..0000000000 --- a/tests/bugs/modalg/bug745_5 +++ /dev/null @@ -1,24 +0,0 @@ - -puts "========" -puts "OCC745" -puts "========" -puts "" -############################ -# Not correct creation of bisector loci: -############################ - -restore [locate_data_file OCC745_pocket4.brep] w -checkshape w -plane p -mkface result p w -topoload result -drawcont - -smallview -2D- -2dfit - -mat -result - -set square 5844.21 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug745_6 b/tests/bugs/modalg/bug745_6 deleted file mode 100755 index d07d2536b7..0000000000 --- a/tests/bugs/modalg/bug745_6 +++ /dev/null @@ -1,46 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty : Result shape is NULL shape" -puts "TODO OCC12345 ALL: Error : The command is not valid. The length is" - -puts "========" -puts "OCC745" -puts "BUC60878" -puts "========" -puts "" -################################ -# There are discontinuities in offset contours: -################################ - -restore [locate_data_file BUC60878-wire3.brep] a -checkshape a - -if { [catch { mkoffset result a 1 -10 } status] } { - puts "Faulty OCC745" -} else { - renamevar result_1 result - set nb_info [nbshapes result] - regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve - puts [format "Result shape result contains %s vertexes" $ve] - if { $ve == 0 } { - puts [format "Faulty : Result shape is NULL shape"] - } else { - regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi - if {$wi > 1 } { - set ll [explode result w] - set num [llength $ll] - puts [format "Faulty : Result shape result is COMPOUND and contains %s wires" $num] - foreach {k} $ll { - checkshape $k - regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection $k] full cs - if { $cs != 0 } { - puts [format "Faulty : Result shape is UNclosed wire !!! " $k] - } else { - puts [format "OK: Result shape is CLOSED wire !!! "] - } - } - } - } -} - -set length 0 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug745_7 b/tests/bugs/modalg/bug745_7 deleted file mode 100755 index ed125119db..0000000000 --- a/tests/bugs/modalg/bug745_7 +++ /dev/null @@ -1,45 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty : Result shape is NULL shape" -puts "TODO OCC12345 ALL: Error : The command is not valid. The length is" - -puts "========" -puts "OCC745" -puts "========" -puts "" -###################################################### -## Exception thrown: Standard_ConstructionError: Offset wire is not closed: -###################################################### - -source [locate_data_file OCC745_cont1.dat] -checkshape pp - -if { [catch { mkoffset result pp 1 -10 } status] } { - puts "Faulty OCC745" -} else { - renamevar result_1 result - set nb_info [nbshapes result] - regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve - puts [format "Result shape result contains %s vertexes" $ve] - if { $ve == 0 } { - puts [format "Faulty : Result shape is NULL shape"] - } else { - regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi - if {$wi > 1 } { - set ll [explode result w] - set num [llength $ll] - puts [format "Faulty : Result shape result is COMPOUND and contains %s wires" $num] - foreach {k} $ll { - checkshape $k - regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection $k] full cs - if { $cs != 0 } { - puts [format "Faulty : Result shape is UNclosed wire !!! " $k] - } else { - puts [format "OK: Result shape is CLOSED wire !!! "] - } - } - } - } -} - -set length 0 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug745_8 b/tests/bugs/modalg/bug745_8 deleted file mode 100755 index 8fa54a95a0..0000000000 --- a/tests/bugs/modalg/bug745_8 +++ /dev/null @@ -1,43 +0,0 @@ - -puts "========" -puts "OCC745" -puts "========" -puts "" -################################################### -## Exception thrown: Standard_ConstructionError: Offset wire is not closed: -################################################### - -restore [locate_data_file BUC60830-face2.brep] f -checkshape f - -if { [catch { mkoffset result f 45 -0.042225 } status] } { - puts "Faulty OCC745" -} else { - renamevar result_1 result - set nb_info [nbshapes result] - regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve - puts [format "Result shape result contains %s vertexes" $ve] - if { $ve == 0 } { - puts [format "Faulty : Result shape is NULL shape"] - } else { - regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi - if {$wi > 1 } { - set ll [explode result w] - set num [llength $ll] - puts [format "Faulty : Result shape result is COMPOUND and contains %s wires" $num] - foreach {k} $ll { - checkshape $k - regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection $k] full cs - if { $cs != 0 } { - puts [format "Faulty : Result shape is UNclosed wire !!! " $k] - } else { - puts [format "OK: Result shape is CLOSED wire !!! "] - } - } - } - } -} - -set length 72.1851 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug745_9 b/tests/bugs/modalg/bug745_9 deleted file mode 100755 index 1ad8a6cabd..0000000000 --- a/tests/bugs/modalg/bug745_9 +++ /dev/null @@ -1,45 +0,0 @@ -puts "TODO OCC12345 ALL: Error : The command is not valid. The length is" -puts "TODO OCC12345 ALL: Faulty : Result shape is NULL shape" - -puts "========" -puts "OCC745" -puts "========" -puts "" -##################################################### -# The latter command enters an endless loop: it was not completed in 30 min: -##################################################### - -source [locate_data_file OCC745_cont2.dat] -checkshape pq - -if { [catch { mkoffset result pq 1 -10 } status] } { - puts "Faulty OCC745" -} else { - renamevar result_1 result - set nb_info [nbshapes result] - regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve - puts [format "Result shape result contains %s vertexes" $ve] - if { $ve == 0 } { - puts [format "Faulty : Result shape is NULL shape"] - } else { - regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi - if {$wi > 1 } { - set ll [explode result w] - set num [llength $ll] - puts [format "Faulty : Result shape result is COMPOUND and contains %s wires" $num] - foreach {k} $ll { - checkshape $k - regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection $k] full cs - if { $cs != 0 } { - puts [format "Faulty : Result shape is UNclosed wire !!! " $k] - } else { - puts [format "OK: Result shape is CLOSED wire !!! "] - } - } - } - } -} - -set length 0 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug748 b/tests/bugs/modalg/bug748 deleted file mode 100755 index 053e0bf5c9..0000000000 --- a/tests/bugs/modalg/bug748 +++ /dev/null @@ -1,18 +0,0 @@ - -puts "========" -puts "OCC748" -puts "========" -puts "" -################################## -## Incorrect work of DRAW-command "common" -################################## - -restore [locate_data_file OCC748_1.brep] s1 -checkshape s1 -restore [locate_data_file OCC748_2.brep] s2 -checkshape s2 - -bcommon result s1 s2 - -set square 628.319 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug755_1 b/tests/bugs/modalg/bug755_1 deleted file mode 100755 index 6866b0d977..0000000000 --- a/tests/bugs/modalg/bug755_1 +++ /dev/null @@ -1,34 +0,0 @@ - -puts "========" -puts "OCC755" -puts "SAM1607" -puts "(case 1)" -puts "========" -puts "" -#################################################################### -##Result of cut of capteur2 from capteur1 is a solid. It must be a compound, as it consists of 2 bodies. -#################################################################### - -restore [locate_data_file OCC755_1.brep] a1 -checkshape a1 -restore [locate_data_file OCC755_2.brep] a2 -checkshape a2 - -bcut result a1 a2 - -set wt_is [whatis result] - -set lth [llength $wt_is] - -if {$lth < 5} { - puts "Faulty OCC755 (case 1)" -} else { - if {[regexp {COMPOUND} $wt_is] == 1} { - puts "OCC755 OK (case 2)" - } else { - puts "Faulty OCC755 (case 2)" - } -} - -set square 1.57358e+06 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug758 b/tests/bugs/modalg/bug758 deleted file mode 100755 index cfe478409e..0000000000 --- a/tests/bugs/modalg/bug758 +++ /dev/null @@ -1,26 +0,0 @@ - -puts "========" -puts "OCC758" -puts "SAM1613" -puts "========" -puts "" -################################################### -##It's impossible to cut two little shapes from the big one in the attached file. -################################################### - -restore [locate_data_file OCC758.brep] a -explode a -checkshape a_1 -checkshape a_2 -checkshape a_3 - -bcut res1 a_1 a_2 - -checkshape res1 - -bcut result res1 a_3 - -set square 49473.6 -set 2dviewer 0 - - diff --git a/tests/bugs/modalg/bug7626_1 b/tests/bugs/modalg/bug7626_1 deleted file mode 100644 index 4eb38094ab..0000000000 --- a/tests/bugs/modalg/bug7626_1 +++ /dev/null @@ -1,29 +0,0 @@ -puts "============" -puts "OCC7626" -puts "============" -puts "" -###################################################### -# Bad result of bcut operation -###################################################### - -set BugNumber OCC7626 - -psphere s 10 -box b 10 0 0 20 20 20 -trotate b 10 0 0 0 0 1 45 - -bcut result s b - -set square 1271.7 - -set nb_v_good 4 -set nb_e_good 7 -set nb_w_good 4 -set nb_f_good 3 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 21 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug7626_2 b/tests/bugs/modalg/bug7626_2 deleted file mode 100644 index 406de37ad2..0000000000 --- a/tests/bugs/modalg/bug7626_2 +++ /dev/null @@ -1,30 +0,0 @@ -puts "============" -puts "OCC7626" -puts "============" -puts "" -###################################################### -# Bad result of bcut operation -###################################################### - -set BugNumber OCC7626 - -psphere s 10 -box b 10 0 0 20 20 20 -trotate b 10 0 0 0 0 1 45 - -bcommon result s b - -set square 199.095 - -set nb_v_good 2 -set nb_e_good 3 -set nb_w_good 3 -set nb_f_good 3 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 14 - -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug763 b/tests/bugs/modalg/bug763 deleted file mode 100755 index f1ee1169a0..0000000000 --- a/tests/bugs/modalg/bug763 +++ /dev/null @@ -1,20 +0,0 @@ - -puts "========" -puts "OCC763" -puts "========" -puts "" -#################################### -## Bad result of fuse operation between two cylinders -#################################### - -restore [locate_data_file OCC763_c1.brep] c1 -checkshape c1 -restore [locate_data_file OCC763_c2.brep] c2 -checkshape c2 - -bop c1 c2 -bopfuse result - -set square 23189.4 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug7668 b/tests/bugs/modalg/bug7668 deleted file mode 100644 index e3704ab77e..0000000000 --- a/tests/bugs/modalg/bug7668 +++ /dev/null @@ -1,36 +0,0 @@ -puts "============" -puts "OCC7668" -puts "============" -puts "" -####################################################################### -# BRepOffsetAPI_MakeOffset wrong generated list -####################################################################### - -puts "#" -puts "Non stable test case on Linux. MKV. 29.12.2010" -puts " ( VERTEX : 136 or VERTEX : 134 )" -puts "#" - -set BugNumber OCC7668 - -restore [locate_data_file OCC7668.brep] a1 - -wire w1 a1 - -mkoffset result w1 1 2 - -renamevar result_1 result - -# Analysis of "nbshapes res" -set nb_v_good 134 -set nb_e_good 134 -set nb_w_good 1 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 269 - -set length 136.008 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug767 b/tests/bugs/modalg/bug767 deleted file mode 100755 index d53e007c40..0000000000 --- a/tests/bugs/modalg/bug767 +++ /dev/null @@ -1,15 +0,0 @@ - -puts "=======" -puts "OCC767" -puts "=======" -puts "" -############################################ -## Command sameparametr in DRAW hangs on attached edge. -############################################ - -restore [locate_data_file OCC767.brep] result - -sameparameter result - -set length 7.6901 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug77 b/tests/bugs/modalg/bug77 deleted file mode 100755 index ef994793ec..0000000000 --- a/tests/bugs/modalg/bug77 +++ /dev/null @@ -1,21 +0,0 @@ -puts "========================" -puts " BUC60866 " -puts " OCC77 " -puts "========================" -puts "" -###################################################### -# The BRepFill_Pipe fails -###################################################### - -restore [locate_data_file buc60866a.rle] f -checkshape f - -restore [locate_data_file buc60866b.rle] w -checkshape w - -pipe result w f - -set square 1.12048e+07 -set 2dviewer 0 - - diff --git a/tests/bugs/modalg/bug770 b/tests/bugs/modalg/bug770 deleted file mode 100755 index a16f240721..0000000000 --- a/tests/bugs/modalg/bug770 +++ /dev/null @@ -1,27 +0,0 @@ -puts "TODO ?OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO ?OCC12345 ALL: Error : The square of result shape is" -puts "TODO ?OCC12345 ALL: TEST INCOMPLETE" - -puts "========" -puts "OCC770" -puts "SAM1636" -puts "========" -puts "" -############################ -## Impossible fusing 3 attached shapes -############################ - -restore [locate_data_file OCC770.brep] a -explode a -checkshape a_1 -checkshape a_2 -checkshape a_3 - -bfuse res1 a_1 a_2 - -checkshape res1 - -bfuse result res1 a_3 - -set square 962546. -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug771 b/tests/bugs/modalg/bug771 deleted file mode 100755 index 58f902941d..0000000000 --- a/tests/bugs/modalg/bug771 +++ /dev/null @@ -1,25 +0,0 @@ - -puts "========" -puts "OCC771" -puts "SAM1639" -puts "========" -puts "" -########################### -## Impossible fusung 3 shapes attached -########################### - -restore [locate_data_file OCC771.brep] a -explode a -checkshape a_1 -checkshape a_2 -checkshape a_3 - -bfuse res1 a_1 a_2 - -checkshape res1 - -bfuse result res1 a_3 - -set square 1306.68 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug772 b/tests/bugs/modalg/bug772 deleted file mode 100755 index 3b3233171f..0000000000 --- a/tests/bugs/modalg/bug772 +++ /dev/null @@ -1,21 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -puts "========" -puts "OCC772" -puts "SAM1643" -puts "========" -puts "" -###################################### -## Impossible to make a common of the shapes attached. -###################################### - -restore [locate_data_file OCC772.brep] a -explode a -checkshape a_1 -checkshape a_2 - -bcommon result a_1 a_2 - -set square 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug774_1 b/tests/bugs/modalg/bug774_1 deleted file mode 100755 index b8a4a1a21e..0000000000 --- a/tests/bugs/modalg/bug774_1 +++ /dev/null @@ -1,22 +0,0 @@ - -puts "========" -puts "OCC774" -puts "SAM1647" -puts "(case 1)" -puts "========" -puts "" -################################# -## It's impossible to cut one shape from another. -################################# - -restore [locate_data_file OCC774.brep] a -explode a -checkshape a_1 -checkshape a_2 - -if { [catch { bcut result a_1 a_2 } status] } { - puts "Faulty OCC774 (case 1)" -} - -set square 50704.6 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug774_2 b/tests/bugs/modalg/bug774_2 deleted file mode 100755 index 8d902616ce..0000000000 --- a/tests/bugs/modalg/bug774_2 +++ /dev/null @@ -1,22 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -puts "========" -puts "OCC774" -puts "SAM1647" -puts "(case 2)" -puts "========" -puts "" -################################# -## -restore [locate_data_file OCC774.brep] a -explode a -checkshape a_1 -checkshape a_2 - -if { [catch { bcut result a_2 a_1 } status] } { - puts "Faulty OCC774 (case 2)" -} - -set square 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug775 b/tests/bugs/modalg/bug775 deleted file mode 100755 index 09239ef1c3..0000000000 --- a/tests/bugs/modalg/bug775 +++ /dev/null @@ -1,19 +0,0 @@ - -puts "========" -puts "OCC775" -puts "SAM1650" -puts "========" -puts "" -############################# -## Impossible to fuse two attached shapes. -############################# - -restore [locate_data_file OCC775.brep] a -explode a -checkshape a_1 -checkshape a_2 - -bfuse result a_1 a_2 - -set square 61146.4 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug776_1 b/tests/bugs/modalg/bug776_1 deleted file mode 100755 index 2478e60984..0000000000 --- a/tests/bugs/modalg/bug776_1 +++ /dev/null @@ -1,20 +0,0 @@ - -puts "========" -puts "OCC776" -puts "SAM1654" -puts "(case 1)" -puts "========" -puts "" -########################################## -## Impossible to cut one shape from another in the attachment -########################################## - -restore [locate_data_file OCC776.brep] a -explode a -checkshape a_1 -checkshape a_2 - -bcut result a_1 a_2 - -set square 112637. -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug776_2 b/tests/bugs/modalg/bug776_2 deleted file mode 100755 index cc8962d7a0..0000000000 --- a/tests/bugs/modalg/bug776_2 +++ /dev/null @@ -1,20 +0,0 @@ - -puts "========" -puts "OCC776" -puts "SAM1654" -puts "(case 2)" -puts "========" -puts "" -########################################## -## Impossible to cut one shape from another in the attachment -########################################## - -restore [locate_data_file OCC776.brep] a -explode a -checkshape a_1 -checkshape a_2 - -bcut result a_2 a_1 - -set square 40403.2 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug778_1 b/tests/bugs/modalg/bug778_1 deleted file mode 100755 index 8dfba8f219..0000000000 --- a/tests/bugs/modalg/bug778_1 +++ /dev/null @@ -1,20 +0,0 @@ - -puts "========" -puts "OCC778" -puts "SAM1656" -puts "(case 1)" -puts "========" -puts "" -###################################### -## Incorrect result of cut of the cylinder from the shape. -###################################### - -restore [locate_data_file OCC778.brep] a -explode a -checkshape a_1 -checkshape a_2 - -bcut result a_1 a_2 - -set square 13633.6 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug778_2 b/tests/bugs/modalg/bug778_2 deleted file mode 100755 index 0fead207eb..0000000000 --- a/tests/bugs/modalg/bug778_2 +++ /dev/null @@ -1,20 +0,0 @@ - -puts "========" -puts "OCC778" -puts "SAM1656" -puts "(case 2)" -puts "========" -puts "" -##################################### -## Incorrect result of cut of the cylinder from the shape -##################################### - -restore [locate_data_file OCC778.brep] a -explode a -checkshape a_1 -checkshape a_2 - -bcut result a_2 a_1 - -set square 678.584 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug779 b/tests/bugs/modalg/bug779 deleted file mode 100755 index e6d938f954..0000000000 --- a/tests/bugs/modalg/bug779 +++ /dev/null @@ -1,22 +0,0 @@ - -puts "========" -puts "OCC779" -puts "========" -puts "" -################################ -## Common operation produces invalid shape -################################ - -restore [locate_data_file OCC779_s1.brep] s1 -checkshape s1 -restore [locate_data_file OCC779_s2.brep] s2 -checkshape s2 - -ttranslate s1 0 0 -30 -prism s1p s1 0 0 70 -checkshape s1p - -bcommon result s1p s2 - -set square 64191.2 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug78 b/tests/bugs/modalg/bug78 deleted file mode 100755 index 5b01cb84be..0000000000 --- a/tests/bugs/modalg/bug78 +++ /dev/null @@ -1,18 +0,0 @@ -puts "============" -puts "BUC60875" -puts "OCC78" -puts "============" -puts "" -############################### -## Pipe is created incorrectly on two wires -############################### - -#datadir /disk4/QA/hotline/GRIDS/chl/data -restore [locate_data_file BUC60875_wire.brep] w -restore [locate_data_file BUC60875_profile.brep] p -checkshape w -checkshape p - -pipe result w p -set square 10191.8 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug780_1 b/tests/bugs/modalg/bug780_1 deleted file mode 100755 index 41a967261a..0000000000 --- a/tests/bugs/modalg/bug780_1 +++ /dev/null @@ -1,20 +0,0 @@ - -puts "========" -puts "OCC780" -puts "SAM1239" -puts "(case 1)" -puts "========" -puts "" -######################################### -## Fuse and common between two faces are wrong (SAM1239) -######################################### - -restore [locate_data_file OCC780.brep] f -explode f f -checkshape f_1 -checkshape f_2 - -bcommon result f_1 f_2 - -set square 6283.19 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug780_2 b/tests/bugs/modalg/bug780_2 deleted file mode 100755 index 6c90fe6669..0000000000 --- a/tests/bugs/modalg/bug780_2 +++ /dev/null @@ -1,20 +0,0 @@ - -puts "========" -puts "OCC780" -puts "SAM1239" -puts "(case 2)" -puts "========" -puts "" -######################################### -## Fuse and common between two faces are wrong (SAM1239) -######################################### - -restore [locate_data_file OCC780.brep] f -explode f f -checkshape f_1 -checkshape f_2 - -bfuse result f_1 f_2 - -set square 12566.4 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug788_1 b/tests/bugs/modalg/bug788_1 deleted file mode 100755 index 7bf800cefb..0000000000 --- a/tests/bugs/modalg/bug788_1 +++ /dev/null @@ -1,20 +0,0 @@ - -puts "=========" -puts " OCC788 " -puts "=========" -puts "" -################################################# -## ThruSection cannot determine correctly correspondence between wires -################################################# -restore [locate_data_file OCC788_s1w.brep] w1 -explode w1 -wire ww1 w1_1 - -restore [locate_data_file OCC788_s2w.brep] w2 -explode w2 -wire ww2 w2_1 - -thrusections result 0 0 ww1 ww2 - -set 2dviewer 0 -set square 148608. diff --git a/tests/bugs/modalg/bug788_2 b/tests/bugs/modalg/bug788_2 deleted file mode 100755 index cbb20238b1..0000000000 --- a/tests/bugs/modalg/bug788_2 +++ /dev/null @@ -1,24 +0,0 @@ - -puts "=========" -puts " OCC788 " -puts "=========" -puts "" -################################################## -## ThruSection cannot determine correctly correspondence between wires -################################################## - -restore [locate_data_file OCC788_s1w.brep] w1 -explode w1 -wire ww1 w1_1 - -restore [locate_data_file OCC788_s2w.brep] w2 -explode w2 -wire ww2 w2_1 - - -thrusections result 0 0 ww1 ww2 - -puts "It necessary to analyse the photo" - -set 2dviewer 0 -set square 148608. diff --git a/tests/bugs/modalg/bug789 b/tests/bugs/modalg/bug789 deleted file mode 100755 index 59e95ec2d2..0000000000 --- a/tests/bugs/modalg/bug789 +++ /dev/null @@ -1,25 +0,0 @@ - -puts "=========" -puts " OCC789 " -puts "=========" -puts "" -######################################################## -## When working on 2 closed wires (each of 1 edge), the thrusection algorithm creates -## a surface with isolines which oscillate in longitudinal direction somewhere in the -## middle between end sections. -######################################################## - -restore [locate_data_file OCC789_s3.brep] w1 -explode w1 -wire ww1 w1_1 - -restore [locate_data_file OCC789_s4.brep] w2 -explode w2 -wire ww2 w2_1 - -thrusections result 0 0 ww1 ww2 - -puts "It necessary to analyse the photo" - -set square 142424. -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug794 b/tests/bugs/modalg/bug794 deleted file mode 100755 index b840b8e330..0000000000 --- a/tests/bugs/modalg/bug794 +++ /dev/null @@ -1,27 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "=========" -puts " OCC794 " -puts "=========" -puts "" -##################################################### -## The offset algorithm produced invalid result when offseting an attached face -##################################################### - -pload QAcommands - -restore [locate_data_file OCC794.brep] a - -offsetshape result a 10 - -set x_coord 120 -set y_coord 150 - -vinit -vdisplay result -vsetdispmode 1 -vfit - -checkcolor $x_coord $y_coord 0.77 0.54 0.09 - -set square 206399 -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug80 b/tests/bugs/modalg/bug80 deleted file mode 100755 index 84e95b82d3..0000000000 --- a/tests/bugs/modalg/bug80 +++ /dev/null @@ -1,22 +0,0 @@ -puts "============" -puts "BUC60877" -puts "OCC80" -puts "============" -puts "" -########################################################## -## The command "section" in Draw gives exception "attempt to access to null objec " -########################################################## - -restore [locate_data_file BUC60877_lh.brep] sh -checkshape sh - -plane pl 820 198 140 -1e-06 0 1 -mkface f pl -1000 500 -300 100 - -if [catch {bsection result sh f } catch_result] { - puts "Faulty BUC60877: function SECTION works wrongly" -} else { - puts "BUC60877 OK: function SECTION works properly" -} -set length 1358.63 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug81 b/tests/bugs/modalg/bug81 deleted file mode 100755 index 31ccd3acf7..0000000000 --- a/tests/bugs/modalg/bug81 +++ /dev/null @@ -1,28 +0,0 @@ -puts "============" -puts "BUC60907" -puts "OCC81" -puts "============" -puts "" -############################### -## Section shell by plane gives overlapped edges -############################### - -restore [locate_data_file BUC60907_px1.rle] sh -checkshape sh - -plane f 60 0 0 1 0 0 -mkface f f -bsection result sh f -puts "Info: it should be 12 edges" - -set nb_info [nbshapes result] -regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full ne - -if { $ne != 12 } { - puts "Faulty :Number of edges is wrong" -} else { - puts "Number of edges is OK" -} - -set length 33.6353 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug817_1 b/tests/bugs/modalg/bug817_1 deleted file mode 100755 index 2c1f12346d..0000000000 --- a/tests/bugs/modalg/bug817_1 +++ /dev/null @@ -1,32 +0,0 @@ -puts "TODO OCC12345 ALL: OCC817: Error" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -pload QAcommands - -puts "============" -puts "OCC817" -puts "============" -puts "" -############################# -## Bad results of BRepAlgoAPI_Common -############################# - -set InfoList [OCC817 result 10] - -set OriginalVolume 0 -regexp {Info: Original volume = ([-0-9.+eE]+)} $InfoList full OriginalVolume - -set AccumulatedMeshedVolume 0 -regexp {Info: Accumulated meshed volume = ([-0-9.+eE]+)} $InfoList full AccumulatedMeshedVolume - -set percent_max 0.1 -set percent [expr abs(${AccumulatedMeshedVolume} - ${OriginalVolume}) / (${OriginalVolume}) * 100.] - -if {${percent} > ${percent_max}} { - puts "OCC817: Error" -} else { - puts "OCC817: OK" -} - -set 2dviewer 0 -set square 0 diff --git a/tests/bugs/modalg/bug817_2 b/tests/bugs/modalg/bug817_2 deleted file mode 100755 index 75a2c042c8..0000000000 --- a/tests/bugs/modalg/bug817_2 +++ /dev/null @@ -1,28 +0,0 @@ -pload QAcommands - -puts "============" -puts "OCC817" -puts "============" -puts "" -############################# -## Bad results of BRepAlgoAPI_Common -############################# - -set InfoList [OCC817 result 15] - -set OriginalVolume 0 -regexp {Info: Original volume = ([-0-9.+eE]+)} $InfoList full OriginalVolume - -set AccumulatedMeshedVolume 0 -regexp {Info: Accumulated meshed volume = ([-0-9.+eE]+)} $InfoList full AccumulatedMeshedVolume - -set percent_max 0.1 -set percent [expr abs(${AccumulatedMeshedVolume} - ${OriginalVolume}) / (${OriginalVolume}) * 100.] - -if {${percent} > ${percent_max}} { - puts "OCC817: Error" -} else { - puts "OCC817: OK" -} -set 2dviewer 0 -set square 6000 diff --git a/tests/bugs/modalg/bug817_3 b/tests/bugs/modalg/bug817_3 deleted file mode 100755 index a97e252549..0000000000 --- a/tests/bugs/modalg/bug817_3 +++ /dev/null @@ -1,29 +0,0 @@ -pload QAcommands - -puts "============" -puts "OCC817" -puts "============" -puts "" -############################# -## Bad results of BRepAlgoAPI_Common -############################# - -set InfoList [OCC817 result 30] - - -set OriginalVolume 0 -regexp {Info: Original volume = ([-0-9.+eE]+)} $InfoList full OriginalVolume - -set AccumulatedMeshedVolume 0 -regexp {Info: Accumulated meshed volume = ([-0-9.+eE]+)} $InfoList full AccumulatedMeshedVolume - -set percent_max 0.1 -set percent [expr abs(${AccumulatedMeshedVolume} - ${OriginalVolume}) / (${OriginalVolume}) * 100.] - -if {${percent} > ${percent_max}} { - puts "OCC817: Error" -} else { - puts "OCC817: OK" -} -set 2dviewer 0 -set square 6000 diff --git a/tests/bugs/modalg/bug82 b/tests/bugs/modalg/bug82 deleted file mode 100755 index ce7fe2f0f9..0000000000 --- a/tests/bugs/modalg/bug82 +++ /dev/null @@ -1,32 +0,0 @@ -puts "============" -puts "BUC60908" -puts "OCC82" -puts "============" -puts "" -############################### -## Incomplete section of shell by plane -############################### - -restore [locate_data_file BUC60907_px1.rle] sh -checkshape sh - -plane f 0 14.8053 0 0 1 0 -mkface f f -bsection result sh f - -set nb_info [nbshapes result] -regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full nb_verices -regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full nb_edges - -set nnv [expr $nb_verices-1] - -puts "VERTEX : $nb_verices, EDGE : $nb_edges" - -if { $nnv > $nb_edges } { - puts "Surplus of vertices, Faulty section" -} else { - puts "Number of vertices correspond edges: OK" -} -set length 113.703 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug8228 b/tests/bugs/modalg/bug8228 deleted file mode 100644 index 570e5e26f9..0000000000 --- a/tests/bugs/modalg/bug8228 +++ /dev/null @@ -1,37 +0,0 @@ -puts "============" -puts "OCC8228" -puts "============" -puts "" -###################################################### -# exeption is raised during the vprops in DRAW on the attached shape -###################################################### - -set BugNumber OCC8228 - -catch {pload XDE} -catch {pload DCAF} - -# Create a new document and set UndoLimit - -NewDocument D MDTV-XCAF -UndoLimit D 100 - -# Open a transaction -NewCommand D - -ReadStep D [locate_data_file OCC8228.stp] -XGetOneShape result D - -set square 1.46159e+06 - -set nb_v_good 1296 -set nb_e_good 2041 -set nb_w_good 826 -set nb_f_good 761 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 4926 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug822_1 b/tests/bugs/modalg/bug822_1 deleted file mode 100755 index f35be9857a..0000000000 --- a/tests/bugs/modalg/bug822_1 +++ /dev/null @@ -1,27 +0,0 @@ -pload QAcommands - -puts "========" -puts "OCC822" -puts "========" -puts "" -##################################### -## BRepMesh_IncrementalMesh fails on some faces -##################################### -## (old topology) -##################################### - -if {[ catch { set info_result [OCC822_1 a1 a2 result 0] } ] } { - puts "Faulty OCC822" -} else { - if { [regexp {FAILED} $info_result] } { - puts "Faulty OCC822" - } - - set ExplodeList [explode result] - if {[llength ${ExplodeList}] < 1} { - puts "Faulty OCC822" - } -} - -set square 133931 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug822_2 b/tests/bugs/modalg/bug822_2 deleted file mode 100755 index add7d038ed..0000000000 --- a/tests/bugs/modalg/bug822_2 +++ /dev/null @@ -1,26 +0,0 @@ -pload QAcommands - -puts "=======" -puts "OCC822" -puts "=======" -puts "" -##################################### -## BRepMesh_IncrementalMesh fails on some faces -##################################### -## (old topology) -##################################### - -if { [ catch { set info_result [OCC822_2 a1 a2 result 0] } ] } { - puts "Faulty OCC822" -} else { - if { [regexp {FAILED} $info_result] } { - puts "Faulty OCC822" - } - - set ExplodeList [explode result] - if {[llength ${ExplodeList}] < 1} { - puts "Faulty OCC822" - } -} -set square 61963.5 -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug823 b/tests/bugs/modalg/bug823 deleted file mode 100755 index 3cc1481bfe..0000000000 --- a/tests/bugs/modalg/bug823 +++ /dev/null @@ -1,26 +0,0 @@ -pload QAcommands - -puts "=======" -puts "OCC823" -puts "=======" -puts "" -############################### -## BRepAlgoAPI_Fuse fails on two cylinders -############################### -## (old topology) -##################################### - -if { [ catch { set info_result [OCC823 a1 a2 result] } ] } { - puts "Faulty OCC823" -} else { - if { [regexp {FAILED} $info_result] } { - puts "Faulty OCC823" - } - - set ExplodeList [explode result] - if {[llength ${ExplodeList}] < 1} { - puts "Faulty OCC823 : Resulting shape is empty COMPOUND" - } -} -set square 23189.5 -set 2dviewer 1 diff --git a/tests/bugs/modalg/bug823_1 b/tests/bugs/modalg/bug823_1 deleted file mode 100755 index 36655d3c1d..0000000000 --- a/tests/bugs/modalg/bug823_1 +++ /dev/null @@ -1,30 +0,0 @@ -pload QAcommands - -puts "============" -puts "OCC823" -puts "============" -puts "" -################################ -## BRepAlgoAPI_Fuse fails on two cylinders -################################ -## -## Note: test for old topology -## -################################ - -if { [ catch { set info_result [OCC823 a1 a2 a3] } ] } { - puts "Faulty : exception was caught" -} else { - checkshape a1 - checkshape a2 - bfuse result a1 a2 - - set ExplodeList [explode result] - if {[llength ${ExplodeList}] < 1} { - puts "Faulty : Resulting shape is empty COMPOUND" - } -} - -set square 23189.5 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug824 b/tests/bugs/modalg/bug824 deleted file mode 100755 index d24c36a964..0000000000 --- a/tests/bugs/modalg/bug824 +++ /dev/null @@ -1,27 +0,0 @@ -pload QAcommands - -puts "============" -puts "OCC824" -puts "============" -puts "" -#################################### -## BRepAlgoAPI_Fuse fails on cylinder and sphere -#################################### -## (old topology) -##################################### - -if { [ catch { set info_result [OCC824 a1 a2 result 0] } ] } { - puts "Faulty OCC824" -} else { - if { [regexp {FAILED} $info_result] } { - puts "Faulty OCC824" - } - - set ExplodeList [explode result] - if {[llength ${ExplodeList}] < 1} { - puts "Faulty OCC824" - } -} - -set square 16336.3 -set 2dviewer 1 diff --git a/tests/bugs/modalg/bug824_1 b/tests/bugs/modalg/bug824_1 deleted file mode 100755 index ffc7e9acdd..0000000000 --- a/tests/bugs/modalg/bug824_1 +++ /dev/null @@ -1,30 +0,0 @@ -pload QAcommands - -puts "=======" -puts "OCC824" -puts "=======" -puts "" -#################################### -## BRepAlgoAPI_Fuse fails on cylinder and sphere -#################################### -## -## Note: test for old topology -## -################################ - -if { [ catch { set info_result [OCC824 a1 a2 a3] } ] } { - puts "Faulty : exception was catch" -} else { - checkshape a1 - checkshape a2 - bfuse result a1 a2 - - set ExplodeList [explode result] - if {[llength ${ExplodeList}] < 1} { - puts "Faulty : Resulting shape is empty COMPOUND" - } -} - -set square 16336.3 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug825 b/tests/bugs/modalg/bug825 deleted file mode 100755 index 6005e515fd..0000000000 --- a/tests/bugs/modalg/bug825 +++ /dev/null @@ -1,37 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty OCC825" -puts "TODO OCC12345 ALL: Error : The command is not valid. The square is" - -pload QAcommands - -puts "============" -puts "OCC825" -puts "============" -puts "" -###################################### -## BRepAlgoAPI_Cut fails on sphere and b-spline face -###################################### -## (old topology) -##################################### - -if { [ catch { set info_result [OCC825 a1 a2 a3 res1 res2 0] } ] } { - puts "Faulty OCC825" -} else { - if { [regexp {FAILED} $info_result] } { - puts "Faulty OCC825" - } - - set ExplodeList [explode res1] - if {[llength ${ExplodeList}] < 1} { - puts "Faulty OCC825" - } - - set ExplodeList [explode res2] - if {[llength ${ExplodeList}] < 1} { - puts "Faulty OCC825" - } - checkshape res1 - renamevar res2 result -} - -set square 0 -set 2dviewer 1 diff --git a/tests/bugs/modalg/bug825_1 b/tests/bugs/modalg/bug825_1 deleted file mode 100755 index 85e294e339..0000000000 --- a/tests/bugs/modalg/bug825_1 +++ /dev/null @@ -1,31 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -pload QAcommands - -puts "=======" -puts "OCC825" -puts "=======" -puts "" -###################################### -## BRepAlgoAPI_Cut fails on sphere and b-spline face -###################################### -## -## Note: test for old topology -## -################################ - -if { [ catch { set info_result [OCC825 a1 a2 a3 a4 a5] } ] } { - puts "Faulty : an exception was caught" -} else { - checkshape a1 - checkshape a2 - bcut result a2 a1 - set ExplodeList [explode result] - if {[llength ${ExplodeList}] < 1} { - puts "Faulty : Resulting shape is empty COMPOUND" - } -} - -set square 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug825_2 b/tests/bugs/modalg/bug825_2 deleted file mode 100755 index 59f72fbd76..0000000000 --- a/tests/bugs/modalg/bug825_2 +++ /dev/null @@ -1,32 +0,0 @@ -pload QAcommands -puts "TODO OCC12345 ALL: Error : The square of result shape is" -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" - -puts "========" -puts "OCC825" -puts "========" -puts "" -###################################### -## BRepAlgoAPI_Cut fails on sphere and b-spline face -###################################### -## -## Note: test for old topology -## -################################ - -if { [ catch { set info_result [OCC825 a1 a2 a3 a4 a5] } ] } { - puts "Faulty : an exception was caught" -} else { - checkshape a1 - checkshape a3 - - bcut result a3 a1 - - set ExplodeList [explode result] - if {[llength ${ExplodeList}] < 1} { - puts "Faulty : Resulting shape is empty COMPOUND" - } -} - -set square 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug826 b/tests/bugs/modalg/bug826 deleted file mode 100755 index f6349bfa9a..0000000000 --- a/tests/bugs/modalg/bug826 +++ /dev/null @@ -1,27 +0,0 @@ -pload QAcommands - -puts "============" -puts "OCC826" -puts "============" -puts "" -################################### -## BRepAlgoAPI_Fuse fails on revolved and sphere -################################### -## (old topology) -##################################### - -if { [ catch { set info_result [OCC826 a1 a2 result] } ] } { - puts "Faulty OCC826" -} else { - if { [regexp {FAILED} $info_result] } { - puts "Faulty OCC826" - } - - set ExplodeList [explode result] - if {[llength ${ExplodeList}] < 1} { - puts "Faulty OCC826" - } -} - -set square 272939 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug826_1 b/tests/bugs/modalg/bug826_1 deleted file mode 100755 index eef30204e5..0000000000 --- a/tests/bugs/modalg/bug826_1 +++ /dev/null @@ -1,29 +0,0 @@ -pload QAcommands - -puts "============" -puts "OCC826" -puts "============" -puts "" -################################### -## BRepAlgoAPI_Fuse fails on revolved and sphere -################################### -## -## Note: test for old topology -## -################################ - -if { [ catch { set result [OCC826 a1 a2 a3] } ] } { - puts "Faulty : an exception was caught" -} else { - checkshape a1 - checkshape a2 - bfuse result a1 a2 - - set ExplodeList [explode result] - if {[llength ${ExplodeList}] < 1} { - puts "Faulty : Resulting shape is empty COMPOUND" - } -} - -set square 272939 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug827 b/tests/bugs/modalg/bug827 deleted file mode 100755 index 675aa6d77d..0000000000 --- a/tests/bugs/modalg/bug827 +++ /dev/null @@ -1,45 +0,0 @@ -pload QAcommands - -puts "========" -puts "OCC827" -puts "========" -puts "" -################################### -## BRepAlgoAPI_Fuse fails on cylinder and torus -################################### - -# -# a1 - Cylinder -# a2 - Torus1 -# a3 - Torus1 -# res1 - Fuse(Torus1 & Cylinder) -# res2 - Fuse(Torus2 & res1) -# - -if { [ catch { set info_result [OCC827 a1 a2 a3 result1 result2] } ] } { - puts "Faulty : an exception was caught" -} else { - if { [lsearch ${info_result} FAILED] > -1} { - puts "Faulty OCC827 (case 1)" - } - checkshape a1 - checkshape a2 - checkshape a3 - checkshape result1 - checkshape result2 - - set ExplodeList [explode result1] - if {[llength ${ExplodeList}] < 1} { - puts "Faulty : Resulting shape is empty COMPOUND" - } - - set ExplodeList [explode result2] - if {[llength ${ExplodeList}] < 1} { - puts "Faulty : Resulting shape is empty COMPOUND" - } - - renamevar result2 result -} - -set square 11847.7 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug827_1 b/tests/bugs/modalg/bug827_1 deleted file mode 100755 index b0e9123317..0000000000 --- a/tests/bugs/modalg/bug827_1 +++ /dev/null @@ -1,48 +0,0 @@ -puts "TODO OCC12345 ALL: Error : The square of result shape is" -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO OCC12345 ALL: Faulty OCC827" - -pload QAcommands - -puts "========" -puts "OCC827" -puts "========" -puts "" -################################### -## BRepAlgoAPI_Fuse fails on cylinder and torus -################################### -## (old topology) -##################################### - -# -# a1 - Cylinder -# a2 - Torus1 -# a3 - Torus1 -# res1 - Fuse(Torus1 & Cylinder) -# res2 - Fuse(Torus2 & res1) -# - -if { [ catch { set info_result [OCC827 a1 a2 a3 res1 res2 0] } ] } { - puts "Faulty OCC827" -} else { - if { [regexp {FAILED} $info_result] } { - puts "Faulty OCC827" - } - checkshape a1 - checkshape a2 - checkshape a3 - checkshape res1 - - set ExplodeList [explode res1] - if {[llength ${ExplodeList}] < 1} { - puts "Faulty OCC827" - } - - set ExplodeList [explode res2] - if {[llength ${ExplodeList}] < 1} { - puts "Faulty OCC827" - } - renamevar res2 result -} -set square 0 -set 2dviewer 1 diff --git a/tests/bugs/modalg/bug827_2 b/tests/bugs/modalg/bug827_2 deleted file mode 100755 index e4ff7e600c..0000000000 --- a/tests/bugs/modalg/bug827_2 +++ /dev/null @@ -1,42 +0,0 @@ -pload QAcommands - -puts "=======" -puts "OCC827" -puts "=======" -puts "" -#################################### -## BRepAlgoAPI_Fuse fails on cylinder and torus -#################################### - - -# -# a1 - Cylinder -# a2 - Torus1 -# a3 - Torus1 -# res1 - Fuse(Torus1 & Cylinder) -# res2 - Fuse(Torus2 & res1) -# - -if { [ catch { set info_result [OCC827 a1 a2 a3 a4 a5] } ] } { - puts "Faulty OCC827" -} else { - checkshape a1 - checkshape a2 - checkshape a3 - bop a1 a2 - bopfuse res1 - checkshape res1 - set ExplodeList [explode res1] - if {[llength ${ExplodeList}] < 1} { - puts "Faulty OCC827 : Resulting shape is empty COMPOUND" - } - bop res1 a3 - bopfuse result - set ExplodeList [explode result] - if {[llength ${ExplodeList}] < 1} { - puts "Faulty OCC827 : Resulting shape is empty COMPOUND" - } -} -set square 11847.7 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug827_3 b/tests/bugs/modalg/bug827_3 deleted file mode 100755 index 4905ae2867..0000000000 --- a/tests/bugs/modalg/bug827_3 +++ /dev/null @@ -1,43 +0,0 @@ -pload QAcommands - -puts "=======" -puts "OCC827" -puts "=======" -puts "" -#################################### -## BRepAlgoAPI_Fuse fails on cylinder and torus -#################################### - -# -# a1 - Cylinder -# a2 - Torus1 -# a3 - Torus1 -# res1 - Fuse(Torus1 & Cylinder) -# res2 - Fuse(Torus2 & res1) -# - -if { [ catch { set info_result [OCC827 a1 a2 a3 a4 a5] } ] } { - puts "Faulty OCC827" -} else { - checkshape a1 - checkshape a2 - checkshape a3 - bop a2 a1 - bopfuse res1 - checkshape res1 - set ExplodeList [explode res1] - if {[llength ${ExplodeList}] < 1} { - puts "Faulty OCC827 : Resulting shape is empty COMPOUND" - } - bop a3 res1 - bopfuse result - - set ExplodeList [explode result] - if {[llength ${ExplodeList}] < 1} { - puts "Faulty OCC827 : Resulting shape is empty COMPOUND" - } -} - -set square 11847.7 -set 2dviewer 1 - diff --git a/tests/bugs/modalg/bug828 b/tests/bugs/modalg/bug828 deleted file mode 100755 index c13182cfdb..0000000000 --- a/tests/bugs/modalg/bug828 +++ /dev/null @@ -1,28 +0,0 @@ -pload QAcommands - -puts "========" -puts "OCC828" -puts "========" -puts "" -############################### -## BRepFilletAPI_MakeFillet fails on prism -############################### - -if { [ catch { set info_result [OCC828 a1] } ] } { - puts "Faulty : an exception was caught" -} else { - if { [lsearch ${info_result} FAILED] > -1} { - puts "Faulty : command was FAILED" - } - checkshape a1 - explode a1 e - blend result a1 10 a1_7 10 a1_6 - - set ExplodeList [explode result] - if {[llength ${ExplodeList}] < 1} { - puts "Faulty : Resulting shape is empty COMPOUND" - } -} - -set square 17816.2 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug829_1 b/tests/bugs/modalg/bug829_1 deleted file mode 100755 index 8c4cd8c9bb..0000000000 --- a/tests/bugs/modalg/bug829_1 +++ /dev/null @@ -1,46 +0,0 @@ -puts "TODO OCC12345 ALL: An exception was caught" -puts "TODO OCC12345 ALL: Exception" - -puts "========" -puts "OCC829" -puts "========" -puts "" -################################### -## BRepOffsetAPI_MakeOffset fails on given wires -################################### -puts " This part - LIMITATION for existed algorithms" -################################### - -restore [locate_data_file OCC829_w1.brep] a -checkshape a -explode a w - -if { [catch { mkoffset result a_1 1 5 } status] } { - puts "Faulty : An exception was caught" -} else { - renamevar result_1 result - set nb_info [nbshapes result] - regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve - puts [format "Result shape result contains %s vertexes" $ve] - if { $ve == 0 } { - puts [format "Faulty : Result shape is NULL shape"] - } else { - regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi - if {$wi > 1 } { - set ll [explode result w] - set num [llength $ll] - puts [format "Faulty : Result shape result is COMPOUND and contains %s wires" $num] - foreach {k} $ll { - checkshape $k - regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection $k] full cs - if { $cs != 0 } { - puts [format "Faulty : Result shape is UNclosed wire !!! " $k] - } else { - puts [format "OK: Result shape is CLOSED wire !!! "] - } - } - } - } - set length 0 - set 2dviewer 0 -} diff --git a/tests/bugs/modalg/bug829_2 b/tests/bugs/modalg/bug829_2 deleted file mode 100755 index c26735518e..0000000000 --- a/tests/bugs/modalg/bug829_2 +++ /dev/null @@ -1,43 +0,0 @@ - -puts "========" -puts "OCC829" -puts "========" -puts "" -################################### -## BRepOffsetAPI_MakeOffset fails on given wires -################################### -restore [locate_data_file OCC829_w2.brep] a -checkshape a -explode a w - -if { [catch { mkoffset result a_1 1 5 } status] } { - puts "Faulty OCC829 (case 1)" -} else { - renamevar result_1 result - set nb_info [nbshapes result] - regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve - puts [format "Result shape result contains %s vertexes" $ve] - if { $ve == 0 } { - puts [format "Faulty : Result shape is NULL shape"] - } else { - regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi - if {$wi > 1 } { - set ll [explode result w] - set num [llength $ll] - puts [format "Faulty : Result shape result is COMPOUND and contains %s wires" $num] - foreach {k} $ll { - checkshape $k - regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection $k] full cs - if { $cs != 0 } { - puts [format "Faulty : Result shape is UNclosed wire !!! " $k] - } else { - puts [format "OK: Result shape is CLOSED wire !!! "] - } - } - } - } -} - -set length 3690.75 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug8370 b/tests/bugs/modalg/bug8370 deleted file mode 100755 index c8fca38d92..0000000000 --- a/tests/bugs/modalg/bug8370 +++ /dev/null @@ -1,33 +0,0 @@ -puts "================" -puts "OCC8370" -puts "================" -puts "" -####################################################################################### -# One face is not displayed in shading mode -###################################################################################### - -set BugNumber OCC8370 - -pload XDE - -igesread [locate_data_file OCC8370-part1.igs] result * - -set square 25310.8 - -set nb_v_good 5060 -set nb_e_good 5105 -set nb_w_good 416 -set nb_f_good 399 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 10981 - -vinit -tclean result -vsetdispmode 1 -vdisplay result -vfit - -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug8372 b/tests/bugs/modalg/bug8372 deleted file mode 100644 index 5a7cfaa4d7..0000000000 --- a/tests/bugs/modalg/bug8372 +++ /dev/null @@ -1,28 +0,0 @@ -puts "============" -puts "OCC8372" -puts "============" -puts "" -###################################################### -# Twisted result of ThruSections operation -###################################################### - -set BugNumber OCC8372 - -restore [locate_data_file OCC8372_1.brep] w1 -restore [locate_data_file OCC8372_2.brep] w2 - -thrusections result 1 1 w1 w2 - -set square 4140.46 - -set nb_v_good 12 -set nb_e_good 18 -set nb_w_good 8 -set nb_f_good 8 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 48 - -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug83_1 b/tests/bugs/modalg/bug83_1 deleted file mode 100755 index e063bdc58d..0000000000 --- a/tests/bugs/modalg/bug83_1 +++ /dev/null @@ -1,38 +0,0 @@ -puts "============" -puts "BUC60912" -puts "OCC83" -puts "============" -puts "" -############################### -## Section of simple BSpline surfaces is performed too slow -############################### - -puts "1 case: perform section with plane" -restore [locate_data_file BUC60912_sec_slow.brep] c -explode c -checkshape c_1 -checkshape c_2 - -renamevar c_1 sh -renamevar c_2 pr -plane f 0 0 0 1 0 0 -mkface f f -11 11 -11 11 - -dchrono h reset -dchrono h start -bsection result f pr - -dchrono h stop -set q2 [dchrono h show] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $q2 full z -puts "$z" -if { $z > 5 } { - puts "Elapsed time is more then 5 seconds - Faulty" -} else { - puts "Elapsed time is less then 5 - OK" -} - -set length 42.879 -set 2dviewer 0 - - diff --git a/tests/bugs/modalg/bug83_2 b/tests/bugs/modalg/bug83_2 deleted file mode 100755 index e73545e7e2..0000000000 --- a/tests/bugs/modalg/bug83_2 +++ /dev/null @@ -1,36 +0,0 @@ -puts "============" -puts "BUC60912" -puts "OCC83" -puts "============" -puts "" -############################### -## Section of simple BSpline surfaces is performed too slow -############################### - -puts "2 case: perform section with planar BSpline surface" -restore [locate_data_file BUC60912_sec_slow.brep] c -explode c -checkshape c_1 -checkshape c_2 - -renamevar c_1 sh -renamevar c_2 pr -plane f 0 0 0 1 0 0 -mkface f f -11 11 -11 11 - -puts "Info: perform section with planar BSpline surface" -dchrono h2 reset -dchrono h2 start -bsection result sh pr -dchrono h2 stop -set q2 [ dchrono h2 show ] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $q2 full z2 -puts "$z2" -if { $z2 > 40 } { - puts "Elapsed time is more then 40 seconds - Faulty" -} else { - puts "Elapsed time is less then 40 - OK" -} -set length 42.879 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug86 b/tests/bugs/modalg/bug86 deleted file mode 100755 index c6e6c34767..0000000000 --- a/tests/bugs/modalg/bug86 +++ /dev/null @@ -1,19 +0,0 @@ - -puts "========================" -puts " BUC60957 " -puts " OCC86 " -puts "========================" - -puts "Restoring the wires :" -restore [locate_data_file OCC86a.brep] w1 -checkshape w1 -restore [locate_data_file OCC86b.brep] w2 -checkshape w2 - -puts "Do Thrusection by following command: thrusections res 0 0 w1 w2 " - -thrusections result 0 0 w1 w2 - -set length 102.832 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug87 b/tests/bugs/modalg/bug87 deleted file mode 100755 index 5905aad316..0000000000 --- a/tests/bugs/modalg/bug87 +++ /dev/null @@ -1,32 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty : Now w1,w2 have bspline curves as basic !!!" -puts "TODO OCC12345 ALL: Error : The square of result shape is" - -puts "========================" -puts " BUC60958 " -puts " OCC87 " -puts "========================" - -puts "Restoring the wires :" -restore [locate_data_file OCC86a.brep] w1 -checkshape w1 -restore [locate_data_file OCC86b.brep] w2 -checkshape w2 - -set first1 [dump w1] -set second1 [dump w2] - -# puts "Do Thrusection by following command: thrusections res 0 0 w1 w2 " - -thrusections result 0 0 w1 w2 - -set first2 [dump w1] -set second2 [dump w2] - -if {$first1 != $first2 || $second1 != $second2} { - puts "Faulty : Now w1,w2 have bspline curves as basic !!!" -} else { - puts "Correct result: Wires have circle curves as basic" -} - -set square 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug889 b/tests/bugs/modalg/bug889 deleted file mode 100755 index 5140c7eed5..0000000000 --- a/tests/bugs/modalg/bug889 +++ /dev/null @@ -1,18 +0,0 @@ -puts "=======" -puts "DXF906" -puts "OCC889" -puts "OCC1013" -puts "=======" -puts "" -######################################################### -## After fix OCC157 we have plane surface in face (instead bspline as in C40). -## But now checkshape founds number of errors on new face. I think that face from -## c40 is not better than in dev -######################################################### - -restore [locate_data_file DXF906.rle] a - -mkplane result a - -set square 92131.6 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug890 b/tests/bugs/modalg/bug890 deleted file mode 100755 index 27f9fdd443..0000000000 --- a/tests/bugs/modalg/bug890 +++ /dev/null @@ -1,22 +0,0 @@ - -puts "=======" -puts "OCC890" -puts "SAM1681" -puts "=======" -puts "" -############################## -## No possibility to fuse the attached prisms. -############################## - -restore [locate_data_file OCC890.brep] a -explode a - -checkshape a_1 -checkshape a_2 - -if { [ catch { bfuse result a_1 a_2 } catch_result ] } { - puts "Faulty OCC890 (case 3)" -} - -set square 1.8276e+06 -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug895 b/tests/bugs/modalg/bug895 deleted file mode 100755 index 2d2edccf50..0000000000 --- a/tests/bugs/modalg/bug895 +++ /dev/null @@ -1,56 +0,0 @@ -puts "============" -puts "OCC895" -puts "============" -puts "" -######################################################### -## In one case, twisted surface is created. -## The problem is in incorrect computation of mutual orientations of wire segments. -######################################################### - -pload QAcommands - -set scale 73.609 -set center_X 7.93702 -set center_Y 0.264503 -set proj_X 0.523995 -set proj_Y 0.359655 -set proj_Z 0.77206 -set up_X -0.739036 -set up_Y -0.258607 -set up_Z 0.622051 -set at_X 9.06773 -set at_Y -1.93771 -set at_Z 1.45124 - -set x_coord 210 -set y_coord 210 - -set status 0 - -set angle 5 -set reverse 0 -set order 0 - -if { [ catch { OCC895 result ${angle} ${reverse} ${order} } ] } { - puts "Faulty : an exception was caught" -} - -if { ${status} == 0} { - vinit - vsetdispmode 1 - vdisplay result - - vviewparams ${scale} ${center_X} ${center_Y} \ - ${proj_X} ${proj_Y} ${proj_Z} \ - ${up_X} ${up_Y} ${up_Z} \ - ${at_X} ${at_Y} ${at_Z} - - checkcolor $x_coord $y_coord 0.98 0.72 0.13 - - if { ${stat} != 1 } { - puts "Faulty OCC895 (case 2)" - } -} - -set square 18.1614 -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug910 b/tests/bugs/modalg/bug910 deleted file mode 100755 index e2798a7697..0000000000 --- a/tests/bugs/modalg/bug910 +++ /dev/null @@ -1,49 +0,0 @@ -#INTERFACE DXF -puts "============" -puts "OCC910" -puts "============" -puts "" -##################################################### -## The problem with sat files depends on problem of BRepTools_WireExplorer -##################################################### - -pload XDE - -restore [locate_data_file OCC910.rle] a - -checkshape a -explode a w -checkshape a_7 - -set list1 [expwire a_7] -regexp {TopoDS_Iterator\(EDGE\) donne ([-0-9.+eE]+) Edges} $list1 full TopoDS_Iterator1 -regexp {TopExp_Explorer\(EDGE\) donne ([-0-9.+eE]+) Edges} $list1 full TopExp_Explorer1 -regexp {BRepTools_WireExplorer donne ([-0-9.+eE]+) Edges} $list1 full BRepTools_WireExplorer1 - - -set list2 [expwire a_7 a] -regexp {TopoDS_Iterator\(EDGE\) donne ([-0-9.+eE]+) Edges} $list1 full TopoDS_Iterator2 -regexp {TopExp_Explorer\(EDGE\) donne ([-0-9.+eE]+) Edges} $list1 full TopExp_Explorer2 -regexp {BRepTools_WireExplorer donne ([-0-9.+eE]+) Edges} $list1 full BRepTools_WireExplorer2 - -puts "TopoDS_Iterator1 = ${TopoDS_Iterator1}" -puts "TopExp_Explorer1 = ${TopExp_Explorer1}" -puts "BRepTools_WireExplorer1 = ${BRepTools_WireExplorer1}" - -puts "TopoDS_Iterator2 = ${TopoDS_Iterator2}" -puts "TopExp_Explorer2 = ${TopExp_Explorer2}" -puts "BRepTools_WireExplorer2 = ${BRepTools_WireExplorer2}" - -if { ${TopoDS_Iterator1} != ${TopoDS_Iterator2} || \ - ${TopExp_Explorer1} != ${TopExp_Explorer2} || \ - ${BRepTools_WireExplorer1} != ${BRepTools_WireExplorer2} } { - puts "Faulty OCC910" -} else { - puts "OCC910 OK" -} - -renamevar a_7 result - -set length 149.816 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/bug919 b/tests/bugs/modalg/bug919 deleted file mode 100755 index dcca9030fd..0000000000 --- a/tests/bugs/modalg/bug919 +++ /dev/null @@ -1,33 +0,0 @@ - -puts "=======" -puts "OCC919" -puts "SAM1623" -puts "=======" -puts "" -############################# -## Impossible to fuse the shapes. -############################## - -restore [locate_data_file OCC919.brep] a - -explode a - -# See comment in CR23244: -restore [locate_data_file OCC919-PROC.brep] a_1 -# - -checkshape a_1 -checkshape a_2 - -if { [ catch { bfuse result a_1 a_2} catch_result ] } { - puts "Faulty OCC919 (case 1)" -} else { - if { [ catch { checkshape result } catch_result ] } { - puts "Faulty OCC919 (case 2)" - } else { - puts "OCC919 OK" - } -} - -set square 272591. -set 2dviewer 0 diff --git a/tests/bugs/modalg/bug951_1 b/tests/bugs/modalg/bug951_1 deleted file mode 100755 index ea45927a6d..0000000000 --- a/tests/bugs/modalg/bug951_1 +++ /dev/null @@ -1,38 +0,0 @@ -puts "=========" -puts " OCC951 " -puts "=========" -puts "" -################################################## -##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes -################################################## -## (old topology) -## (common) -## (section) -###################################################### - -restore [locate_data_file OCC951_1.brep] b -restore [locate_data_file OCC951_2.brep] a - -checkshape b -checkshape a - -bcommon result b a - -set nb_info [nbshapes result] -regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve -regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full ed -regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi -regexp {FACE +: +([-0-9.+eE]+)} $nb_info full fa -regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full sh -regexp {SOLID +: +([-0-9.+eE]+)} $nb_info full so -regexp {COMPSOLID +: +([-0-9.+eE]+)} $nb_info full cm -regexp {COMPOUND +: +([-0-9.+eE]+)} $nb_info full co -regexp {SHAPE +: +([-0-9.+eE]+)} $nb_info full shl -if { $ve != 0 || $ed != 0 || $wi != 0 || $fa != 0 || $sh != 0 || $so != 0 || $cm != 0 || $co != 0 || $shl != 0 } { - puts " OCC951 : COMMON operation was made PROPERLY" -} else { - puts "Faulty OCC951 : result of COMMON operation is EMPTY compound" -} - -set square 560.908 -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug951_2 b/tests/bugs/modalg/bug951_2 deleted file mode 100755 index fd39ccdf8d..0000000000 --- a/tests/bugs/modalg/bug951_2 +++ /dev/null @@ -1,39 +0,0 @@ -puts "=========" -puts " OCC951 " -puts "=========" -puts "" -################################################## -##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes -################################################## -## (new topology) -## (bopcommon) -## (bopsection) -###################################################### - -restore [locate_data_file OCC951_1.brep] b -restore [locate_data_file OCC951_2.brep] a - -checkshape b -checkshape a - -bop b a -bopcommon result - -set nb_info [nbshapes result] -regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve -regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full ed -regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi -regexp {FACE +: +([-0-9.+eE]+)} $nb_info full fa -regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full sh -regexp {SOLID +: +([-0-9.+eE]+)} $nb_info full so -regexp {COMPSOLID +: +([-0-9.+eE]+)} $nb_info full cm -regexp {COMPOUND +: +([-0-9.+eE]+)} $nb_info full co -regexp {SHAPE +: +([-0-9.+eE]+)} $nb_info full shl -if { $ve != 0 || $ed != 0 || $wi != 0 || $fa != 0 || $sh != 0 || $so != 0 || $cm != 0 || $co != 0 || $shl != 0 } { - puts " OCC951 : COMMON operation was made PROPERLY" -} else { - puts "Faulty OCC951 : result of COMMON operation is EMPTY compound" -} - -set square 560.908 -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug951_3 b/tests/bugs/modalg/bug951_3 deleted file mode 100755 index bf8f0a239d..0000000000 --- a/tests/bugs/modalg/bug951_3 +++ /dev/null @@ -1,39 +0,0 @@ -puts "=========" -puts " OCC951 " -puts "=========" -puts "" -################################################## -##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes -################################################## -## (old topology) -## (common) -## (section) -###################################################### - -restore [locate_data_file OCC951_1.brep] b -restore [locate_data_file OCC951_2.brep] a - -checkshape b -checkshape a - -bsection result b a - -set nb_info [nbshapes result] -regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve -regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full ed -regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi -regexp {FACE +: +([-0-9.+eE]+)} $nb_info full fa -regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full sh -regexp {SOLID +: +([-0-9.+eE]+)} $nb_info full so -regexp {COMPSOLID +: +([-0-9.+eE]+)} $nb_info full cm -regexp {COMPOUND +: +([-0-9.+eE]+)} $nb_info full co -regexp {SHAPE +: +([-0-9.+eE]+)} $nb_info full shl -if { $ve != 0 || $ed != 0 || $wi != 0 || $fa != 0 || $sh != 0 || $so != 0 || $cm != 0 || $co != 0 || $shl != 0 } { - puts " OCC951 : COMMON operation was made PROPERLY" -} else { - puts "Faulty OCC951 : result of COMMON operation is EMPTY compound" -} - -set length 39.8616 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug951_31 b/tests/bugs/modalg/bug951_31 deleted file mode 100644 index 0cbdd41ef4..0000000000 --- a/tests/bugs/modalg/bug951_31 +++ /dev/null @@ -1,43 +0,0 @@ -puts "=========" -puts " OCC951 " -puts "=========" -puts "" -################################################## -##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes -################################################## -## (old topology) -## (common) -## (section) -###################################################### - -restore [locate_data_file OCC951_1.brep] b -restore [locate_data_file OCC951_2.brep] a - -checkshape b -checkshape a - -bcommon result a b - -set nb_info [nbshapes result] - -regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve -regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full ed -regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi -regexp {FACE +: +([-0-9.+eE]+)} $nb_info full fa -regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full sh -regexp {SOLID +: +([-0-9.+eE]+)} $nb_info full so -regexp {COMPSOLID +: +([-0-9.+eE]+)} $nb_info full cm -regexp {COMPOUND +: +([-0-9.+eE]+)} $nb_info full co -regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full shl - -if { $ve != 0 || $ed != 0 || $wi != 0 || $fa != 0 || $sh != 0 || $so != 0 || $cm != 0 || $co != 0 || $shl != 0 } { - puts " OCC951 : COMMON operation was made PROPERLY" - puts "" -} else { - puts "Faulty OCC951 : result of COMMON operation is EMPTY compound" - puts "" -} - -set square 560.908 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug951_32 b/tests/bugs/modalg/bug951_32 deleted file mode 100644 index 8d181b16eb..0000000000 --- a/tests/bugs/modalg/bug951_32 +++ /dev/null @@ -1,43 +0,0 @@ -puts "=========" -puts " OCC951 " -puts "=========" -puts "" -################################################## -##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes -################################################## -## (old topology) -## (common) -## (section) -###################################################### - -restore [locate_data_file OCC951_1.brep] b -restore [locate_data_file OCC951_2.brep] a - -checkshape b -checkshape a - -bsection result a b - -set nb_info [nbshapes result] - -regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve -regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full ed -regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi -regexp {FACE +: +([-0-9.+eE]+)} $nb_info full fa -regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full sh -regexp {SOLID +: +([-0-9.+eE]+)} $nb_info full so -regexp {COMPSOLID +: +([-0-9.+eE]+)} $nb_info full cm -regexp {COMPOUND +: +([-0-9.+eE]+)} $nb_info full co -regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full shl - - - -if { $ve != 0 || $ed != 0 || $wi != 0 || $fa != 0 || $sh != 0 || $so != 0 || $cm != 0 || $co != 0 || $shl != 0 } { - puts " OCC951 : SECTION operation was made PROPERLY" - puts "" -} else { - puts "Faulty OCC951 : result of SECTION operation is EMPTY compound" - puts "" -} -set length 39.8616 -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug951_4 b/tests/bugs/modalg/bug951_4 deleted file mode 100755 index 3dd6465216..0000000000 --- a/tests/bugs/modalg/bug951_4 +++ /dev/null @@ -1,39 +0,0 @@ -puts "=========" -puts " OCC951 " -puts "=========" -puts "" -################################################## -##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes -################################################## -## (new topology) -## (bopcommon) -## (bopsection) -###################################################### - -restore [locate_data_file OCC951_1.brep] b -restore [locate_data_file OCC951_2.brep] a - -checkshape b -checkshape a - -bop b a -bopsection result - -set nb_info [nbshapes result] -regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve -regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full ed -regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi -regexp {FACE +: +([-0-9.+eE]+)} $nb_info full fa -regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full sh -regexp {SOLID +: +([-0-9.+eE]+)} $nb_info full so -regexp {COMPSOLID +: +([-0-9.+eE]+)} $nb_info full cm -regexp {COMPOUND +: +([-0-9.+eE]+)} $nb_info full co -regexp {SHAPE +: +([-0-9.+eE]+)} $nb_info full shl -if { $ve != 0 || $ed != 0 || $wi != 0 || $fa != 0 || $sh != 0 || $so != 0 || $cm != 0 || $co != 0 || $shl != 0 } { - puts " OCC951 : COMMON operation was made PROPERLY" -} else { - puts "Faulty OCC951 : result of COMMON operation is EMPTY compound" -} - -set length 39.8616 -set 3dviewer 1 diff --git a/tests/bugs/modalg/bug951_41 b/tests/bugs/modalg/bug951_41 deleted file mode 100644 index dcf984e10d..0000000000 --- a/tests/bugs/modalg/bug951_41 +++ /dev/null @@ -1,24 +0,0 @@ -puts "============" -puts "OCC951" -puts "============" -puts "" -###################################################### -##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes -###################################################### -## (new topology) -## (bopcommon) -## (bopsection) -###################################################### - -restore [locate_data_file OCC951_1.brep] s1 -restore [locate_data_file OCC951_2.brep] s2 - -checkshape s1 -checkshape s2 - -bop s1 s2 -bopcommon result - -set square 560.908 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug951_42 b/tests/bugs/modalg/bug951_42 deleted file mode 100644 index e801200b83..0000000000 --- a/tests/bugs/modalg/bug951_42 +++ /dev/null @@ -1,24 +0,0 @@ -puts "============" -puts "OCC951" -puts "============" -puts "" -###################################################### -##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes -###################################################### -## (new topology) -## (bopcommon) -## (bopsection) -###################################################### - -restore [locate_data_file OCC951_1.brep] s1 -restore [locate_data_file OCC951_2.brep] s2 - -checkshape s1 -checkshape s2 - -bop s1 s2 -bopsection result - -set length 39.8616 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug951_5 b/tests/bugs/modalg/bug951_5 deleted file mode 100644 index b82848fa0b..0000000000 --- a/tests/bugs/modalg/bug951_5 +++ /dev/null @@ -1,43 +0,0 @@ -puts "=========" -puts " OCC951 " -puts "=========" -puts "" -################################################## -##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes -################################################## -## (new topology) -## (bopcommon) -## (bopsection) -###################################################### - -restore [locate_data_file OCC951_1.brep] b -restore [locate_data_file OCC951_2.brep] a - -checkshape b -checkshape a - -############ -bop a b -bopcommon result -############ -set nb_info [nbshapes result] -regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve -regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full ed -regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi -regexp {FACE +: +([-0-9.+eE]+)} $nb_info full fa -regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full sh -regexp {SOLID +: +([-0-9.+eE]+)} $nb_info full so -regexp {COMPSOLID +: +([-0-9.+eE]+)} $nb_info full cm -regexp {COMPOUND +: +([-0-9.+eE]+)} $nb_info full co -regexp {SHAPE +: +([-0-9.+eE]+)} $nb_info full shl - -if { $ve != 0 || $ed != 0 || $wi != 0 || $fa != 0 || $sh != 0 || $so != 0 || $cm != 0 || $co != 0 || $shl != 0 } { - puts " OCC951 : COMMON operation was made PROPERLY" - puts "" -} else { - puts "Faulty OCC951 : result of COMMON operation is EMPTY compound" - puts "" -} - -set square 560.908 -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug951_51 b/tests/bugs/modalg/bug951_51 deleted file mode 100644 index 3f561bf95a..0000000000 --- a/tests/bugs/modalg/bug951_51 +++ /dev/null @@ -1,24 +0,0 @@ -puts "============" -puts "OCC951" -puts "============" -puts "" -###################################################### -##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes -###################################################### -## (new topology) -## (bopcommon) -## (bopsection) -###################################################### - -restore [locate_data_file OCC951_1.brep] s1 -restore [locate_data_file OCC951_2.brep] s2 - -checkshape s1 -checkshape s2 - -bop s2 s1 -bopcommon result - -set square 560.908 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug951_52 b/tests/bugs/modalg/bug951_52 deleted file mode 100644 index 79fd3a630b..0000000000 --- a/tests/bugs/modalg/bug951_52 +++ /dev/null @@ -1,24 +0,0 @@ -puts "============" -puts "OCC951" -puts "============" -puts "" -###################################################### -##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes -###################################################### -## (new topology) -## (bopcommon) -## (bopsection) -###################################################### - -restore [locate_data_file OCC951_1.brep] s1 -restore [locate_data_file OCC951_2.brep] s2 - -checkshape s1 -checkshape s2 - -bop s2 s1 -bopsection result - -set length 39.8616 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug951_6 b/tests/bugs/modalg/bug951_6 deleted file mode 100644 index 8b0800d618..0000000000 --- a/tests/bugs/modalg/bug951_6 +++ /dev/null @@ -1,43 +0,0 @@ -puts "=========" -puts " OCC951 " -puts "=========" -puts "" -################################################## -##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes -################################################## -## (new topology) -## (bopcommon) -## (bopsection) -###################################################### - -restore [locate_data_file OCC951_1.brep] b -restore [locate_data_file OCC951_2.brep] a - -checkshape b -checkshape a - -bop a b -bopcommon res1 -bopsection result - -set nb_info [nbshapes result] -regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve -regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full ed -regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi -regexp {FACE +: +([-0-9.+eE]+)} $nb_info full fa -regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full sh -regexp {SOLID +: +([-0-9.+eE]+)} $nb_info full so -regexp {COMPSOLID +: +([-0-9.+eE]+)} $nb_info full cm -regexp {COMPOUND +: +([-0-9.+eE]+)} $nb_info full co -regexp {SHAPE +: +([-0-9.+eE]+)} $nb_info full shl - -if { $ve != 0 || $ed != 0 || $wi != 0 || $fa != 0 || $sh != 0 || $so != 0 || $cm != 0 || $co != 0 || $shl != 0 } { - puts " OCC951 : COMMON operation was made PROPERLY" - puts "" -} else { - puts "Faulty OCC951 : result of COMMON operation is EMPTY compound" - puts "" -} - -set length 39.8616 -set 3dviewer 0 diff --git a/tests/bugs/modalg/bug951_61 b/tests/bugs/modalg/bug951_61 deleted file mode 100644 index 23e752c547..0000000000 --- a/tests/bugs/modalg/bug951_61 +++ /dev/null @@ -1,23 +0,0 @@ -puts "============" -puts "OCC951" -puts "============" -puts "" -###################################################### -##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes -###################################################### -## (old topology) -## (common) -## (section) -###################################################### - -restore [locate_data_file OCC951_1.brep] s1 -restore [locate_data_file OCC951_2.brep] s2 - -checkshape s1 -checkshape s2 - -bcommon result s1 s2 - -set square 560.908 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug951_62 b/tests/bugs/modalg/bug951_62 deleted file mode 100644 index 50ebc0733e..0000000000 --- a/tests/bugs/modalg/bug951_62 +++ /dev/null @@ -1,23 +0,0 @@ -puts "============" -puts "OCC951" -puts "============" -puts "" -###################################################### -##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes -###################################################### -## (old topology) -## (common) -## (section) -###################################################### - -restore [locate_data_file OCC951_1.brep] s1 -restore [locate_data_file OCC951_2.brep] s2 - -checkshape s1 -checkshape s2 - -bsection result s1 s2 - -set length 39.8616 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug951_71 b/tests/bugs/modalg/bug951_71 deleted file mode 100644 index 8217619dd2..0000000000 --- a/tests/bugs/modalg/bug951_71 +++ /dev/null @@ -1,23 +0,0 @@ -puts "============" -puts "OCC951" -puts "============" -puts "" -###################################################### -##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes -###################################################### -## (old topology) -## (common) -## (section) -###################################################### - -restore [locate_data_file OCC951_1.brep] s1 -restore [locate_data_file OCC951_2.brep] s2 - -checkshape s1 -checkshape s2 - -bcommon result s2 s1 - -set square 560.908 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug951_72 b/tests/bugs/modalg/bug951_72 deleted file mode 100644 index 82a31c9976..0000000000 --- a/tests/bugs/modalg/bug951_72 +++ /dev/null @@ -1,23 +0,0 @@ -puts "============" -puts "OCC951" -puts "============" -puts "" -###################################################### -##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes -###################################################### -## (old topology) -## (common) -## (section) -###################################################### - -restore [locate_data_file OCC951_1.brep] s1 -restore [locate_data_file OCC951_2.brep] s2 - -checkshape s1 -checkshape s2 - -bsection result s2 s1 - -set length 39.8616 -set 3dviewer 1 - diff --git a/tests/bugs/modalg/bug957 b/tests/bugs/modalg/bug957 deleted file mode 100755 index 58e157bbf8..0000000000 --- a/tests/bugs/modalg/bug957 +++ /dev/null @@ -1,15 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO OCC12345 ALL: Error : The length of result shape is" - -puts "========" -puts "OCC957" -puts "========" -puts "" -############################################################## -##Draw function PSPHERE creates incorrect shape (according to CHECKSHAPE function) -############################################################## - -psphere result 10 10 10 - -set length 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg/fra62369 b/tests/bugs/modalg/fra62369 deleted file mode 100755 index 00157154f2..0000000000 --- a/tests/bugs/modalg/fra62369 +++ /dev/null @@ -1,20 +0,0 @@ - -puts "===========" -puts "FRA62369" -puts "===========" - -restore [locate_data_file fra62369a.brep] a -checkshape a - -compound result - -set i 1 -repeat 100 { - plane p_$i 0 0 200+$i - mkface f_$i p_$i - bsection s_$i a f_$i -2d -a - compound s_$i result result - incr i -} -set length 3961.04 -set 2dviewer 0 diff --git a/tests/bugs/modalg/pro16983 b/tests/bugs/modalg/pro16983 deleted file mode 100755 index 3ba6a9239b..0000000000 --- a/tests/bugs/modalg/pro16983 +++ /dev/null @@ -1,17 +0,0 @@ - -puts "============" -puts "PRO16983" -puts "============" - -restore [locate_data_file pro16983a.brep] B -checkshape B -plane p 0 0 0 1 0 0 -vertex v1 0 90.16396 252.4591 -vertex v2 0 252.459 -9.835989 -edge e v2 v1 -wire w e -featlf B w p -5 0 0 5 0 0 1 1 -featperform lf result - -set square 796476 -set 2dviewer 0 diff --git a/tests/bugs/modalg/pro18892 b/tests/bugs/modalg/pro18892 deleted file mode 100755 index 3e91f5a1b3..0000000000 --- a/tests/bugs/modalg/pro18892 +++ /dev/null @@ -1,35 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty : Result is BAD. Distance is more than MaxTolerance" -puts "TODO OCC12345 ALL: Error : The length of result shape is" - -puts "==========" -puts "PRO18892" -puts "==========" -# Version de test: K4O, PATCH LEVEL: -# GEOMETRY-M4-6A : 3 -# GEOMLITE-M4-6A : 1 -# TOPOLOGY-M4-6A : 2 - -restore [locate_data_file pro18892.rle] a -checkshape a - -explode a -bsection result a_1 a_2 -2d -a -explode result - -mkcurve c result_1 -cvalue c 1 X Y Z -vertex v X Y Z -explode a e - -distmini d v a_8 - -set tol [ maxtolerance a_8 ] -regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tol full MaxEdgeTolerance -regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tol full MaxVertexTolerance -regexp {([-0-9.+eE]+)$} [dump d_val] full d - -if { [expr $d > $MaxEdgeTolerance] || [expr $d > $MaxVertexTolerance] } { - puts "Faulty : Result is BAD. Distance is more than MaxTolerance" -} - -set length 0 diff --git a/tests/bugs/modalg/pro19424 b/tests/bugs/modalg/pro19424 deleted file mode 100755 index 1a3d49176e..0000000000 --- a/tests/bugs/modalg/pro19424 +++ /dev/null @@ -1,19 +0,0 @@ - -puts "==========" -puts "PRO19424" -puts "==========" - -restore [locate_data_file pro19424a.brep] b -checkshape b -restore [locate_data_file pro19424b.brep] p -checkshape p - -if [catch {evolved result b p o } catch_result] { - puts "Faulty PRO19424 : function EVOLVED works wrongly" -} else { - puts "PRO19424 OK: function EVOLVED works properly" -} - -set square 246.506 -set 2dviewer 0 - diff --git a/tests/bugs/modalg/pro19626 b/tests/bugs/modalg/pro19626 deleted file mode 100755 index b583d566d1..0000000000 --- a/tests/bugs/modalg/pro19626 +++ /dev/null @@ -1,22 +0,0 @@ - -puts "============" -puts "PRO19626" -puts "============" - -restore [locate_data_file pro19626a.brep] a -checkshape a -restore [locate_data_file pro19626b.brep] b -checkshape b - -bsection result a b -regexp { nb alone Vertices : +([-0-9.+eE]+)} [checksection result] full num -if { $num != 2 } { - puts " Faulty PRO19626: Result shape is INcorrect !!! " -} else { - puts "PRO19626 OK : Result shape is CORRECT !!! " -} - -set length 174.597 -set 2dviewer 0 - - diff --git a/tests/bugs/modalg/pro19653 b/tests/bugs/modalg/pro19653 deleted file mode 100755 index 9bcd875300..0000000000 --- a/tests/bugs/modalg/pro19653 +++ /dev/null @@ -1,29 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty : TEST FAILED" -puts "TODO OCC12345 ALL: Error : The length of result shape is" - -puts "============" -puts "PRO19653" -puts "BREPALGO_BOOLEANOPERATION does not return result." -puts "==================================" -puts "It takes visual check for this BUG" -puts "==================================" - -restore [locate_data_file pro19653a.brep] a -checkshape a -restore [locate_data_file pro19653b.brep] b -checkshape b -bsection result a b - -explode result e -checkshape result_1 -explode a e -regexp {Mass +: +([-0-9.+eE]+)} [lprops result_1] full ll_1 -regexp {Mass +: +([-0-9.+eE]+)} [lprops a_4] full ll_2 -if { $ll_1 != $ll_2 } { - puts "Faulty : TEST FAILED" -} else { - puts "PRO19653 OK : BREPALGO_BOOLEANOPERATION returns result" -} - -set length 0 -set 2dviewer 0 diff --git a/tests/bugs/modalg_1/begin b/tests/bugs/modalg_1/begin new file mode 100755 index 0000000000..f40c35f0a3 --- /dev/null +++ b/tests/bugs/modalg_1/begin @@ -0,0 +1,20 @@ +set subgroup modalg + +set calcul "p" +set type "i" + +proc OFFSETSHAPE {distance faces calcul type} { + uplevel #0 explode s f + uplevel #0 offsetparameter 1e-7 $calcul $type + uplevel #0 offsetload s $distance $faces + uplevel #0 offsetperform result +} + + + + + + + + + diff --git a/tests/bugs/modalg_1/buc60409_1 b/tests/bugs/modalg_1/buc60409_1 new file mode 100755 index 0000000000..1aceec9594 --- /dev/null +++ b/tests/bugs/modalg_1/buc60409_1 @@ -0,0 +1,28 @@ + +puts "==============" +puts " BUC60409 " +puts " FUSE " +puts "==============" + +restore [locate_data_file buc60409a.brep] c +restore [locate_data_file buc60409b.brep] s + +set che [checkshape c] +if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty BUC60409 (shape 1): Source shape is invalid. It was detected by Checkshape command" + puts "Body of the script was NOT executed" + renamevar c result +} else { + puts "BUC60409 OK (shape 1): Source shape is valid" + set che [checkshape s] + if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty BUC60409 (shape 2): Source shape is invalid. It was detected by Checkshape command" + puts "Body of the script was NOT executed" + renamevar s result + } else { + puts "BUC60409 OK (shape 2): Source shape is valid" + bfuse result c s + } +} +set square 39.0894 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60409_2 b/tests/bugs/modalg_1/buc60409_2 new file mode 100755 index 0000000000..3ebd2a1c27 --- /dev/null +++ b/tests/bugs/modalg_1/buc60409_2 @@ -0,0 +1,28 @@ + +puts "=============" +puts " BUC60409 " +puts " CUT " +puts "=============" + +restore [locate_data_file buc60409a.brep] c +restore [locate_data_file buc60409b.brep] s + +set che [checkshape c] +if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty BUC60409 (shape 1): Source shape is invalid. It was detected by Checkshape command" + puts "Body of the script was NOT executed" + renamevar c result +} else { + puts "BUC60409 OK (shape 1): Source shape is valid" + set che [checkshape s] + if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty BUC60409 (shape 2): Source shape is invalid. It was detected by Checkshape command" + puts "Body of the script was NOT executed" + renamevar s result + } else { + puts "BUC60409 OK (shape 2): Source shape is valid" + bcut result c s + } +} +set square 31.8476 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60409_3 b/tests/bugs/modalg_1/buc60409_3 new file mode 100755 index 0000000000..824156f38d --- /dev/null +++ b/tests/bugs/modalg_1/buc60409_3 @@ -0,0 +1,29 @@ + +puts "=================" +puts " BUC60409 " +puts " COMMON " +puts "=================" + +restore [locate_data_file buc60409a.brep] c +restore [locate_data_file buc60409b.brep] s + +set che [checkshape c] +if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty BUC60409 (shape 1): Source shape is invalid. It was detected by Checkshape command" + puts "Body of the script was NOT executed" + renamevar c result +} else { + puts "BUC60409 OK (shape 1): Source shape is valid" + + set che [checkshape s] + if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty BUC60409 (shape 2): Source shape is invalid. It was detected by Checkshape command" + puts "Body of the script was NOT executed" + renamevar s result + } else { + puts "BUC60409 OK (shape 2): Source shape is valid" + bcommon result c s + } +} +set square 4.89279 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60462_1 b/tests/bugs/modalg_1/buc60462_1 new file mode 100755 index 0000000000..bb20c30538 --- /dev/null +++ b/tests/bugs/modalg_1/buc60462_1 @@ -0,0 +1,23 @@ +puts "TODO OCC12345 ALL: Faulty : Section is incorrect" +puts "TODO OCC12345 ALL: Error : The length of result shape is" + +puts "=============" +puts "BUC60462" +puts "=============" +puts "Section" +puts "" + +restore [locate_data_file buc60462a.brep] a +checkshape a +restore [locate_data_file buc60462b.brep] b +checkshape b +bsection result a b + +regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection result] full cs + +if { $cs != 0 } { + puts "Faulty : Section is incorrect" +} + +set length 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60462_2 b/tests/bugs/modalg_1/buc60462_2 new file mode 100755 index 0000000000..32b9d90abb --- /dev/null +++ b/tests/bugs/modalg_1/buc60462_2 @@ -0,0 +1,26 @@ +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_17" +puts "TODO OCC12345 ALL: Faulty : mistakes are found in checked shape by checkshape command" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + + +puts "==========" +puts "BUC60462" +puts "==========" + +restore [locate_data_file buc60462c.brep] a +checkshape a +restore [locate_data_file buc60462d.brep] b +checkshape b +puts "Fuse begin" +bfuse result a b +puts "Fuse end" + +set che [checkshape result r] +if { [regexp {OK} $che] != 1 } { + puts "Faulty : mistakes are found in checked shape by checkshape command" +} else { + puts "Checking by checkshape - OK" +} + +set square 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60463 b/tests/bugs/modalg_1/buc60463 new file mode 100755 index 0000000000..3980770778 --- /dev/null +++ b/tests/bugs/modalg_1/buc60463 @@ -0,0 +1,22 @@ +puts "TODO OCC12345 ALL: Error : The length of result shape is" +puts "TODO OCC12345 ALL: Faulty : Section is incorrect" + +puts "=============" +puts "BUC60463" +puts "=============" +puts "Section" +puts "" +cpulimit 1400 +restore [locate_data_file buc60463a.brep] a +checkshape a +restore [locate_data_file buc60463b.brep] b +checkshape b +bsection result a b + +regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection result] full cs +if { $cs != 0 } { + puts "Faulty : Section is incorrect" +} +set length 0 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/buc60523 b/tests/bugs/modalg_1/buc60523 new file mode 100755 index 0000000000..a1d1cb238b --- /dev/null +++ b/tests/bugs/modalg_1/buc60523 @@ -0,0 +1,12 @@ + +puts "========================" +puts "BUC60523" +puts "========================" + +restore [locate_data_file buc60523a.brep] a +checkshape a +sewing result 1.e-7 a +set square 156.919 +set 2dviewer 0 + + diff --git a/tests/bugs/modalg_1/buc60531_1 b/tests/bugs/modalg_1/buc60531_1 new file mode 100755 index 0000000000..6bc69bb76a --- /dev/null +++ b/tests/bugs/modalg_1/buc60531_1 @@ -0,0 +1,15 @@ + +puts "========================" +puts "BUC60531" +puts "========================" + +restore [locate_data_file buc60531a.brep] r1 +checkshape r1 +restore [locate_data_file buc60531b.brep] pl1 +checkshape pl1 + +bcut result r1 pl1 + +set square 115935 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/buc60531_2 b/tests/bugs/modalg_1/buc60531_2 new file mode 100755 index 0000000000..c4e9dc329f --- /dev/null +++ b/tests/bugs/modalg_1/buc60531_2 @@ -0,0 +1,21 @@ + +puts "========================" +puts "BUC60531" +puts "========================" + +restore [locate_data_file buc60531a.brep] r1 +checkshape r1 + +restore [locate_data_file buc60531b.brep] pl1 +checkshape pl1 + +bcut r2 r1 pl1 +checkshape r2 + +restore [locate_data_file buc60531c.brep] pl2 +checkshape pl2 + +bcut result r2 pl2 + +set square 115935 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60532 b/tests/bugs/modalg_1/buc60532 new file mode 100755 index 0000000000..936a35bbc6 --- /dev/null +++ b/tests/bugs/modalg_1/buc60532 @@ -0,0 +1,22 @@ +puts "===========" +puts "BUC60532" +puts "===========" + +restore [locate_data_file buc60532a.brep] p +checkshape p + +restore [locate_data_file buc60532b.brep] t1 +checkshape t1 + +restore [locate_data_file buc60532c.brep] t2 +checkshape t2 + +# create halfspace +halfspace h1 t1 20 20 0 +halfspace h2 t2 20 20 0 + +# first cut +bcut result p h1 + +set square 81.8172 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60532_1 b/tests/bugs/modalg_1/buc60532_1 new file mode 100755 index 0000000000..be2eeff4fb --- /dev/null +++ b/tests/bugs/modalg_1/buc60532_1 @@ -0,0 +1,23 @@ +puts "===========" +puts "BUC60532" +puts "===========" + +restore [locate_data_file buc60532a.brep] p +checkshape p + +restore [locate_data_file buc60532b.brep] t1 +checkshape t1 + +restore [locate_data_file buc60532c.brep] t2 +checkshape t2 + +# create halfspace +halfspace h1 t1 20 20 0 +halfspace h2 t2 20 20 0 + +# first cut +bcut result p h1 + +set square 81.8172 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/buc60532_2 b/tests/bugs/modalg_1/buc60532_2 new file mode 100755 index 0000000000..9d2b3735ae --- /dev/null +++ b/tests/bugs/modalg_1/buc60532_2 @@ -0,0 +1,52 @@ +puts "==========" +puts "BUC60532" +puts "==========" + +restore [locate_data_file buc60532a.brep] p +checkshape p + +restore [locate_data_file buc60532b.brep] t1 +checkshape t1 + +restore [locate_data_file buc60532c.brep] t2 +checkshape t2 + +# create halfspace +#vertex v 20 20 0 +halfspace h1 t1 20 20 0 +halfspace h2 t2 20 20 0 + +# first cut +bcut res1 p h1 + +explode res1 e +mkcurve cu11 res1_1 +mkcurve cu12 res1_2 +mkcurve cu13 res1_3 +mkcurve cu14 res1_4 +mkcurve cu15 res1_5 + +checkshape res1 +puts [computetolerance res1] + +# second cut +bcut res2 res1 h2 +tcopy res2 res +checkshape res2 + +explode res2 e +mkcurve cu21 res2_1 +mkcurve cu22 res2_2 +mkcurve cu23 res2_3 +mkcurve cu24 res2_4 +mkcurve cu25 res2_5 + +explode res2 face + +puts [computetolerance res2] + +renamevar res2 result + +set square 78.8705 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/buc60533 b/tests/bugs/modalg_1/buc60533 new file mode 100755 index 0000000000..8af03576d1 --- /dev/null +++ b/tests/bugs/modalg_1/buc60533 @@ -0,0 +1,69 @@ +puts "==========" +puts "BUC60533" +puts "==========" + +restore [locate_data_file buc60533a.brep] part +checkshape part +#puts "Tolerance part" +#computetolerance part + +restore [locate_data_file buc60533b.brep] trTool +checkshape trTool +#puts "Tolerance trTool" +#computetolerance trTool + +# create halfspace +vertex v 10000 15000 -15000 +halfspace hs trTool 10000 15000 -15000 +#puts "Tolerance hs" +#computetolerance hs + +#************************************************* +if [catch {bcut result part hs} catch_result] { + puts "Faulty BUC60533: function CUT works wrongly" +} else { + puts " BUC60533 OK: function CUT works properly" +} +#************************************************* + +#set che [checkshape res r] +#set err [lindex $che [expr [llength $che] - 1]] +#if { $err != "OK"} { +# puts "Faulty : mistakes are found in checked shape by checkshape command" +#} else { +# puts "Checking by checkshape - OK" + +#explode res e +#mkcurve cu1 res_1 +#mkcurve cu2 res_2 +#mkcurve cu3 res_3 +#mkcurve cu4 res_4 +#mkcurve cu5 res_5 + +#checkshape res + +#set tolerance [ maxtolerance res ] +#set MaxFaceTolerance [ lindex $tolerance 14 ] +#set MaxEdgeTolerance [ lindex $tolerance 20 ] +#set MaxVertexTolerance [ lindex $tolerance 26 ] +#if { $MaxFaceTolerance > 1 || $MaxEdgeTolerance > 1 || $MaxVertexTolerance > 1 } { +#puts "Faulty :Tolerance of shape is more then 1.0" +#} else { +#puts "Tolerance of shape is less then 1.0" +#} +#} + +# Objectif : Couper part par trTool +# +# part est construite a partir d'un semi de point et de telle facon que u=x et v=y. +# On obtient une Geom_BSplineSurface. On cree alors la topologie a partir de cette +# surface via BRepAPI::MakeFace(surface) +# Dans notre code, a aucun moment, nous +# n'initialisons la tolerance. +# +# Le cut n'est pas effectue car une exception est levee : +# An exception was caught Standard_ConstructionError: +# ** Exception ** Standard_ConstructionError: + +set square 1.63191e+07 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60555_1 b/tests/bugs/modalg_1/buc60555_1 new file mode 100755 index 0000000000..0f0ba0ff45 --- /dev/null +++ b/tests/bugs/modalg_1/buc60555_1 @@ -0,0 +1,37 @@ +puts "===========" +puts "BUC60555" +puts "CUT Case 1" +puts "===========" +#cpulim add aki 070704 +cpulimit 1600 +restore [locate_data_file buc60555a.brep] part +checkshape part +restore [locate_data_file buc60555b.brep] trTool1 +checkshape trTool1 +halfspace hs1 trTool1 20000 10000 0 +bcut cut1 part hs1 + +checkshape cut1 + +tcopy cut1 result + +explode cut1 e +mkcurve cu1 cut1_1 +mkcurve cu2 cut1_2 +mkcurve cu3 cut1_3 +mkcurve cu4 cut1_4 + +set tolerance [ maxtolerance cut1 ] + +regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxFaceTolerance +regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxEdgeTolerance +regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxVertexTolerance + +if { $MaxFaceTolerance > 1 || $MaxEdgeTolerance > 1 || $MaxVertexTolerance > 1 } { + puts "Faulty :Tolerance of shape is more then 1.0" +} else { + puts "Tolerance of shape is less then 1.0" +} + +set square 4.60842e+07 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60555_2 b/tests/bugs/modalg_1/buc60555_2 new file mode 100755 index 0000000000..7e55c72f3f --- /dev/null +++ b/tests/bugs/modalg_1/buc60555_2 @@ -0,0 +1,54 @@ +puts "=============" +puts "BUC60555" +puts "CUT Case2" +puts "=============" +cpulimit 1400 +restore [locate_data_file buc60555a.brep] part +checkshape part +restore [locate_data_file buc60555b.brep] trTool1 +checkshape trTool1 + +halfspace hs1 trTool1 20000 10000 0 +bcut cut1 part hs1 +checkshape cut1 + +set che [checkshape cut1 r] +if { [regexp {OK} $che] != 1 } { + puts "Faulty : mistakes are found in checked shape by checkshape command" +} else { + puts "Checking by checkshape - OK" +} + +puts [maxtolerance cut1] + +restore [locate_data_file buc60555c.brep] trTool2 +halfspace hs2 trTool2 10000 10000 0 +bcut cut2 cut1 hs2 + +tcopy cut2 result + +explode cut2 e +mkcurve cu1 cut2_1 +mkcurve cu2 cut2_2 +mkcurve cu3 cut2_3 +mkcurve cu4 cut2_4 + +set che [checkshape cut2 r] +if { [regexp {OK} $che] != 1 } { + puts "Faulty : mistakes are found in checked shape by checkshape command" +} else { + puts "Checking by checkshape - OK" +} + +checkshape cut2 +set tolerance [ maxtolerance cut2 ] +regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxFaceTolerance +regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxEdgeTolerance +regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxVertexTolerance +if { $MaxFaceTolerance > 1 || $MaxEdgeTolerance > 1 || $MaxVertexTolerance > 1 } { + puts "Faulty : Tolerance of shape is more then 1.0" +} else { + puts "Tolerance of shape is less then 1.0" +} +set square 4.52817e+07 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60555_3 b/tests/bugs/modalg_1/buc60555_3 new file mode 100755 index 0000000000..eee1c97b3f --- /dev/null +++ b/tests/bugs/modalg_1/buc60555_3 @@ -0,0 +1,70 @@ +puts "==============" +puts "BUC60555" +puts "CUT Case 3" +puts "==============" +cpulimit 5000 +restore [locate_data_file buc60555a.brep] part +checkshape part +restore [locate_data_file buc60555b.brep] trTool1 +checkshape trTool1 + +halfspace hs1 trTool1 20000 10000 0 +bcut cut1 part hs1 +checkshape cut1 + +set che [checkshape cut1 r] +if { [regexp {OK} $che] != 1 } { + puts "Faulty : mistakes are found in checked shape by checkshape command" +} else { + puts "Checking by checkshape - OK" +} + +maxtolerance cut1 + +restore [locate_data_file buc60555c.brep] trTool2 +halfspace hs2 trTool2 10000 10000 0 +bcut cut2 cut1 hs2 +checkshape cut2 + +set che [checkshape cut2 r] +if { [regexp {OK} $che] != 1 } { + puts "Faulty : mistakes are found in checked shape by checkshape command" +} else { + puts "Checking by checkshape - OK" +} + +maxtolerance cut2 + +restore [locate_data_file buc60555d.brep] trTool3 +halfspace hs3 trTool3 20000 1000 0 +bcut cut3 cut2 hs3 + +tcopy cut3 result + +explode cut3 e +mkcurve cu1 cut3_1 +mkcurve cu2 cut3_2 +mkcurve cu3 cut3_3 +mkcurve cu4 cut3_4 + +set che [checkshape cut3 r] +if { [regexp {OK} $che] != 1 } { + puts "Faulty : mistakes are found in checked shape by checkshape command" +} else { + puts "Checking by checkshape - OK" +} + +checkshape cut3 + +set tolerance [ maxtolerance cut3 ] +regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxFaceTolerance +regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxEdgeTolerance +regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxVertexTolerance + +if { $MaxFaceTolerance > 1 || $MaxEdgeTolerance > 1 || $MaxVertexTolerance > 1 } { + puts "Faulty : Tolerance of shape is more then 1.0" +} else { + puts "Tolerance of shape is less then 1.0" +} +set square 2.22138e+07 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60585_1 b/tests/bugs/modalg_1/buc60585_1 new file mode 100755 index 0000000000..76fbd9590a --- /dev/null +++ b/tests/bugs/modalg_1/buc60585_1 @@ -0,0 +1,18 @@ + +puts "========================" +puts "BUC60585" +puts "========================" + +restore [locate_data_file buc60585a.brep] s +checkshape s +plane ps 2036.25 -97.5 -1460.499755859375 0.0 -0.75103523489975432 -0.66026212668838646 1.0 0.0 0.0 + +psection result s ps + +set length 117.81 +set 2dviewer 0 + +## set num [lindex [checksection res] 4] +# if { $num != 0 } { +# puts " Faulty : Result shape is Unclosed !!! " +# } diff --git a/tests/bugs/modalg_1/buc60585_2 b/tests/bugs/modalg_1/buc60585_2 new file mode 100755 index 0000000000..d37af3dee1 --- /dev/null +++ b/tests/bugs/modalg_1/buc60585_2 @@ -0,0 +1,15 @@ + +puts "========================" +puts "BUC60585" +puts "========================" + +restore [locate_data_file buc60585b.brep] t +checkshape t +plane pt 2036.25 -97.5 -1460.499755859375 0.0 -1.0 0.0 1.0 0.0 0.0 + +psection result t pt + +set length 22.0446 +set 2dviewer 0 + +# checksection res diff --git a/tests/bugs/modalg_1/buc60623_1 b/tests/bugs/modalg_1/buc60623_1 new file mode 100755 index 0000000000..35906ca1d4 --- /dev/null +++ b/tests/bugs/modalg_1/buc60623_1 @@ -0,0 +1,15 @@ + +puts "========================" +puts "BUC60623" +puts "========================" + +restore [locate_data_file buc60623a.brep] a +checkshape a +restore [locate_data_file buc60623b.brep] b +checkshape b + +bsection result a b + +set length 1475.98 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/buc60623_2 b/tests/bugs/modalg_1/buc60623_2 new file mode 100755 index 0000000000..25d0b279e6 --- /dev/null +++ b/tests/bugs/modalg_1/buc60623_2 @@ -0,0 +1,15 @@ + +puts "========================" +puts "BUC60623" +puts "========================" + +restore [locate_data_file buc60623a.brep] a +checkshape a +restore [locate_data_file buc60623b.brep] b +checkshape b + +bsection result b a +# checksection res + +set length 1475.98 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60635 b/tests/bugs/modalg_1/buc60635 new file mode 100755 index 0000000000..c477cdba39 --- /dev/null +++ b/tests/bugs/modalg_1/buc60635 @@ -0,0 +1,13 @@ + +puts "=============" +puts "BUC60635" +puts "=============" + +restore [locate_data_file buc60635a.brep] a +checkshape a + +mkplane result a + +set square 2035.58 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/buc60649 b/tests/bugs/modalg_1/buc60649 new file mode 100755 index 0000000000..313cc938cf --- /dev/null +++ b/tests/bugs/modalg_1/buc60649 @@ -0,0 +1,20 @@ +puts "==========" +puts "BUC60649" +puts "BUC60657" +puts "==========" +puts "" + +restore [locate_data_file buc60649a.brep] a +checkshape a + +set che [checkshape a rr] +if { [regexp {OK} $che] != 1 } { + puts "Faulty : mistakes are found in SOURCE shape by checkshape command" + puts "Body of the script was not executed" +} else { + puts "Checking of SOURCE shape by checkshape - OK" + mkoffset result a 1 1 + renamevar result_1 result +} +set length 271.473 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60663_1 b/tests/bugs/modalg_1/buc60663_1 new file mode 100755 index 0000000000..2cf7b73aac --- /dev/null +++ b/tests/bugs/modalg_1/buc60663_1 @@ -0,0 +1,26 @@ + +puts "=====================================" +puts "BUC60663" +puts "=====================================" +puts "" +puts "It takes visual check for this BUG. See V2 point" +puts "=====================================" +puts "" + +restore [locate_data_file buc60663a.brep] a +checkshape a +restore [locate_data_file buc60663b.brep] b +checkshape b + +bsection result a b + +regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection result] full num +if { $num != 2 } { + puts " Faulty : Result shape is INcorrect !!! " +} + + +#fsameparameter res + +set length 26.2001 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60663_2 b/tests/bugs/modalg_1/buc60663_2 new file mode 100755 index 0000000000..3bf367be9f --- /dev/null +++ b/tests/bugs/modalg_1/buc60663_2 @@ -0,0 +1,33 @@ +puts "TODO OCC12345 ALL: Faulty : the distanse is" +puts "TODO OCC12345 ALL: Error : The length of result shape is" + +puts "=====================================" +puts "BUC60663" +puts "=====================================" +puts "" +puts "It takes visual check for this BUG." +puts "=====================================" +puts "" + +restore [locate_data_file buc60663a.brep] a +checkshape a +restore [locate_data_file buc60663b.brep] b +checkshape b + +bsection result a b + +set expl [explode result v] +set len [llength $expl] +set ver [lindex $expl [expr $len - 1]] +explode b e +explode b_4 v +distmini d $ver b_5 + +regexp {([-0-9.+eE]+)$} [dump d_val] full dist +regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} [maxtolerance $ver] full toler + +if {$dist > $toler} { + puts "Faulty : the distanse is $dist. It is more $toler." +} +set length 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60668 b/tests/bugs/modalg_1/buc60668 new file mode 100755 index 0000000000..0aef85e0b9 --- /dev/null +++ b/tests/bugs/modalg_1/buc60668 @@ -0,0 +1,27 @@ + +puts "====================" +puts "BUC60668" +puts "Three boxes must appear on picture" +puts "====================" + +box b 100 0 0 10 10 10 +box b1 10 10 10 +box b2 50 50 50 10 10 10 +box a -10 -10 -10 200 200 200 + +compound b b1 b2 c + +regexp {Mass +: +([-0-9.+eE]+)} [vprops c] full vcomp + +#compound b b1 c +bcommon result c a + +regexp {Mass +: +([-0-9.+eE]+)} [vprops result] full vcomm + +if { $vcomp != $vcomm } { + puts " Faulty : Common is incorrect" +} else { + puts " BUC60668 OK : Common was made properly" +} +set square 1800 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60669 b/tests/bugs/modalg_1/buc60669 new file mode 100755 index 0000000000..ef4feb62a5 --- /dev/null +++ b/tests/bugs/modalg_1/buc60669 @@ -0,0 +1,21 @@ +pload QAcommands + +puts "==================" +puts "BUC60669" +puts "==================" +puts "" +############################################################# +## An exception was caught OSD_SIGBUS: SIGBUS 'bus error' detected.** +## Exception ** OSD_SIGBUS: SIGBUS 'bus error' detected. +############################################################# + +restore [locate_data_file buc60669a.brep] shell1 +checkshape shell1 +restore [locate_data_file buc60669b.brep] shell2 +checkshape shell2 + +ksection result shell1 shell2 1000 0.0001 0.00001 0 + +#checksection res +set length 104.754 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60682 b/tests/bugs/modalg_1/buc60682 new file mode 100755 index 0000000000..95f9416e67 --- /dev/null +++ b/tests/bugs/modalg_1/buc60682 @@ -0,0 +1,32 @@ +puts "TODO OCC12345 ALL: Faulty BUC60682" +puts "TODO OCC12345 ALL: Error : The square of result shape is" +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" + +pload QAcommands + +puts "==================" +puts "BUC60682" +puts "==================" + +restore [locate_data_file buc60682a.brep] shell1 +restore [locate_data_file buc60682b.brep] shell2 + +set che [checkshape shell1] +if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty BUC60682 (shell 1): Source shape is invalid. It was detected by Checkshape command" + puts "Body of the script was NOT executed" + renamevar shell1 result +} else { + puts "BUC60682 OK (shell 1): Source shape is valid" + set che [checkshape shell2] + if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty BUC60682 (shell 2): Source shape is invalid. It was detected by Checkshape command" + puts "Body of the script was NOT executed" + renamevar shell2 result + } else { + puts "BUC60682 OK (shell 2): Source shape is valid" + ksection result shell1 shell2 1000 0.0001 0.00001 0 + } +} +set square 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60684 b/tests/bugs/modalg_1/buc60684 new file mode 100755 index 0000000000..487dc7748d --- /dev/null +++ b/tests/bugs/modalg_1/buc60684 @@ -0,0 +1,12 @@ + +puts "=============" +puts "BUC60684" +puts "=============" + +restore [locate_data_file buc60684a.brep] w +checkshape w + +prism result w 0 0 10 + +set square 148.875 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60690 b/tests/bugs/modalg_1/buc60690 new file mode 100755 index 0000000000..66b214437e --- /dev/null +++ b/tests/bugs/modalg_1/buc60690 @@ -0,0 +1,48 @@ +puts "TODO OCC12345 ALL: Faulty : The distance between" +puts "TODO OCC12345 ALL: Error : The length of result shape is" + +puts "========================" +puts "BUC60690" +puts "========================" +puts "" + +restore [locate_data_file buc60690a.brep] a +restore [locate_data_file buc60690b.brep] b + +set che [checkshape a] +if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty BUC60690 (shape 1): Source shape is invalid. It was detected by Checkshape command" + puts "Body of the script was NOT executed" + renamevar a result +} else { + puts "BUC60690 OK (shape 1): Source shape is valid" + set che [checkshape b] + if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty BUC60690 (shape 2): Source shape is invalid. It was detected by Checkshape command" + puts "Body of the script was NOT executed" + renamevar b result + } else { + puts "BUC60690 OK (shape 2): Source shape is valid" + + bsection result a b + + set le [explode result v] + distmini d1 result_1 b + distmini d2 [lindex $le [expr [llength $le] - 1]] b + + regexp {([-0-9.+eE]+)$} [dump d1_val] full du1 + + if { [expr $du1 > 1e-7] } { + puts "Faulty : The distance between first vertex and shellB is $du1. It is more then 1e-7." + } + + regexp {([-0-9.+eE]+)$} [dump d2_val] full du2 + if { [expr $du2 > 1e-7] } { + puts "Faulty : The distance between last vertex and shellB is $du2. It is more then 1e-7." + } + } +} +set length 0 +set 2dviewer 0 + + diff --git a/tests/bugs/modalg_1/buc60703_1 b/tests/bugs/modalg_1/buc60703_1 new file mode 100755 index 0000000000..46b25d82eb --- /dev/null +++ b/tests/bugs/modalg_1/buc60703_1 @@ -0,0 +1,37 @@ +#puts "TODO OCC12345 ALL: An exception was caught" +#puts "TODO OCC12345 ALL: Exception" +#puts "TODO OCC12345 ALL: Faulty BUC60703: here is problem with FUSE operation" + +puts "========================" +puts "BUC60703" +puts "=================================" +puts "Action with models with VERY BIG tolerance" +puts "=================================" +########################################## +## Crash during a fuse whilst two plans are tangent. +## ( Case has LIMITATION status currently ) +########################################## + +#cpulimit 9000 + +restore [locate_data_file buc60703a.brep] a +# maxtolerance a +checkshape a +restore [locate_data_file buc60703b.brep] b +# maxtolerance b +checkshape b + +if [catch {bfuse result a b } catch_result] { + puts "Faulty BUC60703: here is problem with FUSE operation" +} else { + puts "OK OCC348: function FUSE works ok" + if [catch {checkshape result } catch_result] { + puts "Faulty BUC60703 : here is checking problem." + } else { + puts "BUC60703 OK" + } + # maxtolerance res + set square 237.333 + set 2dviewer 0 +} + diff --git a/tests/bugs/modalg_1/buc60703_2 b/tests/bugs/modalg_1/buc60703_2 new file mode 100755 index 0000000000..a8a4b772e2 --- /dev/null +++ b/tests/bugs/modalg_1/buc60703_2 @@ -0,0 +1,31 @@ + +puts "========================" +puts "BUC60703" +puts "=================================" +puts "Action with models with CORRECT tolerance" +puts "=================================" +puts "" +############################################ +## Crash during a fuse whilst two plans are tangent. +############################################ + +restore [locate_data_file buc60703c.brep] a +checkshape a + +restore [locate_data_file buc60703e.brep] b +checkshape b + + +if [catch {bfuse result a b } catch_result] { + puts "Faulty BUC60703: here is problem with FUSE operation" +} else { + puts "OK BUC60703: function FUSE works ok" + if [catch {checkshape result } catch_result] { + puts "WARNING BUC60703 : Function checkshape gives bad result" + puts " See also OCC438: 919 D3 and D4" + } else { + puts "BUC60703 OK in checkshape" + } +} +set square 236.72 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60703_3 b/tests/bugs/modalg_1/buc60703_3 new file mode 100755 index 0000000000..fc773b64cc --- /dev/null +++ b/tests/bugs/modalg_1/buc60703_3 @@ -0,0 +1,24 @@ + +puts "========================" +puts "BUC60703" +puts "========================" + +restore [locate_data_file buc60703e.brep] a +#maxtolerance a +checkshape a +restore [locate_data_file buc60703d.brep] b +#maxtolerance b +checkshape b + +if [catch {bfuse result a b } catch_result] { + puts "Faulty BUC60703: here is problem with FUSE operation" +} else { + puts "OK OCC348: function FUSE works ok" + if [catch {checkshape result} catch_result] { + puts "Faulty BUC60703 : here is checking problem. See also OCC438: 919 D3 and D4" + } else { + puts "BUC60703 : here is NOT checking problem" + } +} +set square 371.259 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60703_4 b/tests/bugs/modalg_1/buc60703_4 new file mode 100755 index 0000000000..32f006487f --- /dev/null +++ b/tests/bugs/modalg_1/buc60703_4 @@ -0,0 +1,35 @@ + +puts "========================" +puts "BUC60703" +puts "========================" +puts "" +#################################### +## Crash during a fuse whilst two plans are tangent. +#################################### + +restore [locate_data_file buc60703d.brep] a +#maxtolerance a +checkshape a +restore [locate_data_file buc60703f.brep] b +#maxtolerance b +checkshape b + +if [catch {bfuse result a b } catch_result] { + puts "Faulty BUC60703: here is problem with FUSE operation" +} else { + puts "OK OCC348: function FUSE works ok" + if [catch {checkshape result} catch_result] { + set mistake 1 + } else { + set mistake 0 + } + + if { $mistake != 0} { + puts "Faulty BUC60703 : here is checking problem. See also OCC438: 919 D3 and D4" + } else { + puts "BUC60703 : here is NOT checking problem" + } +} +set square 505.797 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/buc60704 b/tests/bugs/modalg_1/buc60704 new file mode 100755 index 0000000000..85a5fed6d0 --- /dev/null +++ b/tests/bugs/modalg_1/buc60704 @@ -0,0 +1,15 @@ + +puts "========================" +puts "BUC60704" +puts "BUC60709" +puts "========================" + +restore [locate_data_file buc60704a.brep] p +checkshape p +restore [locate_data_file buc60704b.brep] s +checkshape s + +bfuse result p s + +set square 39.0889 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60708 b/tests/bugs/modalg_1/buc60708 new file mode 100755 index 0000000000..906f393778 --- /dev/null +++ b/tests/bugs/modalg_1/buc60708 @@ -0,0 +1,24 @@ + +puts "===========" +puts "BUC60708" +puts "===========" + +restore [locate_data_file buc60708a.brep] a +checkshape a +restore [locate_data_file buc60708b.brep] b +checkshape b + +bcommon result a b + +set faces [explode result f] +set n [llength $faces] + +set end [lindex $faces [expr $n-1]] + +if { $end != "result_4" } { + puts " Faulty :Common operation was made wrongly" +} else { + puts " Common operation was made successfully" +} +set square 13.4871 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60712 b/tests/bugs/modalg_1/buc60712 new file mode 100755 index 0000000000..dfe87f1ddb --- /dev/null +++ b/tests/bugs/modalg_1/buc60712 @@ -0,0 +1,50 @@ +puts "==========" +puts "BUC60712" +puts "==========" +puts "" +puts "==================================" +puts "It takes visual check for this BUG" +puts "==================================" + +# +# OCC22070: Grid Tests: CHL set, detected problems +# Problems: +# The shape buc60712a.brep is self-interferred. +# thus it can not be used as the argument for Boolean Operation Algorithm. +# +# Proposals: +# The Case chl/902/F3 should be removed or rewritten: + +restore [locate_data_file buc60712a.brep] a +checkshape a + +restore [locate_data_file buc60712b.brep] b +checkshape b + +# Recompute "a" shape +explode a f + +bop a_1 a_2 +bopfuse r12 + +bop a_3 a_4 +bopfuse r34 + +bop r12 r34 + +bopfuse r + +# Start boolean operation +bop r b +bopsection result + +# Check result +regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection result] full num +# Resume +if { $num != 0 } { + puts " Faulty BUC60712: Result shape is INcorrect !!! " +} else { + puts "BUC60712 OK: Result shape is correct " +} +set length 1.88145 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60714 b/tests/bugs/modalg_1/buc60714 new file mode 100755 index 0000000000..b0d5e443e4 --- /dev/null +++ b/tests/bugs/modalg_1/buc60714 @@ -0,0 +1,23 @@ + +puts "========================" +puts "BUC60714" +puts "========================" + +profile f x 30 y 20 x -30 +explode f w +vertex v1 0 0 0 +vertex v2 0 -10 -10 +edge e v1 v2 + +wire w e +mksweep f_1 +setsweep -FR +addsweep w + +######## +#does'nt work +buildsweep result -C -S + +set square 1979.9 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/buc60728 b/tests/bugs/modalg_1/buc60728 new file mode 100755 index 0000000000..278e19f85f --- /dev/null +++ b/tests/bugs/modalg_1/buc60728 @@ -0,0 +1,22 @@ + +puts "========================" +puts "BUC60728" +puts "========================" +puts "" +#################################################### +## Infinite loop in section. Section between the two attached faces never finish. +#################################################### + +restore [locate_data_file buc60728a.brep] s1 +restore [locate_data_file buc60728b.brep] s2 +build3d s1 +checkshape s1 +checkshape s2 + +bsection result s1 s2 + +#checksection res +#checkshape res + +set length 238.032 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60744 b/tests/bugs/modalg_1/buc60744 new file mode 100755 index 0000000000..e5cde98d9e --- /dev/null +++ b/tests/bugs/modalg_1/buc60744 @@ -0,0 +1,47 @@ +pload QAcommands + +puts "========================" +puts "BUC60744" +puts "========================" +puts "" + +restore [locate_data_file buc60744a.brep] a +restore [locate_data_file buc60744b.brep] b + +set che [checkshape a] +if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty BUC60744 (shape 1): Source shape is invalid. It was detected by Checkshape command" + puts "Body of the script was NOT executed" + renamevar a result +} else { + puts "BUC60744 OK (shape 1): Source shape is valid" + + set che [checkshape b] + if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty BUC60744 (shape 2): Source shape is invalid. It was detected by Checkshape command" + puts "Body of the script was NOT executed" + renamevar b result + } else { + puts "BUC60744 OK (shape 2): Source shape is valid" + + ksection result a b 1000 0.0001 0.00001 0 + + set ne [llength [explode result e]] + set nv [llength [explode result v]] + + if {$ne >= $nv} { + puts [format "Faulty : the number of edges is %s, but the number of vertexes is %s." $ne $nv] + } + } +} +bsection result a b + +set ne [llength [explode result e]] +set nv [llength [explode result v]] + +if {$ne >= $nv} { + puts [format "Faulty : the number of edges is %s, but the number of vertexes is %s." $ne $nv] +} + +set length 228.386 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60776_1 b/tests/bugs/modalg_1/buc60776_1 new file mode 100755 index 0000000000..108307777a --- /dev/null +++ b/tests/bugs/modalg_1/buc60776_1 @@ -0,0 +1,16 @@ + +puts "========================" +puts "BUC60776" +puts "========================" + +restore [locate_data_file buc60776a.brep] a +checkshape a +restore [locate_data_file buc60776b.brep] b +checkshape b +bfuse result a b + +set square 60771.3 + +set 2dviewer 1 + + diff --git a/tests/bugs/modalg_1/buc60776_2 b/tests/bugs/modalg_1/buc60776_2 new file mode 100755 index 0000000000..a8e30d8d1d --- /dev/null +++ b/tests/bugs/modalg_1/buc60776_2 @@ -0,0 +1,15 @@ + +puts "========================" +puts "BUC60776" +puts "========================" + +restore [locate_data_file buc60776c.brep] a +checkshape a +restore [locate_data_file buc60776d.brep] b +checkshape b +bsection result a b + +set length 111.405 + +set 2dviewer 1 + diff --git a/tests/bugs/modalg_1/buc60777 b/tests/bugs/modalg_1/buc60777 new file mode 100755 index 0000000000..1ef9960273 --- /dev/null +++ b/tests/bugs/modalg_1/buc60777 @@ -0,0 +1,24 @@ + +puts "========================" +puts "BUC60777" +puts "========================" + +profile p x 30 y -10 x 10 y 10 x 10 y 30 t -30 -20 t -30 20 +mkoffset result p 1 -1 +explode p w + +regexp {Mass +: +([-0-9.+eE]+)} [lprops result_1] full end +regexp {Mass +: +([-0-9.+eE]+)} [lprops p_1] full end1 + +if { $end >= $end1} { + puts " Faulty Mkoffset operation was made wrongly" + } else { + puts " Mkoffset operation was made successfully" +} + +# Lenth of "profile" : 203.733802110964 + +renamevar result_1 result + +set length 191.044 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60782_1 b/tests/bugs/modalg_1/buc60782_1 new file mode 100755 index 0000000000..c937fdef4a --- /dev/null +++ b/tests/bugs/modalg_1/buc60782_1 @@ -0,0 +1,38 @@ +puts "TODO OCC12345 ALL: An exception was caught" +puts "TODO OCC12345 ALL: Exception" +puts "TODO OCC12345 ALL: Faulty BUC60782: mkoffset works wrongly" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +puts "========================" +puts "BUC60782" +puts "CASE 1" +puts "========================" +puts "" +puts "Results of Geom2d_OffsetCurve are sometimes strange (not correct). " +puts "" + +restore [locate_data_file buc60782a.brep] a +set che [checkshape a] +if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty BUC60782 (case 1): Source shape is invalid" +} else { + puts "BUC60782 OK (case 1): Sourse shape is correct" +} + +set che [checkshape a rr] +if { [regexp {OK} $che ] != 1} { + puts "Faulty : mistakes are found in SOURCE shape by checkshape command" + puts "Body of the script was not executed" +} else { + puts "Checking of SOURCE shape by checkshape - OK" + if [catch { mkoffset result a 1 10 } catch_result] { + puts "Faulty BUC60782: mkoffset works wrongly" + renamevar a result + } else { + puts "OK BUC60782: offset is created" + tpcompound result + } +} + +set square 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60782_2 b/tests/bugs/modalg_1/buc60782_2 new file mode 100755 index 0000000000..7d042a14b8 --- /dev/null +++ b/tests/bugs/modalg_1/buc60782_2 @@ -0,0 +1,36 @@ +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_2" +puts "TODO OCC12345 ALL: Faulty : mistakes are found in SOURCE shape by checkshape command" +puts "TODO OCC12345 ALL: Faulty BUC60782" + +puts "========================" +puts "BUC60782" +puts "CASE 2" +puts "========================" +puts "" +puts "Results of Geom2d_OffsetCurve are sometimes strange (not correct). " +puts "" + +restore [locate_data_file buc60782b.brep] a +set che [checkshape a] +if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty BUC60782 (case 2): Source shape is invalid" +} else { + puts "BUC60782 OK (case 2): Sourse shape is correct" +} + +set che [checkshape a rr] +if { [regexp {OK} $che ] != 1} { + puts "Faulty : mistakes are found in SOURCE shape by checkshape command" + puts "Body of the script was not executed" +} else { + puts "Checking of SOURCE shape by checkshape - OK" + if [catch { mkoffset result a 1 10 } catch_result] { + puts "Faulty BUC60782: mkoffset works wrongly" + renamevar a result + } else { + puts "OK BUC60782: offset is created" + tpcompound result + } + set square 0 + set 2dviewer 0 +} diff --git a/tests/bugs/modalg_1/buc60782_3 b/tests/bugs/modalg_1/buc60782_3 new file mode 100755 index 0000000000..e1eb11f6d3 --- /dev/null +++ b/tests/bugs/modalg_1/buc60782_3 @@ -0,0 +1,39 @@ +puts "TODO OCC12345 ALL: An exception was caught" +puts "TODO OCC12345 ALL: Exception" +puts "TODO OCC12345 ALL: Faulty BUC60782: mkoffset works wrongly" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + + +puts "========================" +puts "BUC60782" +puts "CASE 3" +puts "========================" +puts "" +puts "Results of Geom2d_OffsetCurve are sometimes strange (not correct). " +puts "" + +restore [locate_data_file buc60782c.brep] a + +set che [checkshape a] +if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty BUC60782 (case 3): Source shape is invalid" +} else { + puts "BUC60782 OK (case 3): Sourse shape is correct" +} + +set che [checkshape a rr] +if { [regexp {OK} $che ] != 1 } { + puts "Faulty : mistakes are found in SOURCE shape by checkshape command" + puts "Body of the script was not executed" +} else { + puts "Checking of SOURCE shape by checkshape - OK" + if [catch { mkoffset result a 1 10 } catch_result] { + puts "Faulty BUC60782: mkoffset works wrongly" + renamevar a result + } else { + puts "OK BUC60782: offset is created" + tpcompound result + } +} +set square 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60787_1 b/tests/bugs/modalg_1/buc60787_1 new file mode 100755 index 0000000000..2119030376 --- /dev/null +++ b/tests/bugs/modalg_1/buc60787_1 @@ -0,0 +1,30 @@ +puts "TODO OCC12345 ALL: Faulty : result should be a shell, but not a compound of faces" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +puts "========" +puts "BUC60787" +puts "BUC60783" +puts "========" + +#restore Common_Shell_Case2.brep S1 +#restore Common_Solid_Case2.brep S2 + +restore [locate_data_file buc60787a.brep] S1 +checkshape S1 +restore [locate_data_file buc60787b.brep] S2 +checkshape S1 + +bcommon result S1 S2 + +set nb_info [nbshapes result] +regexp {COMPOUND +: +([-0-9.+eE]+)} $nb_info full err +regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full err1 + +if { $err != 0 || $err1 != 1} { + puts "Faulty : result should be a shell, but not a compound of faces" +} else { + puts "BUC60787 - OK" +} + +set square 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60787_2 b/tests/bugs/modalg_1/buc60787_2 new file mode 100755 index 0000000000..48e5ec78e1 --- /dev/null +++ b/tests/bugs/modalg_1/buc60787_2 @@ -0,0 +1,29 @@ +puts "TODO OCC12345 ALL: Faulty : result should be a shell, but not a compound of faces" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +puts "========" +puts "BUC60787" +puts "BUC60783" +puts "========" + +#restore Cut_Shell_Case2.brep S1 +#restore Cut_Solid_Case2.brep S2 + +restore [locate_data_file buc60787c.brep] S1 +checkshape S1 +restore [locate_data_file buc60787d.brep] S2 +checkshape S2 + +bcut result S1 S2 + +set nb_info [nbshapes result] +regexp {COMPOUND +: +([-0-9.+eE]+)} $nb_info full err +regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full err1 + +if { $err != 0 || $err1 != 1} { + puts "Faulty : result should be a shell, but not a compound of faces" +} else { + puts "BUC60787 - OK" +} +set square 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60788_1 b/tests/bugs/modalg_1/buc60788_1 new file mode 100755 index 0000000000..bc6ba4bc1b --- /dev/null +++ b/tests/bugs/modalg_1/buc60788_1 @@ -0,0 +1,28 @@ + +puts "============" +puts "BUC60788" +puts "case 1" +puts "============" + +#restore Intersection_Shell1_Case1.brep S1 +#restore Intersection_Shell2_Case1.brep S2 + +restore [locate_data_file buc60788a.brep] S1 +checkshape S1 +restore [locate_data_file buc60788b.brep] S2 +checkshape S2 + +bsection result S1 S2 + +set nb_info [nbshapes result] +regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full err +regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full err1 + +if { $err != 4 && $err1 != 3} { + puts "Faulty : result (res) is incorrect" +} else { + puts "BUC60788 - OK" +} + +set length 750 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60788_2 b/tests/bugs/modalg_1/buc60788_2 new file mode 100755 index 0000000000..5b9c8ff92c --- /dev/null +++ b/tests/bugs/modalg_1/buc60788_2 @@ -0,0 +1,29 @@ +puts "TODO OCC12345 ALL: Faulty : result should be a shell, but not a compound of faces" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +puts "========" +puts "BUC60788" +puts "case 3" +puts "========" + +#restore Cut_Shell_Case2.brep S1 +#restore Cut_Solid_Case2.brep S2 + +restore [locate_data_file buc60788e.brep] S1 +checkshape S1 +restore [locate_data_file buc60787d.brep] S2 +checkshape S2 + +bcut result S1 S2 + +set nb_info [nbshapes result] +regexp {COMPOUND +: +([-0-9.+eE]+)} $nb_info full err +regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full err1 + +if { $err != 0 || $err1 != 1} { + puts "Faulty : result should be a shell, but not a compound of faces" +} else { + puts "BUC60788 - OK" +} +set square 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60788_3 b/tests/bugs/modalg_1/buc60788_3 new file mode 100755 index 0000000000..dbf3fd88dd --- /dev/null +++ b/tests/bugs/modalg_1/buc60788_3 @@ -0,0 +1,29 @@ +puts "TODO OCC12345 ALL: Faulty : result should be a shell, but not a compound of faces" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +puts "========" +puts "BUC60788" +puts "case 2" +puts "========" + +#restore Common_Shell_Case2.brep S1 +#restore Common_Solid_Case2.brep S2 + +restore [locate_data_file buc60788c.brep] S1 +checkshape S1 +restore [locate_data_file buc60787b.brep] S2 +checkshape S1 + +bcommon result S1 S2 + +set nb_info [nbshapes result] +regexp {COMPOUND +: +([-0-9.+eE]+)} $nb_info full err +regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full err1 + +if { $err != 0 || $err1 != 1} { + puts "Faulty : result should be a shell, but not a compound of faces" +} else { + puts "BUC60788 - OK" +} +set square 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60789_1 b/tests/bugs/modalg_1/buc60789_1 new file mode 100755 index 0000000000..b35e264144 --- /dev/null +++ b/tests/bugs/modalg_1/buc60789_1 @@ -0,0 +1,26 @@ + +puts "========" +puts "BUC60789" +puts "========" +puts "" + +#restore buc60789a.brep S1 +restore [locate_data_file buc60787b.brep] S1 +### (by apn during classification) +checkshape S1 +restore [locate_data_file buc60789b.brep] S2 +checkshape S2 + +bcommon result S1 S2 + +set nb_info [nbshapes result] +regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve +regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full ed + +if { $ve != 0 && $ed != 0 } { + puts " BUC60789 OK: COMMON operation was made properly" +} else { + puts "Faulty BUC60789: COMMON operation was made wrongly" +} +set length 78.3594 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60789_2 b/tests/bugs/modalg_1/buc60789_2 new file mode 100755 index 0000000000..8ae8dde94e --- /dev/null +++ b/tests/bugs/modalg_1/buc60789_2 @@ -0,0 +1,26 @@ + +puts "========" +puts "BUC60789" +puts "========" +puts "" + +#restore buc60789c.brep S1 +##by apn +restore [locate_data_file buc60787b.brep] S1 +checkshape S1 +restore [locate_data_file buc60789d.brep] S2 +checkshape S2 + +bcut result S2 S1 + +set nb_info [nbshapes result] +regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve +regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full ed + + if { $ve != 0 && $ed != 0 } { + puts " BUC60789 OK: CUT operation was made properly" + } else { + puts "Faulty BUC60789: CUT operation was made wrongly" + } +set length 288.856 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60801 b/tests/bugs/modalg_1/buc60801 new file mode 100755 index 0000000000..2adb282d60 --- /dev/null +++ b/tests/bugs/modalg_1/buc60801 @@ -0,0 +1,19 @@ + +puts "========================" +puts "BUC60801" +puts "========================" + +box b -10 -10 -10 30 40 40 +box a1 -20 0 -20 20 20 100 +box a2 0 20 -20 50 20 100 +box c -20 -20 20 100 100 100 +bcut r1 b a1 +bcut r2 r1 a2 +bcut r3 r2 c +checkshape r3 + +renamevar r3 result + +set square 6400 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/buc60803 b/tests/bugs/modalg_1/buc60803 new file mode 100755 index 0000000000..78d48220fa --- /dev/null +++ b/tests/bugs/modalg_1/buc60803 @@ -0,0 +1,15 @@ + +puts "========================" +puts "BUC60803" +puts "========================" + +restore [locate_data_file buc60803a.brep] a +checkshape a +restore [locate_data_file buc60803b.brep] b +checkshape b + +bfuse result a b + +set square 1.86064e+07 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/buc60830_4 b/tests/bugs/modalg_1/buc60830_4 new file mode 100755 index 0000000000..d0b5e69dcf --- /dev/null +++ b/tests/bugs/modalg_1/buc60830_4 @@ -0,0 +1,20 @@ +puts "=============" +puts "BUC60830" +puts "BUC60829" +puts "=============" + +restore [locate_data_file BUC60830-face2.brep] f +checkshape f + +set che [checkshape f rr] +if { [regexp {OK} $che] != 1 } { + puts "Faulty : mistakes are found in SOURCE shape by checkshape command" + puts "Body of the script was not executed" +} else { + puts "Checking of SOURCE shape by checkshape - OK" + mkoffset result f 1 3 + renamevar result_1 result +} + +set length 81.5088 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60839 b/tests/bugs/modalg_1/buc60839 new file mode 100755 index 0000000000..cad2dbf042 --- /dev/null +++ b/tests/bugs/modalg_1/buc60839 @@ -0,0 +1,17 @@ + +puts "============" +puts "BUC60839" +puts "============" +puts "" + +restore [locate_data_file BUC60839-1.brep] a +checkshape a +restore [locate_data_file BUC60839-2.brep] b +checkshape b + +puts "Starting fuse operation" + +bfuse result a b + +set square 27341.6 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60841 b/tests/bugs/modalg_1/buc60841 new file mode 100755 index 0000000000..b12cccc345 --- /dev/null +++ b/tests/bugs/modalg_1/buc60841 @@ -0,0 +1,14 @@ + +puts "========" +puts "BUC60841" +puts "========" + +restore [locate_data_file buc60841a.brep] sh1 +checkshape sh1 +restore [locate_data_file buc60841b.brep] sh2 +checkshape sh2 + +bfuse result sh1 sh2 + +set square 890971 +set 2dviewer 1 diff --git a/tests/bugs/modalg_1/buc60849 b/tests/bugs/modalg_1/buc60849 new file mode 100755 index 0000000000..cf84ffe5ef --- /dev/null +++ b/tests/bugs/modalg_1/buc60849 @@ -0,0 +1,19 @@ + +puts "============" +puts "BUC60849" +puts "============" +puts "" + +restore [locate_data_file BUC60849.brep] result +checkshape result + +set bndb [ lindex [bounding result] 3 ] + +if { $bndb > 100.000001 } { + puts "Faulty BUC60849 : Bounding box of spherical surface is created wroughly." +} else { + puts "BUC60849 OK :Bounding box of spherical surface is created properly." +} +set square 125663 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/buc60865 b/tests/bugs/modalg_1/buc60865 new file mode 100755 index 0000000000..0b3f61ac12 --- /dev/null +++ b/tests/bugs/modalg_1/buc60865 @@ -0,0 +1,28 @@ + +puts "============" +puts "BUC60865" +puts "BUC60864" +puts "============" +puts "" +########################## +## Section gives duplicate edges. +########################## + +restore [locate_data_file BUC60865_sh6.brep] sh +checkshape sh + +plane pl 1.1 0.99999 1 0 1 0 +mkface f pl +bsection result sh f + +set nb_info [nbshapes result] +regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full ed + +if { $ed == 5 } { + puts " BUC60865 : SECTION operation was made properly" +} else { + puts "Faulty BUC60865: SECTION operation was made wrongly" +} +set length 4.5 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/buc60878_1 b/tests/bugs/modalg_1/buc60878_1 new file mode 100755 index 0000000000..c5fe7f4740 --- /dev/null +++ b/tests/bugs/modalg_1/buc60878_1 @@ -0,0 +1,25 @@ +puts "=============" +puts "BUC60878" +puts "=============" + +#restore BUC60878-wire1.brep a +#########dtext -10 -10 -60 "THE CASE IS INCORRECT" +#mkoffset r a 1 0.5 +#tpcompound res +#checkshape res + +restore [locate_data_file BUC60878-wire1.brep] a +checkshape a + +set che [checkshape a rr] +if { [regexp {OK} $che] != 1 } { + puts "Faulty : mistakes are found in SOURCE shape by checkshape command" + puts "Body of the script was not executed" +} else { + puts "Checking of SOURCE shape by checkshape - OK" + mkoffset result a 1 0.5 + renamevar result_1 result +} + +set length 370.796 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60878_2 b/tests/bugs/modalg_1/buc60878_2 new file mode 100755 index 0000000000..f68c06d12d --- /dev/null +++ b/tests/bugs/modalg_1/buc60878_2 @@ -0,0 +1,25 @@ +puts "=============" +puts "BUC60878" +puts "=============" + +#restore BUC60878-wire3.brep a +#########dtext -10 -10 -60 "THE CASE IS INCORRECT" +#mkoffset r a 1 0.25 +#tpcompound res +#checkshape res + +restore [locate_data_file BUC60878-wire3.brep] a +checkshape a + +set che [checkshape a rr] +if { [regexp {OK} $che] != 1 } { + puts "Faulty : mistakes are found in SOURCE shape by checkshape command" + puts "Body of the script was not executed" +} else { + puts "Checking of SOURCE shape by checkshape - OK" + mkoffset result a 1 0.25 + renamevar result_1 result +} + +set length 11.2406 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60878_3 b/tests/bugs/modalg_1/buc60878_3 new file mode 100755 index 0000000000..a67e88e0e8 --- /dev/null +++ b/tests/bugs/modalg_1/buc60878_3 @@ -0,0 +1,25 @@ +puts "=============" +puts "BUC60878" +puts "=============" + +#restore BUC60878-wire5.brep a +###############dtext 0 -10 0 "THE CASE IS INCORRECT" +#mkoffset r a 1 4 +#tpcompound res +#checkshape res + +restore [locate_data_file BUC60878-wire5.brep] a +checkshape a + +set che [checkshape a rr] +if { [regexp {OK} $che] != 1 } { + puts "Faulty : mistakes are found in SOURCE shape by checkshape command" + puts "Body of the script was not executed" +} else { + puts "Checking of SOURCE shape by checkshape - OK" + mkoffset result a 1 4 + renamevar result_1 result +} + +set length 107.351 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60880 b/tests/bugs/modalg_1/buc60880 new file mode 100755 index 0000000000..e488e343ed --- /dev/null +++ b/tests/bugs/modalg_1/buc60880 @@ -0,0 +1,38 @@ + +puts "============" +puts "BUC60880" +puts "============" +puts "" +########################################## +## We have overlapping edges when section a shell by plane. +########################################## + +restore [locate_data_file BUC60880_sec_error2.brep] sh +checkshape sh + +plane pl 65000 19000 2600 1 0 0 +mkface f pl + +bsection result sh f + +set nb_info [nbshapes result] +regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full ed + +if { $ed == 1 } { + puts "BUC60880 OK: SECTION operation was made properly" +} else { + explode result e + set status [OCC333 result_1 result_2] + if {[llength ${status}] < 1} { + puts "BUC60880 ERROR" + } else { + regexp {([-0-9.+eE]+)} $status full code + if { ${code} == 3 || ${code} == 2} { + puts "BUC60880 : Section command works properly" + } else { + puts "Faulty BUC60880: Section was made WRONGLY" + } + } +} +set length 1424.94 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60881 b/tests/bugs/modalg_1/buc60881 new file mode 100755 index 0000000000..0c4a2f7b2b --- /dev/null +++ b/tests/bugs/modalg_1/buc60881 @@ -0,0 +1,15 @@ + +puts "============" +puts "BUC60881" +puts "============" +puts "" + +restore [locate_data_file BUC60881.brep] a +explode a +checkshape a_1 +checkshape a_1 + +bfuse result a_1 a_2 + +set square 34069 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60882 b/tests/bugs/modalg_1/buc60882 new file mode 100755 index 0000000000..0d57ec2e40 --- /dev/null +++ b/tests/bugs/modalg_1/buc60882 @@ -0,0 +1,45 @@ +puts "============" +puts "BUC60882" +puts "============" +puts "" +####################################################################### +## The edge is corrupted after applying command "fsameparameter": tolerance is increased up to 1e+50 +####################################################################### + +pload XDE + +restore [locate_data_file BUC60882_samepar.brep] result + +set che [checkshape result] + +if { [regexp {Faulty} $che ] == 1 } { + puts "Warning BUC60882: Source shape is NOT correct. It was detected by Checkshape command" +} else { + puts "BUC60882 OK: Source shape is valid" +} + +puts "*** Before : " + +regexp {Tolerance +MAX=([-0-9.+eE]+)} [tolerance result] full MaxTol + +puts "MaxTolerance = $MaxTol" +if { $MaxTol > 1 } { + puts "Warning : Tolerance of Source edge is more then 1.0" +} else { + puts " Tolerance of source edge is less then 1.0" +} + +fsameparameter result 1e-5 + +puts "*** After : " +regexp {Tolerance +MAX=([-0-9.+eE]+)} [tolerance result] full MaxTol_1 + +puts "MaxTolerance = $MaxTol_1" +if { $MaxTol_1 > $MaxTol } { + puts [format "Faulty BUC60882 : Tolerance of Result edge increased and it is equal to %s" $MaxTol_1] +} else { + puts " BUC60882 OK: Tolerance of Result edge is less or equal to tolerance of Sourse edge." +} + +set length 1768.53 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60896 b/tests/bugs/modalg_1/buc60896 new file mode 100755 index 0000000000..6f8c0b5dcc --- /dev/null +++ b/tests/bugs/modalg_1/buc60896 @@ -0,0 +1,18 @@ + +puts "============" +puts "BUC60896" +puts "============" +puts "" +############################################################### +## If give command "sameparameter edge" on attached edge in the DRAW this command hang. +############################################################### + +restore [locate_data_file BUC60896_edge.rle] result +# checkshape res + +sameparameter result +sameparameter result tol 1.e-2 +sameparameter result tol 1000 + +set length 48288.3 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60898 b/tests/bugs/modalg_1/buc60898 new file mode 100755 index 0000000000..1a252cc45b --- /dev/null +++ b/tests/bugs/modalg_1/buc60898 @@ -0,0 +1,26 @@ +puts "TODO OCC12345 ALL: Faulty BUC60898: here is reading problem" + +puts "===========" +puts " BUC60898" +puts "===========" +puts "" + +pload XDE + +if [catch { igesbrep [locate_data_file $filedir/buc60898.igs] a *} result] { +## rename to BUC60898.igs + puts "Faulty BUC60898: here is reading problem" +} else { + puts "BUC60898 OK" + tpcompound a + + if [catch {sewing result 1e-7 a } catch_result] { + puts "Faulty BUC60898: function SEWING gives except" + } else { + puts " BUC60898 OK: function SEWING works without except" + } + set square 0 + set 2dviewer 0 +} + + diff --git a/tests/bugs/modalg_1/buc60899_1 b/tests/bugs/modalg_1/buc60899_1 new file mode 100755 index 0000000000..115e9c8a2a --- /dev/null +++ b/tests/bugs/modalg_1/buc60899_1 @@ -0,0 +1,48 @@ + +puts "============" +puts "BUC60899" +puts "============" +puts "" +##################################################### +## Execution of the script prism_sec.tcl gives exception "NumericError". +##################################################### + +set n 2 +set dx 4 +set sx 1 +set sz 10 +set xc [dval (2*$dx+2*$sx)*$n/2] +set zc -30 +set r [dval $xc*0.9] + +set x 0 +set y -50 +set z 0 +set pol "polyline w $x $y $z" +for {set i 1} {$i <= $n} {incr i} { + set x [dval $x+$dx] + set pol "$pol $x $y $z" + set x [dval $x+$sx] + set z [dval $z+$sz] + set pol "$pol $x $y $z" + set x [dval $x+$dx] + set pol "$pol $x $y $z" + set x [dval $x+$sx] + set z [dval $z-$sz] + set pol "$pol $x $y $z" +} + +eval $pol +circle c $xc 0 $zc $r +mkedge c c + +prism cyl c 0 0 -$zc*2 inf +prism crg w 0 -$y*2 0 inf + +bsection result crg cyl + +set length 15.1392 +set 2dviewer 0 + +# checksection res +# checkshape res diff --git a/tests/bugs/modalg_1/buc60899_2 b/tests/bugs/modalg_1/buc60899_2 new file mode 100755 index 0000000000..09757b8361 --- /dev/null +++ b/tests/bugs/modalg_1/buc60899_2 @@ -0,0 +1,61 @@ + +puts "============" +puts "BUC60899" +puts "============" +puts "" +##################################################### +## Execution of the script prism_sec.tcl gives exception "NumericError". +##################################################### + +set n 2 +set dx 4 +set sx 1 +set sz 10 +set xc [dval (2*$dx+2*$sx)*$n/2] +set zc -30 +set r [dval $xc*0.9] + +set x 0 +set y -50 +set z 0 +set pol "polyline w $x $y $z" +for {set i 1} {$i <= $n} {incr i} { + set x [dval $x+$dx] + set pol "$pol $x $y $z" + set x [dval $x+$sx] + set z [dval $z+$sz] + set pol "$pol $x $y $z" + set x [dval $x+$dx] + set pol "$pol $x $y $z" + set x [dval $x+$sx] + set z [dval $z-$sz] + set pol "$pol $x $y $z" +} + +eval $pol +polyline c $xc-$r -$r*2 $zc $xc+$r -$r*2 $zc $xc+$r $r*2 $zc $xc-$r $r*2 $zc $xc-$r -$r*2 $zc + +prism cyl c 0 0 -$zc*2 inf +prism crg w 0 -$y*2 0 inf +bsection result crg cyl + +#checksection res +#checkshape res + +set nb_info [nbshapes result] +regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full edgeness + + #set fullness [ nbshapes res ] + #puts "$fullness" + #set qq [ lindex $fullness 0 ] + #set edgeness [ lindex $fullness 10 ] + # puts "$edgeness" + +if { $edgeness == 1 } { + puts "Shape is empty, it is Faulty result" +} else { + puts "Shape is not empty, OK" +} + +set length 162.299 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60901 b/tests/bugs/modalg_1/buc60901 new file mode 100755 index 0000000000..7c9395f234 --- /dev/null +++ b/tests/bugs/modalg_1/buc60901 @@ -0,0 +1,62 @@ + +puts "============" +puts "BUC60901" +puts "============" +puts "" +################################################################ +## We should get the edges forming a closed intersection line but we see breaks. +################################################################ + +set n 3 +set dx 1 +set sx 20 +set sz 10 + +set xc [dval (2*$dx+2*$sx)*$n/2] +set yc 0 +set zc [dval $sz*10] +set nxc 0.5 +set nyc -0.3 +set nzc 1 +set r [dval $xc*0.9] + +set x 0 +set y [dval -$r*1.2] +set z 0 +set pol "polyline w $x $y $z" +for {set i 1} {$i <= $n} {incr i} { + set x [dval $x+$dx] + set pol "$pol $x $y $z" + set x [dval $x+$sx] + set z [dval $z+$sz] + set pol "$pol $x $y $z" + set x [dval $x+$dx] + set pol "$pol $x $y $z" + set x [dval $x+$sx] + set z [dval $z-$sz] + set pol "$pol $x $y $z" +} + +eval $pol +circle c $xc $yc $zc $nxc $nyc $nzc $r +mkedge c c + +set lcyl [dval -$zc*2] +set lcrg [dval -$y*2] + +prism cyl c 0 0 $lcyl +prism crg w 0 $lcrg 0 +bsection result crg cyl + +set nb_info [nbshapes result] +regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full nb_vertices +regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full nb_edges + +if { $nb_vertices != $nb_edges } { + puts "Section is opened: Faulty shape" +} else { + puts "Section is closed: OK" +} + +set length 350.404 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60905 b/tests/bugs/modalg_1/buc60905 new file mode 100755 index 0000000000..29a629ed19 --- /dev/null +++ b/tests/bugs/modalg_1/buc60905 @@ -0,0 +1,24 @@ + +puts "============" +puts "BUC60905" +puts "============" +puts "" +puts "TODO CR23530 ALL: Faulty shapes in variables faulty_1 to faulty_" + +######################################################### +## shape contains open shells if sewing would be made with big tolerance invalid shape +## will be produced, and visualization crashes. +######################################################### + +restore [locate_data_file BUC60905.brep] a +# checkshape a + +sewing result 10 a + +vinit +vdisplay result + +# checkshape res + +set square 270868 +set 3dviewer 0 diff --git a/tests/bugs/modalg_1/buc60909 b/tests/bugs/modalg_1/buc60909 new file mode 100755 index 0000000000..afbcfe6e23 --- /dev/null +++ b/tests/bugs/modalg_1/buc60909 @@ -0,0 +1,16 @@ + +puts "============" +puts "BUC60909" +puts "============" +puts "" + +box boite 200 200 200 +nexplode boite F +profile cont S boite_4 F 0 50 X 50 Y 100 X -50 +featrevol boite cont boite_4 0 0 200 0 -1 0 1 1 +featperform revol result boite_1 + +set square 265343 +set 2dviewer 0 + + diff --git a/tests/bugs/modalg_1/buc60922 b/tests/bugs/modalg_1/buc60922 new file mode 100755 index 0000000000..81374aafea --- /dev/null +++ b/tests/bugs/modalg_1/buc60922 @@ -0,0 +1,27 @@ + +puts "============" +puts "BUC60922" +puts "============" +puts "" +############################# +## Exception NumericError in Extrema +############################# + +restore [locate_data_file BUC60907_px1.rle] sh +checkshape sh + +line l 40 0 5 0 1 0 +mkedge e l +subshape sh F 379 +mksurface result sh_379 + +puts "Info: compute extrema" +extrema result l + +puts "Info: compute distmini" +distmini r sh e + +mkface result result + +set square 157.932 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60926 b/tests/bugs/modalg_1/buc60926 new file mode 100755 index 0000000000..d5f8bfcc6b --- /dev/null +++ b/tests/bugs/modalg_1/buc60926 @@ -0,0 +1,20 @@ + +puts "============" +puts "BUC60926" +puts "============" +puts "" +###################################################################### +## Creating a sphere of radius 1 at 0,0,0 and a cone with r1=1 r2=2 height=2 angle=3*PI/2 at 1,1,0 and +## then using BRepAlgoAPI_Fuse on the two solids will trigger a segmentation fault. +###################################################################### + +restore [locate_data_file shading_132.brep] a +checkshape a + +restore [locate_data_file BUC60926-2.brep] b +checkshape b + +bfuse result a b + +set square 41.7175 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60927 b/tests/bugs/modalg_1/buc60927 new file mode 100755 index 0000000000..2e32accb5a --- /dev/null +++ b/tests/bugs/modalg_1/buc60927 @@ -0,0 +1,16 @@ + +puts "============" +puts "BUC60927" +puts "============" + +restore [locate_data_file BUC60927.brep] a + +explode a +checkshape a_1 +checkshape a_2 + +bcut result a_2 a_1 + +set square 94795.3 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/buc60930 b/tests/bugs/modalg_1/buc60930 new file mode 100755 index 0000000000..80d4a4df0b --- /dev/null +++ b/tests/bugs/modalg_1/buc60930 @@ -0,0 +1,21 @@ + +puts "============" +puts "BUC60930" +puts "============" +puts "" +###################################### +## Exception ConstructionError in LocOpe_SplitShape. +###################################### + +restore [locate_data_file BUC60930_splitshape.brep] c +explode c +checkshape c_1 +checkshape c_2 + +renamevar c_1 f +renamevar c_2 e + +splitshape result f f e + +set square 13.3392 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60934 b/tests/bugs/modalg_1/buc60934 new file mode 100755 index 0000000000..5a6fff90bc --- /dev/null +++ b/tests/bugs/modalg_1/buc60934 @@ -0,0 +1,13 @@ + +puts "============" +puts "BUC60934" +puts "============" + +restore [locate_data_file BUC60934.brep] a +checkshape a + +mkplane result a + +set square 40303.1 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/buc60942 b/tests/bugs/modalg_1/buc60942 new file mode 100755 index 0000000000..4cbddcdc50 --- /dev/null +++ b/tests/bugs/modalg_1/buc60942 @@ -0,0 +1,35 @@ + +puts "============" +puts "BUC60942" +puts "============" +############################################################### +## SplitShape algorithm modifies original shape (increases vertex tolerance of a plitting edge). +############################################################### + +restore [locate_data_file BUC60942_splitshape.brep] c +explode c +checkshape c_1 +checkshape c_2 + +renamevar c_1 f +renamevar c_2 w + +set tol1 [maxtolerance w] +regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tol1 full MaxEdgeTol1 +regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tol1 full MaxVertexTol1 + +splitshape result f f w + +set tol2 [maxtolerance w] +regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tol2 full MaxEdgeTol2 +regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tol2 full MaxVertexTol2 + + +if { $MaxEdgeTol1 < $MaxEdgeTol2 || $MaxVertexTol1 < $MaxVertexTol1 } { + puts "Faulty BUC60942: max tolerance of the input wire has been increased by about 10 times." +} else { + puts "BUC60942 OK: Tolerance of shape is correct" +} + +set square 37.7032 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60946 b/tests/bugs/modalg_1/buc60946 new file mode 100755 index 0000000000..4981868ff0 --- /dev/null +++ b/tests/bugs/modalg_1/buc60946 @@ -0,0 +1,25 @@ + +puts "============" +puts "BUC60946" +puts "============" + +restore [locate_data_file BUC60946_prism.brep] c +explode c +checkshape c_1 +checkshape c_2 + +renamevar c_1 sh +renamevar c_2 pr +bsection result sh pr + +set nb_info [nbshapes result] +regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full nb_vertices +regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full nb_edges + +if { $nb_vertices != $nb_edges } { + puts "Section is opened: Faulty shape" +} else { + puts "Section is closed: OK" +} +set length 52.5057 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/buc60971 b/tests/bugs/modalg_1/buc60971 new file mode 100755 index 0000000000..b296845575 --- /dev/null +++ b/tests/bugs/modalg_1/buc60971 @@ -0,0 +1,15 @@ + +puts "========" +puts "BUC60971" +puts "CASE 2" +puts "========" +puts "" + +restore [locate_data_file buc60971.brep] a +explode a +checkshape a_1 +checkshape a_2 + +bfuse result a_2 a_3 +set square 93698.1 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug100 b/tests/bugs/modalg_1/bug100 new file mode 100755 index 0000000000..3a7fed6c16 --- /dev/null +++ b/tests/bugs/modalg_1/bug100 @@ -0,0 +1,23 @@ + +puts "================" +puts "OCC100" +puts "================" +puts "" +######################################## +## Draw is crashed during cut on Windows NT. SAM1185. +######################################## + +restore [locate_data_file OCC100_sp.brep] sh1 +checkshape sh1 + +restore [locate_data_file OCC100_cyl.brep] sh2 +checkshape sh2 + +#OCC100 : on WNT result is crushed when we make the next command: + +bcut result sh1 sh2 + +set square 2130.25 +set 2dviewer 0 + + diff --git a/tests/bugs/modalg_1/bug101 b/tests/bugs/modalg_1/bug101 new file mode 100755 index 0000000000..00d25aa261 --- /dev/null +++ b/tests/bugs/modalg_1/bug101 @@ -0,0 +1,20 @@ + +puts "================" +puts "BUC60663" +puts "BUC60662" +puts "OCC101" +puts "================" +puts "" +###################################### +## After restore c shell, section is incomplete +###################################### +restore [locate_data_file buc60663a.brep] sh1 +checkshape sh1 +restore [locate_data_file buc60663b.brep] sh2 +checkshape sh2 + +bsection result sh1 sh2 + +set length 26.2001 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug1013 b/tests/bugs/modalg_1/bug1013 new file mode 100755 index 0000000000..2cca8e0e1a --- /dev/null +++ b/tests/bugs/modalg_1/bug1013 @@ -0,0 +1,13 @@ +puts "================" +puts "OCC1013" +puts "OCC906" +puts "================" +puts "" + +restore [locate_data_file DXF906.rle] wire +checkshape wire + +mkplane result wire + +set square 92131.6 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug10160_1 b/tests/bugs/modalg_1/bug10160_1 new file mode 100755 index 0000000000..98e2c133f6 --- /dev/null +++ b/tests/bugs/modalg_1/bug10160_1 @@ -0,0 +1,59 @@ +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" + +puts "============" +puts "OCC10160" +puts "============" +puts "" +####################################################################### +# BOP perfomance improvemen +####################################################################### + +set BugNumber OCC10160 + +restore [locate_data_file OCC10160-1.brep] b1 +restore [locate_data_file OCC10160-2.brep] b2 + +set NbTests 3 + +dchrono h0 reset +dchrono h0 start + +bop b1 b2 +dchrono h0 stop +set CPU_time0_List [dchrono h0 show] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time0_List full CPU_user_time0 +puts "CPU_user_time0=${CPU_user_time0}" + +puts "Start boolean operation ..." +dchrono h reset; dchrono h start +# +# BOOLEAN OPERATION ----- START +# +for {set i 1} {$i <= ${NbTests}} {incr i} { + bopcommon result +} +# +# BOOLEAN OPERATION ----- FINISH +# +dchrono h stop; set CPU_time_List [dchrono h show] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time_List full CPU_user_time + +puts "Finish boolean operation ..." +puts "CPU_user_time=${CPU_user_time}" +set CPU_user_time [expr ${CPU_user_time} / ${NbTests}] +puts "CPU_user_time=${CPU_user_time}" + +set square 1.30062e+07 + +# Analysis of "nbshapes res" +set nb_v_good 20 +set nb_e_good 28 +set nb_w_good 16 +set nb_f_good 15 +set nb_sh_good 3 +set nb_sol_good 3 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 86 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug10160_10 b/tests/bugs/modalg_1/bug10160_10 new file mode 100755 index 0000000000..a6f967858b --- /dev/null +++ b/tests/bugs/modalg_1/bug10160_10 @@ -0,0 +1,54 @@ +puts "============" +puts "OCC10160" +puts "============" +puts "" +####################################################################### +# BOP perfomance improvemen +####################################################################### + +set BugNumber OCC10160 + +restore [locate_data_file OCC10160-2.brep] b1 +restore [locate_data_file OCC10160-3.brep] b2 + +set NbTests 3 + +puts "Prepare boolean operation ..." +dchrono h0 reset; dchrono h0 start +bop b1 b2 +dchrono h0 stop; set CPU_time0_List [dchrono h0 show] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time0_List full CPU_user_time0 +puts "CPU_user_time0=${CPU_user_time0}" + +puts "Start boolean operation ..." +dchrono h reset; dchrono h start +# +# BOOLEAN OPERATION ----- START +# +for {set i 1} {$i <= ${NbTests}} {incr i} { + bopfuse result +} +# +# BOOLEAN OPERATION ----- FINISH +# +dchrono h stop; set CPU_time_List [dchrono h show] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time_List full CPU_user_time +puts "Finish boolean operation ..." +puts "CPU_user_time=${CPU_user_time}" +set CPU_user_time [expr ${CPU_user_time} / ${NbTests}] +puts "CPU_user_time=${CPU_user_time}" + +set square 3.20326e+07 + +# Analysis of "nbshapes res" +set nb_v_good 116 +set nb_e_good 173 +set nb_w_good 67 +set nb_f_good 63 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 422 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug10160_11 b/tests/bugs/modalg_1/bug10160_11 new file mode 100755 index 0000000000..8172a4166e --- /dev/null +++ b/tests/bugs/modalg_1/bug10160_11 @@ -0,0 +1,54 @@ +puts "============" +puts "OCC10160" +puts "============" +puts "" +####################################################################### +# BOP perfomance improvemen +####################################################################### + +set BugNumber OCC10160 + +restore [locate_data_file OCC10160-2.brep] b1 +restore [locate_data_file OCC10160-3.brep] b2 + +set NbTests 3 + +puts "Prepare boolean operation ..." +dchrono h0 reset; dchrono h0 start +bop b1 b2 +dchrono h0 stop; set CPU_time0_List [dchrono h0 show] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time0_List full CPU_user_time0 +puts "CPU_user_time0=${CPU_user_time0}" + +puts "Start boolean operation ..." +dchrono h reset; dchrono h start +# +# BOOLEAN OPERATION ----- START +# +for {set i 1} {$i <= ${NbTests}} {incr i} { + bopcut result +} +# +# BOOLEAN OPERATION ----- FINISH +# +dchrono h stop; set CPU_time_List [dchrono h show] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time_List full CPU_user_time +puts "Finish boolean operation ..." +puts "CPU_user_time=${CPU_user_time}" +set CPU_user_time [expr ${CPU_user_time} / ${NbTests}] +puts "CPU_user_time=${CPU_user_time}" + +set square 3.05154e+07 + +# Analysis of "nbshapes res" +set nb_v_good 96 +set nb_e_good 143 +set nb_w_good 51 +set nb_f_good 48 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 341 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug10160_12 b/tests/bugs/modalg_1/bug10160_12 new file mode 100755 index 0000000000..e4c0243320 --- /dev/null +++ b/tests/bugs/modalg_1/bug10160_12 @@ -0,0 +1,54 @@ +puts "============" +puts "OCC10160" +puts "============" +puts "" +####################################################################### +# BOP perfomance improvemen +####################################################################### + +set BugNumber OCC10160 + +restore [locate_data_file OCC10160-2.brep] b1 +restore [locate_data_file OCC10160-3.brep] b2 + +set NbTests 3 + +puts "Prepare boolean operation ..." +dchrono h0 reset; dchrono h0 start +bop b1 b2 +dchrono h0 stop; set CPU_time0_List [dchrono h0 show] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time0_List full CPU_user_time0 +puts "CPU_user_time0=${CPU_user_time0}" + +puts "Start boolean operation ..." +dchrono h reset; dchrono h start +# +# BOOLEAN OPERATION ----- START +# +for {set i 1} {$i <= ${NbTests}} {incr i} { + boptuc result +} +# +# BOOLEAN OPERATION ----- FINISH +# +dchrono h stop; set CPU_time_List [dchrono h show] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time_List full CPU_user_time +puts "Finish boolean operation ..." +puts "CPU_user_time=${CPU_user_time}" +set CPU_user_time [expr ${CPU_user_time} / ${NbTests}] +puts "CPU_user_time=${CPU_user_time}" + +set square 6.38359e+06 + +# Analysis of "nbshapes res" +set nb_v_good 108 +set nb_e_good 161 +set nb_w_good 61 +set nb_f_good 60 +set nb_sh_good 3 +set nb_sol_good 3 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 397 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug10160_2 b/tests/bugs/modalg_1/bug10160_2 new file mode 100755 index 0000000000..e85072e0ef --- /dev/null +++ b/tests/bugs/modalg_1/bug10160_2 @@ -0,0 +1,57 @@ +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" + +puts "============" +puts "OCC10160" +puts "============" +puts "" +####################################################################### +# BOP perfomance improvemen +####################################################################### + +set BugNumber OCC10160 + +restore [locate_data_file OCC10160-1.brep] b1 +restore [locate_data_file OCC10160-2.brep] b2 + +set NbTests 3 + +puts "Prepare boolean operation ..." +dchrono h0 reset; dchrono h0 start +bop b1 b2 +dchrono h0 stop; set CPU_time0_List [dchrono h0 show] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time0_List full CPU_user_time0 +puts "CPU_user_time0=${CPU_user_time0}" + +puts "Start boolean operation ..." +dchrono h reset; dchrono h start +# +# BOOLEAN OPERATION ----- START +# +for {set i 1} {$i <= ${NbTests}} {incr i} { + bopfuse result +} +# +# BOOLEAN OPERATION ----- FINISH +# +dchrono h stop; set CPU_time_List [dchrono h show] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time_List full CPU_user_time +puts "Finish boolean operation ..." +puts "CPU_user_time=${CPU_user_time}" +set CPU_user_time [expr ${CPU_user_time} / ${NbTests}] +puts "CPU_user_time=${CPU_user_time}" + +set square 4.75218e+07 + +# Analysis of "nbshapes res" +set nb_v_good 32 +set nb_e_good 60 +set nb_w_good 32 +set nb_f_good 29 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 156 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug10160_3 b/tests/bugs/modalg_1/bug10160_3 new file mode 100755 index 0000000000..bba4743bb5 --- /dev/null +++ b/tests/bugs/modalg_1/bug10160_3 @@ -0,0 +1,56 @@ +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" +puts "TODO OCC11111 ALL: Error : The square of result shape is" +puts "============" +puts "OCC10160" +puts "============" +puts "" +####################################################################### +# BOP perfomance improvemen +####################################################################### + +set BugNumber OCC10160 + +restore [locate_data_file OCC10160-1.brep] b1 +restore [locate_data_file OCC10160-2.brep] b2 + +set NbTests 3 + +puts "Prepare boolean operation ..." +dchrono h0 reset; dchrono h0 start +bop b1 b2 +dchrono h0 stop; set CPU_time0_List [dchrono h0 show] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time0_List full CPU_user_time0 +puts "CPU_user_time0=${CPU_user_time0}" + +puts "Start boolean operation ..." +dchrono h reset; dchrono h start +# +# BOOLEAN OPERATION ----- START +# +for {set i 1} {$i <= ${NbTests}} {incr i} { + bopcut result +} +# +# BOOLEAN OPERATION ----- FINISH +# +dchrono h stop; set CPU_time_List [dchrono h show] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time_List full CPU_user_time +puts "Finish boolean operation ..." +puts "CPU_user_time=${CPU_user_time}" +set CPU_user_time [expr ${CPU_user_time} / ${NbTests}] +puts "CPU_user_time=${CPU_user_time}" + +set square 2.36194e+07 + +# Analysis of "nbshapes res" +set nb_v_good 24 +set nb_e_good 34 +set nb_w_good 20 +set nb_f_good 19 +set nb_sh_good 4 +set nb_sol_good 4 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 106 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug10160_4 b/tests/bugs/modalg_1/bug10160_4 new file mode 100755 index 0000000000..c8283b9efe --- /dev/null +++ b/tests/bugs/modalg_1/bug10160_4 @@ -0,0 +1,56 @@ +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" +puts "============" +puts "OCC10160" +puts "============" +puts "" +####################################################################### +# BOP perfomance improvemen +####################################################################### + +set BugNumber OCC10160 + +restore [locate_data_file OCC10160-1.brep] b1 +restore [locate_data_file OCC10160-2.brep] b2 + +set NbTests 3 + +puts "Prepare boolean operation ..." +dchrono h0 reset; dchrono h0 start +bop b1 b2 +dchrono h0 stop; set CPU_time0_List [dchrono h0 show] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time0_List full CPU_user_time0 +puts "CPU_user_time0=${CPU_user_time0}" + +puts "Start boolean operation ..." +dchrono h reset; dchrono h start +# +# BOOLEAN OPERATION ----- START +# +for {set i 1} {$i <= ${NbTests}} {incr i} { + boptuc result +} +# +# BOOLEAN OPERATION ----- FINISH +# +dchrono h stop; set CPU_time_List [dchrono h show] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time_List full CPU_user_time +puts "Finish boolean operation ..." +puts "CPU_user_time=${CPU_user_time}" +set CPU_user_time [expr ${CPU_user_time} / ${NbTests}] +puts "CPU_user_time=${CPU_user_time}" + +set square 3.56087e+07 + +# Analysis of "nbshapes res" +set nb_v_good 24 +set nb_e_good 34 +set nb_w_good 20 +set nb_f_good 17 +set nb_sh_good 3 +set nb_sol_good 3 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 102 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug10160_5 b/tests/bugs/modalg_1/bug10160_5 new file mode 100755 index 0000000000..87ca7f71e6 --- /dev/null +++ b/tests/bugs/modalg_1/bug10160_5 @@ -0,0 +1,55 @@ +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" +puts "============" +puts "OCC10160" +puts "============" +puts "" +####################################################################### +# BOP perfomance improvemen +####################################################################### + +set BugNumber OCC10160 + +restore [locate_data_file OCC10160-1.brep] b1 +restore [locate_data_file OCC10160-3.brep] b2 + +set NbTests 3 + +puts "Prepare boolean operation ..." +dchrono h0 reset; dchrono h0 start +bop b1 b2 +dchrono h0 stop; set CPU_time0_List [dchrono h0 show] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time0_List full CPU_user_time0 +puts "CPU_user_time0=${CPU_user_time0}" + +puts "Start boolean operation ..." +dchrono h reset; dchrono h start +# +# BOOLEAN OPERATION ----- START +# +for {set i 1} {$i <= ${NbTests}} {incr i} { + bopcommon result +} +# +# BOOLEAN OPERATION ----- FINISH +# +dchrono h stop; set CPU_time_List [dchrono h show] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time_List full CPU_user_time +puts "Finish boolean operation ..." +puts "CPU_user_time=${CPU_user_time}" +set CPU_user_time [expr ${CPU_user_time} / ${NbTests}] +puts "CPU_user_time=${CPU_user_time}" + +set square 782201 + +# Analysis of "nbshapes res" +set nb_v_good 53 +set nb_e_good 75 +set nb_w_good 38 +set nb_f_good 34 +set nb_sh_good 6 +set nb_sol_good 6 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 213 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug10160_6 b/tests/bugs/modalg_1/bug10160_6 new file mode 100755 index 0000000000..029f0ce478 --- /dev/null +++ b/tests/bugs/modalg_1/bug10160_6 @@ -0,0 +1,57 @@ +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" +puts "============" +puts "OCC10160" +puts "============" +puts "" +####################################################################### +# BOP perfomance improvemen +####################################################################### + +set BugNumber OCC10160 + +restore [locate_data_file OCC10160-1.brep] b1 +restore [locate_data_file OCC10160-3.brep] b2 + +set NbTests 3 + +puts "Prepare boolean operation ..." +dchrono h0 reset; dchrono h0 start +bop b1 b2 +dchrono h0 stop; set CPU_time0_List [dchrono h0 show] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time0_List full CPU_user_time0 +puts "CPU_user_time0=${CPU_user_time0}" + +puts "Start boolean operation ..." +dchrono h reset; dchrono h start +# +# BOOLEAN OPERATION ----- START +# +for {set i 1} {$i <= ${NbTests}} {incr i} { + bopfuse result +} +# +# BOOLEAN OPERATION ----- FINISH +# +dchrono h stop; set CPU_time_List [dchrono h show] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time_List full CPU_user_time +puts "Finish boolean operation ..." +puts "CPU_user_time=${CPU_user_time}" +set CPU_user_time [expr ${CPU_user_time} / ${NbTests}] +puts "CPU_user_time=${CPU_user_time}" + +set square 3.61484e+07 + +# Analysis of "nbshapes res" +set nb_v_good 121 +set nb_e_good 178 +set nb_w_good 65 +set nb_f_good 59 +set nb_sh_good 3 +set nb_sol_good 2 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 429 + +set 2dviewer 0 + + diff --git a/tests/bugs/modalg_1/bug10160_7 b/tests/bugs/modalg_1/bug10160_7 new file mode 100755 index 0000000000..bbbc95e988 --- /dev/null +++ b/tests/bugs/modalg_1/bug10160_7 @@ -0,0 +1,56 @@ +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" + +puts "============" +puts "OCC10160" +puts "============" +puts "" +####################################################################### +# BOP perfomance improvemen +####################################################################### + +set BugNumber OCC10160 + +restore [locate_data_file OCC10160-1.brep] b1 +restore [locate_data_file OCC10160-3.brep] b2 + +set NbTests 3 + +puts "Prepare boolean operation ..." +dchrono h0 reset; dchrono h0 start +bop b1 b2 +dchrono h0 stop; set CPU_time0_List [dchrono h0 show] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time0_List full CPU_user_time0 +puts "CPU_user_time0=${CPU_user_time0}" + +puts "Start boolean operation ..." +dchrono h reset; dchrono h start +# +# BOOLEAN OPERATION ----- START +# +for {set i 1} {$i <= ${NbTests}} {incr i} { + bopcut result +} +# +# BOOLEAN OPERATION ----- FINISH +# +dchrono h stop; set CPU_time_List [dchrono h show] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time_List full CPU_user_time +puts "Finish boolean operation ..." +puts "CPU_user_time=${CPU_user_time}" +set CPU_user_time [expr ${CPU_user_time} / ${NbTests}] +puts "CPU_user_time=${CPU_user_time}" + +set square 3.00597e+07 + +# Analysis of "nbshapes res" +set nb_v_good 61 +set nb_e_good 87 +set nb_w_good 44 +set nb_f_good 36 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 231 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug10160_8 b/tests/bugs/modalg_1/bug10160_8 new file mode 100755 index 0000000000..e2b97189cd --- /dev/null +++ b/tests/bugs/modalg_1/bug10160_8 @@ -0,0 +1,55 @@ +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" +puts "============" +puts "OCC10160" +puts "============" +puts "" +####################################################################### +# BOP perfomance improvemen +####################################################################### + +set BugNumber OCC10160 + +restore [locate_data_file OCC10160-1.brep] b1 +restore [locate_data_file OCC10160-3.brep] b2 + +set NbTests 3 + +puts "Prepare boolean operation ..." +dchrono h0 reset; dchrono h0 start +bop b1 b2 +dchrono h0 stop; set CPU_time0_List [dchrono h0 show] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time0_List full CPU_user_time0 +puts "CPU_user_time0=${CPU_user_time0}" + +puts "Start boolean operation ..." +dchrono h reset; dchrono h start +# +# BOOLEAN OPERATION ----- START +# +for {set i 1} {$i <= ${NbTests}} {incr i} { + boptuc result +} +# +# BOOLEAN OPERATION ----- FINISH +# +dchrono h stop; set CPU_time_List [dchrono h show] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time_List full CPU_user_time +puts "Finish boolean operation ..." +puts "CPU_user_time=${CPU_user_time}" +set CPU_user_time [expr ${CPU_user_time} / ${NbTests}] +puts "CPU_user_time=${CPU_user_time}" + +set square 6.87093e+06 + +# Analysis of "nbshapes res" +set nb_v_good 113 +set nb_e_good 166 +set nb_w_good 59 +set nb_f_good 57 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 398 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug10160_9 b/tests/bugs/modalg_1/bug10160_9 new file mode 100755 index 0000000000..eb5f66f169 --- /dev/null +++ b/tests/bugs/modalg_1/bug10160_9 @@ -0,0 +1,54 @@ +puts "============" +puts "OCC10160" +puts "============" +puts "" +####################################################################### +# BOP perfomance improvemen +####################################################################### + +set BugNumber OCC10160 + +restore [locate_data_file OCC10160-2.brep] b1 +restore [locate_data_file OCC10160-3.brep] b2 + +set NbTests 3 + +puts "Prepare boolean operation ..." +dchrono h0 reset; dchrono h0 start +bop b1 b2 +dchrono h0 stop; set CPU_time0_List [dchrono h0 show] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time0_List full CPU_user_time0 +puts "CPU_user_time0=${CPU_user_time0}" + +puts "Start boolean operation ..." +dchrono h reset; dchrono h start +# +# BOOLEAN OPERATION ----- START +# +for {set i 1} {$i <= ${NbTests}} {incr i} { + bopcommon result +} +# +# BOOLEAN OPERATION ----- FINISH +# +dchrono h stop; set CPU_time_List [dchrono h show] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $CPU_time_List full CPU_user_time +puts "Finish boolean operation ..." +puts "CPU_user_time=${CPU_user_time}" +set CPU_user_time [expr ${CPU_user_time} / ${NbTests}] +puts "CPU_user_time=${CPU_user_time}" + +set square 4.86635e+06 + +# Analysis of "nbshapes res" +set nb_v_good 88 +set nb_e_good 131 +set nb_w_good 45 +set nb_f_good 45 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 312 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug10232 b/tests/bugs/modalg_1/bug10232 new file mode 100755 index 0000000000..38ceba48e6 --- /dev/null +++ b/tests/bugs/modalg_1/bug10232 @@ -0,0 +1,38 @@ +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" + +puts "============" +puts "OCC10232" +puts "============" +puts "" +####################################################################### +# Exception "Segmentation violation" in Boolean Operations +####################################################################### + +set BugNumber OCC10232 + +puts "Load first shape ..." +restore [locate_data_file OCC10232_ms1.brep] b1 +puts "Load second shape ..." +restore [locate_data_file OCC10232_ms2.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopsection result +puts "Finish boolean operation ..." + +set length 3210.71 + +set nb_v_good 1197 +set nb_e_good 1182 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 2380 + +set 2dviewer 1 + diff --git a/tests/bugs/modalg_1/bug102_1 b/tests/bugs/modalg_1/bug102_1 new file mode 100755 index 0000000000..90f0ed084f --- /dev/null +++ b/tests/bugs/modalg_1/bug102_1 @@ -0,0 +1,19 @@ + +puts "================" +puts "BUC60803" +puts "OCC102" +puts "================" +puts "" + +restore [locate_data_file buc60803a.brep] sh1 +checkshape sh1 +restore [locate_data_file buc60803b.brep] sh2 +checkshape sh2 + +bfuse result sh1 sh2 + +set square 1.86064e+07 +set 2dviewer 0 + + + diff --git a/tests/bugs/modalg_1/bug102_2 b/tests/bugs/modalg_1/bug102_2 new file mode 100755 index 0000000000..c9dbb81e47 --- /dev/null +++ b/tests/bugs/modalg_1/bug102_2 @@ -0,0 +1,18 @@ + +puts "================" +puts "BUC60803" +puts "OCC102" +puts "================" +puts "" + +restore [locate_data_file buc60803a.brep] sh1 +checkshape sh1 +restore [locate_data_file buc60803b.brep] sh2 +checkshape sh2 + +bfuse result sh2 sh1 + +set square 1.86064e+07 +set 2dviewer 0 + + diff --git a/tests/bugs/modalg_1/bug10435_1 b/tests/bugs/modalg_1/bug10435_1 new file mode 100755 index 0000000000..4605e60820 --- /dev/null +++ b/tests/bugs/modalg_1/bug10435_1 @@ -0,0 +1,38 @@ +puts "============" +puts "OCC10435" +puts "============" +puts "" +####################################################################### +# error in fillet after Cut of torus from box +####################################################################### + +set BugNumber OCC10435 + +restore [locate_data_file OCC10435.brep] a + +checkshape a +explode a e + +set radius 5. + +if { [catch {fillet result a ${radius} a_10 ${radius} a_15 ${radius} a_16 } catch_result] } { + puts "Faulty ${BugNumber} exception (case 1): Fillet operation fails on given shape " +} else { + puts "${BugNumber} (case 1) OK: Fillet operation was made" + + set square 36455.2 + + # Analysis of "nbshapes res" + set nb_v_good 12 + set nb_e_good 19 + set nb_w_good 11 + set nb_f_good 10 + set nb_sh_good 1 + set nb_sol_good 1 + set nb_compsol_good 0 + set nb_compound_good 1 + set nb_shape_good 55 +} + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug10435_2 b/tests/bugs/modalg_1/bug10435_2 new file mode 100755 index 0000000000..ae6577a41b --- /dev/null +++ b/tests/bugs/modalg_1/bug10435_2 @@ -0,0 +1,34 @@ +puts "============" +puts "OCC10435" +puts "============" +puts "" +####################################################################### +# error in fillet after Cut of torus from box +####################################################################### + +set BugNumber OCC10435 + +puts "Load shape ..." +restore [locate_data_file OCC10435.brep] b1 + +explode b1 e + +puts "Start fillet ..." +fillet result b1 5 b1_15 5 b1_16 5 b1_10 +puts "Finish fillet ..." + +set square 36455.2 + +# Analysis of "nbshapes res" +set nb_v_good 12 +set nb_e_good 19 +set nb_w_good 11 +set nb_f_good 10 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 55 + +set 2dviewer 1 + diff --git a/tests/bugs/modalg_1/bug10605_1 b/tests/bugs/modalg_1/bug10605_1 new file mode 100755 index 0000000000..023a6ecad7 --- /dev/null +++ b/tests/bugs/modalg_1/bug10605_1 @@ -0,0 +1,34 @@ +puts "============" +puts "OCC10605" +puts "============" +puts "" +####################################################################### +# Fuse Fails +####################################################################### + +set BugNumber OCC10605 + +restore [locate_data_file OCC10605-1.brep] b1 +restore [locate_data_file OCC10605-3.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopcommon result +puts "Finish boolean operation ..." + +set square 233.798 + +# Analysis of "nbshapes res" +set nb_v_good 10 +set nb_e_good 15 +set nb_w_good 7 +set nb_f_good 7 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 42 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug10605_2 b/tests/bugs/modalg_1/bug10605_2 new file mode 100755 index 0000000000..af3bae240b --- /dev/null +++ b/tests/bugs/modalg_1/bug10605_2 @@ -0,0 +1,34 @@ +puts "============" +puts "OCC10605" +puts "============" +puts "" +####################################################################### +# Fuse Fails +####################################################################### + +set BugNumber OCC10605 + +restore [locate_data_file OCC10605-1.brep] b1 +restore [locate_data_file OCC10605-3.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopfuse result +puts "Finish boolean operation ..." + +set square 838.752 + +# Analysis of "nbshapes res" +set nb_v_good 15 +set nb_e_good 22 +set nb_w_good 10 +set nb_f_good 9 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 59 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug10605_3 b/tests/bugs/modalg_1/bug10605_3 new file mode 100755 index 0000000000..ed50c6eb71 --- /dev/null +++ b/tests/bugs/modalg_1/bug10605_3 @@ -0,0 +1,34 @@ +puts "============" +puts "OCC10605" +puts "============" +puts "" +####################################################################### +# Fuse Fails +####################################################################### + +set BugNumber OCC10605 + +restore [locate_data_file OCC10605-1.brep] b1 +restore [locate_data_file OCC10605-3.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopcut result +puts "Finish boolean operation ..." + +set square 779.887 + +# Analysis of "nbshapes res" +set nb_v_good 13 +set nb_e_good 19 +set nb_w_good 8 +set nb_f_good 7 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 50 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug10605_4 b/tests/bugs/modalg_1/bug10605_4 new file mode 100755 index 0000000000..eb432e0348 --- /dev/null +++ b/tests/bugs/modalg_1/bug10605_4 @@ -0,0 +1,34 @@ +puts "============" +puts "OCC10605" +puts "============" +puts "" +####################################################################### +# Fuse Fails +####################################################################### + +set BugNumber OCC10605 + +restore [locate_data_file OCC10605-1.brep] b1 +restore [locate_data_file OCC10605-3.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +boptuc result +puts "Finish boolean operation ..." + +set square 292.663 + +# Analysis of "nbshapes res" +set nb_v_good 12 +set nb_e_good 18 +set nb_w_good 9 +set nb_f_good 9 +set nb_sh_good 2 +set nb_sol_good 2 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 53 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug10605_5 b/tests/bugs/modalg_1/bug10605_5 new file mode 100755 index 0000000000..3f6d3b4929 --- /dev/null +++ b/tests/bugs/modalg_1/bug10605_5 @@ -0,0 +1,33 @@ +puts "============" +puts "OCC10605" +puts "============" +puts "" +####################################################################### +# Fuse Fails +####################################################################### + +set BugNumber OCC10605 + +restore [locate_data_file OCC10605-1.brep] b1 +restore [locate_data_file OCC10605-3.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopsection result b1 b2 +puts "Finish boolean operation ..." + +set length 59.8334 +# Analysis of "nbshapes res" +set nb_v_good 9 +set nb_e_good 9 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 19 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug10606_1 b/tests/bugs/modalg_1/bug10606_1 new file mode 100755 index 0000000000..2196de4079 --- /dev/null +++ b/tests/bugs/modalg_1/bug10606_1 @@ -0,0 +1,34 @@ +puts "============" +puts "OCC10606" +puts "============" +puts "" +####################################################################### +# Fuse Fails +####################################################################### + +set BugNumber OCC10606 + +restore [locate_data_file OCC10604-1.brep] b1 +restore [locate_data_file OCC10606-2.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopcommon result +puts "Finish boolean operation ..." + +set square 66.672 + +# Analysis of "nbshapes res" +set nb_v_good 6 +set nb_e_good 8 +set nb_w_good 2 +set nb_f_good 2 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 21 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug10606_2 b/tests/bugs/modalg_1/bug10606_2 new file mode 100755 index 0000000000..b2e880752c --- /dev/null +++ b/tests/bugs/modalg_1/bug10606_2 @@ -0,0 +1,34 @@ +puts "============" +puts "OCC10606" +puts "============" +puts "" +####################################################################### +# Fuse Fails +####################################################################### + +set BugNumber OCC10606 + +restore [locate_data_file OCC10604-1.brep] b1 +restore [locate_data_file OCC10606-2.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopfuse result +puts "Finish boolean operation ..." + +set square 1450.22 + +# Analysis of "nbshapes res" +set nb_v_good 6 +set nb_e_good 8 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 25 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug10606_3 b/tests/bugs/modalg_1/bug10606_3 new file mode 100755 index 0000000000..ca14f2ea3c --- /dev/null +++ b/tests/bugs/modalg_1/bug10606_3 @@ -0,0 +1,34 @@ +puts "============" +puts "OCC10606" +puts "============" +puts "" +####################################################################### +# Fuse Fails +####################################################################### + +set BugNumber OCC10606 + +restore [locate_data_file OCC10604-1.brep] b1 +restore [locate_data_file OCC10606-2.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopcut result +puts "Finish boolean operation ..." + +set square 761.355 + +# Analysis of "nbshapes res" +set nb_v_good 6 +set nb_e_good 8 +set nb_w_good 3 +set nb_f_good 3 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 23 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug10606_4 b/tests/bugs/modalg_1/bug10606_4 new file mode 100755 index 0000000000..144937b15e --- /dev/null +++ b/tests/bugs/modalg_1/bug10606_4 @@ -0,0 +1,34 @@ +puts "============" +puts "OCC10606" +puts "============" +puts "" +####################################################################### +# Fuse Fails +####################################################################### + +set BugNumber OCC10606 + +restore [locate_data_file OCC10604-1.brep] b1 +restore [locate_data_file OCC10606-2.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +boptuc result +puts "Finish boolean operation ..." + +set square 755.54 + +# Analysis of "nbshapes res" +set nb_v_good 6 +set nb_e_good 8 +set nb_w_good 3 +set nb_f_good 3 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 23 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug10606_5 b/tests/bugs/modalg_1/bug10606_5 new file mode 100755 index 0000000000..46e467e4a7 --- /dev/null +++ b/tests/bugs/modalg_1/bug10606_5 @@ -0,0 +1,34 @@ +puts "============" +puts "OCC10606" +puts "============" +puts "" +####################################################################### +# Fuse Fails +####################################################################### + +set BugNumber OCC10606 + +restore [locate_data_file OCC10604-1.brep] b1 +restore [locate_data_file OCC10606-2.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopsection result b1 b2 +puts "Finish boolean operation ..." + +set length 18.3861 + +# Analysis of "nbshapes res" +set nb_v_good 4 +set nb_e_good 4 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 9 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug1077 b/tests/bugs/modalg_1/bug1077 new file mode 100755 index 0000000000..5f6a1a718c --- /dev/null +++ b/tests/bugs/modalg_1/bug1077 @@ -0,0 +1,16 @@ +pload QAcommands + +puts "============" +puts "OCC1077" +puts "============" +puts "" +###################################################### +# BUG in boolean operations in the development version +###################################################### + +if { [catch { OCC1077 result } catch_result] } { + puts "Faulty OCC1077" +} + +set square 587.181 +set 3dviewer 1 diff --git a/tests/bugs/modalg_1/bug108 b/tests/bugs/modalg_1/bug108 new file mode 100755 index 0000000000..70b73d3b81 --- /dev/null +++ b/tests/bugs/modalg_1/bug108 @@ -0,0 +1,28 @@ + +puts "================" +puts "BUC61037" +puts "OCC108" +puts "================" +puts "" +##################################################################### +## BRepTools::AddUVBounds for the planar face bounded by a circle returns too small bounding box. +##################################################################### + +restore [locate_data_file bug61037.brep] sh1 +checkshape sh1 + +set rr [bounding sh1] +regexp { *([-0-9.+eE]+) +([-0-9.+eE]+) +([-0-9.+eE]+) +([-0-9.+eE]+) +([-0-9.+eE]+) +([-0-9.+eE]+)} $rr full v1_x v1_y v1_z v2_x v2_y v2_z +vertex v1 $v1_x $v1_y $v1_z +vertex v2 $v2_x $v2_y $v2_z +edge result v1 v2 +regexp {Mass +: +([-0-9.+eE]+)} [lprops result] full dis +if { [expr $dis < 0.201357] } { + puts "Faulty BUC61037: Planar circle and bounded face a returns too small bounding box" +} else { + puts "OCC134 OK: bounding box is correct" +} + +set length 0.201357 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug10842_1 b/tests/bugs/modalg_1/bug10842_1 new file mode 100755 index 0000000000..a269905008 --- /dev/null +++ b/tests/bugs/modalg_1/bug10842_1 @@ -0,0 +1,36 @@ +puts "TODO OCC111111 ALL: Error : Result shape is WRONG" + +puts "============" +puts "OCC10842" +puts "============" +puts "" +####################################################################### +# Bug in Bop +####################################################################### + +set BugNumber OCC10842 + +restore [locate_data_file OCC10842-1.brep] b1 +restore [locate_data_file OCC10842-2.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopcommon result +puts "Finish boolean operation ..." + +set square 2312.93 + +# Analysis of "nbshapes res" +set nb_v_good 7 +set nb_e_good 9 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 27 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug10842_2 b/tests/bugs/modalg_1/bug10842_2 new file mode 100755 index 0000000000..85e0e6fd46 --- /dev/null +++ b/tests/bugs/modalg_1/bug10842_2 @@ -0,0 +1,36 @@ +puts "TODO OCC111111 ALL: Error : Result shape is WRONG" + +puts "============" +puts "OCC10842" +puts "============" +puts "" +####################################################################### +# Bug in Bop +####################################################################### + +set BugNumber OCC10842 + +restore [locate_data_file OCC10842-1.brep] b1 +restore [locate_data_file OCC10842-2.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopfuse result +puts "Finish boolean operation ..." + +set square 27919.7 + +# Analysis of "nbshapes res" +set nb_v_good 15 +set nb_e_good 21 +set nb_w_good 7 +set nb_f_good 6 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 52 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug10842_3 b/tests/bugs/modalg_1/bug10842_3 new file mode 100755 index 0000000000..0dd94602c8 --- /dev/null +++ b/tests/bugs/modalg_1/bug10842_3 @@ -0,0 +1,36 @@ +puts "TODO OCC111111 ALL: Error : Result shape is WRONG" + +puts "============" +puts "OCC10842" +puts "============" +puts "" +####################################################################### +# Bug in Bop +####################################################################### + +set BugNumber OCC10842 + +restore [locate_data_file OCC10842-1.brep] b1 +restore [locate_data_file OCC10842-2.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopcut result +puts "Finish boolean operation ..." + +set square 18757.7 + +# Analysis of "nbshapes res" +set nb_v_good 13 +set nb_e_good 18 +set nb_w_good 6 +set nb_f_good 6 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 46 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug10842_4 b/tests/bugs/modalg_1/bug10842_4 new file mode 100755 index 0000000000..df6e78c140 --- /dev/null +++ b/tests/bugs/modalg_1/bug10842_4 @@ -0,0 +1,36 @@ +puts "TODO OCC111111 ALL: Error : Result shape is WRONG" + +puts "============" +puts "OCC10842" +puts "============" +puts "" +####################################################################### +# Bug in Bop +####################################################################### + +set BugNumber OCC10842 + +restore [locate_data_file OCC10842-1.brep] b1 +restore [locate_data_file OCC10842-2.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +boptuc result +puts "Finish boolean operation ..." + +set square 11475 + +# Analysis of "nbshapes res" +set nb_v_good 9 +set nb_e_good 12 +set nb_w_good 5 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 33 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug10842_5 b/tests/bugs/modalg_1/bug10842_5 new file mode 100755 index 0000000000..87cddb120d --- /dev/null +++ b/tests/bugs/modalg_1/bug10842_5 @@ -0,0 +1,34 @@ +puts "============" +puts "OCC10842" +puts "============" +puts "" +####################################################################### +# Bug in Bop +####################################################################### + +set BugNumber OCC10842 + +restore [locate_data_file OCC10842-1.brep] b1 +restore [locate_data_file OCC10842-2.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopsection result b1 b2 +puts "Finish boolean operation ..." + +set length 122.816 + +# Analysis of "nbshapes res" +set nb_v_good 6 +set nb_e_good 6 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 13 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug10846_1 b/tests/bugs/modalg_1/bug10846_1 new file mode 100755 index 0000000000..151d20a9aa --- /dev/null +++ b/tests/bugs/modalg_1/bug10846_1 @@ -0,0 +1,34 @@ +puts "============" +puts "OCC10846" +puts "============" +puts "" +####################################################################### +# Cut operation produces invalid result +####################################################################### + +set BugNumber OCC10846 + +restore [locate_data_file bug10846_solid1.brep] b1 +restore [locate_data_file bug10846_solid2.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopcommon result +puts "Finish boolean operation ..." + +set square 183.567 + +# Analysis of "nbshapes res" +set nb_v_good 18 +set nb_e_good 31 +set nb_w_good 19 +set nb_f_good 19 +set nb_sh_good 6 +set nb_sol_good 6 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 100 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug10846_2 b/tests/bugs/modalg_1/bug10846_2 new file mode 100755 index 0000000000..17e59f1ef0 --- /dev/null +++ b/tests/bugs/modalg_1/bug10846_2 @@ -0,0 +1,34 @@ +puts "============" +puts "OCC10846" +puts "============" +puts "" +####################################################################### +# Cut operation produces invalid result +####################################################################### + +set BugNumber OCC10846 + +restore [locate_data_file bug10846_solid1.brep] b1 +restore [locate_data_file bug10846_solid2.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopfuse result +puts "Finish boolean operation ..." + +set square 2309.97 + +# Analysis of "nbshapes res" +set nb_v_good 25 +set nb_e_good 45 +set nb_w_good 15 +set nb_f_good 15 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 103 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug10846_3 b/tests/bugs/modalg_1/bug10846_3 new file mode 100755 index 0000000000..c69041bca7 --- /dev/null +++ b/tests/bugs/modalg_1/bug10846_3 @@ -0,0 +1,34 @@ +puts "============" +puts "OCC10846" +puts "============" +puts "" +####################################################################### +# Cut operation produces invalid result +####################################################################### + +set BugNumber OCC10846 + +restore [locate_data_file bug10846_solid1.brep] b1 +restore [locate_data_file bug10846_solid2.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopcut result +puts "Finish boolean operation ..." + +set square 510.907 + +# Analysis of "nbshapes res" +set nb_v_good 24 +set nb_e_good 43 +set nb_w_good 20 +set nb_f_good 20 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 110 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug10846_4 b/tests/bugs/modalg_1/bug10846_4 new file mode 100755 index 0000000000..0f277e7ddb --- /dev/null +++ b/tests/bugs/modalg_1/bug10846_4 @@ -0,0 +1,34 @@ +puts "============" +puts "OCC10846" +puts "============" +puts "" +####################################################################### +# Cut operation produces invalid result +####################################################################### + +set BugNumber OCC10846 + +restore [locate_data_file bug10846_solid1.brep] b1 +restore [locate_data_file bug10846_solid2.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +boptuc result +puts "Finish boolean operation ..." + +set square 1982.63 + +# Analysis of "nbshapes res" +set nb_v_good 19 +set nb_e_good 33 +set nb_w_good 14 +set nb_f_good 14 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 83 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug10846_5 b/tests/bugs/modalg_1/bug10846_5 new file mode 100755 index 0000000000..4130e90237 --- /dev/null +++ b/tests/bugs/modalg_1/bug10846_5 @@ -0,0 +1,22 @@ +puts "============" +puts "OCC10846" +puts "============" +puts "" +####################################################################### +# Cut operation produces invalid result +####################################################################### + +set BugNumber OCC10846 + +restore [locate_data_file bug10846_solid1.brep] b1 +restore [locate_data_file bug10846_solid2.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopsection result b1 b2 +puts "Finish boolean operation ..." + +set length 94.4534 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug109 b/tests/bugs/modalg_1/bug109 new file mode 100755 index 0000000000..df88060a3d --- /dev/null +++ b/tests/bugs/modalg_1/bug109 @@ -0,0 +1,34 @@ +puts "TODO OCC12345 ALL: Faulty BUC61057: here can be shading problem" + +puts "================" +puts "BUC61057" +puts "OCC109" +puts "================" +puts "" +########################################################## +## Visualisation of the attached shape is wrong in the shading mode. +########################################################## + +restore [locate_data_file OCC109.brep] result + +checkshape result + +vinit +tclean result +vdisplay result +vsetdispmode result 1 +vfit + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +if { $tri != 294 && $nod != 300 } { + puts "Faulty BUC61057: here can be shading problem" +} else { + puts "Shading of BUC61057 is OK" +} + +set square 33.8757 +set only_screen 1 + diff --git a/tests/bugs/modalg_1/bug110_1 b/tests/bugs/modalg_1/bug110_1 new file mode 100755 index 0000000000..12eff3b10a --- /dev/null +++ b/tests/bugs/modalg_1/bug110_1 @@ -0,0 +1,41 @@ + +puts "========================" +puts " BUC60706 " +puts " OCC110 " +puts "(cases 1-3)" +puts "========================" + +restore [locate_data_file buc60706a.brep] f +checkshape f + +restore [locate_data_file buc60706b.brep] w +checkshape w +pipe t w f + +restore [locate_data_file buc60706c.brep] s +checkshape s + +bcut res_1 s t +checkshape res_1 + +restore [locate_data_file buc60706d.brep] f +checkshape f + +restore [locate_data_file buc60706e.brep] w +checkshape w +pipe t w f + +bcut res_2 res_1 t +checkshape res_2 + +restore [locate_data_file buc60706g.brep] f +checkshape f + +restore [locate_data_file buc60706h.brep] w +checkshape w +pipe t w f + +bcut result res_2 t + +set square 865172 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug110_2 b/tests/bugs/modalg_1/bug110_2 new file mode 100755 index 0000000000..523c69ac6e --- /dev/null +++ b/tests/bugs/modalg_1/bug110_2 @@ -0,0 +1,41 @@ + +puts "========================" +puts " BUC60706 " +puts " OCC110 " +puts "(case 4-6)" +puts "========================" + +restore [locate_data_file buc60706j.brep] f +checkshape f + +restore [locate_data_file buc60706b.brep] w +checkshape w +pipe t w f + +restore [locate_data_file buc60706l.brep] s +checkshape s + +bcut res_1 s t +checkshape res_1 + +restore [locate_data_file buc60706m.brep] f +checkshape f + +restore [locate_data_file buc60706e.brep] w +checkshape w +pipe t w f + +bcut res_2 res_1 t +checkshape res_2 + +restore [locate_data_file buc60706p.brep] f +checkshape f + +restore [locate_data_file buc60706h.brep] w +checkshape w +pipe t w f + +bcut result res_2 t + +set square 860752 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug110_3 b/tests/bugs/modalg_1/bug110_3 new file mode 100755 index 0000000000..3d389aa1d4 --- /dev/null +++ b/tests/bugs/modalg_1/bug110_3 @@ -0,0 +1,41 @@ + +puts "========================" +puts " BUC60706 " +puts " OCC110 " +puts "(case 7-9)" +puts "========================" + +restore [locate_data_file buc60706s.brep] f +checkshape f + +restore [locate_data_file buc60706b.brep] w +checkshape w +pipe t w f + +restore [locate_data_file buc60706l.brep] s +checkshape s + +bcut res_1 s t +checkshape res_1 + +restore [locate_data_file buc60706v.brep] f +checkshape f + +restore [locate_data_file buc60706e.brep] w +checkshape w +pipe t w f + +bcut res_2 res_1 t +checkshape res_2 + +restore [locate_data_file buc60706x.brep] f +checkshape f + +restore [locate_data_file buc60706h.brep] w +checkshape w +pipe t w f + +bcut result res_2 t + +set square 861220 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug11565_1 b/tests/bugs/modalg_1/bug11565_1 new file mode 100755 index 0000000000..29a46b572b --- /dev/null +++ b/tests/bugs/modalg_1/bug11565_1 @@ -0,0 +1,27 @@ +puts "============" +puts "OCC11565" +puts "============" +puts "" +####################################################################### +# Boolean operation "Cut" in 2d cannot cut the hole from the rectangle +####################################################################### + +restore [locate_data_file OCC11565.brep] a +explode a + +bop a_1 a_2 +bopcut result + +set square 28.6255 +set nb_v_good 12 +set nb_e_good 12 +set nb_w_good 2 +set nb_f_good 1 +set nb_sh_good 1 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 29 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug11565_2 b/tests/bugs/modalg_1/bug11565_2 new file mode 100755 index 0000000000..3a2358bcc2 --- /dev/null +++ b/tests/bugs/modalg_1/bug11565_2 @@ -0,0 +1,27 @@ +puts "============" +puts "OCC11565" +puts "============" +puts "" +####################################################################### +# Boolean operation "Cut" in 2d cannot cut the hole from the rectangle +####################################################################### + +restore [locate_data_file OCC11565.brep] a +explode a + +bop a_1 a_3 +bopcut result + +set square 28.6438 +set nb_v_good 12 +set nb_e_good 12 +set nb_w_good 2 +set nb_f_good 1 +set nb_sh_good 1 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 29 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug116 b/tests/bugs/modalg_1/bug116 new file mode 100755 index 0000000000..072b9622f9 --- /dev/null +++ b/tests/bugs/modalg_1/bug116 @@ -0,0 +1,24 @@ + +puts "================" +puts "OCC116" +puts "================" +puts "" +############################################# +## Creation of chamfer is impossible on attached shape.(SAM1201) +############################################# + +restore [locate_data_file OCC116.brep] sh +checkshape sh + +explode sh f +explode sh_6 e + +if [catch {chamf result sh sh_6_1 sh_6 A 2 45 sh_6_8 sh_6 A 2 45 } catch_result] { + puts "1) Faulty OCC116: chamfer is NOT created properly" + } else { + puts "1) CHAMF OCC116 OK" +} + +set square 48357.5 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug117_1 b/tests/bugs/modalg_1/bug117_1 new file mode 100755 index 0000000000..df5947b78e --- /dev/null +++ b/tests/bugs/modalg_1/bug117_1 @@ -0,0 +1,16 @@ + +puts "================" +puts "OCC117" +puts "================" +puts "" + +restore [locate_data_file OCC117.brep] sh +explode sh +checkshape sh_1 +checkshape sh_2 + +bfuse result sh_1 sh_2 + +set square 292297 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug117_2 b/tests/bugs/modalg_1/bug117_2 new file mode 100755 index 0000000000..4847bb82c1 --- /dev/null +++ b/tests/bugs/modalg_1/bug117_2 @@ -0,0 +1,17 @@ + +puts "================" +puts "OCC117" +puts "================" +puts "" + +restore [locate_data_file OCC117.brep] sh +explode sh +checkshape sh_1 +checkshape sh_2 + +bfuse result sh_2 sh_1 + +set square 292297 +set 2dviewer 0 + + diff --git a/tests/bugs/modalg_1/bug118 b/tests/bugs/modalg_1/bug118 new file mode 100755 index 0000000000..936f184aad --- /dev/null +++ b/tests/bugs/modalg_1/bug118 @@ -0,0 +1,17 @@ +puts "========" +puts "OCC118" +puts "========" +######################################################## +## The Cone part of final fuse shape becomes invisible +######################################################## + +restore [locate_data_file OCC118-1.brep] a +checkshape a +restore [locate_data_file OCC118-2.brep] b +checkshape b + +bop a b +bopfuse result a b + +set square 4844.63 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug118_1 b/tests/bugs/modalg_1/bug118_1 new file mode 100755 index 0000000000..069e6ea12c --- /dev/null +++ b/tests/bugs/modalg_1/bug118_1 @@ -0,0 +1,17 @@ +puts "========" +puts "OCC118" +puts "========" +######################################################## +## The Cone part of final fuse shape becomes invisible +######################################################## + +restore [locate_data_file OCC118-1.brep] a +checkshape a +restore [locate_data_file OCC118-2.brep] b +checkshape b + +bfuse result a b + +set square 4844.63 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_1/bug118_2 b/tests/bugs/modalg_1/bug118_2 new file mode 100755 index 0000000000..ea8056d799 --- /dev/null +++ b/tests/bugs/modalg_1/bug118_2 @@ -0,0 +1,17 @@ +puts "========" +puts "OCC118" +puts "========" +######################################################## +## The Cone part of final fuse shape becomes invisible +######################################################## + +restore [locate_data_file OCC118-1.brep] a +checkshape a +restore [locate_data_file OCC118-2.brep] b +checkshape b + +bfuse result b a + +set square 4844.63 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_1/bug12213 b/tests/bugs/modalg_1/bug12213 new file mode 100755 index 0000000000..d52e13b4ad --- /dev/null +++ b/tests/bugs/modalg_1/bug12213 @@ -0,0 +1,47 @@ +puts "============" +puts "OCC12213" +puts "============" +puts "" +####################################################################### +# Invalid sweep was created by command "buildsweep" in DRAW in case circular path +####################################################################### + +set BugNumber OCC12213 + +circle c1 0 0 0 100 +trim cc1 c1 0 3.14 +mkedge e2 cc1 +wire w2 e2 + +box a 95 -10 -5 10 10 10 +explode a w +explode a_4 e +wire w21 a_4_1 a_4_2 a_4_3 a_4_4 + +box b -110 -10 -5 20 10 10 +explode b w +explode b_4 e +wire w22 b_4_1 b_4_2 b_4_3 b_4_4 + +explode w2 v + +mksweep w2 +addsweep w21 w2_1 +addsweep w22 w2_2 +buildsweep result + +set square 15708.8 + +# Analysis of "nbshapes res" +set nb_v_good 8 +set nb_e_good 12 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 29 + +set 2dviewer 1 + diff --git a/tests/bugs/modalg_1/bug12257 b/tests/bugs/modalg_1/bug12257 new file mode 100755 index 0000000000..39214ff550 --- /dev/null +++ b/tests/bugs/modalg_1/bug12257 @@ -0,0 +1,37 @@ +puts "============" +puts "OCC12257" +puts "============" +puts "" +####################################################################### +# Fuse operation fails +####################################################################### + +set BugNumber OCC12257 + +puts "Load shape ..." +restore [locate_data_file OCC12257.brep] b1 + +explode b1 + +puts "Prepare boolean operation ..." +bop b1_1 b1_2 + +puts "Start boolean operation ..." +bopfuse result +puts "Finish boolean operation ..." + +set square 3394.17 + +# Analysis of "nbshapes res" +set nb_v_good 72 +set nb_e_good 109 +set nb_w_good 39 +set nb_f_good 39 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 262 + +set 2dviewer 1 + diff --git a/tests/bugs/modalg_1/bug1226 b/tests/bugs/modalg_1/bug1226 new file mode 100755 index 0000000000..cc775f0d25 --- /dev/null +++ b/tests/bugs/modalg_1/bug1226 @@ -0,0 +1,24 @@ +puts "================" +puts "OCC1226" +puts "The revolution problem reproduced in OCC Samples" +puts "================" +puts "" + +vertex v1 0 0 0 +vertex v2 50 0 0 +vertex v3 50 50 0 + +edge e1 v1 v2 +edge e2 v2 v3 +edge e3 v3 v1 + +wire w e1 e2 e3 + +mkplane f w + +revol result f 0 0 30 0 1 0 180 + +set square 23211.3 +set 2dviewer 0 + + diff --git a/tests/bugs/modalg_1/bug122_1 b/tests/bugs/modalg_1/bug122_1 new file mode 100755 index 0000000000..3bf29a6fe4 --- /dev/null +++ b/tests/bugs/modalg_1/bug122_1 @@ -0,0 +1,17 @@ + +puts "================" +puts "OCC122" +puts "================" +puts "" + +restore [locate_data_file OCC122.brep] sh +explode sh + +checkshape sh_1 +checkshape sh_2 + +bfuse result sh_1 sh_2 + +set square 172790 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug122_2 b/tests/bugs/modalg_1/bug122_2 new file mode 100755 index 0000000000..1fbedc286e --- /dev/null +++ b/tests/bugs/modalg_1/bug122_2 @@ -0,0 +1,16 @@ +puts "================" +puts "OCC122" +puts "================" +puts "" + +restore [locate_data_file OCC122.brep] sh +explode sh + +checkshape sh_1 +checkshape sh_2 + +bfuse result sh_2 sh_1 + +set square 172790 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug122_3 b/tests/bugs/modalg_1/bug122_3 new file mode 100755 index 0000000000..b92f668e11 --- /dev/null +++ b/tests/bugs/modalg_1/bug122_3 @@ -0,0 +1,16 @@ +puts "================" +puts "OCC122" +puts "================" +puts "" + +restore [locate_data_file OCC122.brep] sh +explode sh + +checkshape sh_1 +checkshape sh_2 + +bcut result sh_1 sh_2 + +set square 83334.1 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug122_4 b/tests/bugs/modalg_1/bug122_4 new file mode 100755 index 0000000000..7e892c3f91 --- /dev/null +++ b/tests/bugs/modalg_1/bug122_4 @@ -0,0 +1,16 @@ + +puts "================" +puts "OCC122" +puts "================" +puts "" + +restore [locate_data_file OCC122.brep] sh +explode sh + +checkshape sh_1 +checkshape sh_2 + +bcut result sh_2 sh_1 + +set square 132943 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug123_1 b/tests/bugs/modalg_1/bug123_1 new file mode 100755 index 0000000000..ca0a6d22c5 --- /dev/null +++ b/tests/bugs/modalg_1/bug123_1 @@ -0,0 +1,17 @@ + +puts "================" +puts "OCC123" +puts "================" +puts "" + +restore [locate_data_file OCC123.brep] sh +checkshape sh + +explode sh + +bfuse result sh_1 sh_2 + +set square 81598.4 +set 2dviewer 0 + + diff --git a/tests/bugs/modalg_1/bug123_2 b/tests/bugs/modalg_1/bug123_2 new file mode 100755 index 0000000000..edb5a8869b --- /dev/null +++ b/tests/bugs/modalg_1/bug123_2 @@ -0,0 +1,18 @@ + +puts "================" +puts "OCC123" +puts "================" +puts "" + +restore [locate_data_file OCC123.brep] sh +checkshape sh + +explode sh + +bfuse result sh_2 sh_1 + +set square 81598.4 +set 2dviewer 0 + + + diff --git a/tests/bugs/modalg_1/bug1243_1 b/tests/bugs/modalg_1/bug1243_1 new file mode 100755 index 0000000000..8fa04a21b7 --- /dev/null +++ b/tests/bugs/modalg_1/bug1243_1 @@ -0,0 +1,26 @@ +puts "================" +puts "OCC1243" +puts "================" +puts "Bad solid created from face with command 'revol'" +puts "" + +restore [locate_data_file OCC1243-1.brep] f1 +checkshape f1 + +revol result f1 -5000.0 0.0 0.0 10000.0 0.0 0.0 360.0 + +set tolerance [maxtolerance result] +regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxFaceTolerance +regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxEdgeTolerance +regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxVertexTolerance + +set max_tolerance 1.00000e-06 + +if { ${MaxFaceTolerance} > ${max_tolerance} || ${MaxEdgeTolerance} > ${max_tolerance} || ${MaxVertexTolerance} > ${max_tolerance} } { + puts "OCC1243 - Error" +} else { + puts "OCC1243 - OK" +} + +set square 350733 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug1243_2 b/tests/bugs/modalg_1/bug1243_2 new file mode 100755 index 0000000000..3fc9d74348 --- /dev/null +++ b/tests/bugs/modalg_1/bug1243_2 @@ -0,0 +1,26 @@ +puts "================" +puts "OCC1243" +puts "================" +puts "Bad solid created from face with command 'revol'" +puts "" + +restore [locate_data_file OCC1243-2.brep] f1 +checkshape f1 + +revol result f1 -5000.0 0.0 0.0 10000.0 0.0 0.0 360.0 + +set tolerance [maxtolerance result] +regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxFaceTolerance +regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxEdgeTolerance +regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxVertexTolerance + +set max_tolerance 1.00000e-06 + +if { ${MaxFaceTolerance} > ${max_tolerance} || ${MaxEdgeTolerance} > ${max_tolerance} || ${MaxVertexTolerance} > ${max_tolerance} } { + puts "OCC1243 - Error" +} else { + puts "OCC1243 - OK" +} + +set square 3.06024e+06 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug12507 b/tests/bugs/modalg_1/bug12507 new file mode 100755 index 0000000000..dbef9be48f --- /dev/null +++ b/tests/bugs/modalg_1/bug12507 @@ -0,0 +1,30 @@ +puts "============" +puts "OCC12507" +puts "============" +puts "" +####################################################################### +# Wrong result of fuse operation +####################################################################### + +puts "First shape ..." +pcylinder c 3 3 +explode c e + +puts "Second shape ..." +tcopy c_3 e3 +ttranslate e3 0 6 0 + +bop c_3 e3 +bopfuse result + +set nb_v_good 3 +set nb_e_good 4 +set nb_w_good 1 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 9 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug1255 b/tests/bugs/modalg_1/bug1255 new file mode 100755 index 0000000000..7ee3cb6152 --- /dev/null +++ b/tests/bugs/modalg_1/bug1255 @@ -0,0 +1,16 @@ +puts "================" +puts "OCC1255" +puts "================" +puts "" +# Exception in command 'section' + +restore [locate_data_file OCC1255.brep] a +checkshape a + +plane p1 0 -36.8067 0 0 1 0 +mkface f1 p1 + +bsection result a f1 + +set length 5534.74 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug1255_1 b/tests/bugs/modalg_1/bug1255_1 new file mode 100755 index 0000000000..e204e59af1 --- /dev/null +++ b/tests/bugs/modalg_1/bug1255_1 @@ -0,0 +1,24 @@ +puts "=========" +puts " OCC1255 " +puts "=========" +puts "" +############################################### +## Exception in command 'section' +# (This script tests new topology) +############################################### + +restore [locate_data_file OCC1255.brep] a +checkshape a + +plane p1 0 -36.8067 0 0 1 0 +mkface f1 p1 + +if { [catch {bop a f1 } ] } { + puts "Faulty OCC1255: BOP operation was made wrongly" +} else { + bopsection result +} + +set length 5383.42 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug12627 b/tests/bugs/modalg_1/bug12627 new file mode 100755 index 0000000000..073bbadf66 --- /dev/null +++ b/tests/bugs/modalg_1/bug12627 @@ -0,0 +1,30 @@ +puts "============" +puts "OCC12627" +puts "============" +puts "" +####################################################################### +# Classification of a point comparing to a face is incorrect +####################################################################### + +set BugNumber OCC12627 + +restore [locate_data_file OCC12627_1.brep] b1 +restore [locate_data_file OCC12627_2.brep] b2 + +bop b1 b2 +bopfuse result + +set square 272295 +set nb_v_good 13 +set nb_e_good 20 +set nb_w_good 9 +set nb_f_good 9 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 54 + +set 2dviewer 0 + + diff --git a/tests/bugs/modalg_1/bug12661 b/tests/bugs/modalg_1/bug12661 new file mode 100755 index 0000000000..762d9f9f40 --- /dev/null +++ b/tests/bugs/modalg_1/bug12661 @@ -0,0 +1,82 @@ +puts "================" +puts "OCC12661" +puts "================" +puts "" +####################################################################################### +# Wrong calculation of bnd box for edge if edge has polygon of triangulation +####################################################################################### + +proc GetPercent {Value GoodValue} { + set Percent 0. + if {${GoodValue} != 0.} { + set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] + } elseif {${Value} != 0.} { + set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] + } else { + set Percent 0. + } + return ${Percent} +} + +set BugNumber OCC12661 + +restore [locate_data_file OCC12661.brep] result +set res [bounding result] + +set x1 [lindex ${res} 0] +set y1 [lindex ${res} 1] +set z1 [lindex ${res} 2] +set x2 [lindex ${res} 3] +set y2 [lindex ${res} 4] +set z2 [lindex ${res} 5] + +set good_x1 -6.3659273065258741 +set good_y1 0.7051405053395956 +set good_z1 -2.5792617865186296 +set good_x2 6.3659273065258795 +set good_y2 7.6599592236605769 +set good_z2 3.0815250146676485 + +set percent_max 0.1 +set status 0 + +set x1_percent [GetPercent ${x1} ${good_x1}] +set y1_percent [GetPercent ${y1} ${good_y1}] +set z1_percent [GetPercent ${z1} ${good_z1}] +set x2_percent [GetPercent ${x2} ${good_x2}] +set y2_percent [GetPercent ${y2} ${good_y2}] +set z2_percent [GetPercent ${z2} ${good_z2}] + +if {${x1_percent} > ${percent_max}} { + puts "Faulty ${BugNumber} : x1 is wrong" + set status 1 +} +if {${y1_percent} > ${percent_max}} { + puts "Faulty ${BugNumber} : y1 is wrong" + set status 1 +} +if {${z1_percent} > ${percent_max}} { + puts "Faulty ${BugNumber} : z1 is wrong" + set status 1 +} +if {${x2_percent} > ${percent_max}} { + puts "Faulty ${BugNumber} : x2 is wrong" + set status 1 +} +if {${y2_percent} > ${percent_max}} { + puts "Faulty ${BugNumber} : y2 is wrong" + set status 1 +} +if {${z2_percent} > ${percent_max}} { + puts "Faulty ${BugNumber} : z2 is wrong" + set status 1 +} + +if { ${status} == 0 } { + puts "${BugNumber}: OK" +} else { + puts "${BugNumber}: Faulty" +} + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug12918 b/tests/bugs/modalg_1/bug12918 new file mode 100755 index 0000000000..079b51fba0 --- /dev/null +++ b/tests/bugs/modalg_1/bug12918 @@ -0,0 +1,29 @@ +puts "============" +puts "OCC12918" +puts "============" +puts "" +####################################################################### +# Boolean Operations failed +####################################################################### + +set BugNumber OCC12918 + +restore [locate_data_file OCC12918_1.brep] b1 +restore [locate_data_file OCC12918_2.brep] b2 + +bop b1 b2 +bopfuse result + +set square 0.00240038 +set nb_v_good 24 +set nb_e_good 36 +set nb_w_good 14 +set nb_f_good 14 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 91 + +set 2dviewer 1 + diff --git a/tests/bugs/modalg_1/bug13116_1 b/tests/bugs/modalg_1/bug13116_1 new file mode 100755 index 0000000000..45a23c3452 --- /dev/null +++ b/tests/bugs/modalg_1/bug13116_1 @@ -0,0 +1,29 @@ +puts "============" +puts "OCC13116" +puts "============" +puts "" +####################################################################### +# Boolean Operations produce faulty shape +####################################################################### + +set BugNumber OCC13116 + +restore [locate_data_file OCC13116_sh1.brep] b1 +restore [locate_data_file OCC13116_sh2.brep] b2 + +bop b1 b2 +bopfuse result + +set square 438194 +set nb_v_good 21 +set nb_e_good 37 +set nb_w_good 16 +set nb_f_good 16 +set nb_sh_good 2 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 94 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug13116_2 b/tests/bugs/modalg_1/bug13116_2 new file mode 100755 index 0000000000..4cd36f391f --- /dev/null +++ b/tests/bugs/modalg_1/bug13116_2 @@ -0,0 +1,27 @@ +puts "============" +puts "OCC13116" +puts "============" +puts "" +####################################################################### +# Boolean Operations produce faulty shape +####################################################################### + +restore [locate_data_file OCC13116_sh1.brep] b1 +restore [locate_data_file OCC13116_sh2.brep] b2 + +bop b1 b2 +bopcommon result + +set square 3769.91 +set nb_v_good 3 +set nb_e_good 5 +set nb_w_good 2 +set nb_f_good 2 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 15 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug13116_3 b/tests/bugs/modalg_1/bug13116_3 new file mode 100755 index 0000000000..5f36a5ea38 --- /dev/null +++ b/tests/bugs/modalg_1/bug13116_3 @@ -0,0 +1,27 @@ +puts "============" +puts "OCC13116" +puts "============" +puts "" +####################################################################### +# Boolean Operations produce faulty shape +####################################################################### + +restore [locate_data_file OCC13116_sh1.brep] b1 +restore [locate_data_file OCC13116_sh2.brep] b2 + +bop b1 b2 +bopcut result + +set square 438194 +set nb_v_good 21 +set nb_e_good 34 +set nb_w_good 15 +set nb_f_good 15 +set nb_sh_good 2 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 89 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug13116_4 b/tests/bugs/modalg_1/bug13116_4 new file mode 100755 index 0000000000..a4364700b7 --- /dev/null +++ b/tests/bugs/modalg_1/bug13116_4 @@ -0,0 +1,27 @@ +puts "============" +puts "OCC13116" +puts "============" +puts "" +####################################################################### +# Boolean Operations produce faulty shape +####################################################################### + +restore [locate_data_file OCC13116_sh1.brep] b1 +restore [locate_data_file OCC13116_sh2.brep] b2 + +bop b1 b2 +boptuc result + +set square 3769.89 +set nb_v_good 3 +set nb_e_good 8 +set nb_w_good 3 +set nb_f_good 3 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 20 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug13140 b/tests/bugs/modalg_1/bug13140 new file mode 100755 index 0000000000..4f6182227d --- /dev/null +++ b/tests/bugs/modalg_1/bug13140 @@ -0,0 +1,47 @@ +puts "============" +puts "OCC13140" +puts "============" +puts "" +####################################################################### +# Exception during creation pipe on from attached spine and profile +####################################################################### + +restore [locate_data_file OCC13140_Spine.brep] Spine +restore [locate_data_file OCC13140_Profile.brep] Profile + +pipe result Spine Profile + +set square 3.48689 +set good_vertex 2 +set good_edge 3 +set good_wire 1 +set good_face 1 + +set explode_v_length [llength [explode result v] ] +set explode_e_length [llength [explode result e] ] +set explode_w_length [llength [explode result w] ] +set explode_f_length [llength [explode result f] ] + +if { ${explode_v_length} != ${good_vertex} } { + puts "vertex: Faulty" +} else { + puts "vertex: OK" +} +if { ${explode_e_length} != ${good_edge} } { + puts "edge: Faulty" +} else { + puts "edge: OK" +} +if { ${explode_w_length} != ${good_wire} } { + puts "wire: Faulty" +} else { + puts "wire: OK" +} +if { ${explode_f_length} != ${good_face} } { + puts "face: Faulty" +} else { + puts "face: OK" +} + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug13142 b/tests/bugs/modalg_1/bug13142 new file mode 100755 index 0000000000..e1563caa66 --- /dev/null +++ b/tests/bugs/modalg_1/bug13142 @@ -0,0 +1,28 @@ +puts "============" +puts "OCC13142" +puts "============" +puts "" +####################################################################### +# Exception is raised while performing boolean operations +####################################################################### + +restore [locate_data_file OCC13142.brep] result + +vinit +vdisplay result +vfit +vsetdispmode 1 + +set square 513.007 +set nb_v_good 34 +set nb_e_good 66 +set nb_w_good 47 +set nb_f_good 42 +set nb_sh_good 9 +set nb_sol_good 9 +set nb_compsol_good 0 +set nb_compound_good 3 +set nb_shape_good 210 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug13186_1 b/tests/bugs/modalg_1/bug13186_1 new file mode 100755 index 0000000000..1b98aede77 --- /dev/null +++ b/tests/bugs/modalg_1/bug13186_1 @@ -0,0 +1,29 @@ +puts "TODO OCC12345 ALL: Error : Result shape is WRONG" +puts "============" +puts "OCC13186" +puts "============" +puts "" +####################################################################### +# Problem with Boolean operation +# Bug is reprodused on Linux platform only +####################################################################### + +restore [locate_data_file OCC13186_cutcyl11.brep] b1 +restore [locate_data_file OCC13186_sphere.brep] b2 + +bop b1 b2 +bopcut result + +set square 42.5841 +set nb_v_good 19 +set nb_e_good 25 +set nb_w_good 12 +set nb_f_good 7 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 66 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug13186_2 b/tests/bugs/modalg_1/bug13186_2 new file mode 100755 index 0000000000..10c6b3bcc2 --- /dev/null +++ b/tests/bugs/modalg_1/bug13186_2 @@ -0,0 +1,29 @@ +puts "TODO OCC12345 ALL: Error : Result shape is WRONG" +puts "============" +puts "OCC13186" +puts "============" +puts "" +####################################################################### +# Problem with Boolean operation +# Bug is reprodused on Linux platform only +####################################################################### + +restore [locate_data_file OCC13186_cutcyl11.brep] b1 +restore [locate_data_file OCC13186_sphere.brep] b2 + +bop b1 b2 +bopfuse result + +set square 85.6816 +set nb_v_good 21 +set nb_e_good 28 +set nb_w_good 13 +set nb_f_good 8 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 73 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug13186_3 b/tests/bugs/modalg_1/bug13186_3 new file mode 100755 index 0000000000..aa62fa0484 --- /dev/null +++ b/tests/bugs/modalg_1/bug13186_3 @@ -0,0 +1,29 @@ +puts "TODO OCC12345 ALL: Error : Result shape is WRONG" +puts "============" +puts "OCC13186" +puts "============" +puts "" +####################################################################### +# Problem with Boolean operation +# Bug is reprodused on Linux platform only +####################################################################### + +restore [locate_data_file OCC13186_cutcyl11.brep] b1 +restore [locate_data_file OCC13186_sphere.brep] b2 + +bop b1 b2 +bopcommon result + +set square 14.9648 +set nb_v_good 8 +set nb_e_good 11 +set nb_w_good 7 +set nb_f_good 5 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 34 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug13186_4 b/tests/bugs/modalg_1/bug13186_4 new file mode 100755 index 0000000000..ccb5179adb --- /dev/null +++ b/tests/bugs/modalg_1/bug13186_4 @@ -0,0 +1,29 @@ +puts "TODO OCC12345 ALL: Error : Result shape is WRONG" +puts "============" +puts "OCC13186" +puts "============" +puts "" +####################################################################### +# Problem with Boolean operation +# Bug is reprodused on Linux platform only +####################################################################### + +restore [locate_data_file OCC13186_cutcyl11.brep] b1 +restore [locate_data_file OCC13186_sphere.brep] b2 + +bop b1 b2 +boptuc result + +set square 58.0624 +set nb_v_good 10 +set nb_e_good 14 +set nb_w_good 8 +set nb_f_good 6 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 41 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug13209_1 b/tests/bugs/modalg_1/bug13209_1 new file mode 100755 index 0000000000..e42f64f226 --- /dev/null +++ b/tests/bugs/modalg_1/bug13209_1 @@ -0,0 +1,27 @@ +puts "============" +puts "OCC13209" +puts "============" +puts "" +####################################################################### +# Exception is raised while performing boolean operations +####################################################################### + +restore [locate_data_file OCC13209_s1.brep] b1 +restore [locate_data_file OCC13209_s2.brep] b2 + +bop b1 b2 +bopfuse result + +set square 17308.3 +set nb_v_good 13 +set nb_e_good 25 +set nb_w_good 13 +set nb_f_good 12 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 66 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug13209_2 b/tests/bugs/modalg_1/bug13209_2 new file mode 100755 index 0000000000..fcd4e9ebf2 --- /dev/null +++ b/tests/bugs/modalg_1/bug13209_2 @@ -0,0 +1,30 @@ +puts "============" +puts "OCC13209" +puts "============" +puts "" +####################################################################### +# Exception is raised while performing boolean operations +####################################################################### + +restore [locate_data_file OCC13209_s1.brep] b1 +restore [locate_data_file OCC13209_s2.brep] b2 + +bop b1 b2 +bopcommon result + +set square 2990.42 +set nb_v_good 13 +set nb_e_good 23 +set nb_w_good 10 +set nb_f_good 10 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 59 + +set 2dviewer 0 + + + + diff --git a/tests/bugs/modalg_1/bug13209_3 b/tests/bugs/modalg_1/bug13209_3 new file mode 100755 index 0000000000..e9d940df67 --- /dev/null +++ b/tests/bugs/modalg_1/bug13209_3 @@ -0,0 +1,27 @@ +puts "============" +puts "OCC13209" +puts "============" +puts "" +####################################################################### +# Exception is raised while performing boolean operations +####################################################################### + +restore [locate_data_file OCC13209_s1.brep] b1 +restore [locate_data_file OCC13209_s2.brep] b2 + +bop b1 b2 +bopcut result + +set square 17292.5 +set nb_v_good 13 +set nb_e_good 26 +set nb_w_good 12 +set nb_f_good 11 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 65 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug13209_4 b/tests/bugs/modalg_1/bug13209_4 new file mode 100755 index 0000000000..c9de1b5e0f --- /dev/null +++ b/tests/bugs/modalg_1/bug13209_4 @@ -0,0 +1,27 @@ +puts "============" +puts "OCC13209" +puts "============" +puts "" +####################################################################### +# Exception is raised while performing boolean operations +####################################################################### + +restore [locate_data_file OCC13209_s1.brep] b1 +restore [locate_data_file OCC13209_s2.brep] b2 + +bop b1 b2 +boptuc result + +set square 3006.19 +set nb_v_good 11 +set nb_e_good 18 +set nb_w_good 11 +set nb_f_good 11 +set nb_sh_good 3 +set nb_sol_good 3 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 58 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug13211_1 b/tests/bugs/modalg_1/bug13211_1 new file mode 100755 index 0000000000..4413d96d6a --- /dev/null +++ b/tests/bugs/modalg_1/bug13211_1 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC13211" +puts "============" +puts "" +####################################################################### +# Wrong treatment of conical faces in BOP algorithm +####################################################################### + +restore [locate_data_file OCC13211-f14.brep] b1 +restore [locate_data_file OCC13211-f24.brep] b2 + +bop b1 b2 +bopsection result + +set length 37.7057 +set nb_v_good 5 +set nb_e_good 4 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 10 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug13211_10 b/tests/bugs/modalg_1/bug13211_10 new file mode 100755 index 0000000000..79e24d1680 --- /dev/null +++ b/tests/bugs/modalg_1/bug13211_10 @@ -0,0 +1,27 @@ +puts "============" +puts "OCC13211" +puts "============" +puts "" +####################################################################### +# Wrong treatment of conical faces in BOP algorithm +####################################################################### + +restore [locate_data_file OCC13209_s1.brep] s1 +restore [locate_data_file OCC13209_s2.brep] s2 + +bop s1 s2 +boptuc result + +set square 3006.19 +set nb_v_good 11 +set nb_e_good 18 +set nb_w_good 11 +set nb_f_good 11 +set nb_sh_good 3 +set nb_sol_good 3 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 58 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug13211_11 b/tests/bugs/modalg_1/bug13211_11 new file mode 100755 index 0000000000..5ecd0b9f66 --- /dev/null +++ b/tests/bugs/modalg_1/bug13211_11 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC13211" +puts "============" +puts "" +####################################################################### +# Wrong treatment of conical faces in BOP algorithm +####################################################################### + +restore [locate_data_file OCC13209_s1.brep] s1 +restore [locate_data_file OCC13209_s2.brep] s2 + +bop s1 s2 +bopsection result + +set length 228.699 +set nb_v_good 13 +set nb_e_good 15 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 29 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug13211_2 b/tests/bugs/modalg_1/bug13211_2 new file mode 100755 index 0000000000..9e78307060 --- /dev/null +++ b/tests/bugs/modalg_1/bug13211_2 @@ -0,0 +1,46 @@ +puts "TODO ?OCC12345 ALL: Error : Result shape is WRONG" +puts "============" +puts "OCC13211" +puts "============" +puts "" +####################################################################### +# Wrong treatment of conical faces in BOP algorithm +####################################################################### + +set BugNumber OCC13211 + +vertex v1 136.06, 187.51, 0.0 +vertex v2 136.06, 143.01, 0.0 +edge e1 v1 v2 +vertex v3 136.06, 143.01, 0.0 +vertex v4 128.08, 143.01, 0.0 +edge e2 v3 v4 +vertex v5 128.08, 143.01, 0.0 +vertex v6 127.88, 164.75, 0.0 +edge e3 v5 v6 +vertex v7 127.88, 164.75, 0.0 +vertex v8 116.11, 176.00, 0.0 +edge e4 v7 v8 +vertex v9 116.11, 176.00, 0.0 +vertex v10 136.06, 187.51, 0.0 +edge e5 v9 v10 +wire twire e1 e2 e3 e4 e5 +mkplane tface twire +revol r1 tface 153.08, 143.01 0.0 1 0 0 360 1 +revol r2 tface 136.06, 68.01, 0.0 0 1 0 360 1 + +bop r1 r2 +bopfuse result + +set square 17308.3 +set nb_v_good 13 +set nb_e_good 25 +set nb_w_good 13 +set nb_f_good 12 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 66 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug13211_3 b/tests/bugs/modalg_1/bug13211_3 new file mode 100755 index 0000000000..5f60902008 --- /dev/null +++ b/tests/bugs/modalg_1/bug13211_3 @@ -0,0 +1,43 @@ +puts "============" +puts "OCC13211" +puts "============" +puts "" +####################################################################### +# Wrong treatment of conical faces in BOP algorithm +####################################################################### + +vertex v1 136.06, 187.51, 0.0 +vertex v2 136.06, 143.01, 0.0 +edge e1 v1 v2 +vertex v3 136.06, 143.01, 0.0 +vertex v4 128.08, 143.01, 0.0 +edge e2 v3 v4 +vertex v5 128.08, 143.01, 0.0 +vertex v6 127.88, 164.75, 0.0 +edge e3 v5 v6 +vertex v7 127.88, 164.75, 0.0 +vertex v8 116.11, 176.00, 0.0 +edge e4 v7 v8 +vertex v9 116.11, 176.00, 0.0 +vertex v10 136.06, 187.51, 0.0 +edge e5 v9 v10 +wire twire e1 e2 e3 e4 e5 +mkplane tface twire +revol r1 tface 153.08, 143.01 0.0 1 0 0 360 1 +revol r2 tface 136.06, 68.01, 0.0 0 1 0 360 1 + +bop r1 r2 +bopcommon result + +set square 2990.42 +set nb_v_good 13 +set nb_e_good 23 +set nb_w_good 10 +set nb_f_good 10 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 59 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug13211_4 b/tests/bugs/modalg_1/bug13211_4 new file mode 100755 index 0000000000..d8c09f7a02 --- /dev/null +++ b/tests/bugs/modalg_1/bug13211_4 @@ -0,0 +1,44 @@ +puts "TODO ?OCC12345 ALL: Error : Result shape is WRONG" +puts "============" +puts "OCC13211" +puts "============" +puts "" +####################################################################### +# Wrong treatment of conical faces in BOP algorithm +####################################################################### + +vertex v1 136.06, 187.51, 0.0 +vertex v2 136.06, 143.01, 0.0 +edge e1 v1 v2 +vertex v3 136.06, 143.01, 0.0 +vertex v4 128.08, 143.01, 0.0 +edge e2 v3 v4 +vertex v5 128.08, 143.01, 0.0 +vertex v6 127.88, 164.75, 0.0 +edge e3 v5 v6 +vertex v7 127.88, 164.75, 0.0 +vertex v8 116.11, 176.00, 0.0 +edge e4 v7 v8 +vertex v9 116.11, 176.00, 0.0 +vertex v10 136.06, 187.51, 0.0 +edge e5 v9 v10 +wire twire e1 e2 e3 e4 e5 +mkplane tface twire +revol r1 tface 153.08, 143.01 0.0 1 0 0 360 1 +revol r2 tface 136.06, 68.01, 0.0 0 1 0 360 1 + +bop r1 r2 +bopcut result + +set square 17292.5 +set nb_v_good 13 +set nb_e_good 26 +set nb_w_good 12 +set nb_f_good 11 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 65 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug13211_5 b/tests/bugs/modalg_1/bug13211_5 new file mode 100755 index 0000000000..5d832e4b44 --- /dev/null +++ b/tests/bugs/modalg_1/bug13211_5 @@ -0,0 +1,43 @@ +puts "============" +puts "OCC13211" +puts "============" +puts "" +####################################################################### +# Wrong treatment of conical faces in BOP algorithm +####################################################################### + +vertex v1 136.06, 187.51, 0.0 +vertex v2 136.06, 143.01, 0.0 +edge e1 v1 v2 +vertex v3 136.06, 143.01, 0.0 +vertex v4 128.08, 143.01, 0.0 +edge e2 v3 v4 +vertex v5 128.08, 143.01, 0.0 +vertex v6 127.88, 164.75, 0.0 +edge e3 v5 v6 +vertex v7 127.88, 164.75, 0.0 +vertex v8 116.11, 176.00, 0.0 +edge e4 v7 v8 +vertex v9 116.11, 176.00, 0.0 +vertex v10 136.06, 187.51, 0.0 +edge e5 v9 v10 +wire twire e1 e2 e3 e4 e5 +mkplane tface twire +revol r1 tface 153.08, 143.01 0.0 1 0 0 360 1 +revol r2 tface 136.06, 68.01, 0.0 0 1 0 360 1 + +bop r1 r2 +boptuc result + +set square 3006.19 +set nb_v_good 11 +set nb_e_good 18 +set nb_w_good 11 +set nb_f_good 11 +set nb_sh_good 3 +set nb_sol_good 3 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 58 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug13211_6 b/tests/bugs/modalg_1/bug13211_6 new file mode 100755 index 0000000000..4eb80cc3b9 --- /dev/null +++ b/tests/bugs/modalg_1/bug13211_6 @@ -0,0 +1,43 @@ +puts "============" +puts "OCC13211" +puts "============" +puts "" +####################################################################### +# Wrong treatment of conical faces in BOP algorithm +####################################################################### + +vertex v1 136.06, 187.51, 0.0 +vertex v2 136.06, 143.01, 0.0 +edge e1 v1 v2 +vertex v3 136.06, 143.01, 0.0 +vertex v4 128.08, 143.01, 0.0 +edge e2 v3 v4 +vertex v5 128.08, 143.01, 0.0 +vertex v6 127.88, 164.75, 0.0 +edge e3 v5 v6 +vertex v7 127.88, 164.75, 0.0 +vertex v8 116.11, 176.00, 0.0 +edge e4 v7 v8 +vertex v9 116.11, 176.00, 0.0 +vertex v10 136.06, 187.51, 0.0 +edge e5 v9 v10 +wire twire e1 e2 e3 e4 e5 +mkplane tface twire +revol r1 tface 153.08, 143.01 0.0 1 0 0 360 1 +revol r2 tface 136.06, 68.01, 0.0 0 1 0 360 1 + +bop r1 r2 +bopsection result + +set length 228.699 +set nb_v_good_vertex 13 +set nb_e_good_edge 15 +set nb_w_good_wire 0 +set nb_f_good_face 0 +set nb_sh_good_shell 0 +set nb_sol_good_solid 0 +set nb_compsol_good_compsolid 0 +set nb_compound_good_compound 1 +set nb_shape_good_shape 29 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug13211_7 b/tests/bugs/modalg_1/bug13211_7 new file mode 100755 index 0000000000..35455eadc1 --- /dev/null +++ b/tests/bugs/modalg_1/bug13211_7 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC13211" +puts "============" +puts "" +####################################################################### +# Wrong treatment of conical faces in BOP algorithm +####################################################################### + +restore [locate_data_file OCC13209_s1.brep] s1 +restore [locate_data_file OCC13209_s2.brep] s2 + +bop s1 s2 +bopfuse result + +set square 17308.3 +set nb_v_good 13 +set nb_e_good 25 +set nb_w_good 13 +set nb_f_good 12 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 66 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug13211_8 b/tests/bugs/modalg_1/bug13211_8 new file mode 100755 index 0000000000..775c689910 --- /dev/null +++ b/tests/bugs/modalg_1/bug13211_8 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC13211" +puts "============" +puts "" +####################################################################### +# Wrong treatment of conical faces in BOP algorithm +####################################################################### + +restore [locate_data_file OCC13209_s1.brep] s1 +restore [locate_data_file OCC13209_s2.brep] s2 + +bop s1 s2 +bopcommon result + +set square 2990.42 +set nb_v_good 13 +set nb_e_good 23 +set nb_w_good 10 +set nb_f_good 10 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 59 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug13211_9 b/tests/bugs/modalg_1/bug13211_9 new file mode 100755 index 0000000000..6c44ff238f --- /dev/null +++ b/tests/bugs/modalg_1/bug13211_9 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC13211" +puts "============" +puts "" +####################################################################### +# Wrong treatment of conical faces in BOP algorithm +####################################################################### + +restore [locate_data_file OCC13209_s1.brep] s1 +restore [locate_data_file OCC13209_s2.brep] s2 + +bop s1 s2 +bopcut result + +set square 17292.5 +set nb_v_good 13 +set nb_e_good 26 +set nb_w_good 12 +set nb_f_good 11 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 65 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug13395 b/tests/bugs/modalg_1/bug13395 new file mode 100755 index 0000000000..84e659a20d --- /dev/null +++ b/tests/bugs/modalg_1/bug13395 @@ -0,0 +1,54 @@ +puts "============" +puts "OCC13395" +puts "============" +puts "" +####################################################################### +# Pipe is constructed wrongly on a result of revolution +####################################################################### + +# revolution of an edge to obtain half-disk +line line1 0 0 0 1 0 0 +mkedge edge1 line1 0 10 +revol revol1 edge1 0 0 0 0 1 0 180 + +# spine for pipe +line line2 0 0 0 0 1 0 +mkedge edge2 line2 0 10 +wire wire_spine edge2 + +# invalid pipe +pipe result wire_spine revol1 + +set square 828.319 +set good_vertex 6 +set good_edge 9 +set good_wire 5 +set good_face 5 +set explode_v_length [llength [explode result v] ] +set explode_e_length [llength [explode result e] ] +set explode_w_length [llength [explode result w] ] +set explode_f_length [llength [explode result f] ] + +if { ${explode_v_length} != ${good_vertex} } { + puts "vertex: Faulty" +} else { + puts "vertex: OK" +} +if { ${explode_e_length} != ${good_edge} } { + puts "edge: Faulty" +} else { + puts "edge: OK" +} +if { ${explode_w_length} != ${good_wire} } { + puts "wire: Faulty" +} else { + puts "wire: OK" +} +if { ${explode_f_length} != ${good_face} } { + puts "face: Faulty" +} else { + puts "face: OK" +} + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug13538 b/tests/bugs/modalg_1/bug13538 new file mode 100755 index 0000000000..817c1bfb5b --- /dev/null +++ b/tests/bugs/modalg_1/bug13538 @@ -0,0 +1,30 @@ +puts "============" +puts "OCC13538" +puts "============" +puts "" +####################################################################### +# Problem with Boolean operation on Shells +####################################################################### + +box a 100 100 100 +box b 100 100 100 +ttranslate b 0 0 100 +explode a Sh +explode b Sh + +bop a_1 b_1 +bopcommon result + +set square 10000 +set nb_v_good 4 +set nb_e_good 4 +set nb_w_good 1 +set nb_f_good 1 +set nb_sh_good 1 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 12 + +set 2viewer 0 + diff --git a/tests/bugs/modalg_1/bug1360 b/tests/bugs/modalg_1/bug1360 new file mode 100755 index 0000000000..3d3bec60ac --- /dev/null +++ b/tests/bugs/modalg_1/bug1360 @@ -0,0 +1,19 @@ +pload QAcommands + +puts "================" +puts "OCC1360" +puts "================" +puts "" +###################################################### +# Solid correctly displayed in shadding mode, but one tis faces itself has no prs +###################################################### + +pload XDE + +restore [locate_data_file OCC1360.brep] sh + +fixshape result sh 1e-7 + +set square 407.599 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_1/bug140 b/tests/bugs/modalg_1/bug140 new file mode 100755 index 0000000000..9f342caf75 --- /dev/null +++ b/tests/bugs/modalg_1/bug140 @@ -0,0 +1,23 @@ + +puts "================" +puts "OCC140" +puts "================" +puts "" +######################################################### +## Fillet is created incorrectly on attached shape. +######################################################### + +restore [locate_data_file shading_137.brep] s +checkshape s + +dset SCALE1 5 +tscale s 0 0 0 SCALE1 +explode s e +blend sh s 4.5*SCALE1 s_4 4.5*SCALE1 s_5 4.5*SCALE1 s_1 +explode sh so + +renamevar sh_1 result +fsameparameter result + +set square 3.65424e+06 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug144 b/tests/bugs/modalg_1/bug144 new file mode 100755 index 0000000000..b10e67e68b --- /dev/null +++ b/tests/bugs/modalg_1/bug144 @@ -0,0 +1,34 @@ +puts "TODO OCC12345 ALL: Faulty : the distanse is" +puts "TODO OCC12345 ALL: Error : The length of result shape is" + +puts "================" +puts "BUC60663" +puts "OCC144" +puts "================" +puts "" + +restore [locate_data_file buc60663a.brep] a +checkshape a +restore [locate_data_file buc60663b.brep] b +checkshape b + +bsection result a b + +puts [checksection result] + +regexp {(result_[-0-9.+eE]+$)} [explode result v] full ver + +explode b e +explode b_4 v +distmini d $ver b_5 + +regexp {([-0-9.+eE]+)$} [dump d_val] full dist +regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} [ maxtolerance $ver ] full toler + +if { [expr $dist > $toler] } { + puts "Faulty : the distanse is $dist. It is more $toler." +} + +set length 0 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug14506 b/tests/bugs/modalg_1/bug14506 new file mode 100755 index 0000000000..f36847847c --- /dev/null +++ b/tests/bugs/modalg_1/bug14506 @@ -0,0 +1,29 @@ +puts "TODO OCC12345 ALL: Error : Result shape is WRONG" + +puts "============" +puts "OCC14506" +puts "============" +puts "" +####################################################################### +# Wrong section of faces with bspline geometry +####################################################################### + +restore [locate_data_file bug14506_face1.brep] face1 +restore [locate_data_file bug14506_face2.brep] face2 + +bop face1 face2 +bopsection result + +set length 129.639 +set nb_v_good 2 +set nb_e_good 2 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 5 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug14536 b/tests/bugs/modalg_1/bug14536 new file mode 100755 index 0000000000..11e559b7c9 --- /dev/null +++ b/tests/bugs/modalg_1/bug14536 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC14536" +puts "============" +puts "" +####################################################################### +# Boolean Operation Algorithm failed +####################################################################### + +restore [locate_data_file OCC14536-sh1.brep] s1 +restore [locate_data_file OCC14536-sh2.brep] s2 + +bop s1 s2 +bopfuse result + +set square 330318 +set nb_v_good 7 +set nb_e_good 13 +set nb_w_good 6 +set nb_f_good 6 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 35 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug1456 b/tests/bugs/modalg_1/bug1456 new file mode 100755 index 0000000000..ccde302470 --- /dev/null +++ b/tests/bugs/modalg_1/bug1456 @@ -0,0 +1,36 @@ +puts "============" +puts "OCC1456" +puts "============" +puts "" +###################################################### +# Impossible to build mixed type fillets +###################################################### + +restore [locate_data_file OCC1456.brep] a + +checkshape a + +############################################## +explode a w +explode a_4 e +mkevol result a +updatevol a_4_1 0 5 0.5 20 1 5 +updatevol a_4_2 0 5 +updatevol a_4_3 0 5 +updatevol a_4_4 0 5 0.5 20 1 5 +updatevol a_4_5 0 5 0.5 20 1 5 +updatevol a_4_6 0 5 +updatevol a_4_7 0 5 0.5 20 1 5 +updatevol a_4_8 0 5 + +if { [catch { buildevol } catch_result] } { + puts "Faulty OCC1456 (case 2)" +} + +vinit +vdisplay result +vsetdispmode 0 +vfit + +set square 3.21455e+06 +set only_screen 1 diff --git a/tests/bugs/modalg_1/bug14643 b/tests/bugs/modalg_1/bug14643 new file mode 100755 index 0000000000..61159b278f --- /dev/null +++ b/tests/bugs/modalg_1/bug14643 @@ -0,0 +1,39 @@ +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" + +puts "============" +puts "OCC14643" +puts "============" +puts "" +####################################################################### +# Checkshape command gives wrong result for compound of 66 solids +####################################################################### + +set BugNumber OCC14643 + +restore [locate_data_file OCC14643.brep] result + +set square 8.63143e+07 +set nb_v_good 108 +set nb_e_good 282 +set nb_w_good 239 +set nb_f_good 259 +set nb_sh_good 66 +set nb_sol_good 66 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 1021 + +puts "" +puts "Check each solid" +explode result +for {set k 1} {$k < 67} {incr k} { + puts "" + puts [eval whatis result_$k] + puts [eval checkshape result_$k] + wait .5 +} +puts "" +puts "End check each solid" + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug14777 b/tests/bugs/modalg_1/bug14777 new file mode 100755 index 0000000000..06ccd40c09 --- /dev/null +++ b/tests/bugs/modalg_1/bug14777 @@ -0,0 +1,27 @@ +puts "============" +puts "OCC14777" +puts "============" +puts "" +####################################################################### +# Boolean Operation Algorithm failed +####################################################################### + +restore [locate_data_file OCC14777-s1.brep] s1 +restore [locate_data_file OCC14777-s2.brep] s2 + +bop s1 s2 +bopcut result + +set square 10653.3 +set nb_v_good 6 +set nb_e_good 9 +set nb_w_good 5 +set nb_f_good 5 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 28 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug1477_1 b/tests/bugs/modalg_1/bug1477_1 new file mode 100755 index 0000000000..ec27ed3140 --- /dev/null +++ b/tests/bugs/modalg_1/bug1477_1 @@ -0,0 +1,25 @@ +puts "============" +puts "OCC1477" +puts "============" +puts "" +###################################################### +# Problems in MakePipeShell +# (case 1) +###################################################### + +restore [locate_data_file OCC1477-1.brep] s1 +restore [locate_data_file OCC1477-2.brep] s2 + +checkshape s1 +checkshape s2 + +mksweep s1 + +addsweep s2 + +if { [catch {buildsweep result} catch_result] } { + puts "Faulty OCC1477" +} + +set square 913238 +set 3dviewer 1 diff --git a/tests/bugs/modalg_1/bug1477_10 b/tests/bugs/modalg_1/bug1477_10 new file mode 100755 index 0000000000..5ba4490fec --- /dev/null +++ b/tests/bugs/modalg_1/bug1477_10 @@ -0,0 +1,29 @@ +puts "TODO OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO OCC11111 ALL: Error : The square of result shape is" + +puts "============" +puts "OCC1477" +puts "============" +puts "" +###################################################### +# Problems in MakePipeShell +# (case 10) +###################################################### + +restore [locate_data_file OCC1477-1.brep] s1 +restore [locate_data_file OCC1477-2.brep] s2 + +checkshape s1 +checkshape s2 + +mksweep s1 + +addsweep s2 -T 0 1 1 2 2 .5 + +if { [catch {buildsweep result -C} catch_result] } { + puts "Faulty OCC1477" +} + +set square 0 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_1/bug1477_11 b/tests/bugs/modalg_1/bug1477_11 new file mode 100755 index 0000000000..e820087640 --- /dev/null +++ b/tests/bugs/modalg_1/bug1477_11 @@ -0,0 +1,31 @@ +puts "TODO ?OCC11111 ALL: An exception was caught" +puts "TODO ?OCC11111 ALL: Exception" +puts "TODO ?OCC11111 ALL: Faulty OCC1477" +puts "TODO ?OCC11111 ALL: TEST INCOMPLETE" + +puts "============" +puts "OCC1477" +puts "============" +puts "" +###################################################### +# Problems in MakePipeShell +# (case 11) +###################################################### + +restore [locate_data_file OCC1477-1.brep] s1 +restore [locate_data_file OCC1477-2.brep] s2 + +checkshape s1 +checkshape s2 + +mksweep s1 + +addsweep s2 0 1 1 2 2 .5 + +if { [catch {buildsweep result -R} catch_result] } { + puts "Faulty OCC1477" +} + +set square 1.81647e+006 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_1/bug1477_12 b/tests/bugs/modalg_1/bug1477_12 new file mode 100755 index 0000000000..d842464f99 --- /dev/null +++ b/tests/bugs/modalg_1/bug1477_12 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC1477" +puts "============" +puts "" +###################################################### +# Problems in MakePipeShell +# (case 12) +###################################################### + +restore [locate_data_file OCC1477-1.brep] s1 +restore [locate_data_file OCC1477-2.brep] s2 + +checkshape s1 +checkshape s2 + +mksweep s1 + +addsweep s2 -T 0 1 1 2 2 .5 + +if { [catch {buildsweep result -R} catch_result] } { + puts "Faulty OCC1477" +} + +set good_square 1.99019e+06 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_1/bug1477_2 b/tests/bugs/modalg_1/bug1477_2 new file mode 100755 index 0000000000..0791b76a0f --- /dev/null +++ b/tests/bugs/modalg_1/bug1477_2 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC1477" +puts "============" +puts "" +###################################################### +# Problems in MakePipeShell +# (case 2) +###################################################### + +restore [locate_data_file OCC1477-1.brep] s1 +restore [locate_data_file OCC1477-2.brep] s2 + +checkshape s1 +checkshape s2 + +mksweep s1 + +addsweep s2 -T + +if { [catch {buildsweep result} catch_result] } { + puts "Faulty OCC1477" +} + +set square 913238 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_1/bug1477_3 b/tests/bugs/modalg_1/bug1477_3 new file mode 100755 index 0000000000..5a8856743b --- /dev/null +++ b/tests/bugs/modalg_1/bug1477_3 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC1477" +puts "============" +puts "" +###################################################### +# Problems in MakePipeShell +# (case 3) +###################################################### + +restore [locate_data_file OCC1477-1.brep] s1 +restore [locate_data_file OCC1477-2.brep] s2 + +checkshape s1 +checkshape s2 + +mksweep s1 + +addsweep s2 + +if { [catch {buildsweep result -C} catch_result] } { + puts "Faulty OCC1477" +} + +set square 1.02648e+06 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_1/bug1477_4 b/tests/bugs/modalg_1/bug1477_4 new file mode 100755 index 0000000000..6cf2622d9b --- /dev/null +++ b/tests/bugs/modalg_1/bug1477_4 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC1477" +puts "============" +puts "" +###################################################### +# Problems in MakePipeShell +# (case 4) +###################################################### + +restore [locate_data_file OCC1477-1.brep] s1 +restore [locate_data_file OCC1477-2.brep] s2 + +checkshape s1 +checkshape s2 + +mksweep s1 + +addsweep s2 -T + +if { [catch {buildsweep result -C} catch_result] } { + puts "Faulty OCC1477" +} + +set square 1.11707e+06 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_1/bug1477_5 b/tests/bugs/modalg_1/bug1477_5 new file mode 100755 index 0000000000..170be3cec4 --- /dev/null +++ b/tests/bugs/modalg_1/bug1477_5 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC1477" +puts "============" +puts "" +###################################################### +# Problems in MakePipeShell +# (case 5) +###################################################### + +restore [locate_data_file OCC1477-1.brep] s1 +restore [locate_data_file OCC1477-2.brep] s2 + +checkshape s1 +checkshape s2 + +mksweep s1 + +addsweep s2 + +if { [catch {buildsweep result -R} catch_result] } { + puts "Faulty OCC1477" +} + +set square 1.02342e+06 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_1/bug1477_6 b/tests/bugs/modalg_1/bug1477_6 new file mode 100755 index 0000000000..d434bc9ce2 --- /dev/null +++ b/tests/bugs/modalg_1/bug1477_6 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC1477" +puts "============" +puts "" +###################################################### +# Problems in MakePipeShell +# (case 6) +###################################################### + +restore [locate_data_file OCC1477-1.brep] s1 +restore [locate_data_file OCC1477-2.brep] s2 + +checkshape s1 +checkshape s2 + +mksweep s1 + +addsweep s2 -T + +if { [catch {buildsweep result -R} catch_result] } { + puts "Faulty OCC1477" +} + +set square 1.10891e+06 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_1/bug1477_7 b/tests/bugs/modalg_1/bug1477_7 new file mode 100755 index 0000000000..207c93f8c3 --- /dev/null +++ b/tests/bugs/modalg_1/bug1477_7 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC1477" +puts "============" +puts "" +###################################################### +# Problems in MakePipeShell +# (case 7) +###################################################### + +restore [locate_data_file OCC1477-1.brep] s1 +restore [locate_data_file OCC1477-2.brep] s2 + +checkshape s1 +checkshape s2 + +mksweep s1 + +addsweep s2 0 1 1 2 2 .5 + +if { [catch {buildsweep result} catch_result] } { + puts "Faulty OCC1477" +} + +set square 1.49907e+06 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_1/bug1477_8 b/tests/bugs/modalg_1/bug1477_8 new file mode 100755 index 0000000000..1f30885fba --- /dev/null +++ b/tests/bugs/modalg_1/bug1477_8 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC1477" +puts "============" +puts "" +###################################################### +# Problems in MakePipeShell +# (case 8) +###################################################### + +restore [locate_data_file OCC1477-1.brep] s1 +restore [locate_data_file OCC1477-2.brep] s2 + +checkshape s1 +checkshape s2 + +mksweep s1 + +addsweep s2 -T 0 1 1 2 2 .5 + +if { [catch {buildsweep result} catch_result] } { + puts "Faulty OCC1477" +} + +set square 1.56786e+06 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_1/bug1477_9 b/tests/bugs/modalg_1/bug1477_9 new file mode 100755 index 0000000000..5590bcc157 --- /dev/null +++ b/tests/bugs/modalg_1/bug1477_9 @@ -0,0 +1,29 @@ +puts "TODO OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO OCC11111 ALL: Error : The square of result shape is" + +puts "============" +puts "OCC1477" +puts "============" +puts "" +###################################################### +# Problems in MakePipeShell +# (case 9) +###################################################### + +restore [locate_data_file OCC1477-1.brep] s1 +restore [locate_data_file OCC1477-2.brep] s2 + +checkshape s1 +checkshape s2 + +mksweep s1 + +addsweep s2 0 1 1 2 2 .5 + +if { [catch {buildsweep result -C} catch_result] } { + puts "Faulty OCC1477" +} + +set square 0 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_1/bug14780 b/tests/bugs/modalg_1/bug14780 new file mode 100755 index 0000000000..7e71e6a512 --- /dev/null +++ b/tests/bugs/modalg_1/bug14780 @@ -0,0 +1,29 @@ +puts "============" +puts "OCC14780" +puts "============" +puts "" +###################################################### +# Boolean operations (section, fuse, common, cut) give incorrect result +###################################################### + +set BugNumber OCC14780 + +restore [locate_data_file OCC14780_part1.brep] s1 +restore [locate_data_file OCC14780_part2.brep] s2 + +bop s1 s2 +bopsection result + +regexp {nb alone Vertices +: +([-0-9.+eE]+)} [checksection result] full Vertices + +set good_Vertices 0 +if { ${Vertices} != ${good_Vertices} } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +set length 171.289 +set 2dviewer 0 + + diff --git a/tests/bugs/modalg_1/bug15036 b/tests/bugs/modalg_1/bug15036 new file mode 100755 index 0000000000..ee06151f28 --- /dev/null +++ b/tests/bugs/modalg_1/bug15036 @@ -0,0 +1,43 @@ +puts "============" +puts "OCC15936" +puts "============" +puts "" +####################################################################### +# Wrong shape build by revolution algorithm +####################################################################### + +vertex v1 0 725 20 +vertex v2 0 709 20 +vertex v3 0 709 230 +vertex v4 0 645 230 +vertex v5 0 645 320 +vertex v6 0 805 320 +vertex v7 0 805 230 +vertex v8 0 741 230 +vertex v9 0 741 20 +edge e12 v1 v2 +edge e23 v2 v3 +edge e34 v3 v4 +edge e45 v4 v5 +edge e56 v5 v6 +edge e67 v6 v7 +edge e78 v7 v8 +edge e89 v8 v9 +edge e91 v9 v1 +wire w e12 e23 e34 e45 e56 e67 e78 e89 e91 +mkplane fr w 1 + +revol result fr 0.001428571428572667 640.5285714285715 20 -1.691188905560395E-05 0.9999999998569939 0 360 + +set square 1.03597e+06 +set nb_v_good 9 +set nb_e_good 14 +set nb_w_good 13 +set nb_f_good 9 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 47 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug15836 b/tests/bugs/modalg_1/bug15836 new file mode 100755 index 0000000000..61980d90f0 --- /dev/null +++ b/tests/bugs/modalg_1/bug15836 @@ -0,0 +1,25 @@ +puts "============" +puts "OCC15836" +puts "============" +puts "" +####################################################################### +# Wrong visualization of filleted shape on IRIX32 platform +####################################################################### + +restore [locate_data_file OCC15836.brep] f +explode f e + +fillet result f 10 f_8 15 f_9 20 f_11 25 f_17 30 f_21 35 f_29 + +set square 42816.6 +set nb_v_good 31 +set nb_e_good 50 +set nb_w_good 21 +set nb_f_good 21 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 126 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug15850 b/tests/bugs/modalg_1/bug15850 new file mode 100755 index 0000000000..dc41ca7dfc --- /dev/null +++ b/tests/bugs/modalg_1/bug15850 @@ -0,0 +1,28 @@ +puts "TODO OCC12345 ALL: Error : Result shape is WRONG" +puts "============" +puts "OCC15850" +puts "============" +puts "" +####################################################################### +# Regression in BOP - wrong results for simple shapes with Bspline geometry +####################################################################### + +restore [locate_data_file OCC15850_bb.brep] bb +restore [locate_data_file OCC15850_bc.brep] bc + +bop bb bc +bopcut result + +set square 732.453 +set nb_v_good 12 +set nb_e_good 17 +set nb_w_good 9 +set nb_f_good 7 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 48 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug15850_1 b/tests/bugs/modalg_1/bug15850_1 new file mode 100755 index 0000000000..6816d4cc73 --- /dev/null +++ b/tests/bugs/modalg_1/bug15850_1 @@ -0,0 +1,28 @@ +puts "TODO OCC12345 ALL: Error : Result shape is WRONG" +puts "============" +puts "OCC15850" +puts "============" +puts "" +####################################################################### +# Regression in BOP - wrong results for simple shapes with Bspline geometry +####################################################################### + +restore [locate_data_file OCC15850_bb.brep] bb +restore [locate_data_file OCC15850_bc.brep] bc + +bop bb bc +boptuc result + +set square 301.996 +set nb_v_good 6 +set nb_e_good 8 +set nb_w_good 6 +set nb_f_good 6 +set nb_sh_good 2 +set nb_sol_good 2 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 31 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug15850_2 b/tests/bugs/modalg_1/bug15850_2 new file mode 100755 index 0000000000..42a2e28cdc --- /dev/null +++ b/tests/bugs/modalg_1/bug15850_2 @@ -0,0 +1,28 @@ +puts "TODO OCC12345 ALL: Error : Result shape is WRONG" +puts "============" +puts "OCC15850" +puts "============" +puts "" +####################################################################### +# Regression in BOP - wrong results for simple shapes with Bspline geometry +####################################################################### + +restore [locate_data_file OCC15850_bb.brep] bb +restore [locate_data_file OCC15850_bc.brep] bc + +bop bb bc +bopcommon result + +set square 245.55 +set nb_v_good 4 +set nb_e_good 5 +set nb_w_good 3 +set nb_f_good 3 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 18 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug15850_3 b/tests/bugs/modalg_1/bug15850_3 new file mode 100755 index 0000000000..869ab3e3ad --- /dev/null +++ b/tests/bugs/modalg_1/bug15850_3 @@ -0,0 +1,28 @@ +puts "TODO OCC12345 ALL: Error : Result shape is WRONG" +puts "============" +puts "OCC15850" +puts "============" +puts "" +####################################################################### +# Regression in BOP - wrong results for simple shapes with Bspline geometry +####################################################################### + +restore [locate_data_file OCC15850_bb.brep] bb +restore [locate_data_file OCC15850_bc.brep] bc + +bop bb bc +bopfuse result + +set square 788.9 +set nb_v_good 14 +set nb_e_good 20 +set nb_w_good 12 +set nb_f_good 10 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 59 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug15850_4 b/tests/bugs/modalg_1/bug15850_4 new file mode 100755 index 0000000000..9a7180632b --- /dev/null +++ b/tests/bugs/modalg_1/bug15850_4 @@ -0,0 +1,38 @@ +puts "TODO OCC12345 ALL: Error : Result shape is WRONG" +puts "============" +puts "OCC15850" +puts "============" +puts "" +####################################################################### +# Regression in BOP - wrong results for simple shapes with Bspline geometry +####################################################################### + +set BugNumber OCC15850 + +restore [locate_data_file OCC15850_bb.brep] bb +restore [locate_data_file OCC15850_bc.brep] bc + +bop bb bc +bopsection result + +set length 37.6991 +set nb_v_good 4 +set nb_e_good 4 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 9 + +regexp {nb alone Vertices +: +([-0-9.+eE]+)} [checksection result] full Vertices +set good_Vertices 0 +if { ${Vertices} != ${good_Vertices} } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug15943 b/tests/bugs/modalg_1/bug15943 new file mode 100755 index 0000000000..11aee304ef --- /dev/null +++ b/tests/bugs/modalg_1/bug15943 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC15943" +puts "============" +puts "" +####################################################################### +# Wrong result of boolen fuse +####################################################################### + +restore [locate_data_file OCC15943_p1.brep] b1 +restore [locate_data_file OCC15943_p2.brep] b2 + +bop b1 b2 +bopfuse result + +set square 266944 +set nb_v_good 12 +set nb_e_good 20 +set nb_w_good 10 +set nb_f_good 10 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 55 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug15968_1 b/tests/bugs/modalg_1/bug15968_1 new file mode 100755 index 0000000000..aafb8936c4 --- /dev/null +++ b/tests/bugs/modalg_1/bug15968_1 @@ -0,0 +1,30 @@ +puts "============" +puts "OCC15968" +puts "============" +puts "" +####################################################################### +# Result of checkshape command depends on order of subshapes in a shape +####################################################################### + +restore [locate_data_file OCC15968.brep] s + +explode s f + +# shell 1 +shape s1 sh +add s_2 s1 +add s_1 s1 +renamevar s1 result + +set square 164 +set nb_v_good 10 +set nb_e_good 11 +set nb_w_good 3 +set nb_f_good 2 +set nb_sh_good 1 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 27 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug15968_2 b/tests/bugs/modalg_1/bug15968_2 new file mode 100755 index 0000000000..78c3700833 --- /dev/null +++ b/tests/bugs/modalg_1/bug15968_2 @@ -0,0 +1,30 @@ +puts "============" +puts "OCC15968" +puts "============" +puts "" +####################################################################### +# Result of checkshape command depends on order of subshapes in a shape +####################################################################### + +restore [locate_data_file OCC15968.brep] s + +explode s f + +# shell 2 +shape s2 sh +add s_1 s2 +add s_2 s2 +renamevar s2 result + +set square 164 +set nb_v_good 10 +set nb_e_good 11 +set nb_w_good 3 +set nb_f_good 2 +set nb_sh_good 1 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 27 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug16517_1 b/tests/bugs/modalg_1/bug16517_1 new file mode 100755 index 0000000000..bb2ddb036b --- /dev/null +++ b/tests/bugs/modalg_1/bug16517_1 @@ -0,0 +1,44 @@ +puts "============" +puts "OCC16517" +puts "============" +puts "" +####################################################################### +# Cylindrical projection is wrong +####################################################################### + +set BugNumber OCC16517 + +restore [locate_data_file OCC16517_c.brep] c +restore [locate_data_file OCC16517_s.brep] s + +set Result_List [prj p c s 0 0 1] +set Result_Numbers [llength ${Result_List}] +set mistake 0 +if { ${Result_Numbers} != 2 } { + puts "Faulty ${BugNumber} : projection numbers are wrong" + set mistake 1 +} else { + puts "First projection ..." + renamevar p_1 result + + set status 0 + set length 110.167 + set nb_v_good 1 + set nb_e_good 1 + set nb_w_good 1 + set nb_f_good 0 + set nb_sh_good 0 + set nb_sol_good 0 + set nb_compsol_good 0 + set nb_compound_good 0 + set nb_shape_good 3 +} + +if { ${mistake} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug16517_2 b/tests/bugs/modalg_1/bug16517_2 new file mode 100755 index 0000000000..6a1e214c0c --- /dev/null +++ b/tests/bugs/modalg_1/bug16517_2 @@ -0,0 +1,46 @@ +puts "============" +puts "OCC16517" +puts "============" +puts "" +####################################################################### +# Cylindrical projection is wrong +####################################################################### + +set BugNumber OCC16517 + +restore [locate_data_file OCC16517_c.brep] c +restore [locate_data_file OCC16517_s.brep] s + +set Result_List [prj p c s 0 0 1] +set Result_Numbers [llength ${Result_List}] +set mistake 0 +if { ${Result_Numbers} != 2 } { + puts "Faulty ${BugNumber} : projection numbers are wrong" + set mistake 1 +} else { + puts "Second projection ..." + renamevar p_2 result + set status 0 + + set length 110.167 + set nb_v_good 1 + set nb_e_good 1 + set nb_w_good 1 + set nb_f_good 0 + set nb_sh_good 0 + set nb_sol_good 0 + set nb_compsol_good 0 + set nb_compound_good 0 + set nb_shape_good 3 +} + +# Resume +puts "" +if { ${mistake} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug165_4 b/tests/bugs/modalg_1/bug165_4 new file mode 100755 index 0000000000..49c2d68c5f --- /dev/null +++ b/tests/bugs/modalg_1/bug165_4 @@ -0,0 +1,83 @@ +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 -5.7 +set incr_stepoffset 0.1 +set finish_stepoffset -2.8 + +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" +} + +dchrono h stop +dchrono h show + +renamevar result_1 result + +set length 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug165_5 b/tests/bugs/modalg_1/bug165_5 new file mode 100755 index 0000000000..4437242231 --- /dev/null +++ b/tests/bugs/modalg_1/bug165_5 @@ -0,0 +1,77 @@ +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 -2.6 +set incr_stepoffset 0.1 +set finish_stepoffset 0.0 + +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" +} + +dchrono h stop +dchrono h show + +renamevar result_1 result + +set length 1081.52 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug165_6 b/tests/bugs/modalg_1/bug165_6 new file mode 100755 index 0000000000..aeb81211ce --- /dev/null +++ b/tests/bugs/modalg_1/bug165_6 @@ -0,0 +1,83 @@ +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 diff --git a/tests/bugs/modalg_1/bug165_7 b/tests/bugs/modalg_1/bug165_7 new file mode 100755 index 0000000000..c2fd0a3dea --- /dev/null +++ b/tests/bugs/modalg_1/bug165_7 @@ -0,0 +1,77 @@ +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 5.1 +set incr_stepoffset 0.1 +set finish_stepoffset 6.3 + +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 1113.06 +set 2dviewer 0 + +dchrono h stop +dchrono h show diff --git a/tests/bugs/modalg_1/bug1665 b/tests/bugs/modalg_1/bug1665 new file mode 100755 index 0000000000..811021e144 --- /dev/null +++ b/tests/bugs/modalg_1/bug1665 @@ -0,0 +1,21 @@ +puts "========" +puts "OCC1665" +puts "========" +############################################################ +## Geom_BSplineSurface::SetVPeriodic throws an exception +############################################################ + +restore [locate_data_file OCC1665.draw] a + +if {[catch {setvperiodic a} message]} { + puts "OCC1665 FAULTY : setvperiodic" +} else { + if {[catch {mkface result a} message]} { + puts "OCC1665 FAULTY : mkface" + } else { + set nb_e_good 3 + } +} + +set square 12265.3 +set 3dviewer 2 diff --git a/tests/bugs/modalg_1/bug16667_1 b/tests/bugs/modalg_1/bug16667_1 new file mode 100755 index 0000000000..81d8c6305d --- /dev/null +++ b/tests/bugs/modalg_1/bug16667_1 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC16667" +puts "============" +puts "" +####################################################################### +# 2D Offset algorithm fails +####################################################################### + +restore [locate_data_file OCC16667-face.brep] a + +mkoffset resoffset a 1 20 +renamevar resoffset_1 result + +set length 1542.3 +set nb_v_good 7 +set nb_e_good 7 +set nb_w_good 1 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 15 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug16667_2 b/tests/bugs/modalg_1/bug16667_2 new file mode 100755 index 0000000000..8871038535 --- /dev/null +++ b/tests/bugs/modalg_1/bug16667_2 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC16667" +puts "============" +puts "" +####################################################################### +# 2D Offset algorithm fails +####################################################################### + +restore [locate_data_file OCC16667-face.brep] a + +mkoffset resoffset a 1 -20 +renamevar resoffset_1 result + +set length 1188.62 +set nb_v_good 5 +set nb_e_good 5 +set nb_w_good 1 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 11 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug16667_3 b/tests/bugs/modalg_1/bug16667_3 new file mode 100755 index 0000000000..a62593ed51 --- /dev/null +++ b/tests/bugs/modalg_1/bug16667_3 @@ -0,0 +1,27 @@ +puts "TODO OCC12345 ALL: Error : Result shape is WRONG" +puts "============" +puts "OCC16667" +puts "============" +puts "" +####################################################################### +# 2D Offset algorithm fails +####################################################################### + +restore [locate_data_file OCC16667-wire.brep] a + +mkoffset resoffset a 1 20 +renamevar resoffset_1 result + +set length 1451.49 +set nb_v_good 8 +set nb_e_good 8 +set nb_w_good 1 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 17 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug16667_4 b/tests/bugs/modalg_1/bug16667_4 new file mode 100755 index 0000000000..8fd515e2c6 --- /dev/null +++ b/tests/bugs/modalg_1/bug16667_4 @@ -0,0 +1,28 @@ +puts "TODO OCC12345 ALL: Error : Result shape is WRONG" +puts "============" +puts "OCC16667" +puts "============" +puts "" +####################################################################### +# 2D Offset algorithm fails +####################################################################### + +restore [locate_data_file OCC16667-wire.brep] a + +mkoffset resoffset a 1 -20 +renamevar resoffset_1 result + +set length 1200.16 +set nb_v_good 8 +set nb_e_good 8 +set nb_w_good 1 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 17 + +set 2dviewer 0 + + diff --git a/tests/bugs/modalg_1/bug16781 b/tests/bugs/modalg_1/bug16781 new file mode 100755 index 0000000000..68c744440b --- /dev/null +++ b/tests/bugs/modalg_1/bug16781 @@ -0,0 +1,27 @@ +puts "============" +puts "OCC16781" +puts "============" +puts "" +####################################################################### +# Wrong result of Cut operation. +####################################################################### + +restore [locate_data_file OCC16781-wing_solid.brep] s1 +restore [locate_data_file OCC16781-extr.brep] s2 + +bop s1 s2 +bopcut result + +set square 3.92094e+07 +set nb_v_good 14 +set nb_e_good 21 +set nb_w_good 9 +set nb_f_good 9 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 56 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug17194_1 b/tests/bugs/modalg_1/bug17194_1 new file mode 100755 index 0000000000..149c5d3bc3 --- /dev/null +++ b/tests/bugs/modalg_1/bug17194_1 @@ -0,0 +1,29 @@ +puts "============" +puts "OCC17194" +puts "============" +puts "" +####################################################################### +# Incorrect section of a face got by extrusion of an arc of circle +####################################################################### + +set BugNumber OCC17194 + +circle f 0 0 0 0 0 1 1 0 0 20 +mkedge f f -pi/2 pi/2 +prism f f 50 0 30 +plane pl 10 0 0 1 0 4 +mkface pl pl +bsection result f pl + +set nb_v_good 4 +set nb_e_good 2 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 7 + +set length 15.8064 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug17194_2 b/tests/bugs/modalg_1/bug17194_2 new file mode 100755 index 0000000000..618e031935 --- /dev/null +++ b/tests/bugs/modalg_1/bug17194_2 @@ -0,0 +1,30 @@ +puts "============" +puts "OCC17194" +puts "============" +puts "" +####################################################################### +# Incorrect section of a face got by extrusion of an arc of circle +####################################################################### + +set BugNumber OCC17194 + +circle f 0 0 0 0 0 1 1 0 0 20 +mkedge f f -pi/2 pi/2 +prism f f 50 0 30 +plane pl 10 0 10 1 0 4 +mkface pl pl +bsection result f pl + +set nb_v_good 2 +set nb_e_good 1 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 4 + +set length 54.6122 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug17357_1 b/tests/bugs/modalg_1/bug17357_1 new file mode 100755 index 0000000000..1824e6723f --- /dev/null +++ b/tests/bugs/modalg_1/bug17357_1 @@ -0,0 +1,27 @@ +puts "============" +puts "OCC17357" +puts "============" +puts "" +####################################################################### +# Any boolean operation is impossible between attached shapes +####################################################################### + +restore [locate_data_file OCC17357-1.brep] b1 +restore [locate_data_file OCC17357-2.brep] b2 + +bop b1 b2 +bopcommon result + +set square 1.18671 +set nb_v_good 10 +set nb_e_good 18 +set nb_w_good 8 +set nb_f_good 8 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 47 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug17357_2 b/tests/bugs/modalg_1/bug17357_2 new file mode 100755 index 0000000000..7d49291e77 --- /dev/null +++ b/tests/bugs/modalg_1/bug17357_2 @@ -0,0 +1,27 @@ +puts "============" +puts "OCC17357" +puts "============" +puts "" +####################################################################### +# Any boolean operation is impossible between attached shapes +####################################################################### + +restore [locate_data_file OCC17357-1.brep] b1 +restore [locate_data_file OCC17357-2.brep] b2 + +bop b1 b2 +bopfuse result + +set square 241.111 +set nb_v_good 16 +set nb_e_good 24 +set nb_w_good 12 +set nb_f_good 10 +set nb_sh_goodl 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 65 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug17357_3 b/tests/bugs/modalg_1/bug17357_3 new file mode 100755 index 0000000000..3e7b43055b --- /dev/null +++ b/tests/bugs/modalg_1/bug17357_3 @@ -0,0 +1,27 @@ +puts "============" +puts "OCC17357" +puts "============" +puts "" +####################################################################### +# Any boolean operation is impossible between attached shapes +####################################################################### + +restore [locate_data_file OCC17357-1.brep] b1 +restore [locate_data_file OCC17357-2.brep] b2 + +bop b1 b2 +bopcut result + +set square 241.111 +set nb_v_good 18 +set nb_e_good 30 +set nb_w_good 14 +set nb_f_good 12 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 77 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug17357_4 b/tests/bugs/modalg_1/bug17357_4 new file mode 100755 index 0000000000..2083ce5f33 --- /dev/null +++ b/tests/bugs/modalg_1/bug17357_4 @@ -0,0 +1,27 @@ +puts "============" +puts "OCC17357" +puts "============" +puts "" +####################################################################### +# Any boolean operation is impossible between attached shapes +####################################################################### + +restore [locate_data_file OCC17357-1.brep] b1 +restore [locate_data_file OCC17357-2.brep] b2 + +bop b1 b2 +boptuc result + +set square 1.18671 +set nb_v_good 8 +set nb_e_good 12 +set nb_w_good 6 +set nb_f_good 6 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 35 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug17357_5 b/tests/bugs/modalg_1/bug17357_5 new file mode 100755 index 0000000000..179c395dd0 --- /dev/null +++ b/tests/bugs/modalg_1/bug17357_5 @@ -0,0 +1,18 @@ +puts "============" +puts "OCC17357" +puts "============" +puts "" +####################################################################### +# Any boolean operation is impossible between attached shapes +####################################################################### + +restore [locate_data_file OCC17357-1.brep] b1 +restore [locate_data_file OCC17357-2.brep] b2 + +bop b1 b2 +bopsection result + +set length 3.84991 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug174 b/tests/bugs/modalg_1/bug174 new file mode 100755 index 0000000000..c4eda7d275 --- /dev/null +++ b/tests/bugs/modalg_1/bug174 @@ -0,0 +1,14 @@ +puts "========" +puts "OCC174" +puts "========" +puts "" +########################################################################### +## After analyze given face (file ff97.brep) using BRepCheck we recieve problem - "Bad Orientation of Subshape". +## But we believe that this shape must be OK or we have to recieve more detail another reply from BRepCheck. +########################################################################### + +restore [locate_data_file OCC174.brep] result + +set square 376.873 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug178_1 b/tests/bugs/modalg_1/bug178_1 new file mode 100755 index 0000000000..0e8e48e5e4 --- /dev/null +++ b/tests/bugs/modalg_1/bug178_1 @@ -0,0 +1,18 @@ + +puts "================" +puts "BUC60938" +puts "OCC178" +puts "================" + + +restore [locate_data_file BUC60937.brep] a + +explode a +checkshape a_1 +checkshape a_2 + +bcommon result a_1 a_2 + +set square 152908 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug178_2 b/tests/bugs/modalg_1/bug178_2 new file mode 100755 index 0000000000..c71a9165d3 --- /dev/null +++ b/tests/bugs/modalg_1/bug178_2 @@ -0,0 +1,15 @@ + +puts "================" +puts "BUC60937" +puts "OCC178" +puts "================" + +restore [locate_data_file BUC60937.brep] a +explode a +checkshape a_1 +checkshape a_2 + +bfuse result a_1 a_2 + +set square 835463 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug178_3 b/tests/bugs/modalg_1/bug178_3 new file mode 100755 index 0000000000..081a3830c7 --- /dev/null +++ b/tests/bugs/modalg_1/bug178_3 @@ -0,0 +1,16 @@ + +puts "================" +puts "BUC60936" +puts "OCC178" +puts "================" + +restore [locate_data_file BUC60937.brep] a + +explode a +checkshape a_1 +checkshape a_2 + +bcut result a_1 a_2 + +set square 786002 +set 2dviewer 0 diff --git a/tests/bugs/modalg_1/bug179 b/tests/bugs/modalg_1/bug179 new file mode 100755 index 0000000000..e0eeebe55c --- /dev/null +++ b/tests/bugs/modalg_1/bug179 @@ -0,0 +1,31 @@ + +puts "========" +puts "OCC179" +puts "========" +puts "" +########################################### +## Bug in meshing of the enclosed face +########################################### + +restore [locate_data_file OCC179.brep] result + +tclean result +isos result 0 +incmesh result 0.01 +triangles result + +set tri 0 +set nod 0 + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +if { $tri == 1874 || $nod == 1861} { + puts " OCC179 shading: OK" +} else { + puts " OCC179 shading: Faulty" +} + +set square 12229.8 +set 3dviewer 0 diff --git a/tests/bugs/modalg_1/bug18186 b/tests/bugs/modalg_1/bug18186 new file mode 100755 index 0000000000..99998d66cb --- /dev/null +++ b/tests/bugs/modalg_1/bug18186 @@ -0,0 +1,29 @@ +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO OCC12345 ALL: Error : Result shape is WRONG" +puts "============" +puts "OCC18186" +puts "============" +puts "" +####################################################################### +# Boolean operation algo fails +####################################################################### + +restore [locate_data_file OCC18186_r3.brep] bb +restore [locate_data_file OCC18186_Tool2.brep] bc + +bop bb bc +bopcut result + +set square 308374 +set nb_v_good 43 +set nb_e_good 68 +set nb_w_good 27 +set nb_f_good 27 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 168 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug19071 b/tests/bugs/modalg_1/bug19071 new file mode 100755 index 0000000000..32f3ed070f --- /dev/null +++ b/tests/bugs/modalg_1/bug19071 @@ -0,0 +1,37 @@ +puts "============" +puts "OCC19071" +puts "============" +puts "" +####################################################################### +# The MakeFuse or the MakePartition function crash together on 2 torus +####################################################################### + +set BugNumber OCC19071 + +puts "Load first shape ..." +restore [locate_data_file OCC19071_Rotation_2.brep] b1 +puts "Load second shape ..." +restore [locate_data_file OCC19071_Torus_2.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopfuse result +puts "Finish boolean operation ..." + +set square 177462 + +set nb_v_good 6 +set nb_e_good 16 +set nb_w_good 6 +set nb_f_good 6 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 37 + + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_1/bug19793_2 b/tests/bugs/modalg_1/bug19793_2 new file mode 100755 index 0000000000..02a47794e3 --- /dev/null +++ b/tests/bugs/modalg_1/bug19793_2 @@ -0,0 +1,39 @@ +puts "============" +puts "OCC19793" +puts "============" +puts "" +####################################################################### +# Fuse problem of symetrical shapes. Appendix for NPAL19789 +####################################################################### + +cpulimit 100 +#cpulimit 4500 +set BugNumber OCC19793 + +puts "Load first shape ..." +restore [locate_data_file bug19793_new_shape.brep] b1 +puts "Load second shape ..." +restore [locate_data_file bug19793_shape.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopsection result +puts "Finish boolean operation ..." + +set length 17730.1 + +set nb_e_good 1190 +set nb_v_good 68 +set nb_e_good 70 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 139 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/begin b/tests/bugs/modalg_2/begin new file mode 100755 index 0000000000..f40c35f0a3 --- /dev/null +++ b/tests/bugs/modalg_2/begin @@ -0,0 +1,20 @@ +set subgroup modalg + +set calcul "p" +set type "i" + +proc OFFSETSHAPE {distance faces calcul type} { + uplevel #0 explode s f + uplevel #0 offsetparameter 1e-7 $calcul $type + uplevel #0 offsetload s $distance $faces + uplevel #0 offsetperform result +} + + + + + + + + + diff --git a/tests/bugs/modalg_2/bug19811 b/tests/bugs/modalg_2/bug19811 new file mode 100755 index 0000000000..5b4ef22252 --- /dev/null +++ b/tests/bugs/modalg_2/bug19811 @@ -0,0 +1,35 @@ +puts "============" +puts "OCC19811" +puts "============" +puts "" +####################################################################### +# Scaling problem. Appendix for NPAL19806 +####################################################################### + +set BugNumber OCC19811 + +puts "Load shape ..." +restore [locate_data_file bug19811_VanneMP_supports_tiges_V3.brep] result + +puts "Scaling operation ..." +if [catch { tscale result 0 0 0 0.5 } catch_result] { + puts "Faulty ${BugNumber} : Scaling is wrong" +} + +set square 1.6949e+06 + +set nb_v_good 173 +set nb_e_good 285 +set nb_w_good 113 +set nb_f_good 113 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 686 + +vinit +vdisplay result +vfit + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug20222 b/tests/bugs/modalg_2/bug20222 new file mode 100755 index 0000000000..4c8dcaa7d7 --- /dev/null +++ b/tests/bugs/modalg_2/bug20222 @@ -0,0 +1,19 @@ +puts "============" +puts "OCC20222" +puts "============" +puts "" +####################################################################### +# Chamfer operation produces incorrect shape (PACE-01-006) +####################################################################### + +set BugNumber OCC20222 + +restore [locate_data_file OCC20222.brep] s +explode s f +explode s_10 e +chamf result s s_10_3 s_10 S 50 + +checkshape result + +set square 712126 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug20285_1 b/tests/bugs/modalg_2/bug20285_1 new file mode 100755 index 0000000000..259b622125 --- /dev/null +++ b/tests/bugs/modalg_2/bug20285_1 @@ -0,0 +1,39 @@ +puts "============" +puts "OCC20285" +puts "============" +puts "" +####################################################################### +# SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277 +####################################################################### + +set BugNumber OCC20285 + +puts "Load first shape ..." +restore [locate_data_file OCC20285-main.brep] a1 +explode a1 +renamevar a1_5 b1 + +puts "Load second shape ..." +restore [locate_data_file OCC20285-tool.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopsection result +puts "Finish boolean operation ..." + +set length 750.952 + +set nb_v_good 8 +set nb_e_good 7 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 16 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug20285_10 b/tests/bugs/modalg_2/bug20285_10 new file mode 100755 index 0000000000..e8baf098f8 --- /dev/null +++ b/tests/bugs/modalg_2/bug20285_10 @@ -0,0 +1,41 @@ +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" + +puts "============" +puts "OCC20285" +puts "============" +puts "" +####################################################################### +# SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277 +####################################################################### + +set BugNumber OCC20285 + +puts "Load first shape ..." +restore [locate_data_file OCC20285-main.brep] a1 +explode a1 +renamevar a1_6 b1 + +puts "Load second shape ..." +restore [locate_data_file OCC20285-tool.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +boptuc result +puts "Finish boolean operation ..." + +set square 37856.9 + +set nb_v_good 15 +set nb_e_good 22 +set nb_w_good 9 +set nb_f_good 9 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 58 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug20285_11 b/tests/bugs/modalg_2/bug20285_11 new file mode 100755 index 0000000000..c506d71e0d --- /dev/null +++ b/tests/bugs/modalg_2/bug20285_11 @@ -0,0 +1,39 @@ +puts "============" +puts "OCC20285" +puts "============" +puts "" +####################################################################### +# SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277 +####################################################################### + +set BugNumber OCC20285 + +puts "Load first shape ..." +restore [locate_data_file OCC20285-main.brep] a1 +explode a1 +renamevar a1_7 b1 + +puts "Load second shape ..." +restore [locate_data_file OCC20285-tool.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopsection result +puts "Finish boolean operation ..." + +set length 446.679 + +set nb_v_good 8 +set nb_e_good 8 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 17 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug20285_12 b/tests/bugs/modalg_2/bug20285_12 new file mode 100755 index 0000000000..985760a2eb --- /dev/null +++ b/tests/bugs/modalg_2/bug20285_12 @@ -0,0 +1,39 @@ +puts "============" +puts "OCC20285" +puts "============" +puts "" +####################################################################### +# SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277 +####################################################################### + +set BugNumber OCC20285 + +puts "Load first shape ..." +restore [locate_data_file OCC20285-main.brep] a1 +explode a1 +renamevar a1_7 b1 + +puts "Load second shape ..." +restore [locate_data_file OCC20285-tool.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopcommon result +puts "Finish boolean operation ..." + +set square 17028.5 + +set nb_v_good 12 +set nb_e_good 18 +set nb_w_good 8 +set nb_f_good 8 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 49 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug20285_13 b/tests/bugs/modalg_2/bug20285_13 new file mode 100755 index 0000000000..ff1ac556ad --- /dev/null +++ b/tests/bugs/modalg_2/bug20285_13 @@ -0,0 +1,39 @@ +puts "============" +puts "OCC20285" +puts "============" +puts "" +####################################################################### +# SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277 +####################################################################### + +set BugNumber OCC20285 + +puts "Load first shape ..." +restore [locate_data_file OCC20285-main.brep] a1 +explode a1 +renamevar a1_7 b1 + +puts "Load second shape ..." +restore [locate_data_file OCC20285-tool.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopfuse result +puts "Finish boolean operation ..." + +set square 160323 + +set nb_v_good 26 +set nb_e_good 39 +set nb_w_good 15 +set nb_f_good 15 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 98 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug20285_14 b/tests/bugs/modalg_2/bug20285_14 new file mode 100755 index 0000000000..ccf29dc52a --- /dev/null +++ b/tests/bugs/modalg_2/bug20285_14 @@ -0,0 +1,39 @@ +puts "============" +puts "OCC20285" +puts "============" +puts "" +####################################################################### +# SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277 +####################################################################### + +set BugNumber OCC20285 + +puts "Load first shape ..." +restore [locate_data_file OCC20285-main.brep] a1 +explode a1 +renamevar a1_7 b1 + +puts "Load second shape ..." +restore [locate_data_file OCC20285-tool.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopcut result +puts "Finish boolean operation ..." + +set square 135189 + +set nb_v_good 20 +set nb_e_good 30 +set nb_w_good 12 +set nb_f_good 12 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 77 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug20285_15 b/tests/bugs/modalg_2/bug20285_15 new file mode 100755 index 0000000000..b05dfffb09 --- /dev/null +++ b/tests/bugs/modalg_2/bug20285_15 @@ -0,0 +1,39 @@ +puts "============" +puts "OCC20285" +puts "============" +puts "" +####################################################################### +# SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277 +####################################################################### + +set BugNumber OCC20285 + +puts "Load first shape ..." +restore [locate_data_file OCC20285-main.brep] a1 +explode a1 +renamevar a1_7 b1 + +puts "Load second shape ..." +restore [locate_data_file OCC20285-tool.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +boptuc result +puts "Finish boolean operation ..." + +set square 42162.7 + +set nb_v_good 18 +set nb_e_good 27 +set nb_w_good 11 +set nb_f_good 11 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 70 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug20285_2 b/tests/bugs/modalg_2/bug20285_2 new file mode 100755 index 0000000000..23b99f7350 --- /dev/null +++ b/tests/bugs/modalg_2/bug20285_2 @@ -0,0 +1,39 @@ +puts "============" +puts "OCC20285" +puts "============" +puts "" +####################################################################### +# SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277 +####################################################################### + +set BugNumber OCC20285 + +puts "Load first shape ..." +restore [locate_data_file OCC20285-main.brep] a1 +explode a1 +renamevar a1_5 b1 + +puts "Load second shape ..." +restore [locate_data_file OCC20285-tool.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopcommon result +puts "Finish boolean operation ..." + +set square 17577 + +set nb_v_good 8 +set nb_e_good 12 +set nb_w_good 6 +set nb_f_good 6 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 35 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug20285_3 b/tests/bugs/modalg_2/bug20285_3 new file mode 100755 index 0000000000..9c6c908d9b --- /dev/null +++ b/tests/bugs/modalg_2/bug20285_3 @@ -0,0 +1,39 @@ +puts "============" +puts "OCC20285" +puts "============" +puts "" +####################################################################### +# SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277 +####################################################################### + +set BugNumber OCC20285 + +puts "Load first shape ..." +restore [locate_data_file OCC20285-main.brep] a1 +explode a1 +renamevar a1_5 b1 + +puts "Load second shape ..." +restore [locate_data_file OCC20285-tool.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopfuse result +puts "Finish boolean operation ..." + +set square 113140 + +set nb_v_good 18 +set nb_e_good 28 +set nb_w_good 11 +set nb_f_good 11 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 71 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug20285_4 b/tests/bugs/modalg_2/bug20285_4 new file mode 100755 index 0000000000..e1736b5f37 --- /dev/null +++ b/tests/bugs/modalg_2/bug20285_4 @@ -0,0 +1,39 @@ +puts "============" +puts "OCC20285" +puts "============" +puts "" +####################################################################### +# SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277 +####################################################################### + +set BugNumber OCC20285 + +puts "Load first shape ..." +restore [locate_data_file OCC20285-main.brep] a1 +explode a1 +renamevar a1_5 b1 + +puts "Load second shape ..." +restore [locate_data_file OCC20285-tool.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopcut result +puts "Finish boolean operation ..." + +set square 92859.7 + +set nb_v_good 13 +set nb_e_good 19 +set nb_w_good 8 +set nb_f_good 8 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 51 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug20285_5 b/tests/bugs/modalg_2/bug20285_5 new file mode 100755 index 0000000000..578a72430a --- /dev/null +++ b/tests/bugs/modalg_2/bug20285_5 @@ -0,0 +1,39 @@ +puts "============" +puts "OCC20285" +puts "============" +puts "" +####################################################################### +# SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277 +####################################################################### + +set BugNumber OCC20285 + +puts "Load first shape ..." +restore [locate_data_file OCC20285-main.brep] a1 +explode a1 +renamevar a1_5 b1 + +puts "Load second shape ..." +restore [locate_data_file OCC20285-tool.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +boptuc result +puts "Finish boolean operation ..." + +set square 37856.9 + +set nb_v_good 15 +set nb_e_good 22 +set nb_w_good 9 +set nb_f_good 9 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 58 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug20285_6 b/tests/bugs/modalg_2/bug20285_6 new file mode 100755 index 0000000000..4c0c5e31dd --- /dev/null +++ b/tests/bugs/modalg_2/bug20285_6 @@ -0,0 +1,42 @@ +puts "TODO OCC11111 ALL: Error : The length of result shape is" +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" + +puts "============" +puts "OCC20285" +puts "============" +puts "" +####################################################################### +# SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277 +####################################################################### + +set BugNumber OCC20285 + +puts "Load first shape ..." +restore [locate_data_file OCC20285-main.brep] a1 +explode a1 +renamevar a1_6 b1 + +puts "Load second shape ..." +restore [locate_data_file OCC20285-tool.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopsection result +puts "Finish boolean operation ..." + +set length 750.952 + +set nb_v_good 8 +set nb_e_good 7 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 16 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug20285_7 b/tests/bugs/modalg_2/bug20285_7 new file mode 100755 index 0000000000..7b383b071a --- /dev/null +++ b/tests/bugs/modalg_2/bug20285_7 @@ -0,0 +1,42 @@ +puts "TODO OCC11111 ALL: Error : The square of result shape is" +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" + +puts "============" +puts "OCC20285" +puts "============" +puts "" +####################################################################### +# SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277 +####################################################################### + +set BugNumber OCC20285 + +puts "Load first shape ..." +restore [locate_data_file OCC20285-main.brep] a1 +explode a1 +renamevar a1_6 b1 + +puts "Load second shape ..." +restore [locate_data_file OCC20285-tool.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopcommon result +puts "Finish boolean operation ..." + +set square 17577 + +set nb_v_good 8 +set nb_e_good 12 +set nb_w_good 6 +set nb_f_good 6 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 35 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug20285_8 b/tests/bugs/modalg_2/bug20285_8 new file mode 100755 index 0000000000..36825b68ce --- /dev/null +++ b/tests/bugs/modalg_2/bug20285_8 @@ -0,0 +1,42 @@ +puts "TODO OCC11111 ALL: Error : The square of result shape is" +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" + +puts "============" +puts "OCC20285" +puts "============" +puts "" +####################################################################### +# SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277 +####################################################################### + +set BugNumber OCC20285 + +puts "Load first shape ..." +restore [locate_data_file OCC20285-main.brep] a1 +explode a1 +renamevar a1_6 b1 + +puts "Load second shape ..." +restore [locate_data_file OCC20285-tool.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopfuse result +puts "Finish boolean operation ..." + +set square 113140 + +set nb_v_good 18 +set nb_e_good 28 +set nb_w_good 11 +set nb_f_good 11 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 71 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug20285_9 b/tests/bugs/modalg_2/bug20285_9 new file mode 100755 index 0000000000..6c71942dc1 --- /dev/null +++ b/tests/bugs/modalg_2/bug20285_9 @@ -0,0 +1,42 @@ +puts "TODO OCC11111 ALL: Error : The square of result shape is" +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" + +puts "============" +puts "OCC20285" +puts "============" +puts "" +####################################################################### +# SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277 +####################################################################### + +set BugNumber OCC20285 + +puts "Load first shape ..." +restore [locate_data_file OCC20285-main.brep] a1 +explode a1 +renamevar a1_6 b1 + +puts "Load second shape ..." +restore [locate_data_file OCC20285-tool.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopcut result +puts "Finish boolean operation ..." + +set square 92859.7 + +set nb_v_good 13 +set nb_e_good 19 +set nb_w_good 8 +set nb_f_good 8 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 51 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug20297_1 b/tests/bugs/modalg_2/bug20297_1 new file mode 100755 index 0000000000..36974e9112 --- /dev/null +++ b/tests/bugs/modalg_2/bug20297_1 @@ -0,0 +1,39 @@ +puts "============" +puts "OCC20297" +puts "Customer : TATA" +puts "============" +puts "" +####################################################################### +# Boolean operations (for ex. fuse) fail for given shapes +####################################################################### + +set BugNumber OCC20297 + +puts "Load first shape ..." +restore [locate_data_file OCC20297_1.brep] a1 +explode a1 +renamevar a1_1 b1 +puts "Load second shape ..." +restore [locate_data_file OCC20297_2.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopsection result +puts "Finish boolean operation ..." + +set length 389.898 + +set nb_v_good 64 +set nb_e_good 64 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 129 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug20297_2 b/tests/bugs/modalg_2/bug20297_2 new file mode 100755 index 0000000000..cd0ef7486c --- /dev/null +++ b/tests/bugs/modalg_2/bug20297_2 @@ -0,0 +1,40 @@ +puts "============" +puts "OCC20297" +puts "Customer : TATA" +puts "============" +puts "" +####################################################################### +# Boolean operations (for ex. fuse) fail for given shapes +####################################################################### +####################################################################### + +set BugNumber OCC20297 + +puts "Load first shape ..." +restore [locate_data_file OCC20297_1.brep] a1 +explode a1 +renamevar a1_1 b1 +puts "Load second shape ..." +restore [locate_data_file OCC20297_2.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopcommon result +puts "Finish boolean operation ..." + +set square 31648.3 + +set nb_v_good 129 +set nb_e_good 194 +set nb_w_good 71 +set nb_f_good 69 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 466 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug20297_3 b/tests/bugs/modalg_2/bug20297_3 new file mode 100755 index 0000000000..b672095d96 --- /dev/null +++ b/tests/bugs/modalg_2/bug20297_3 @@ -0,0 +1,40 @@ +puts "============" +puts "OCC20297" +puts "Customer : TATA" +puts "============" +puts "" +####################################################################### +# Boolean operations (for ex. fuse) fail for given shapes +####################################################################### +####################################################################### + +set BugNumber OCC20297 + +puts "Load first shape ..." +restore [locate_data_file OCC20297_1.brep] a1 +explode a1 +renamevar a1_1 b1 +puts "Load second shape ..." +restore [locate_data_file OCC20297_2.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopfuse result +puts "Finish boolean operation ..." + +set square 46473.9 + +set nb_v_good 140 +set nb_e_good 209 +set nb_w_good 83 +set nb_f_good 77 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 512 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug20297_4 b/tests/bugs/modalg_2/bug20297_4 new file mode 100755 index 0000000000..ebda37c1c9 --- /dev/null +++ b/tests/bugs/modalg_2/bug20297_4 @@ -0,0 +1,40 @@ +puts "============" +puts "OCC20297" +puts "Customer : TATA" +puts "============" +puts "" +####################################################################### +# Boolean operations (for ex. fuse) fail for given shapes +####################################################################### +####################################################################### + +set BugNumber OCC20297 + +puts "Load first shape ..." +restore [locate_data_file OCC20297_1.brep] a1 +explode a1 +renamevar a1_1 b1 +puts "Load second shape ..." +restore [locate_data_file OCC20297_2.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopcut result +puts "Finish boolean operation ..." + +set square 69719.6 + +set nb_v_good 141 +set nb_e_good 211 +set nb_w_good 86 +set nb_f_good 78 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 519 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug20297_5 b/tests/bugs/modalg_2/bug20297_5 new file mode 100755 index 0000000000..bd7add7d9c --- /dev/null +++ b/tests/bugs/modalg_2/bug20297_5 @@ -0,0 +1,40 @@ +puts "============" +puts "OCC20297" +puts "Customer : TATA" +puts "============" +puts "" +####################################################################### +# Boolean operations (for ex. fuse) fail for given shapes +####################################################################### +####################################################################### + +set BugNumber OCC20297 + +puts "Load first shape ..." +restore [locate_data_file OCC20297_1.brep] a1 +explode a1 +renamevar a1_1 b1 +puts "Load second shape ..." +restore [locate_data_file OCC20297_2.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +boptuc result +puts "Finish boolean operation ..." + +set square 8402.56 + +set nb_v_good 128 +set nb_e_good 192 +set nb_w_good 68 +set nb_f_good 68 +set nb_sh_good 2 +set nb_sol_good 2 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 461 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug20413 b/tests/bugs/modalg_2/bug20413 new file mode 100755 index 0000000000..862df55f0d --- /dev/null +++ b/tests/bugs/modalg_2/bug20413 @@ -0,0 +1,36 @@ +puts "============" +puts "OCC20413" +puts "============" +puts "" +####################################################################### +# Section is wrong for given shapes +####################################################################### + +set BugNumber OCC20413 + +puts "Load first shape ..." +restore [locate_data_file OCC20413_a1.brep] b1 +puts "Load second shape ..." +restore [locate_data_file OCC20413_a2.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopsection result +puts "Finish boolean operation ..." + +set length 233.024 + +set nb_v_good 9 +set nb_e_good 9 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 19 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug20465 b/tests/bugs/modalg_2/bug20465 new file mode 100755 index 0000000000..38c21cee41 --- /dev/null +++ b/tests/bugs/modalg_2/bug20465 @@ -0,0 +1,31 @@ +puts "========================" +puts "OCC20465" +puts "========================" +puts "" +####################################################################### +# Wrong checkshape results for shells +####################################################################### + +set BugNumber OCC20465 + +restore [locate_data_file OCC20465.brep] r + +checkshape r +explode r f +compound r_1 r_2 r_3 r_4 r_5 r_6 r_7 r_8 r_9 r_10 r_11 result + +set square 900 + +set nb_v_good 23 +set nb_e_good 33 +set nb_w_good 13 +set nb_f_good 11 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 81 + +set square 900 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug20521 b/tests/bugs/modalg_2/bug20521 new file mode 100755 index 0000000000..6a6cff91fb --- /dev/null +++ b/tests/bugs/modalg_2/bug20521 @@ -0,0 +1,35 @@ +puts "================" +puts "OCC20521" +puts "================" +puts "" +####################################################################################### +# Triangulation for a fece is not build +###################################################################################### + +set BugNumber OCC20521 + +catch { pload XDE } + +testreadstep [locate_data_file OCC20521-3DB.stp] result + +set square 322688 + +set nb_v_good 119 +set nb_e_good 199 +set nb_w_good 96 +set nb_f_good 87 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 503 + +vinit +tclean result +vsetdispmode 1 +vdisplay result +vfit + +set 3dviewer 0 + + diff --git a/tests/bugs/modalg_2/bug20785 b/tests/bugs/modalg_2/bug20785 new file mode 100755 index 0000000000..6a7ea868d3 --- /dev/null +++ b/tests/bugs/modalg_2/bug20785 @@ -0,0 +1,51 @@ +puts "========" +puts "OCC20785" +puts "========" +puts "" +###################################################### +# Surfaces are empty after shading +###################################################### + +set BugNumber OCC20785 + +restore [locate_data_file OCC20785.brep] result + +set square 322688 + +set nb_v_good 119 +set nb_e_good 199 +set nb_w_good 96 +set nb_f_good 87 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 503 + +vinit +vdisplay res +vsetdispmode 1 +vfit + +set only_screen 0 + +set scale 2.7840527693872859 +set center_X 3.7559505017270567e-07 +set center_Y -71.035163389154491 +set proj_X -0.89892524480819702 +set proj_Y -0.37323716282844543 +set proj_Z -0.22940616309642792 +set up_X -0.41990724205970764 +set up_Y 0.58468854427337646 +set up_Z 0.69413024187088013 +set at_X -74.980735778808594 +set at_Y 22.785961151123047 +set at_Z -49.215263366699219 + +vviewparams ${scale} ${center_X} ${center_Y} \ + ${proj_X} ${proj_Y} ${proj_Z} \ + ${up_X} ${up_Y} ${up_Z} \ + ${at_X} ${at_Y} ${at_Z} + +set only_screen 0 + diff --git a/tests/bugs/modalg_2/bug20793 b/tests/bugs/modalg_2/bug20793 new file mode 100755 index 0000000000..0d244450e8 --- /dev/null +++ b/tests/bugs/modalg_2/bug20793 @@ -0,0 +1,33 @@ +puts "============" +puts "OCC20793" +puts "============" +puts "" +####################################################################### +# BRepOffsetAPI_MakeOffset produces incorrect result +####################################################################### + +set BugNumber OCC20793 + +puts "Load shape ..." +restore [locate_data_file OCC20793.brep] a + +if [catch { mkoffset resoffset a 1 10 } ] { + puts "Faulty ${BugNumber} : mkoffset is wrong" +} else { + renamevar resoffset_1 result + +set length 671.746 + +set nb_v_good 4 +set nb_e_good 4 +set nb_w_good 1 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 9 + +} + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug20807_1 b/tests/bugs/modalg_2/bug20807_1 new file mode 100755 index 0000000000..99b16c7443 --- /dev/null +++ b/tests/bugs/modalg_2/bug20807_1 @@ -0,0 +1,34 @@ +puts "============" +puts "OCC20807" +puts "============" +puts "" +####################################################################### +# Construction of pipe among a helix containing several convolutions fails +####################################################################### + +set BugNumber OCC20807 + +restore [locate_data_file bug20807_helix_10.brep] spine +wire spine spine + +restore [locate_data_file bug20807_profile.brep] profile + +mksweep spine +setsweep -CN 0 0 1 +addsweep profile + +buildsweep result + +set square 254837 + +set nb_v_good 8 +set nb_e_good 12 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 29 + +set 2dviewer 1 diff --git a/tests/bugs/modalg_2/bug20807_2 b/tests/bugs/modalg_2/bug20807_2 new file mode 100755 index 0000000000..8eb2764750 --- /dev/null +++ b/tests/bugs/modalg_2/bug20807_2 @@ -0,0 +1,33 @@ +puts "============" +puts "OCC20807" +puts "============" +puts "" +####################################################################### +# Construction of pipe among a helix containing several convolutions fails +####################################################################### + +set BugNumber OCC20807 + +restore [locate_data_file bug20807_coil.brep] spine +explode spine + +restore [locate_data_file bug20807_circ.brep] profile + +mksweep spine_1 +addsweep profile + +buildsweep result + +set square 44761.1 + +set nb_v_good 2 +set nb_e_good 3 +set nb_w_good 1 +set nb_f_good 1 +set nb_sh_good 1 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 8 + +set 2dviewer 1 diff --git a/tests/bugs/modalg_2/bug20807_3 b/tests/bugs/modalg_2/bug20807_3 new file mode 100755 index 0000000000..711a6a71ea --- /dev/null +++ b/tests/bugs/modalg_2/bug20807_3 @@ -0,0 +1,32 @@ +puts "============" +puts "OCC20807" +puts "============" +puts "" +####################################################################### +# Construction of pipe among a helix containing several convolutions fails +####################################################################### + +set BugNumber OCC20807 + +restore [locate_data_file bug20807_coil2.brep] spine + +restore [locate_data_file bug20807_circ2.brep] profile + +mksweep spine +addsweep profile + +buildsweep result + +set square 2933.11 + +set nb_v_good 2 +set nb_e_good 3 +set nb_w_good 1 +set nb_f_good 1 +set nb_sh_good 1 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 8 + +set 2dviewer 1 diff --git a/tests/bugs/modalg_2/bug20807_4 b/tests/bugs/modalg_2/bug20807_4 new file mode 100755 index 0000000000..6825b32aa3 --- /dev/null +++ b/tests/bugs/modalg_2/bug20807_4 @@ -0,0 +1,34 @@ +puts "============" +puts "OCC20807" +puts "============" +puts "" +####################################################################### +# Construction of pipe among a helix containing several convolutions fails +####################################################################### + +set BugNumber OCC20807 + +restore [locate_data_file bug20807_spiral.brep] sp +explode sp +wire spine sp_1 + +restore [locate_data_file bug20807_circ3.brep] profile + +mksweep spine +addsweep profile + +buildsweep result + +set square 4.78336e+06 + +set nb_v_good 2 +set nb_e_good 3 +set nb_w_good 1 +set nb_f_good 1 +set nb_sh_good 1 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 8 + +set 2dviewer 1 diff --git a/tests/bugs/modalg_2/bug20827 b/tests/bugs/modalg_2/bug20827 new file mode 100755 index 0000000000..aec2ad795e --- /dev/null +++ b/tests/bugs/modalg_2/bug20827 @@ -0,0 +1,25 @@ +puts "================" +puts "OCC20827" +puts "================" +puts "" +####################################################################################### +# Problem of displaying in SHADING mode +###################################################################################### + +set BugNumber OCC20827 + +restore [locate_data_file OCC20827-ran24s_a-d_1_f107.brep] result + +set square 9707.82 + +set nb_v_good 93 +set nb_e_good 93 +set nb_w_good 13 +set nb_f_good 1 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 200 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug2083_1 b/tests/bugs/modalg_2/bug2083_1 new file mode 100755 index 0000000000..1149afadf0 --- /dev/null +++ b/tests/bugs/modalg_2/bug2083_1 @@ -0,0 +1,28 @@ +puts "============" +puts "OCC2083" +puts "============" +puts "" +###################################################### +# BRepOffsetAPI_MakePipeShell throws an exception +###################################################### + +restore [locate_data_file OCC2083-f1.brep] f1 +restore [locate_data_file OCC2083-f2.brep] f2 +restore [locate_data_file OCC2083-w.brep] s + +checkshape f1 +checkshape f2 +checkshape s + +explode f1 w +explode f2 w +mksweep s +addsweep f1_1 +addsweep f2_1 + +if { [catch {buildsweep result} catch_result] } { + puts "Faulty OCC2083" +} + +set square 36302.3 +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug2083_2 b/tests/bugs/modalg_2/bug2083_2 new file mode 100755 index 0000000000..f9c0386a97 --- /dev/null +++ b/tests/bugs/modalg_2/bug2083_2 @@ -0,0 +1,29 @@ +puts "============" +puts "OCC2083" +puts "============" +puts "" +###################################################### +# BRepOffsetAPI_MakePipeShell throws an exception +###################################################### + +restore [locate_data_file OCC2083-f1.brep] f1 +restore [locate_data_file OCC2083-f2.brep] f2 +restore [locate_data_file OCC2083-w.brep] s + +checkshape f1 +checkshape f2 +checkshape s + +explode f1 w +explode f2 w +mksweep s +addsweep f1_1 -T +addsweep f2_1 -T + +if { [catch {buildsweep result} catch_result] } { + puts "Faulty OCC2083" +} + +set square 36583.8 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_2/bug2083_3 b/tests/bugs/modalg_2/bug2083_3 new file mode 100755 index 0000000000..3865579dc4 --- /dev/null +++ b/tests/bugs/modalg_2/bug2083_3 @@ -0,0 +1,29 @@ +puts "============" +puts "OCC2083" +puts "============" +puts "" +###################################################### +# BRepOffsetAPI_MakePipeShell throws an exception +###################################################### + +restore [locate_data_file OCC2083-f1.brep] f1 +restore [locate_data_file OCC2083-f2.brep] f2 +restore [locate_data_file OCC2083-w.brep] s + +checkshape f1 +checkshape f2 +checkshape s + +explode f1 w +explode f2 w +mksweep s +addsweep f1_1 -T +addsweep f2_1 + +if { [catch {buildsweep result} catch_result] } { + puts "Faulty OCC2083" +} + +set square 36546.8 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_2/bug2083_4 b/tests/bugs/modalg_2/bug2083_4 new file mode 100755 index 0000000000..ea963c56b5 --- /dev/null +++ b/tests/bugs/modalg_2/bug2083_4 @@ -0,0 +1,29 @@ +puts "============" +puts "OCC2083" +puts "============" +puts "" +###################################################### +# BRepOffsetAPI_MakePipeShell throws an exception +###################################################### + +restore [locate_data_file OCC2083-f1.brep] f1 +restore [locate_data_file OCC2083-f2.brep] f2 +restore [locate_data_file OCC2083-w.brep] s + +checkshape f1 +checkshape f2 +checkshape s + +explode f1 w +explode f2 w +mksweep s +addsweep f1_1 +addsweep f2_1 -T + +if { [catch {buildsweep result} catch_result] } { + puts "Faulty OCC2083" +} + +set square 36339.5 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_2/bug20964_1 b/tests/bugs/modalg_2/bug20964_1 new file mode 100755 index 0000000000..be0dba6d80 --- /dev/null +++ b/tests/bugs/modalg_2/bug20964_1 @@ -0,0 +1,37 @@ +puts "============" +puts "OCC20964" +puts "Customer : TATA" +puts "============" +puts "" +####################################################################### +# Wrong result of cut operation for given shapes +####################################################################### + +set BugNumber OCC20964 + +puts "Load first shape ..." +restore [locate_data_file OCC20964_revsolid.brep] b1 +puts "Load second shape ..." +restore [locate_data_file OCC20964_sphere.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopsection result +puts "Finish boolean operation ..." + +set length 323.636 + +set nb_v_good 6 +set nb_e_good 6 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 13 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug20964_2 b/tests/bugs/modalg_2/bug20964_2 new file mode 100755 index 0000000000..389b42df66 --- /dev/null +++ b/tests/bugs/modalg_2/bug20964_2 @@ -0,0 +1,37 @@ +puts "============" +puts "OCC20964" +puts "Customer : TATA" +puts "============" +puts "" +####################################################################### +# Wrong result of cut operation for given shapes +####################################################################### + +set BugNumber OCC20964 + +puts "Load first shape ..." +restore [locate_data_file OCC20964_revsolid.brep] b1 +puts "Load second shape ..." +restore [locate_data_file OCC20964_sphere.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopcommon result +puts "Finish boolean operation ..." + +set square 5164.66 + +set nb_v_good 8 +set nb_e_good 12 +set nb_w_good 6 +set nb_f_good 5 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 34 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug20964_3 b/tests/bugs/modalg_2/bug20964_3 new file mode 100755 index 0000000000..bb6d442a69 --- /dev/null +++ b/tests/bugs/modalg_2/bug20964_3 @@ -0,0 +1,37 @@ +puts "============" +puts "OCC20964" +puts "Customer : TATA" +puts "============" +puts "" +####################################################################### +# Wrong result of cut operation for given shapes +####################################################################### + +set BugNumber OCC20964 + +puts "Load first shape ..." +restore [locate_data_file OCC20964_revsolid.brep] b1 +puts "Load second shape ..." +restore [locate_data_file OCC20964_sphere.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopfuse result +puts "Finish boolean operation ..." + +set square 828829 + +set nb_v_good 20 +set nb_e_good 32 +set nb_w_good 18 +set nb_f_good 16 +set nb_sh_good 3 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 91 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug20964_4 b/tests/bugs/modalg_2/bug20964_4 new file mode 100755 index 0000000000..3c2f2d887a --- /dev/null +++ b/tests/bugs/modalg_2/bug20964_4 @@ -0,0 +1,37 @@ +puts "============" +puts "OCC20964" +puts "Customer : TATA" +puts "============" +puts "" +####################################################################### +# Wrong result of cut operation for given shapes +####################################################################### + +set BugNumber OCC20964 + +puts "Load first shape ..." +restore [locate_data_file OCC20964_revsolid.brep] b1 +puts "Load second shape ..." +restore [locate_data_file OCC20964_sphere.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopcut result +puts "Finish boolean operation ..." + +set square 821892 + +set nb_v_good 22 +set nb_e_good 35 +set nb_w_good 17 +set nb_f_good 14 +set nb_sh_good 2 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 92 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug20964_5 b/tests/bugs/modalg_2/bug20964_5 new file mode 100755 index 0000000000..045919fba7 --- /dev/null +++ b/tests/bugs/modalg_2/bug20964_5 @@ -0,0 +1,37 @@ +puts "============" +puts "OCC20964" +puts "Customer : TATA" +puts "============" +puts "" +####################################################################### +# Wrong result of cut operation for given shapes +####################################################################### + +set BugNumber OCC20964 + +puts "Load first shape ..." +restore [locate_data_file OCC20964_revsolid.brep] b1 +puts "Load second shape ..." +restore [locate_data_file OCC20964_sphere.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +boptuc result +puts "Finish boolean operation ..." + +set square 12101.2 + +set nb_v_good 6 +set nb_e_good 9 +set nb_w_good 7 +set nb_f_good 7 +set nb_sh_good 2 +set nb_sol_good 2 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 34 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug21 b/tests/bugs/modalg_2/bug21 new file mode 100755 index 0000000000..f8ba733c7b --- /dev/null +++ b/tests/bugs/modalg_2/bug21 @@ -0,0 +1,21 @@ +puts "================" +puts "OCC21" +puts "================" +puts "" + +#test for XSDRAWEXE application# +#==============================# + +pload XDE + +restore [locate_data_file OCC21.brep] sh +checkshape sh +puts "two faces in the compound share one edge" + +DT_SplitAngle result sh 90 + +puts "in the resulting shape sharing is not preserved" + +set square 12154.8 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug21060 b/tests/bugs/modalg_2/bug21060 new file mode 100755 index 0000000000..bef0a13ec4 --- /dev/null +++ b/tests/bugs/modalg_2/bug21060 @@ -0,0 +1,33 @@ +puts "TODO OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" +puts "TODO OCC11111 ALL: Error : The square of result shape is" + +puts "================" +puts "OCC21060" +puts "================" +puts "" +####################################################################################### +# Triangulatiom fails on non-manifold face with Sl wire +###################################################################################### + +set BugNumber OCC21060 + +restore [locate_data_file OCC21060-A9_205.brep] result +vinit +vsetdispmode 1 +vdisplay result +vfit + +set square 12 + +set nb_v_good 4 +set nb_e_good 4 +set nb_w_good 2 +set nb_f_good 2 +set nb_sh_good 1 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 13 + +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug212 b/tests/bugs/modalg_2/bug212 new file mode 100755 index 0000000000..362dac5679 --- /dev/null +++ b/tests/bugs/modalg_2/bug212 @@ -0,0 +1,18 @@ +puts "========" +puts "OCC212" +puts "========" +################################################ +## Bug in Topological "Common" boolean operation +################################################ + +restore [locate_data_file OCC212-1.brep] S1 +checkshape S1 +restore [locate_data_file OCC212-2.brep] S2 +checkshape S2 + +bop S1 S2 +bopcommon result + +set square 314.301 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug21255 b/tests/bugs/modalg_2/bug21255 new file mode 100755 index 0000000000..9050872b2b --- /dev/null +++ b/tests/bugs/modalg_2/bug21255 @@ -0,0 +1,56 @@ +puts "============" +puts "OCC21255" +puts "============" +puts "" +####################################################################### +# Some problems with 3D chamfer construction +####################################################################### + +set BugNumber OCC21255 + +restore [locate_data_file OCC21255-1.brep] ss +explode ss F +explode ss_7 E + +vinit +if [catch { chamf result ss ss_7_2 ss_7 5. 5. } ] { + puts "Faulty ${BugNumber} : chamf is wrong" +} else { +set square 45382.5 + +set nb_v_good 15 +set nb_e_good 22 +set nb_w_good 9 +set nb_f_good 9 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 58 + + set 3dviewer 0 + vdisplay result + vsetdispmode 1 + vfit + + set scale 5.8955238204183011 + set center_X -43.928617104386774 + set center_Y 295.47887425975171 + set proj_X 0.62061613798141479 + set proj_Y -0.6891753077507019 + set proj_Z -0.37399500608444214 + set up_X -0.12894462049007416 + set up_Y -0.56017255783081055 + set up_Z 0.81827831268310547 + set at_X 15.248310089111328 + set at_Y 165.90042114257812 + set at_Z 225.19309997558594 + + vviewparams ${scale} ${center_X} ${center_Y} \ + ${proj_X} ${proj_Y} ${proj_Z} \ + ${up_X} ${up_Y} ${up_Z} \ + ${at_X} ${at_Y} ${at_Z} + +} + +set only_screen 1 diff --git a/tests/bugs/modalg_2/bug21261_1 b/tests/bugs/modalg_2/bug21261_1 new file mode 100755 index 0000000000..2b8bff9055 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_1 @@ -0,0 +1,54 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-1.brep] s + +thickshell result s 5 + +set square 36766 + +set nb_v_good 4 +set nb_e_good 10 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 24 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + +set scale 5.8136266443689317 +set center_X -34.878384652992025 +set center_Y 41.518039353084561 +set proj_X 0.5689244270324707 +set proj_Y -0.54117375612258911 +set proj_Z -0.61923813819885254 +set up_X 0.48309960961341858 +set up_Y -0.38943690061569214 +set up_Z 0.78418976068496704 +set at_X -38.500396728515625 +set at_Y 34.677536010742188 +set at_Z -7.9150166511535645 + +vviewparams ${scale} ${center_X} ${center_Y} \ + ${proj_X} ${proj_Y} ${proj_Z} \ + ${up_X} ${up_Y} ${up_Z} \ + ${at_X} ${at_Y} ${at_Z} + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_10 b/tests/bugs/modalg_2/bug21261_10 new file mode 100755 index 0000000000..a38188c12e --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_10 @@ -0,0 +1,54 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-5.brep] s + +thickshell result s -5 + +set square 29923.6 + +set nb_v_good 4 +set nb_e_good 10 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 24 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + +set scale 6.3723487126883533 +set center_X -4.2632564145606011e-14 +set center_Y -22.430308400362279 +set proj_X 0.57735025882720947 +set proj_Y -0.57735025882720947 +set proj_Z 0.57735025882720947 +set up_X -0.40824827551841736 +set up_Y 0.40824827551841736 +set up_Z 0.81649655103683472 +set at_X 0 +set at_Y 0 +set at_Z 0 + +vviewparams ${scale} ${center_X} ${center_Y} \ + ${proj_X} ${proj_Y} ${proj_Z} \ + ${up_X} ${up_Y} ${up_Z} \ + ${at_X} ${at_Y} ${at_Z} + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_11 b/tests/bugs/modalg_2/bug21261_11 new file mode 100755 index 0000000000..7072c3a3b8 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_11 @@ -0,0 +1,54 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-cone1.brep] s + +thickshell result s -5 + +set square 11054.2 + +set nb_v_good 4 +set nb_e_good 8 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 22 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + +set scale 17.084273613995954 +set center_X 210.44987026890158 +set center_Y -5.2570485620847549 +set proj_X 0.98952245712280273 +set proj_Y -0.12535266578197479 +set proj_Z 0.071637466549873352 +set up_X -0.016377445310354233 +set up_Y 0.39552098512649536 +set up_Z 0.91831082105636597 +set at_X 121.38485717773438 +set at_Y -46.730243682861328 +set at_Z 83.376449584960938 + +vviewparams ${scale} ${center_X} ${center_Y} \ + ${proj_X} ${proj_Y} ${proj_Z} \ + ${up_X} ${up_Y} ${up_Z} \ + ${at_X} ${at_Y} ${at_Z} + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_12 b/tests/bugs/modalg_2/bug21261_12 new file mode 100755 index 0000000000..a1d8306bf6 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_12 @@ -0,0 +1,36 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-revarc.brep] s + +thickshell result s -5 + +set square 39635.4 + +set nb_v_good 4 +set nb_e_good 8 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 22 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_13 b/tests/bugs/modalg_2/bug21261_13 new file mode 100755 index 0000000000..d14d0d212b --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_13 @@ -0,0 +1,36 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-revbzc.brep] s + +thickshell result s -5 + +set square 73788.5 + +set nb_v_good 4 +set nb_e_good 8 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 22 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_14 b/tests/bugs/modalg_2/bug21261_14 new file mode 100755 index 0000000000..1b00b6f246 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_14 @@ -0,0 +1,36 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-2137_tsrf.brep] s + +thickshell result s -5 + +set square 27432.4 + +set nb_v_good 4 +set nb_e_good 6 +set nb_w_good 6 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 22 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_15 b/tests/bugs/modalg_2/bug21261_15 new file mode 100755 index 0000000000..ecd6539de8 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_15 @@ -0,0 +1,39 @@ +puts "TODO OCC11111 ALL: Exception" +puts "TODO OCC11111 ALL: An exception was caught" +puts "TODO ?OCC11111 ALL: TEST INCOMPLETE" +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-2137_bss1_crash_C0.brep] s + +thickshell result s -5 + +set square 27432.4 + +set nb_v_good 4 +set nb_e_good 6 +set nb_w_good 6 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 22 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_16 b/tests/bugs/modalg_2/bug21261_16 new file mode 100755 index 0000000000..813fa34a86 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_16 @@ -0,0 +1,36 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-1988_ellipsepipesrf_1.brep] s + +thickshell result s -5 + +set square 17366.2 + +set nb_v_good 4 +set nb_e_good 8 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 22 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_17 b/tests/bugs/modalg_2/bug21261_17 new file mode 100755 index 0000000000..3e960bf1fd --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_17 @@ -0,0 +1,36 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-1988_bscpipesrf_2.brep] s + +thickshell result s -5 + +set square 10250 + +set nb_v_good 4 +set nb_e_good 8 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 22 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_18 b/tests/bugs/modalg_2/bug21261_18 new file mode 100755 index 0000000000..380bb63ed4 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_18 @@ -0,0 +1,36 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-1.brep] s + +thickshell result s -5 + +set square 30288.5 + +set nb_v_good 4 +set nb_e_good 10 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 24 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_19 b/tests/bugs/modalg_2/bug21261_19 new file mode 100755 index 0000000000..4118781047 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_19 @@ -0,0 +1,36 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-box_trim_thickening.brep] s + +thickshell result s -5 + +set square 47143.4 + +set nb_v_good 26 +set nb_e_good 47 +set nb_w_good 23 +set nb_f_good 21 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 119 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_2 b/tests/bugs/modalg_2/bug21261_2 new file mode 100755 index 0000000000..ac01f10a45 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_2 @@ -0,0 +1,54 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-1.brep] s + +thickshell result s -5 + +set square 30288.5 + +set nb_v_good 4 +set nb_e_good 10 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 24 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + +set scale 5.8136266443689317 +set center_X -34.878384652992025 +set center_Y 41.518039353084561 +set proj_X 0.5689244270324707 +set proj_Y -0.54117375612258911 +set proj_Z -0.61923813819885254 +set up_X 0.48309960961341858 +set up_Y -0.38943690061569214 +set up_Z 0.78418976068496704 +set at_X -38.500396728515625 +set at_Y 34.677536010742188 +set at_Z -7.9150166511535645 + +vviewparams ${scale} ${center_X} ${center_Y} \ + ${proj_X} ${proj_Y} ${proj_Z} \ + ${up_X} ${up_Y} ${up_Z} \ + ${at_X} ${at_Y} ${at_Z} + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_20 b/tests/bugs/modalg_2/bug21261_20 new file mode 100755 index 0000000000..7f63b12d25 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_20 @@ -0,0 +1,36 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-comb.brep] s + +thickshell result s -5 + +set square 25639.3 + +set nb_v_good 18 +set nb_e_good 31 +set nb_w_good 17 +set nb_f_good 15 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 83 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_21 b/tests/bugs/modalg_2/bug21261_21 new file mode 100755 index 0000000000..5a2d84e3c6 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_21 @@ -0,0 +1,39 @@ +puts "TODO OCC11111 ALL: Exception" +puts "TODO OCC11111 ALL: An exception was caught" +puts "TODO ?OCC11111 ALL: TEST INCOMPLETE" +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-comb1.brep] s + +thickshell result s -5 + +set square 25639.3 + +set nb_v_good 18 +set nb_e_good 31 +set nb_w_good 17 +set nb_f_good 15 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 83 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_22 b/tests/bugs/modalg_2/bug21261_22 new file mode 100755 index 0000000000..7473484fac --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_22 @@ -0,0 +1,36 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-2.brep] s + +thickshell result s -5 + +set square 66487 + +set nb_v_good 12 +set nb_e_good 24 +set nb_w_good 12 +set nb_f_good 12 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 62 + + + +vinit +vdisplay result +vsetdispmode 1 +vfit + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_23 b/tests/bugs/modalg_2/bug21261_23 new file mode 100755 index 0000000000..854763fb93 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_23 @@ -0,0 +1,36 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-3.brep] s + +thickshell result s -5 + +set square 115498 + +set nb_v_good 24 +set nb_e_good 48 +set nb_w_good 24 +set nb_f_good 24 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 122 + + + +vinit +vdisplay result +vsetdispmode 1 +vfit + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_24 b/tests/bugs/modalg_2/bug21261_24 new file mode 100755 index 0000000000..5e6373edd2 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_24 @@ -0,0 +1,36 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-4.brep] s + +thickshell result s -5 + +set square 44935.7 + +set nb_v_good 16 +set nb_e_good 28 +set nb_w_good 14 +set nb_f_good 14 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 74 + + + +vinit +vdisplay result +vsetdispmode 1 +vfit + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_25 b/tests/bugs/modalg_2/bug21261_25 new file mode 100755 index 0000000000..704c7d4b4c --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_25 @@ -0,0 +1,36 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-5.brep] s + +thickshell result s -5 + +set square 29923.6 + +set nb_v_good 4 +set nb_e_good 10 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 24 + + + +vinit +vdisplay result +vsetdispmode 1 +vfit + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_26 b/tests/bugs/modalg_2/bug21261_26 new file mode 100755 index 0000000000..7ab75bdae3 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_26 @@ -0,0 +1,36 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-cone1.brep] s + +thickshell result s -5 + +set square 11054.2 + +set nb_v_good 4 +set nb_e_good 8 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 22 + + + +vinit +vdisplay result +vsetdispmode 1 +vfit + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_27 b/tests/bugs/modalg_2/bug21261_27 new file mode 100755 index 0000000000..1eee43c16a --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_27 @@ -0,0 +1,36 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-revarc.brep] s + +thickshell result s -5 + +set square 39635.4 + +set nb_v_good 4 +set nb_e_good 8 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 22 + + + +vinit +vdisplay result +vsetdispmode 1 +vfit + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_28 b/tests/bugs/modalg_2/bug21261_28 new file mode 100755 index 0000000000..c54e83f603 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_28 @@ -0,0 +1,36 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-revbzc.brep] s + +thickshell result s -5 + +set square 73788.5 + +set nb_v_good 4 +set nb_e_good 8 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 22 + + + +vinit +vdisplay result +vsetdispmode 1 +vfit + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_29 b/tests/bugs/modalg_2/bug21261_29 new file mode 100755 index 0000000000..92e18e64c8 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_29 @@ -0,0 +1,36 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-uneven_thickening.brep] s + +thickshell result s -2 + +set square 4087.41 + +set nb_v_good 30 +set nb_e_good 51 +set nb_w_good 21 +set nb_f_good 21 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 125 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_3 b/tests/bugs/modalg_2/bug21261_3 new file mode 100755 index 0000000000..841eb26633 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_3 @@ -0,0 +1,54 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-2.brep] s + +thickshell result s 5 + +set square 61710.5 + +set nb_v_good 12 +set nb_e_good 24 +set nb_w_good 12 +set nb_f_good 12 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 62 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + +set scale 5.4752524438940986 +set center_X 0.12443750381514462 +set center_Y 30.91257192276079 +set proj_X 0.75705158710479736 +set proj_Y -0.55456298589706421 +set proj_Z 0.34544554352760315 +set up_X -0.26271694898605347 +set up_Y 0.22571359574794769 +set up_Z 0.93810069561004639 +set at_X -8.4405813217163086 +set at_Y 5.1293683052062988 +set at_Z 1.3484655618667603 + +vviewparams ${scale} ${center_X} ${center_Y} \ + ${proj_X} ${proj_Y} ${proj_Z} \ + ${up_X} ${up_Y} ${up_Z} \ + ${at_X} ${at_Y} ${at_Z} + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_30 b/tests/bugs/modalg_2/bug21261_30 new file mode 100755 index 0000000000..de3b029020 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_30 @@ -0,0 +1,36 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-2137_tsrf.brep] s + +thickshell result s 5 + +set square 27432.4 + +set nb_v_good 4 +set nb_e_good 6 +set nb_w_good 6 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 22 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_31 b/tests/bugs/modalg_2/bug21261_31 new file mode 100755 index 0000000000..ad7fff8a8c --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_31 @@ -0,0 +1,36 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-1988_ellipsepipesrf_1.brep] s + +thickshell result s 2 + +set square 9163.91 + +set nb_v_good 4 +set nb_e_good 8 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 22 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_32 b/tests/bugs/modalg_2/bug21261_32 new file mode 100755 index 0000000000..69bd16dcb4 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_32 @@ -0,0 +1,36 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-1988_bscpipesrf_2.brep] s + +thickshell result s 2 + +set square 5315.89 + +set nb_v_good 4 +set nb_e_good 8 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 22 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_33 b/tests/bugs/modalg_2/bug21261_33 new file mode 100755 index 0000000000..7dbc87a285 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_33 @@ -0,0 +1,36 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-box_trim_thickening.brep] s + +thickshell result s 5 + +set square 50357.1 + +set nb_v_good 34 +set nb_e_good 67 +set nb_w_good 35 +set nb_f_good 33 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 171 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_34 b/tests/bugs/modalg_2/bug21261_34 new file mode 100755 index 0000000000..295561e54e --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_34 @@ -0,0 +1,36 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-box_trim_thickening.brep] s + +thickshell result s 5 i + +set square 50743.4 + +set nb_v_good 26 +set nb_e_good 47 +set nb_w_good 23 +set nb_f_good 21 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 119 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_35 b/tests/bugs/modalg_2/bug21261_35 new file mode 100755 index 0000000000..cef4765c35 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_35 @@ -0,0 +1,36 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-box_trim_thickening.brep] s + +thickshell result s -5 i + +set square 47143.4 + +set nb_v_good 26 +set nb_e_good 47 +set nb_w_good 23 +set nb_f_good 21 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 119 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_36 b/tests/bugs/modalg_2/bug21261_36 new file mode 100755 index 0000000000..34d2c2af5d --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_36 @@ -0,0 +1,36 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-comb.brep] s + +thickshell result s 5 + +set square 24835.8 + +set nb_v_good 16 +set nb_e_good 26 +set nb_w_good 14 +set nb_f_good 12 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 70 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_37 b/tests/bugs/modalg_2/bug21261_37 new file mode 100755 index 0000000000..20b489d52b --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_37 @@ -0,0 +1,36 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-comb.brep] s + +thickshell result s 5 i + +set square 24835.8 + +set nb_v_good 16 +set nb_e_good 26 +set nb_w_good 14 +set nb_f_good 12 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 70 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_38 b/tests/bugs/modalg_2/bug21261_38 new file mode 100755 index 0000000000..c2ea41575d --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_38 @@ -0,0 +1,36 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-comb.brep] s + +thickshell result s -5 i + +set square 25735.8 + +set nb_v_good 16 +set nb_e_good 26 +set nb_w_good 14 +set nb_f_good 12 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 70 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_39 b/tests/bugs/modalg_2/bug21261_39 new file mode 100755 index 0000000000..bbbd4406be --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_39 @@ -0,0 +1,36 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-uneven_thickening.brep] s + +thickshell result s 2 + +set square 4435.62 + +set nb_v_good 30 +set nb_e_good 51 +set nb_w_good 21 +set nb_f_good 21 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 125 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_4 b/tests/bugs/modalg_2/bug21261_4 new file mode 100755 index 0000000000..4c7572cae4 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_4 @@ -0,0 +1,54 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-2.brep] s + +thickshell result s -5 + +set square 66487 + +set nb_v_good 12 +set nb_e_good 24 +set nb_w_good 12 +set nb_f_good 12 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 62 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + +set scale 5.4752524438940986 +set center_X 0.12443750381514462 +set center_Y 30.91257192276079 +set proj_X 0.75705158710479736 +set proj_Y -0.55456298589706421 +set proj_Z 0.34544554352760315 +set up_X -0.26271694898605347 +set up_Y 0.22571359574794769 +set up_Z 0.93810069561004639 +set at_X -8.4405813217163086 +set at_Y 5.1293683052062988 +set at_Z 1.3484655618667603 + +vviewparams ${scale} ${center_X} ${center_Y} \ + ${proj_X} ${proj_Y} ${proj_Z} \ + ${up_X} ${up_Y} ${up_Z} \ + ${at_X} ${at_Y} ${at_Z} + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_40 b/tests/bugs/modalg_2/bug21261_40 new file mode 100755 index 0000000000..f498f5e6cb --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_40 @@ -0,0 +1,54 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-3.brep] s + +thickshell result s -5 i + +set square 115498 + +set nb_v_good 24 +set nb_e_good 48 +set nb_w_good 24 +set nb_f_good 24 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 122 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + +set scale 4.1681300306816444 +set center_X 0.13164276086378379 +set center_Y 6.6154949824974238 +set proj_X 0.48621529340744019 +set proj_Y -0.47558537125587463 +set proj_Z 0.73308473825454712 +set up_X -0.51949578523635864 +set up_Y 0.51725912094116211 +set up_Z 0.68012285232543945 +set at_X 1.1775522232055664 +set at_Y -1.214188814163208 +set at_Z 0.14915035665035248 + +vviewparams ${scale} ${center_X} ${center_Y} \ + ${proj_X} ${proj_Y} ${proj_Z} \ + ${up_X} ${up_Y} ${up_Z} \ + ${at_X} ${at_Y} ${at_Z} + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_41 b/tests/bugs/modalg_2/bug21261_41 new file mode 100755 index 0000000000..db566bfe09 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_41 @@ -0,0 +1,54 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-3.brep] s + +thickshell result s 5 i + +set square 110064 + +set nb_v_good 24 +set nb_e_good 48 +set nb_w_good 24 +set nb_f_good 24 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 122 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + +set scale 4.1681300306816444 +set center_X 0.13164276086378379 +set center_Y 6.6154949824974238 +set proj_X 0.48621529340744019 +set proj_Y -0.47558537125587463 +set proj_Z 0.73308473825454712 +set up_X -0.51949578523635864 +set up_Y 0.51725912094116211 +set up_Z 0.68012285232543945 +set at_X 1.1775522232055664 +set at_Y -1.214188814163208 +set at_Z 0.14915035665035248 + +vviewparams ${scale} ${center_X} ${center_Y} \ + ${proj_X} ${proj_Y} ${proj_Z} \ + ${up_X} ${up_Y} ${up_Z} \ + ${at_X} ${at_Y} ${at_Z} + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_42 b/tests/bugs/modalg_2/bug21261_42 new file mode 100755 index 0000000000..203677a660 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_42 @@ -0,0 +1,54 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-4.brep] s + +thickshell result s -5 i + +set square 44935.7 + +set nb_v_good 16 +set nb_e_good 28 +set nb_w_good 14 +set nb_f_good 14 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 74 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + +set scale 5.7979972910353759 +set center_X 134.00320461480183 +set center_Y 57.36536300752401 +set proj_X 0.40099617838859558 +set proj_Y -0.39083370566368103 +set proj_Z 0.82852339744567871 +set up_X -0.58777821063995361 +set up_Y 0.58394128084182739 +set up_Z 0.55993682146072388 +set at_X 14.468252182006836 +set at_Y -14.975484848022461 +set at_Z -8.813446044921875 + +vviewparams ${scale} ${center_X} ${center_Y} \ + ${proj_X} ${proj_Y} ${proj_Z} \ + ${up_X} ${up_Y} ${up_Z} \ + ${at_X} ${at_Y} ${at_Z} + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_43 b/tests/bugs/modalg_2/bug21261_43 new file mode 100755 index 0000000000..deae111267 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_43 @@ -0,0 +1,54 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-4.brep] s + +thickshell result s 5 i + +set square 43286.4 + +set nb_v_good 16 +set nb_e_good 28 +set nb_w_good 14 +set nb_f_good 14 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 74 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + +set scale 5.7979972910353759 +set center_X 134.00320461480183 +set center_Y 57.36536300752401 +set proj_X 0.40099617838859558 +set proj_Y -0.39083370566368103 +set proj_Z 0.82852339744567871 +set up_X -0.58777821063995361 +set up_Y 0.58394128084182739 +set up_Z 0.55993682146072388 +set at_X 14.468252182006836 +set at_Y -14.975484848022461 +set at_Z -8.813446044921875 + +vviewparams ${scale} ${center_X} ${center_Y} \ + ${proj_X} ${proj_Y} ${proj_Z} \ + ${up_X} ${up_Y} ${up_Z} \ + ${at_X} ${at_Y} ${at_Z} + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_44 b/tests/bugs/modalg_2/bug21261_44 new file mode 100755 index 0000000000..0001237a34 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_44 @@ -0,0 +1,54 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-cone1.brep] s + +thickshell result s 5 + +set square 14506.6 + +set nb_v_good 4 +set nb_e_good 8 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 22 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + +set scale 17.084273613995954 +set center_X 210.44987026890158 +set center_Y -5.2570485620847549 +set proj_X 0.98952245712280273 +set proj_Y -0.12535266578197479 +set proj_Z 0.071637466549873352 +set up_X -0.016377445310354233 +set up_Y 0.39552098512649536 +set up_Z 0.91831082105636597 +set at_X 121.38485717773438 +set at_Y -46.730243682861328 +set at_Z 83.376449584960938 + +vviewparams ${scale} ${center_X} ${center_Y} \ + ${proj_X} ${proj_Y} ${proj_Z} \ + ${up_X} ${up_Y} ${up_Z} \ + ${at_X} ${at_Y} ${at_Z} + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_45 b/tests/bugs/modalg_2/bug21261_45 new file mode 100755 index 0000000000..2ab6f512c7 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_45 @@ -0,0 +1,36 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-revarc.brep] s + +thickshell result s 5 + +set square 48246.4 + +set nb_v_good 4 +set nb_e_good 8 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 22 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_46 b/tests/bugs/modalg_2/bug21261_46 new file mode 100755 index 0000000000..a08115cd6c --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_46 @@ -0,0 +1,36 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-revbzc.brep] s + +thickshell result s 5 + +set square 83884.6 + +set nb_v_good 4 +set nb_e_good 8 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 22 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_5 b/tests/bugs/modalg_2/bug21261_5 new file mode 100755 index 0000000000..155ea36345 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_5 @@ -0,0 +1,54 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-3.brep] s + +thickshell result s 5 + +set square 110064 + +set nb_v_good 24 +set nb_e_good 48 +set nb_w_good 24 +set nb_f_good 24 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 122 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + +set scale 4.1681300306816444 +set center_X 0.13164276086378379 +set center_Y 6.6154949824974238 +set proj_X 0.48621529340744019 +set proj_Y -0.47558537125587463 +set proj_Z 0.73308473825454712 +set up_X -0.51949578523635864 +set up_Y 0.51725912094116211 +set up_Z 0.68012285232543945 +set at_X 1.1775522232055664 +set at_Y -1.214188814163208 +set at_Z 0.14915035665035248 + +vviewparams ${scale} ${center_X} ${center_Y} \ + ${proj_X} ${proj_Y} ${proj_Z} \ + ${up_X} ${up_Y} ${up_Z} \ + ${at_X} ${at_Y} ${at_Z} + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_6 b/tests/bugs/modalg_2/bug21261_6 new file mode 100755 index 0000000000..8c7e84d427 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_6 @@ -0,0 +1,54 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-3.brep] s + +thickshell result s -5 + +set square 115498 + +set nb_v_good 24 +set nb_e_good 48 +set nb_w_good 24 +set nb_f_good 24 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 122 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + +set scale 4.1681300306816444 +set center_X 0.13164276086378379 +set center_Y 6.6154949824974238 +set proj_X 0.48621529340744019 +set proj_Y -0.47558537125587463 +set proj_Z 0.73308473825454712 +set up_X -0.51949578523635864 +set up_Y 0.51725912094116211 +set up_Z 0.68012285232543945 +set at_X 1.1775522232055664 +set at_Y -1.214188814163208 +set at_Z 0.14915035665035248 + +vviewparams ${scale} ${center_X} ${center_Y} \ + ${proj_X} ${proj_Y} ${proj_Z} \ + ${up_X} ${up_Y} ${up_Z} \ + ${at_X} ${at_Y} ${at_Z} + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_7 b/tests/bugs/modalg_2/bug21261_7 new file mode 100755 index 0000000000..37539d4970 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_7 @@ -0,0 +1,54 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-4.brep] s + +thickshell result s 5 + +set square 43286.4 + +set nb_v_good 16 +set nb_e_good 28 +set nb_w_good 14 +set nb_f_good 14 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 74 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + +set scale 5.7979972910353759 +set center_X 134.00320461480183 +set center_Y 57.36536300752401 +set proj_X 0.40099617838859558 +set proj_Y -0.39083370566368103 +set proj_Z 0.82852339744567871 +set up_X -0.58777821063995361 +set up_Y 0.58394128084182739 +set up_Z 0.55993682146072388 +set at_X 14.468252182006836 +set at_Y -14.975484848022461 +set at_Z -8.813446044921875 + +vviewparams ${scale} ${center_X} ${center_Y} \ + ${proj_X} ${proj_Y} ${proj_Z} \ + ${up_X} ${up_Y} ${up_Z} \ + ${at_X} ${at_Y} ${at_Z} + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_8 b/tests/bugs/modalg_2/bug21261_8 new file mode 100755 index 0000000000..94ccb61220 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_8 @@ -0,0 +1,54 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-4.brep] s + +thickshell result s -5 + +set square 44935.7 + +set nb_v_good 16 +set nb_e_good 28 +set nb_w_good 14 +set nb_f_good 14 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 74 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + +set scale 5.7979972910353759 +set center_X 134.00320461480183 +set center_Y 57.36536300752401 +set proj_X 0.40099617838859558 +set proj_Y -0.39083370566368103 +set proj_Z 0.82852339744567871 +set up_X -0.58777821063995361 +set up_Y 0.58394128084182739 +set up_Z 0.55993682146072388 +set at_X 14.468252182006836 +set at_Y -14.975484848022461 +set at_Z -8.813446044921875 + +vviewparams ${scale} ${center_X} ${center_Y} \ + ${proj_X} ${proj_Y} ${proj_Z} \ + ${up_X} ${up_Y} ${up_Z} \ + ${at_X} ${at_Y} ${at_Z} + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21261_9 b/tests/bugs/modalg_2/bug21261_9 new file mode 100755 index 0000000000..f9d6d84309 --- /dev/null +++ b/tests/bugs/modalg_2/bug21261_9 @@ -0,0 +1,54 @@ +puts "========" +puts "OCC21261" +puts "Customer : TATA" +puts "========" +puts "" +###################################################### +# Implementation of thickening of shell functionality +###################################################### + +set BugNumber OCC21261 + +restore [locate_data_file OCC21261-5.brep] s + +thickshell result s 5 + +set square 36363.8 + +set nb_v_good 4 +set nb_e_good 10 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 24 + + + +vinit +vdisplay result +vsetdispmode 0 +vfit + +set scale 6.3723487126883533 +set center_X -4.2632564145606011e-14 +set center_Y -22.430308400362279 +set proj_X 0.57735025882720947 +set proj_Y -0.57735025882720947 +set proj_Z 0.57735025882720947 +set up_X -0.40824827551841736 +set up_Y 0.40824827551841736 +set up_Z 0.81649655103683472 +set at_X 0 +set at_Y 0 +set at_Z 0 + +vviewparams ${scale} ${center_X} ${center_Y} \ + ${proj_X} ${proj_Y} ${proj_Z} \ + ${up_X} ${up_Y} ${up_Z} \ + ${at_X} ${at_Y} ${at_Z} + + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug212_1 b/tests/bugs/modalg_2/bug212_1 new file mode 100755 index 0000000000..2bca2110f9 --- /dev/null +++ b/tests/bugs/modalg_2/bug212_1 @@ -0,0 +1,17 @@ +puts "========" +puts "OCC212" +puts "========" +################################################ +## Bug in Topological "Common" boolean operation +################################################ + +restore [locate_data_file OCC212-1.brep] S1 +checkshape S1 +restore [locate_data_file OCC212-2.brep] S2 +checkshape S2 + +bcommon result S1 S2 + +set square 314.301 +set 3dviewer 0 + diff --git a/tests/bugs/modalg_2/bug212_2 b/tests/bugs/modalg_2/bug212_2 new file mode 100755 index 0000000000..f7ae228d2a --- /dev/null +++ b/tests/bugs/modalg_2/bug212_2 @@ -0,0 +1,17 @@ +puts "========" +puts "OCC212" +puts "========" +################################################ +## Bug in Topological "Common" boolean operation +################################################ + +restore [locate_data_file OCC212-1.brep] S1 +checkshape S1 +restore [locate_data_file OCC212-2.brep] S2 +checkshape S2 + +bcommon result S2 S1 + +set square 314.301 +set 3dviewer 0 + diff --git a/tests/bugs/modalg_2/bug212_3 b/tests/bugs/modalg_2/bug212_3 new file mode 100755 index 0000000000..a33f93429f --- /dev/null +++ b/tests/bugs/modalg_2/bug212_3 @@ -0,0 +1,18 @@ +puts "========" +puts "OCC212" +puts "========" +################################################ +## Bug in Topological "Common" boolean operation +################################################ + +restore [locate_data_file OCC212-1.brep] S1 +checkshape S1 +restore [locate_data_file OCC212-2.brep] S2 +checkshape S2 + +bop S1 S2 +bopcommon result + +set square 314.301 +set 2dviewer 1 + diff --git a/tests/bugs/modalg_2/bug213 b/tests/bugs/modalg_2/bug213 new file mode 100755 index 0000000000..7314139b6e --- /dev/null +++ b/tests/bugs/modalg_2/bug213 @@ -0,0 +1,20 @@ +puts "========" +puts "OCC213" +puts "========" +################################################ +## Bug in Topological "fuse" boolean operation +################################################ + +cpulimit 3500 + +restore [locate_data_file OCC213-1.brep] S1 +checkshape S1 +restore [locate_data_file OCC213-2.brep] S2 +checkshape S2 + +bop S1 S2 +bopfuse result + +set square 4835.45 +set 2dviewer 1 + diff --git a/tests/bugs/modalg_2/bug213_1 b/tests/bugs/modalg_2/bug213_1 new file mode 100755 index 0000000000..e03a1302a8 --- /dev/null +++ b/tests/bugs/modalg_2/bug213_1 @@ -0,0 +1,16 @@ +puts "========" +puts "OCC213" +puts "========" +################################################ +## Bug in Topological "fuse" boolean operation +################################################ + +restore [locate_data_file OCC213-1.brep] S1 +checkshape S1 +restore [locate_data_file OCC213-2.brep] S2 +checkshape S2 + +bfuse result S1 S2 +set square 4835.45 +set 3dviewer 0 + diff --git a/tests/bugs/modalg_2/bug213_2 b/tests/bugs/modalg_2/bug213_2 new file mode 100755 index 0000000000..91e347b23a --- /dev/null +++ b/tests/bugs/modalg_2/bug213_2 @@ -0,0 +1,15 @@ +puts "========" +puts "OCC213" +puts "========" +################################################ +## Bug in Topological "fuse" boolean operation +################################################ + +restore [locate_data_file OCC213-1.brep] S1 +checkshape S1 +restore [locate_data_file OCC213-2.brep] S2 +checkshape S2 + +bfuse result S2 S1 +set square 4835.45 +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug21415 b/tests/bugs/modalg_2/bug21415 new file mode 100755 index 0000000000..7b57ac973a --- /dev/null +++ b/tests/bugs/modalg_2/bug21415 @@ -0,0 +1,60 @@ +puts "TODO OCC11111 ALL: Error : The square of result shape is" +pload QAcommands + +puts "============" +puts "OCC21415" +puts "============" +puts "" +####################################################################### +# Bad triangulation of cylindrical face with large vertex tolerances +####################################################################### + +set BugNumber OCC21415 + +# Data + +set scale 19.469810863701095 +set center_X 436.67687011410339 +set center_Y 148.0981469658436 +set proj_X 0.99999862909317017 +set proj_Y 0.0012245246907696128 +set proj_Z -0.0011169711360707879 +set up_X 0.00037844621692784131 +set up_Y 0.48741284012794495 +set up_Z 0.87317168712615967 +set at_X 291.61880493164062 +set at_Y -453.53787231445312 +set at_Z 82.229469299316406 + +# Start + +restore [locate_data_file OCC21415-face_bad_meshed.brep] result +vinit +vdisplay result +vfit + +vsetdispmode 1 +vfit + + +vviewparams ${scale} ${center_X} ${center_Y} \ + ${proj_X} ${proj_Y} ${proj_Z} \ + ${up_X} ${up_Y} ${up_Z} \ + ${at_X} ${at_Y} ${at_Z} + +puts "TEMPORARY!!!!!!!!!!!!!!!!!" +set square 400000 +puts "TEMPORARY!!!!!!!!!!!!!!!!!" + +# Analysis of "nbshapes res" +set nb_v_good 1 +set nb_e_good 2 +set nb_w_good 1 +set nb_f_good 1 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 5 + +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug21448 b/tests/bugs/modalg_2/bug21448 new file mode 100755 index 0000000000..2fb2f90336 --- /dev/null +++ b/tests/bugs/modalg_2/bug21448 @@ -0,0 +1,50 @@ +puts "============" +puts "OCC21448" +puts "============" +puts "" +####################################################################### +# Invalid result of BRepOffsetAPI_MakePipeShell +####################################################################### + +set BugNumber OCC21448 + +puts "Load first shape ..." +restore [locate_data_file bug21448_base_1.brep] base1 + +puts "Load second shape ..." +restore [locate_data_file bug21448_Invert_2.brep] Invert_2 + +puts "Load third shape ..." +restore [locate_data_file bug21448_chemin.brep] chemin + +puts "Prepare shapes ..." +wire w1 chemin +explode base1 W +explode Invert_2 W +explode chemin V + +puts "Start Make pipe ..." +mksweep w1 +addsweep base1_1 chemin_1 -R +addsweep Invert_2_1 chemin_2 -R +buildsweep result +puts "Finish Make pipe ..." + +set square 1040.94 + +set nb_v_good 4 +set nb_e_good 6 +set nb_w_good 2 +set nb_f_good 2 +set nb_sh_good 1 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 15 + +vinit +vsetdispmode 0 +vdisplay result +vfit + +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug21460 b/tests/bugs/modalg_2/bug21460 new file mode 100755 index 0000000000..aeb40c38c2 --- /dev/null +++ b/tests/bugs/modalg_2/bug21460 @@ -0,0 +1,38 @@ +puts "============" +puts "OCC21460" +puts "============" +puts "" +####################################################################### +# SIGFPE in BOP on two attached edges +####################################################################### + +set BugNumber OCC21460 + +puts "Load first shape ..." +restore [locate_data_file bug21460_aE1.brep] e1 + +puts "Load second shape ..." +restore [locate_data_file bug21460_aE2.brep] e2 + +puts "Prepare boolean operation ..." +bop e1 e2 + +puts "Start boolean operation ..." +bopfuse result +puts "Finish boolean operation ..." + +set mistake 0 + +set length 448.285 + +set nb_v_good 5 +set nb_e_good 4 +set nb_w_good 1 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 11 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug21540 b/tests/bugs/modalg_2/bug21540 new file mode 100755 index 0000000000..489c942251 --- /dev/null +++ b/tests/bugs/modalg_2/bug21540 @@ -0,0 +1,37 @@ +puts "============" +puts "OCC21540" +puts "============" +puts "" +####################################################################### +# Boolean operation section produces wrong result (OCC 6.3.1) +####################################################################### + +set BugNumber OCC21540 + +puts "Load first shape ..." +restore [locate_data_file OCC21540-HalfSpace.brep] b1 + +puts "Load second shape ..." +restore [locate_data_file OCC21540-Shape.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopsection result +puts "Finish boolean operation ..." + +set length 462.35 + +set nb_v_good 58 +set nb_e_good 58 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 117 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug21652_1 b/tests/bugs/modalg_2/bug21652_1 new file mode 100755 index 0000000000..2f29925f9c --- /dev/null +++ b/tests/bugs/modalg_2/bug21652_1 @@ -0,0 +1,36 @@ +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" + +puts "============" +puts "OCC21652" +puts "Customer : TATA" +puts "============" +puts "" +####################################################################### +# TATA-08-005 Problem with offset on the wire +####################################################################### + +set BugNumber OCC21652 + +puts "Load shape ..." +restore [locate_data_file OCC21652.brep] a + +if [catch { mkoffset resoffset a 1 1.0 } ] { + puts "Faulty ${BugNumber} : mkoffset is wrong" +} else { + renamevar resoffset_1 result + +set length 372.531 + +set nb_v_good 93 +set nb_e_good 93 +set nb_w_good 1 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 187 +} + +set 2dviewer 1 + diff --git a/tests/bugs/modalg_2/bug21652_2 b/tests/bugs/modalg_2/bug21652_2 new file mode 100755 index 0000000000..b098efd314 --- /dev/null +++ b/tests/bugs/modalg_2/bug21652_2 @@ -0,0 +1,34 @@ +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" + +puts "============" +puts "OCC21652" +puts "Customer : TATA" +puts "============" +puts "" +####################################################################### +# TATA-08-005 Problem with offset on the wire +####################################################################### + +set BugNumber OCC21652 + +puts "Load shape ..." +restore [locate_data_file OCC21652.brep] a + +if [catch { mkoffset resoffset a 1 0.9 } ] { + puts "Faulty ${BugNumber} : mkoffset is wrong" +} else { + renamevar resoffset_1 result + +set length 371.913 + +set nb_v_good 93 +set nb_e_good 93 +set nb_w_good 1 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 187 +} +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug21722 b/tests/bugs/modalg_2/bug21722 new file mode 100755 index 0000000000..3cc537f316 --- /dev/null +++ b/tests/bugs/modalg_2/bug21722 @@ -0,0 +1,41 @@ +puts "============" +puts "OCC21722" +puts "============" +puts "" +####################################################################### +# The operation Section produces non-complete result. +####################################################################### + +set BugNumber OCC21722 + +puts "Load shape ..." +restore [locate_data_file OCC21722.brep] g + +puts "Prepare first shape ..." +explode g +copy g_1 b1 + +puts "Prepare second shape ..." +copy g_2 b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopsection result +puts "Finish boolean operation ..." + +set length 1.91376 + +set nb_v_good 4 +set nb_e_good 2 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 7 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug2172_1 b/tests/bugs/modalg_2/bug2172_1 new file mode 100755 index 0000000000..2ce9f618ca --- /dev/null +++ b/tests/bugs/modalg_2/bug2172_1 @@ -0,0 +1,22 @@ +puts "============" +puts "OCC2172" +puts "============" +puts "" +###################################################### +# Fuse operation produces invalid shape +###################################################### +## (new topology) +## (bfuse) +###################################################### + +restore [locate_data_file OCC2172-torus.brep] torus +restore [locate_data_file OCC2172-cylinder.brep] cylinder + +checkshape torus +checkshape cylinder + +bfuse result torus cylinder + +set square 28603.8 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_2/bug2172_2 b/tests/bugs/modalg_2/bug2172_2 new file mode 100755 index 0000000000..cdda117dc4 --- /dev/null +++ b/tests/bugs/modalg_2/bug2172_2 @@ -0,0 +1,22 @@ +puts "============" +puts "OCC2172" +puts "============" +puts "" +###################################################### +# Fuse operation produces invalid shape +###################################################### +## (new topology) +## (bfuse) +###################################################### + +restore [locate_data_file OCC2172-torus.brep] torus +restore [locate_data_file OCC2172-cylinder.brep] cylinder + +checkshape torus +checkshape cylinder + +bfuse result cylinder torus + +set square 28603.8 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_2/bug2172_3 b/tests/bugs/modalg_2/bug2172_3 new file mode 100755 index 0000000000..e950a60dcd --- /dev/null +++ b/tests/bugs/modalg_2/bug2172_3 @@ -0,0 +1,24 @@ +puts "============" +puts "OCC2172" +puts "============" +puts "" +###################################################### +# Fuse operation produces invalid shape +###################################################### +## (old topology) +## (fuse) +###################################################### + +restore [locate_data_file OCC2172-torus.brep] torus +restore [locate_data_file OCC2172-cylinder.brep] cylinder + +checkshape torus +checkshape cylinder + +if { [catch {bfuse result torus cylinder} catch_result] } { + puts "Faulty OCC2172" +} + +set square 28603.8 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_2/bug2172_4 b/tests/bugs/modalg_2/bug2172_4 new file mode 100755 index 0000000000..d28938b40d --- /dev/null +++ b/tests/bugs/modalg_2/bug2172_4 @@ -0,0 +1,24 @@ +puts "============" +puts "OCC2172" +puts "============" +puts "" +###################################################### +# Fuse operation produces invalid shape +###################################################### +## (old topology) +## (fuse) +###################################################### + +restore [locate_data_file OCC2172-torus.brep] torus +restore [locate_data_file OCC2172-cylinder.brep] cylinder + +checkshape torus +checkshape cylinder + +if { [catch {bfuse result cylinder torus} catch_result] } { + puts "Faulty OCC2172" +} + +set square 28603.8 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_2/bug21754 b/tests/bugs/modalg_2/bug21754 new file mode 100755 index 0000000000..560dc0ec38 --- /dev/null +++ b/tests/bugs/modalg_2/bug21754 @@ -0,0 +1,36 @@ +puts "================" +puts "OCC21754" +puts "================" +puts "" +################################################################# +# Section of face by plane yields empty result +################################################################# + +set BugNumber OCC21754 + +# load shape and make face with natural bounds, to excluse possibility of +# lame excuse saying that it contains small edges +restore [locate_data_file OCC21754-bug_bsection_empty.brep] a +mksurface s a +mkface f s + +# create plane at Z=-0.410 (the bug is reproduced for Z in range [-0.405;-0.420]) +plane pl 0 0 -0.410 0 0 1 +mkface p pl 0 10 -5 5 + +bsection result f p -2d + +set nb_v_good 2 +set nb_e_good 1 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 4 + +set length 0.592137 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug21909 b/tests/bugs/modalg_2/bug21909 new file mode 100755 index 0000000000..58552629b2 --- /dev/null +++ b/tests/bugs/modalg_2/bug21909 @@ -0,0 +1,74 @@ +pload QAcommands + +puts "============" +puts "OCC21909" +puts "============" +puts "" +####################################################################### +# The surface is visualized with rendering errors +####################################################################### + +set BugNumber OCC21909 + +# Data + +set scale 57.547428234801195 +set center_X -29.161882474505589 +set center_Y -27.085456554411167 +set proj_X -0.25567048788070679 +set proj_Y -0.92769843339920044 +set proj_Z 0.27204453945159912 +set up_X 0.43156850337982178 +set up_Y 0.14228194952011108 +set up_Z 0.89078855514526367 +set at_X 53.189125061035156 +set at_Y -25.674787521362305 +set at_Z -2.9377093315124512 + +set x1 190 + +set y1 216 +set y2 228 + +# +restore [locate_data_file OCC21909-render_error.brep] result + +vinit +vdisplay result +vfit + +vsetdispmode 1 +vfit + +vviewparams ${scale} ${center_X} ${center_Y} \ + ${proj_X} ${proj_Y} ${proj_Z} \ + ${up_X} ${up_Y} ${up_Z} \ + ${at_X} ${at_Y} ${at_Z} + +vmoveto ${x1} ${y1} +vmoveto ${x1} ${y1} + +set status 0 +for {set i ${y1} } {$i <= ${y2} } {incr i} { + set Color1 [QAGetPixelColor ${x1} ${i}] + + set R1 [lindex ${Color1} 2] + set G1 [lindex ${Color1} 5] + set B1 [lindex ${Color1} 8] + + puts "x = ${x1} y = ${i} R = ${R1} G = ${G1} B = ${B1}" + + if { ${R1} == 0 && ${G1} == 0 && ${B1} == 0 } { + incr status + puts "Error : rendering x = ${x1} y = ${i}" + } +} + +if { ${status} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +set 3dviewer 0 + diff --git a/tests/bugs/modalg_2/bug221 b/tests/bugs/modalg_2/bug221 new file mode 100755 index 0000000000..173af51319 --- /dev/null +++ b/tests/bugs/modalg_2/bug221 @@ -0,0 +1,29 @@ +puts "========" +puts "OCC221" +puts "========" +puts "" +###################################################################### +##After loading attached file (one simple face) checkshape give a problem (Bad Orientation of SubShape) +## but I believe that this face is correct. Also I believe that face is vitiated during performing checkshape +## (perhaps - in BRepCheck_Face::ClassifyWire()) +###################################################################### + +restore [locate_data_file OCC221.brep] result +set che [checkshape result r] +if { [regexp {OK} $che] != 1 } { + puts "Faulty OCC221 (checkshape) : Checkshape command works wrongly" +} else { + puts "OCC221 OK (checkshape) : Checkshape command works properly" +} +puts "" +set che [checkshape result] +if { [regexp {Faulty} $che] == 1} { + puts "Faulty OCC221 (checkshape) : Checkshape command works wrongly" +} else { + puts "OCC221 OK (checkshape) : Checkshape command works properly" +} + +set square 425.537 +set 2dviewer 0 + + diff --git a/tests/bugs/modalg_2/bug22109_1 b/tests/bugs/modalg_2/bug22109_1 new file mode 100755 index 0000000000..02896eeb26 --- /dev/null +++ b/tests/bugs/modalg_2/bug22109_1 @@ -0,0 +1,35 @@ +puts "============" +puts "OCC22109" +puts "============" +puts "" +####################################################################### +# Boolean operation common fails. Appendix to the SALOME bug: 0021060 +####################################################################### + +set BugNumber OCC22109 + +puts "Load first shape ..." +restore [locate_data_file bug22109_Solid_24.brep] b1 + +puts "Load second shape ..." +restore [locate_data_file bug22109_tore.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopcommon result +puts "Finish boolean operation ..." + +set nb_v_good 0 +set nb_e_good 0 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 1 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug22109_2 b/tests/bugs/modalg_2/bug22109_2 new file mode 100755 index 0000000000..f5b7c41ba6 --- /dev/null +++ b/tests/bugs/modalg_2/bug22109_2 @@ -0,0 +1,37 @@ +puts "============" +puts "OCC22109" +puts "============" +puts "" +####################################################################### +# Boolean operation common fails. Appendix to the SALOME bug: 0021060 +####################################################################### + +set BugNumber OCC22109 + +puts "Load first shape ..." +restore [locate_data_file bug22109_Solid_24.brep] b1 + +puts "Load second shape ..." +restore [locate_data_file bug22109_tore.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopfuse result +puts "Finish boolean operation ..." + +set square 87449.7 + +set nb_v_good 17 +set nb_e_good 25 +set nb_w_good 14 +set nb_f_good 10 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 69 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug22109_3 b/tests/bugs/modalg_2/bug22109_3 new file mode 100755 index 0000000000..29bb709baa --- /dev/null +++ b/tests/bugs/modalg_2/bug22109_3 @@ -0,0 +1,37 @@ +puts "============" +puts "OCC22109" +puts "============" +puts "" +####################################################################### +# Boolean operation common fails. Appendix to the SALOME bug: 0021060 +####################################################################### + +set BugNumber OCC22109 + +puts "Load first shape ..." +restore [locate_data_file bug22109_Solid_24.brep] b1 + +puts "Load second shape ..." +restore [locate_data_file bug22109_tore.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopcut result +puts "Finish boolean operation ..." + +set square 87443.6 + +set nb_v_good 16 +set nb_e_good 23 +set nb_w_good 14 +set nb_f_good 10 +set nb_sh_good 2 +set nb_sol_good 2 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 68 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug22109_4 b/tests/bugs/modalg_2/bug22109_4 new file mode 100755 index 0000000000..42d9186f4e --- /dev/null +++ b/tests/bugs/modalg_2/bug22109_4 @@ -0,0 +1,37 @@ +puts "============" +puts "OCC22109" +puts "============" +puts "" +####################################################################### +# Boolean operation common fails. Appendix to the SALOME bug: 0021060 +####################################################################### + +set BugNumber OCC22109 + +puts "Load first shape ..." +restore [locate_data_file bug22109_Solid_24.brep] b1 + +puts "Load second shape ..." +restore [locate_data_file bug22109_tore.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +boptuc result +puts "Finish boolean operation ..." + +set square 1140.6 + +set nb_v_good 5 +set nb_e_good 9 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 25 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug22109_5 b/tests/bugs/modalg_2/bug22109_5 new file mode 100755 index 0000000000..d06800cfd5 --- /dev/null +++ b/tests/bugs/modalg_2/bug22109_5 @@ -0,0 +1,37 @@ +puts "============" +puts "OCC22109" +puts "============" +puts "" +####################################################################### +# Boolean operation common fails. Appendix to the SALOME bug: 0021060 +####################################################################### + +set BugNumber OCC22109 + +puts "Load first shape ..." +restore [locate_data_file bug22109_Solid_24.brep] b1 + +puts "Load second shape ..." +restore [locate_data_file bug22109_tore.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopsection result +puts "Finish boolean operation ..." + +set length 127.699 + +set nb_v_good 4 +set nb_e_good 6 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 11 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug22196 b/tests/bugs/modalg_2/bug22196 new file mode 100755 index 0000000000..be2cd23851 --- /dev/null +++ b/tests/bugs/modalg_2/bug22196 @@ -0,0 +1,29 @@ +puts "TODO OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" + +puts "================" +puts "OCC22196" +puts "================" +puts "" +####################################################################################### +# Problem with putting texture on the bottle.brep shape +###################################################################################### + +set BugNumber OCC22196 + +restore [locate_data_file OCC22196-scaled.brep] result + +set square 147.003 + +set nb_v_good 75 +set nb_e_good 157 +set nb_w_good 74 +set nb_f_good 71 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 380 + + +set 3dviewer 1 + diff --git a/tests/bugs/modalg_2/bug22306_1 b/tests/bugs/modalg_2/bug22306_1 new file mode 100755 index 0000000000..f693ce32c6 --- /dev/null +++ b/tests/bugs/modalg_2/bug22306_1 @@ -0,0 +1,36 @@ +puts "============" +puts "OCC22306" +puts "============" +puts "" +####################################################################### +# Fuse between cylinder and sphere produces not vallid result +####################################################################### + +set BugNumber OCC22306 + +puts "Load first shape ..." +restore [locate_data_file OCC22306-cyl.brep] b1 + +puts "Load second shape ..." +restore [locate_data_file OCC22306-sph.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopfuse result +puts "Finish boolean operation ..." + +set square 655.829 + +set nb_v_good 5 +set nb_e_good 10 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 26 + +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug22306_2 b/tests/bugs/modalg_2/bug22306_2 new file mode 100755 index 0000000000..a30432e7cd --- /dev/null +++ b/tests/bugs/modalg_2/bug22306_2 @@ -0,0 +1,37 @@ +puts "============" +puts "OCC22306" +puts "============" +puts "" +####################################################################### +# Fuse between cylinder and sphere produces not vallid result +####################################################################### + +set BugNumber OCC22306 + +puts "Load first shape ..." +restore [locate_data_file OCC22306-cyl.brep] b1 + +puts "Load second shape ..." +restore [locate_data_file OCC22306-sph.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopcut result +puts "Finish boolean operation ..." + +set square 458.125 + +set nb_v_good 4 +set nb_e_good 7 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 22 + +set 3dviewer 1 + diff --git a/tests/bugs/modalg_2/bug22306_3 b/tests/bugs/modalg_2/bug22306_3 new file mode 100755 index 0000000000..32a043eadf --- /dev/null +++ b/tests/bugs/modalg_2/bug22306_3 @@ -0,0 +1,36 @@ +puts "============" +puts "OCC22306" +puts "============" +puts "" +####################################################################### +# Fuse between cylinder and sphere produces not vallid result +####################################################################### + +set BugNumber OCC22306 + +puts "Load first shape ..." +restore [locate_data_file OCC22306-cyl.brep] b1 + +puts "Load second shape ..." +restore [locate_data_file OCC22306-sph.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +boptuc result +puts "Finish boolean operation ..." + +set square 327.269 + +set nb_v_good 5 +set nb_e_good 10 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 26 + +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug22306_4 b/tests/bugs/modalg_2/bug22306_4 new file mode 100755 index 0000000000..e9949b4092 --- /dev/null +++ b/tests/bugs/modalg_2/bug22306_4 @@ -0,0 +1,36 @@ +puts "============" +puts "OCC22306" +puts "============" +puts "" +####################################################################### +# Fuse between cylinder and sphere produces not vallid result +####################################################################### + +set BugNumber OCC22306 + +puts "Load first shape ..." +restore [locate_data_file OCC22306-cyl.brep] b1 + +puts "Load second shape ..." +restore [locate_data_file OCC22306-sph.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopsection result +puts "Finish boolean operation ..." + +set length 26.4582 + +set nb_v_good 3 +set nb_e_good 3 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 7 + +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug22306_5 b/tests/bugs/modalg_2/bug22306_5 new file mode 100755 index 0000000000..bb5181f0c6 --- /dev/null +++ b/tests/bugs/modalg_2/bug22306_5 @@ -0,0 +1,36 @@ +puts "============" +puts "OCC22306" +puts "============" +puts "" +####################################################################### +# Fuse between cylinder and sphere produces not vallid result +####################################################################### + +set BugNumber OCC22306 + +puts "Load first shape ..." +restore [locate_data_file OCC22306-cyl.brep] b1 + +puts "Load second shape ..." +restore [locate_data_file OCC22306-sph.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopcommon result +puts "Finish boolean operation ..." + +set square 129.564 + +set nb_v_good 4 +set nb_e_good 7 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 22 + +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug22310 b/tests/bugs/modalg_2/bug22310 new file mode 100755 index 0000000000..4535479732 --- /dev/null +++ b/tests/bugs/modalg_2/bug22310 @@ -0,0 +1,37 @@ +puts "============" +puts "OCC22310" +puts "============" +puts "" +####################################################################### +# Boolean operation common fails. Appendix to the SALOME bug: 0021128 +####################################################################### + +set BugNumber OCC22310 + +puts "Load first shape ..." +restore [locate_data_file bug22310_vol_inf_30.brep] b1 + +puts "Load second shape ..." +restore [locate_data_file bug22310_vol_sup_30.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopcommon result +puts "Finish boolean operation ..." + +set square 0.0457691 + +set nb_v_good 6 +set nb_e_good 9 +set nb_w_good 5 +set nb_f_good 5 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 28 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug22356 b/tests/bugs/modalg_2/bug22356 new file mode 100755 index 0000000000..748acac8a5 --- /dev/null +++ b/tests/bugs/modalg_2/bug22356 @@ -0,0 +1,37 @@ +puts "============" +puts "OCC22356" +puts "============" +puts "" +####################################################################### +# The result of fuse is not valid for two straight edges. +# Appendix to the SALOME bug: IPAL22182 +####################################################################### + +set BugNumber OCC22356 + +restore [locate_data_file bug22356_cy.brep] bq +explode bq e +copy bq_1 b1 +copy bq_2 b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopfuse result +puts "Finish boolean operation ..." + +set length 300 + +set nb_v_good 3 +set nb_e_good 2 +set nb_w_good 1 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 7 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug22361 b/tests/bugs/modalg_2/bug22361 new file mode 100755 index 0000000000..257be48c33 --- /dev/null +++ b/tests/bugs/modalg_2/bug22361 @@ -0,0 +1,37 @@ +puts "============" +puts "OCC22361" +puts "============" +puts "" +################################################################################################################################ +# Incorrect result of BRepOffsetAPI_MakePipeShell algorithm: it tries to build conical surface between two non-coaxial circles +################################################################################################################################ +set BugNumber 22361 + +circle c1 0 0 0 7 +circle c2 5.28270543795374 13.2067635948844 26.4135271897687 21 +polyline pp 0 0 0 5.28270543795374 13.2067635948844 26.4135271897687 +mkedge c1 c1 +wire c1 c1 +mkedge c2 c2 +wire c2 c2 +fit + +mksweep pp +addsweep c1 +addsweep c2 + +buildsweep result + +set square 2745.88 + +set nb_v_good 2 +set nb_e_good 3 +set nb_w_good 1 +set nb_f_good 1 +set nb_sh_good 1 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 8 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22409_1 b/tests/bugs/modalg_2/bug22409_1 new file mode 100755 index 0000000000..be3f117efd --- /dev/null +++ b/tests/bugs/modalg_2/bug22409_1 @@ -0,0 +1,37 @@ +puts "============" +puts "OCC22409" +puts "============" +puts "" +####################################################################### +# Boolean operation cut fails. Appendix to the SALOME bug: 0019957 +####################################################################### + +set BugNumber OCC22409 + +puts "Load first shape ..." +restore [locate_data_file bug22409_Defaut1.brep] b1 + +puts "Load second shape ..." +restore [locate_data_file bug22409_Solid_7.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopcommon result +puts "Finish boolean operation ..." + +set square 14969 + +set nb_v_good 6 +set nb_e_good 9 +set nb_w_good 5 +set nb_f_good 5 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 28 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug22409_2 b/tests/bugs/modalg_2/bug22409_2 new file mode 100755 index 0000000000..f0141b4088 --- /dev/null +++ b/tests/bugs/modalg_2/bug22409_2 @@ -0,0 +1,37 @@ +puts "============" +puts "OCC22409" +puts "============" +puts "" +####################################################################### +# Boolean operation cut fails. Appendix to the SALOME bug: 0019957 +####################################################################### + +set BugNumber OCC22409 + +puts "Load first shape ..." +restore [locate_data_file bug22409_bloc.brep] b1 + +puts "Load second shape ..." +restore [locate_data_file bug22409_Defaut1_new.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopcut result +puts "Finish boolean operation ..." + +set square 366764 + +set nb_v_good 40 +set nb_e_good 60 +set nb_w_good 22 +set nb_f_good 22 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 147 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug22428 b/tests/bugs/modalg_2/bug22428 new file mode 100755 index 0000000000..a8bd90bbb0 --- /dev/null +++ b/tests/bugs/modalg_2/bug22428 @@ -0,0 +1,30 @@ +puts "================" +puts "OCC22428" +puts "================" +puts "" +########################################################################################## +# The shape is valid on Linux but non-valid on Windows. Appendix for SALOME PARTITION_S2 +########################################################################################## + +set BugNumber OCC22428 + +restore [locate_data_file bug22428_f1.brep] result +set info [ checkshape result ] +set word1 [string compare [lindex ${info} end] "valid"] +set word2 [string compare [lindex ${info} end-1] "be"] +set word3 [string compare [lindex ${info} end-2] "to"] +set word4 [string compare [lindex ${info} end-3] "seems"] +set word5 [string compare [lindex ${info} end-4] "shape"] +set word6 [string compare [lindex ${info} end-5] "This"] + +# Resume +puts "" +if { ${word1} == 0 && ${word2} == 0 && ${word3} == 0 && ${word4} == 0 && ${word5} == 0 && ${word6} == 0} { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} + +set square 7837.39 +set 3dviewer 0 + diff --git a/tests/bugs/modalg_2/bug22436 b/tests/bugs/modalg_2/bug22436 new file mode 100755 index 0000000000..3b4e2f3839 --- /dev/null +++ b/tests/bugs/modalg_2/bug22436 @@ -0,0 +1,30 @@ +puts "============" +puts "OCC22436" +puts "============" +puts "" +####################################################################### +# Extra compound is created when importing non-manifold topology from STEP file +####################################################################### + +catch { pload XDE } + +set BugNumber OCC22436 + +param read.step.nonmanifold 1 + +stepread [locate_data_file bug22436_box.step] b1 * +renamevar b1_1 result + +set square 3.2e+11 + +set nb_v_good 12 +set nb_e_good 20 +set nb_w_good 11 +set nb_f_good 11 +set nb_sh_good 2 +set nb_sol_good 2 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 59 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug22500 b/tests/bugs/modalg_2/bug22500 new file mode 100755 index 0000000000..56ddbfafea --- /dev/null +++ b/tests/bugs/modalg_2/bug22500 @@ -0,0 +1,18 @@ +puts "========================" +puts "OCC22500" +puts "========================" +puts "" +####################################################################### +# Sewing creates invalid shape +####################################################################### + +set BugNumber OCC22500 + +restore [locate_data_file OCC22500-bug602badsewing.brep] a + +if { [catch {sewing result 0.01 a} catch_result] } { + puts "Faulty ${BugNumber} : function Sewing works wrongly" +} + +set square 0.0363594 +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22557 b/tests/bugs/modalg_2/bug22557 new file mode 100755 index 0000000000..4913814064 --- /dev/null +++ b/tests/bugs/modalg_2/bug22557 @@ -0,0 +1,37 @@ +puts "============" +puts "OCC22557" +puts "============" +puts "" +####################################################################### +# Bad result of the Cut operation (for CAS63-sp12-*) +####################################################################### + +set BugNumber OCC22557 + +puts "Load first shape ..." +restore [locate_data_file bug22557_Bloc_racine_70deg.brep] b1 + +puts "Load second shape ..." +restore [locate_data_file bug22557_PaveEntree.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopcut result +puts "Finish boolean operation ..." + +set square 0.172993 + +set nb_v_good 192 +set nb_e_good 288 +set nb_w_good 98 +set nb_f_good 98 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 679 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug22558 b/tests/bugs/modalg_2/bug22558 new file mode 100755 index 0000000000..52e673d8a7 --- /dev/null +++ b/tests/bugs/modalg_2/bug22558 @@ -0,0 +1,30 @@ +pload QAcommands + +puts "============" +puts "OCC22558" +puts "============" +puts "" +####################################################################### +# Bug in gp_Dir::Mirror(const gp_Ax2 & axis) +####################################################################### + +set BugNumber OCC22558 + +set check1 -57735 +set check2 57735 +set info [ OCC22558 1 1 1 1 0 0 0 0 0 ] + +set res_z1 [lindex ${info} end] +set res_y1 [lindex ${info} end-1] +set res_x1 [lindex ${info} end-2] + +set res_z [ expr int($res_z1 * 100000) ] +set res_y [ expr int($res_y1 * 100000) ] +set res_x [ expr int($res_x1 * 100000) ] + +if { ${res_x} == ${check1} && ${res_y} == ${check2} && ${res_z} == ${check2} } { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} + diff --git a/tests/bugs/modalg_2/bug22586 b/tests/bugs/modalg_2/bug22586 new file mode 100755 index 0000000000..041b449a8e --- /dev/null +++ b/tests/bugs/modalg_2/bug22586 @@ -0,0 +1,22 @@ +pload QAcommands + +puts "===========" +puts "OCC22586" +puts "===========" +puts "" +####################################################################### +# ShapeFix_FixSmallFace mistakenly removes a non-small pipe-like face with a seam edge +####################################################################### + +set BugNumber OCC22586 + +restore [locate_data_file OCC22586.brep] shape + +if { [catch { OCC22586 shape result } catch_result] } { + puts "Faulty ${BugNumber}" +} else { + puts "${BugNumber} OK" +} + +set 3dviewer 1 +set square 11275.7 diff --git a/tests/bugs/modalg_2/bug22588 b/tests/bugs/modalg_2/bug22588 new file mode 100755 index 0000000000..c863854414 --- /dev/null +++ b/tests/bugs/modalg_2/bug22588 @@ -0,0 +1,39 @@ +puts "============" +puts "OCC22588" +puts "============" +puts "" +####################################################################### +# Revolution with negative volume in some cases +####################################################################### + +set BugNumber OCC22588 + +vertex v1 0 0 0 +vertex v12 0 0 160 +vertex v13 25 0 25 +edge e7 v1 v12 +edge e8 v12 v13 +edge e9 v13 v1 +wire w2 e7 e8 e9 +plane pln1 25 0 25 0 1 0 -25 0 -25 +mkface face2 pln1 w2 +revol result face2 0 0 0 0 0 1 45 + +set square 5694.99 + +set nb_v_good 3 +set nb_e_good 8 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 21 + +vinit +vdisplay result +vfit + +set only_screen 0 + diff --git a/tests/bugs/modalg_2/bug22631 b/tests/bugs/modalg_2/bug22631 new file mode 100755 index 0000000000..da8164fc25 --- /dev/null +++ b/tests/bugs/modalg_2/bug22631 @@ -0,0 +1,33 @@ +puts "================" +puts "OCC22631" +puts "================" +puts "" +####################################################################################### +# Regression in vizualization for b-spline surface +###################################################################################### + +set BugNumber OCC22631 + +catch { pload XDE } + +testreadstep [locate_data_file OCC22145.stp] result + +set square 205444 + +set nb_v_good 3344 +set nb_e_good 4685 +set nb_w_good 1943 +set nb_f_good 1943 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 2 +set nb_shape_good 11919 + +vinit +tclean result +vsetdispmode 1 +vdisplay result +vfit + +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug22641 b/tests/bugs/modalg_2/bug22641 new file mode 100755 index 0000000000..0ef73b8591 --- /dev/null +++ b/tests/bugs/modalg_2/bug22641 @@ -0,0 +1,36 @@ +puts "TODO OCC11111 ALL: Error : The square of result shape is" +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" + +puts "================" +puts "OCC22641" +puts "================" +puts "" +####################################################################################### +# Meshing problem on the attached model +###################################################################################### + +set BugNumber OCC22641 + +catch { pload XDE } + +testreadstep [locate_data_file OCC22641-RailBosch.stp] result + +set square 160133 + +set nb_v_good 7608 +set nb_e_good 12032 +set nb_w_good 4750 +set nb_f_good 4444 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 28836 + +vinit +tclean result +vsetdispmode 1 +vdisplay result +vfit + +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug22678 b/tests/bugs/modalg_2/bug22678 new file mode 100755 index 0000000000..c72b144a17 --- /dev/null +++ b/tests/bugs/modalg_2/bug22678 @@ -0,0 +1,37 @@ +puts "============" +puts "OCC22678" +puts "============" +puts "" +####################################################################### +# Bad result of the Cut operation. +####################################################################### + +set BugNumber OCC22678 + +puts "Load first shape ..." +restore [locate_data_file bug22678_objCut.brep] b1 + +puts "Load second shape ..." +restore [locate_data_file bug22678_toolCut.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopcut result +puts "Finish boolean operation ..." + +set square 574348 + +set nb_v_good 17 +set nb_e_good 29 +set nb_w_good 16 +set nb_f_good 15 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 80 + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug22695 b/tests/bugs/modalg_2/bug22695 new file mode 100755 index 0000000000..8cae4e3440 --- /dev/null +++ b/tests/bugs/modalg_2/bug22695 @@ -0,0 +1,49 @@ +puts "============" +puts "OCC22695" +puts "============" +puts "" +####################################################################### +# The algorithm BRepFilletAPI_MakeFillet2d crashes in cases when some original edges of the face degenerate (become punctual) +####################################################################### + +set BugNumber OCC22695 + +smallview + +polyline pp 0 0 0 10 0 0 10 10 0 0 10 0 0 0 0 +mkplane ff pp +explode ff e +fit + +donly ff ff_1 ff_2 +if { [catch {chfi2d res1 ff ff_1 ff_2 F 5} catch_result] } { + puts "Faulty ${BugNumber}" +} + +#set length 37.854 + +explode res1 e +donly res1 res1_3 res1_4 +if { [catch {chfi2d res2 res1 res1_3 res1_4 F 5} catch_result] } { + puts "Faulty ${BugNumber}" +} + +#set length 35.708 + +explode res2 e +donly res2 res2_1 res2_5 +if { [catch {chfi2d res3 res2 res2_1 res2_5 F 5} catch_result] } { + puts "Faulty ${BugNumber}" +} + +#set length 33.5619 + +explode res3 e +donly res3 res3_4 res3_5 +if { [catch {chfi2d result res3 res3_4 res3_5 F 5} catch_result] } { + puts "Faulty ${BugNumber}" +} + +set length 31.4159 +set 3dviewer 0 + diff --git a/tests/bugs/modalg_2/bug22717 b/tests/bugs/modalg_2/bug22717 new file mode 100755 index 0000000000..0a575f85cd --- /dev/null +++ b/tests/bugs/modalg_2/bug22717 @@ -0,0 +1,22 @@ +puts "===========" +puts "OCC22717" +puts "===========" +puts "" +####################################################################### +# Exception during sewing +####################################################################### + +set BugNumber OCC22717 + +catch { pload XDE } + +igesread [locate_data_file OCC22717-8_hole.igs] shape_8h * + +if [catch {sewing result 0.019 shape_8h} catch_result] { + puts "Faulty ${BugNumber} : function Sewing works wrongly" +} else { + checkshape result f +} +set square 16490.5 +set 3dviewer 0 + diff --git a/tests/bugs/modalg_2/bug22725 b/tests/bugs/modalg_2/bug22725 new file mode 100755 index 0000000000..acf8bd5c86 --- /dev/null +++ b/tests/bugs/modalg_2/bug22725 @@ -0,0 +1,36 @@ +puts "============" +puts "OCC22725" +puts "============" +puts "" +####################################################################### +# BRepOffsetAPI_ThruSections algorithm produces twisted surface on some wires +####################################################################### + +set BugNumber OCC22725 + +restore [locate_data_file OCC22725-ruled_arc9.brep] a +restore [locate_data_file OCC22725-ruled_bsc9.brep] b + +wire w1 a +wire w2 b + +set issolid 0 +set isruled 1 + +if { [catch { thrusections result ${issolid} ${isruled} w1 w2 } catch_result] } { + puts "Faulty ${BugNumber} : thrusections is wrong" +} + +set square 11010.6 + +set nb_v_good 2 +set nb_e_good 3 +set nb_w_good 1 +set nb_f_good 1 +set nb_sh_good 1 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 8 + +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug22727 b/tests/bugs/modalg_2/bug22727 new file mode 100755 index 0000000000..7946cd245d --- /dev/null +++ b/tests/bugs/modalg_2/bug22727 @@ -0,0 +1,30 @@ +puts "================" +puts "OCC22727" +puts "================" +puts "" +####################################################################################### +# Fillet not produces a result +###################################################################################### + +set BugNumber OCC22727 + +restore [locate_data_file OCC22727-toFillet.brep] t + +tscale t 0.0507219 -0.0399294 -0.00324254 1000 +explode t e +blend result t 2. t_3 + +set square 3471.94 + +set nb_v_good 12 +set nb_e_good 14 +set nb_w_good 3 +set nb_f_good 3 +set nb_sh_good 1 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 34 + +set 3dviewer 1 + diff --git a/tests/bugs/modalg_2/bug22765 b/tests/bugs/modalg_2/bug22765 new file mode 100755 index 0000000000..b6aa4eec2b --- /dev/null +++ b/tests/bugs/modalg_2/bug22765 @@ -0,0 +1,16 @@ +puts "========================" +puts "OCC22765" +puts "========================" +puts "" +####################################################################### +# Sewing produced invalid shape from attached compound with tolerance 0.1 +####################################################################### + +set BugNumber OCC22765 + +restore [locate_data_file OCC22765.brep] a +sewing result 0.1 a + +checkshape result f +set square 0.0141287 +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug22770_1 b/tests/bugs/modalg_2/bug22770_1 new file mode 100755 index 0000000000..1ebf722b75 --- /dev/null +++ b/tests/bugs/modalg_2/bug22770_1 @@ -0,0 +1,40 @@ +puts "================" +puts "OCC22770" +puts "================" +puts "" +####################################################################################### +# Improve comman sewing in DRAW +###################################################################################### + +set BugNumber OCC22770 + +catch { pload XDE } + +# Create a new document and set UndoLimit +# NewDocument D MDTV-XCAF +# UndoLimit D 100 +# Open a transaction +# NewCommand D + +vertex a 1 0 0 +vertex b 10 0 0 +edge e1 a b +vertex c 10.01 0 0 +vertex d 20 0 0 +edge e2 c d +sewing result +t 0.1 e1 e2 +e + +set length 18.99 + +set nb_v_good 3 +set nb_e_good 2 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 6 + +set 3dviewer 0 + diff --git a/tests/bugs/modalg_2/bug22770_10 b/tests/bugs/modalg_2/bug22770_10 new file mode 100755 index 0000000000..a3cf744931 --- /dev/null +++ b/tests/bugs/modalg_2/bug22770_10 @@ -0,0 +1,27 @@ +puts "================" +puts "OCC22770" +puts "================" +puts "" +####################################################################################### +# Improve comman sewing in DRAW +###################################################################################### + +set BugNumber OCC22770 + +restore [locate_data_file 22770-tramp.brep] a +restore [locate_data_file 22770-trans.brep] b +sewing result +t 0.01 a b +mint 0.01 -a + +set square 1.88469e+07 + +set nb_v_good 478 +set nb_e_good 748 +set nb_w_good 273 +set nb_f_good 259 +set nb_sh_good 2 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 1761 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22770_11 b/tests/bugs/modalg_2/bug22770_11 new file mode 100755 index 0000000000..66c4e02873 --- /dev/null +++ b/tests/bugs/modalg_2/bug22770_11 @@ -0,0 +1,27 @@ +puts "================" +puts "OCC22770" +puts "================" +puts "" +####################################################################################### +# Improve comman sewing in DRAW +###################################################################################### + +set BugNumber OCC22770 + +restore [locate_data_file 22770-tramp.brep] a +restore [locate_data_file 22770-trans.brep] b +sewing result +t 0.01 a b +mint 0.01 +s + +set square 1.88469e+07 + +set nb_v_good 476 +set nb_e_good 748 +set nb_w_good 273 +set nb_f_good 259 +set nb_sh_good 2 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 1759 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22770_12 b/tests/bugs/modalg_2/bug22770_12 new file mode 100755 index 0000000000..f7469d60e6 --- /dev/null +++ b/tests/bugs/modalg_2/bug22770_12 @@ -0,0 +1,27 @@ +puts "================" +puts "OCC22770" +puts "================" +puts "" +####################################################################################### +# Improve comman sewing in DRAW +###################################################################################### + +set BugNumber OCC22770 + +restore [locate_data_file 22770-tramp.brep] a +restore [locate_data_file 22770-trans.brep] b +sewing result a b -c + +set square 1.8847e+07 + +set nb_v_good 930 +set nb_e_good 1164 +set nb_w_good 273 +set nb_f_good 259 +set nb_sh_good 11 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 2638 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22770_13 b/tests/bugs/modalg_2/bug22770_13 new file mode 100755 index 0000000000..23e9f35119 --- /dev/null +++ b/tests/bugs/modalg_2/bug22770_13 @@ -0,0 +1,39 @@ +puts "TODO OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" + +puts "================" +puts "OCC22770" +puts "================" +puts "" +####################################################################################### +# Improve comman sewing in DRAW +###################################################################################### + +set BugNumber OCC22770 + +catch { pload XDE } + +# Create a new document and set UndoLimit + +# NewDocument D MDTV-XCAF +# UndoLimit D 100 + +# Open a transaction +# NewCommand D + +restore [locate_data_file 22770-tramp.brep] a +restore [locate_data_file 22770-trans.brep] b +sewing result a b +c + +set square 1.8847e+07 + +set nb_v_good 796 +set nb_e_good 1103 +set nb_w_good 273 +set nb_f_good 259 +set nb_sh_good 5 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 2437 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22770_14 b/tests/bugs/modalg_2/bug22770_14 new file mode 100755 index 0000000000..5adb151355 --- /dev/null +++ b/tests/bugs/modalg_2/bug22770_14 @@ -0,0 +1,27 @@ +puts "================" +puts "OCC22770" +puts "================" +puts "" +####################################################################################### +# Improve comman sewing in DRAW +###################################################################################### + +set BugNumber OCC22770 + +restore [locate_data_file 22770-tramp.brep] a +restore [locate_data_file 22770-trans.brep] b +sewing result a b +c -f + +set square 1.8847e+07 + +set nb_v_good 1469 +set nb_e_good 1474 +set nb_w_good 273 +set nb_f_good 259 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 3476 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22770_15 b/tests/bugs/modalg_2/bug22770_15 new file mode 100755 index 0000000000..8f631d0de5 --- /dev/null +++ b/tests/bugs/modalg_2/bug22770_15 @@ -0,0 +1,39 @@ +puts "TODO OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" + +puts "================" +puts "OCC22770" +puts "================" +puts "" +####################################################################################### +# Improve comman sewing in DRAW +###################################################################################### + +set BugNumber OCC22770 + +catch { pload XDE } + +# Create a new document and set UndoLimit + +# NewDocument D MDTV-XCAF +# UndoLimit D 100 + +# Open a transaction +# NewCommand D + +restore [locate_data_file 22770-tramp.brep] a +restore [locate_data_file 22770-trans.brep] b +sewing result a b -p + +set square 1.8847e+07 + +set nb_v_good 796 +set nb_e_good 1103 +set nb_w_good 273 +set nb_f_good 259 +set nb_sh_good 5 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 2437 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22770_16 b/tests/bugs/modalg_2/bug22770_16 new file mode 100755 index 0000000000..5484064722 --- /dev/null +++ b/tests/bugs/modalg_2/bug22770_16 @@ -0,0 +1,31 @@ +puts "================" +puts "OCC22770" +puts "================" +puts "" +####################################################################################### +# Improve comman sewing in DRAW +###################################################################################### + +set BugNumber OCC22770 + +vertex a 1 0 0 +vertex b 10 0 0 +edge e1 a b +vertex c 10.01 0 0 +vertex d 20 0 0 +edge e2 c d +sewing result 0.1 e1 e2 +e + +set length 18.99 + +set nb_v_good 3 +set nb_e_good 2 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 6 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22770_17 b/tests/bugs/modalg_2/bug22770_17 new file mode 100755 index 0000000000..9d66f491c6 --- /dev/null +++ b/tests/bugs/modalg_2/bug22770_17 @@ -0,0 +1,31 @@ +puts "================" +puts "OCC22770" +puts "================" +puts "" +####################################################################################### +# Improve comman sewing in DRAW +###################################################################################### + +set BugNumber OCC22770 + +vertex a 1 0 0 +vertex b 10 0 0 +edge e1 a b +vertex c 10.01 0 0 +vertex d 20 0 0 +edge e2 c d +sewing result 0.1 e1 e2 -e + +set length 18.99 + +set nb_v_good 4 +set nb_e_good 2 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 7 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22770_18 b/tests/bugs/modalg_2/bug22770_18 new file mode 100755 index 0000000000..d0c5ab40ff --- /dev/null +++ b/tests/bugs/modalg_2/bug22770_18 @@ -0,0 +1,30 @@ +puts "================" +puts "OCC22770" +puts "================" +puts "" +####################################################################################### +# Improve comman sewing in DRAW +###################################################################################### + +set BugNumber OCC22770 + +box a 1 2 3 +box b 2 0 0 1 2 3 +explode a f +explode b f + +sewing result 1.1 a_2 b_1 + +set square 12 + +set nb_v_good 4 +set nb_e_good 4 +set nb_w_good 2 +set nb_f_good 2 +set nb_sh_good 1 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 13 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22770_19 b/tests/bugs/modalg_2/bug22770_19 new file mode 100755 index 0000000000..c41c1aa6f8 --- /dev/null +++ b/tests/bugs/modalg_2/bug22770_19 @@ -0,0 +1,30 @@ +puts "================" +puts "OCC22770" +puts "================" +puts "" +####################################################################################### +# Improve comman sewing in DRAW +###################################################################################### + +set BugNumber OCC22770 + +box a 1 2 3 +box b 2 0 0 1 2 3 +explode a f +explode b f + +sewing result 1.1 a_2 b_1 -f + +set square 12 + +set nb_v_good 8 +set nb_e_good 8 +set nb_w_good 2 +set nb_f_good 2 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 21 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22770_2 b/tests/bugs/modalg_2/bug22770_2 new file mode 100755 index 0000000000..871021134a --- /dev/null +++ b/tests/bugs/modalg_2/bug22770_2 @@ -0,0 +1,39 @@ +puts "================" +puts "OCC22770" +puts "================" +puts "" +####################################################################################### +# Improve comman sewing in DRAW +###################################################################################### + +set BugNumber OCC22770 + +catch { pload XDE } + +# Create a new document and set UndoLimit +# NewDocument D MDTV-XCAF +# UndoLimit D 100 +# Open a transaction +# NewCommand D + +vertex a 1 0 0 +vertex b 10 0 0 +edge e1 a b +vertex c 10.01 0 0 +vertex d 20 0 0 +edge e2 c d +sewing result +t 0.1 e1 e2 -e + +set length 18.99 + +set nb_v_good 4 +set nb_e_good 2 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 7 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22770_20 b/tests/bugs/modalg_2/bug22770_20 new file mode 100755 index 0000000000..1c2f60b797 --- /dev/null +++ b/tests/bugs/modalg_2/bug22770_20 @@ -0,0 +1,30 @@ +puts "================" +puts "OCC22770" +puts "================" +puts "" +####################################################################################### +# Improve comman sewing in DRAW +###################################################################################### + +set BugNumber OCC22770 + +box a 1 2 3 +box b 2 0 0 1 2 3 +explode a f +explode b f + +sewing result 1.1 a_2 b_1 +f + +set square 12 + +set nb_v_good 4 +set nb_e_good 4 +set nb_w_good 2 +set nb_f_good 2 +set nb_sh_good 1 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 13 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22770_21 b/tests/bugs/modalg_2/bug22770_21 new file mode 100755 index 0000000000..d213aabd01 --- /dev/null +++ b/tests/bugs/modalg_2/bug22770_21 @@ -0,0 +1,30 @@ +puts "================" +puts "OCC22770" +puts "================" +puts "" +####################################################################################### +# Improve comman sewing in DRAW +###################################################################################### + +set BugNumber OCC22770 + +box a 1 1 1 +box b 1 0 0 1 2 1 +explode a f +explode b f + +sewing result a_2 a_3 b_3 + +set square 3 + +set nb_v_good 10 +set nb_e_good 11 +set nb_w_good 3 +set nb_f_good 3 +set nb_sh_good 1 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 29 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22770_22 b/tests/bugs/modalg_2/bug22770_22 new file mode 100755 index 0000000000..881360172f --- /dev/null +++ b/tests/bugs/modalg_2/bug22770_22 @@ -0,0 +1,30 @@ +puts "================" +puts "OCC22770" +puts "================" +puts "" +####################################################################################### +# Improve comman sewing in DRAW +###################################################################################### + +set BugNumber OCC22770 + +box a 1 1 1 +box b 1 0 0 1 2 1 +explode a f +explode b f + +sewing result a_2 a_3 b_3 +n + +set square 3 + +set nb_v_good 8 +set nb_e_good 10 +set nb_w_good 3 +set nb_f_good 3 +set nb_sh_good 1 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 25 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22770_23 b/tests/bugs/modalg_2/bug22770_23 new file mode 100755 index 0000000000..bc31bc4fb6 --- /dev/null +++ b/tests/bugs/modalg_2/bug22770_23 @@ -0,0 +1,28 @@ +puts "================" +puts "OCC22770" +puts "================" +puts "" +####################################################################################### +# Improve comman sewing in DRAW +###################################################################################### + +set BugNumber OCC22770 + +restore [locate_data_file 22770-tramp.brep] a +restore [locate_data_file 22770-trans.brep] b + +sewing result 0.1 a b + +set square 1.8847e+07 + +set nb_v_good 480 +set nb_e_good 741 +set nb_w_good 273 +set nb_f_good 259 +set nb_sh_good 2 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 1756 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22770_24 b/tests/bugs/modalg_2/bug22770_24 new file mode 100755 index 0000000000..514f25b65a --- /dev/null +++ b/tests/bugs/modalg_2/bug22770_24 @@ -0,0 +1,30 @@ +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" + +puts "================" +puts "OCC22770" +puts "================" +puts "" +####################################################################################### +# Improve comman sewing in DRAW +###################################################################################### + +set BugNumber OCC22770 + +restore [locate_data_file 22770-tramp.brep] a +restore [locate_data_file 22770-trans.brep] b + +sewing result 0.1 a b +mint 0.01 + +set square 1.88469e+07 + +set nb_v_good 476 +set nb_e_good 748 +set nb_w_good 273 +set nb_f_good 259 +set nb_sh_good 2 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 1759 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22770_25 b/tests/bugs/modalg_2/bug22770_25 new file mode 100755 index 0000000000..b598450d54 --- /dev/null +++ b/tests/bugs/modalg_2/bug22770_25 @@ -0,0 +1,30 @@ +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" + +puts "================" +puts "OCC22770" +puts "================" +puts "" +####################################################################################### +# Improve comman sewing in DRAW +###################################################################################### + +set BugNumber OCC22770 + +restore [locate_data_file 22770-tramp.brep] a +restore [locate_data_file 22770-trans.brep] b + +sewing result 0.1 a b +mint 0.01 -a + +set square 1.88469e+07 + +set nb_v_good 478 +set nb_e_good 748 +set nb_w_good 273 +set nb_f_good 259 +set nb_sh_good 2 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 1761 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22770_26 b/tests/bugs/modalg_2/bug22770_26 new file mode 100755 index 0000000000..458b9bbf1b --- /dev/null +++ b/tests/bugs/modalg_2/bug22770_26 @@ -0,0 +1,30 @@ +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" + +puts "================" +puts "OCC22770" +puts "================" +puts "" +####################################################################################### +# Improve comman sewing in DRAW +###################################################################################### + +set BugNumber OCC22770 + +restore [locate_data_file 22770-tramp.brep] a +restore [locate_data_file 22770-trans.brep] b + +sewing result 0.1 a b +mint 0.01 +s + +set square 1.88469e+07 + +set nb_v_good 476 +set nb_e_good 748 +set nb_w_good 273 +set nb_f_good 259 +set nb_sh_good 2 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 1759 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22770_27 b/tests/bugs/modalg_2/bug22770_27 new file mode 100755 index 0000000000..434392e1e7 --- /dev/null +++ b/tests/bugs/modalg_2/bug22770_27 @@ -0,0 +1,28 @@ +puts "================" +puts "OCC22770" +puts "================" +puts "" +####################################################################################### +# Improve comman sewing in DRAW +###################################################################################### + +set BugNumber OCC22770 + +restore [locate_data_file 22770-tramp.brep] a +restore [locate_data_file 22770-trans.brep] b + +sewing result 0.1 a b -c + +set square 1.8847e+07 + +set nb_v_good 483 +set nb_e_good 744 +set nb_w_good 273 +set nb_f_good 259 +set nb_sh_good 2 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 1762 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22770_28 b/tests/bugs/modalg_2/bug22770_28 new file mode 100755 index 0000000000..3ea3fffc4e --- /dev/null +++ b/tests/bugs/modalg_2/bug22770_28 @@ -0,0 +1,28 @@ +puts "================" +puts "OCC22770" +puts "================" +puts "" +####################################################################################### +# Improve comman sewing in DRAW +###################################################################################### + +set BugNumber OCC22770 + +restore [locate_data_file 22770-tramp.brep] a +restore [locate_data_file 22770-trans.brep] b + +sewing result 0.1 a b +c + +set square 1.8847e+07 + +set nb_v_good 480 +set nb_e_good 741 +set nb_w_good 273 +set nb_f_good 259 +set nb_sh_good 2 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 1756 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22770_29 b/tests/bugs/modalg_2/bug22770_29 new file mode 100755 index 0000000000..dd81aead93 --- /dev/null +++ b/tests/bugs/modalg_2/bug22770_29 @@ -0,0 +1,28 @@ +puts "================" +puts "OCC22770" +puts "================" +puts "" +####################################################################################### +# Improve comman sewing in DRAW +###################################################################################### + +set BugNumber OCC22770 + +restore [locate_data_file 22770-tramp.brep] a +restore [locate_data_file 22770-trans.brep] b + +sewing result 0.1 a b +c -f + +set square 1.8847e+07 + +set nb_v_good 1469 +set nb_e_good 1474 +set nb_w_good 273 +set nb_f_good 259 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 3476 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22770_3 b/tests/bugs/modalg_2/bug22770_3 new file mode 100755 index 0000000000..0426ee29ea --- /dev/null +++ b/tests/bugs/modalg_2/bug22770_3 @@ -0,0 +1,37 @@ +puts "================" +puts "OCC22770" +puts "================" +puts "" +####################################################################################### +# Improve comman sewing in DRAW +###################################################################################### + +set BugNumber OCC22770 + +catch { pload XDE } + +# Create a new document and set UndoLimit +# NewDocument D MDTV-XCAF +# UndoLimit D 100 +# Open a transaction +# NewCommand D + +box a 1 2 3 +box b 2 0 0 1 2 3 +explode a f +explode b f +sewing result +t 1.1 a_2 b_1 + +set square 12 +set nb_v_good 4 +set nb_e_good 4 +set nb_w_good 2 +set nb_f_good 2 +set nb_sh_good 1 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 13 + +set 3dviewer 0 + diff --git a/tests/bugs/modalg_2/bug22770_30 b/tests/bugs/modalg_2/bug22770_30 new file mode 100755 index 0000000000..41710a7d22 --- /dev/null +++ b/tests/bugs/modalg_2/bug22770_30 @@ -0,0 +1,28 @@ +puts "================" +puts "OCC22770" +puts "================" +puts "" +####################################################################################### +# Improve comman sewing in DRAW +###################################################################################### + +set BugNumber OCC22770 + +restore [locate_data_file 22770-tramp.brep] a +restore [locate_data_file 22770-trans.brep] b + +sewing result 0.1 a b -p + +set square 1.8847e+07 + +set nb_v_good 480 +set nb_e_good 741 +set nb_w_good 273 +set nb_f_good 259 +set nb_sh_good 2 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 1756 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22770_4 b/tests/bugs/modalg_2/bug22770_4 new file mode 100755 index 0000000000..84581a5907 --- /dev/null +++ b/tests/bugs/modalg_2/bug22770_4 @@ -0,0 +1,28 @@ +puts "================" +puts "OCC22770" +puts "================" +puts "" +####################################################################################### +# Improve comman sewing in DRAW +###################################################################################### + +set BugNumber OCC22770 + +box a 1 2 3 +box b 2 0 0 1 2 3 +explode a f +explode b f +sewing result +t 1.1 a_2 b_1 -f + +set square 12 +set nb_v_good 8 +set nb_e_good 8 +set nb_w_good 2 +set nb_f_good 2 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 21 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22770_5 b/tests/bugs/modalg_2/bug22770_5 new file mode 100755 index 0000000000..c779148f2c --- /dev/null +++ b/tests/bugs/modalg_2/bug22770_5 @@ -0,0 +1,28 @@ +puts "================" +puts "OCC22770" +puts "================" +puts "" +####################################################################################### +# Improve comman sewing in DRAW +###################################################################################### + +set BugNumber OCC22770 + +box a 1 2 3 +box b 2 0 0 1 2 3 +explode a f +explode b f +sewing result +t 1.1 a_2 b_1 +f + +set square 12 +set nb_v_good 4 +set nb_e_good 4 +set nb_w_good 2 +set nb_f_good 2 +set nb_sh_good 1 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 13 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22770_6 b/tests/bugs/modalg_2/bug22770_6 new file mode 100755 index 0000000000..8b96320efc --- /dev/null +++ b/tests/bugs/modalg_2/bug22770_6 @@ -0,0 +1,28 @@ +puts "================" +puts "OCC22770" +puts "================" +puts "" +####################################################################################### +# Improve comman sewing in DRAW +###################################################################################### + +set BugNumber OCC22770 + +box a 1 1 1 +box b 1 0 0 1 2 1 +explode a f +explode b f +sewing result a_2 a_3 b_3 + +set square 3 +set nb_v_good 10 +set nb_e_good 11 +set nb_w_good 3 +set nb_f_good 3 +set nb_sh_good 1 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 29 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22770_7 b/tests/bugs/modalg_2/bug22770_7 new file mode 100755 index 0000000000..5a207fc206 --- /dev/null +++ b/tests/bugs/modalg_2/bug22770_7 @@ -0,0 +1,28 @@ +puts "================" +puts "OCC22770" +puts "================" +puts "" +####################################################################################### +# Improve comman sewing in DRAW +###################################################################################### + +set BugNumber OCC22770 + +box a 1 1 1 +box b 1 0 0 1 2 1 +explode a f +explode b f +sewing result a_2 a_3 b_3 +n + +set square 3 +set nb_v_good 8 +set nb_e_good 10 +set nb_w_good 3 +set nb_f_good 3 +set nb_sh_good 1 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 25 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22770_8 b/tests/bugs/modalg_2/bug22770_8 new file mode 100755 index 0000000000..af0acc45fb --- /dev/null +++ b/tests/bugs/modalg_2/bug22770_8 @@ -0,0 +1,29 @@ +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" + +puts "================" +puts "OCC22770" +puts "================" +puts "" +####################################################################################### +# Improve comman sewing in DRAW +###################################################################################### + +set BugNumber OCC22770 + +restore [locate_data_file 22770-tramp.brep] a +restore [locate_data_file 22770-trans.brep] b +sewing result +t 0.01 a b + +set square 1.88469e+07 + +set nb_v_good 482 +set nb_e_good 744 +set nb_w_good 273 +set nb_f_good 259 +set nb_sh_good 2 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 1761 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22770_9 b/tests/bugs/modalg_2/bug22770_9 new file mode 100755 index 0000000000..41b7b405f9 --- /dev/null +++ b/tests/bugs/modalg_2/bug22770_9 @@ -0,0 +1,27 @@ +puts "================" +puts "OCC22770" +puts "================" +puts "" +####################################################################################### +# Improve comman sewing in DRAW +###################################################################################### + +set BugNumber OCC22770 + +restore [locate_data_file 22770-tramp.brep] a +restore [locate_data_file 22770-trans.brep] b +sewing result +t 0.01 a b +mint 0.01 + +set square 1.88469e+07 + +set nb_v_good 476 +set nb_e_good 748 +set nb_w_good 273 +set nb_f_good 259 +set nb_sh_good 2 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 1759 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22771 b/tests/bugs/modalg_2/bug22771 new file mode 100755 index 0000000000..ec60b79ad5 --- /dev/null +++ b/tests/bugs/modalg_2/bug22771 @@ -0,0 +1,40 @@ +puts "============" +puts "OCC22771" +puts "============" +puts "" +####################################################################### +# An extra vertex produced in result of Boolean section for the cases of closed intersection curves. +####################################################################### + +set BugNumber OCC22771 + +puts "Load first shape ..." +restore [locate_data_file bug22771_Box_1.brep] b1 + +puts "Load second shape ..." +restore [locate_data_file bug22771_Cylinder_1.brep] b2 + +puts "Prepare boolean operation ..." +explode b1 f +copy b1_5 b1 +copy b2_1 b2 + +bop b1 b2 + +puts "Start boolean operation ..." +bopsection result +puts "Finish boolean operation ..." + +set length 314.159 + +set nb_v_good 1 +set nb_e_good 1 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 3 + +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug22781_1 b/tests/bugs/modalg_2/bug22781_1 new file mode 100755 index 0000000000..cf78f32584 --- /dev/null +++ b/tests/bugs/modalg_2/bug22781_1 @@ -0,0 +1,14 @@ +puts "================" +puts "OCC22781" +puts "================" +puts "" +####################################################################################### +# Regression in GCPnts_TangentialDeflection +###################################################################################### + +set BugNumber OCC22781 + +restore [locate_data_file OCC22781-BeforeCont.brep] result + +set length 5.82393 +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22781_2 b/tests/bugs/modalg_2/bug22781_2 new file mode 100755 index 0000000000..1d2703a655 --- /dev/null +++ b/tests/bugs/modalg_2/bug22781_2 @@ -0,0 +1,21 @@ +pload QAcommands + +puts "================" +puts "OCC22781" +puts "================" +puts "" +####################################################################################### +# Regression in GCPnts_TangentialDeflection +###################################################################################### + +set BugNumber OCC22781 + +restore [locate_data_file OCC22781-BeforeCont.brep] result +vinit +vdisplay result +vfit +vsetdispmode 0 +vselect 290 135 + +set length 5.82393 +set only_screen 0 \ No newline at end of file diff --git a/tests/bugs/modalg_2/bug22781_3 b/tests/bugs/modalg_2/bug22781_3 new file mode 100755 index 0000000000..676ea6fbf4 --- /dev/null +++ b/tests/bugs/modalg_2/bug22781_3 @@ -0,0 +1,15 @@ +puts "================" +puts "OCC22781" +puts "================" +puts "" +####################################################################################### +# Regression in GCPnts_TangentialDeflection +###################################################################################### + +set BugNumber OCC22781 + +restore [locate_data_file OCC22781-BeforeCont.brep] result + +set length 5.82393 +set 3dviewer 0 + diff --git a/tests/bugs/modalg_2/bug22781_4 b/tests/bugs/modalg_2/bug22781_4 new file mode 100755 index 0000000000..496fa0521f --- /dev/null +++ b/tests/bugs/modalg_2/bug22781_4 @@ -0,0 +1,21 @@ +pload QAcommands + +puts "================" +puts "OCC22781" +puts "================" +puts "" +####################################################################################### +# Regression in GCPnts_TangentialDeflection +###################################################################################### + +set BugNumber OCC22781 + +restore [locate_data_file OCC22781-BeforeCont.brep] result +vinit +vdisplay result +vfit +vsetdispmode 1 +vselect 290 135 + +set length 5.82393 +set only_screen 0 diff --git a/tests/bugs/modalg_2/bug22783 b/tests/bugs/modalg_2/bug22783 new file mode 100755 index 0000000000..8910dd6ff0 --- /dev/null +++ b/tests/bugs/modalg_2/bug22783 @@ -0,0 +1,30 @@ +puts "===========" +puts "OCC22783" +puts "===========" +puts "" +####################################################################### +# Improvement of BRepOffsetAPI_MakeFilling: keep old and new boundary edges with all pcurves +####################################################################### + +catch {pload XDE} + +set BugNumber OCC22783 + +restore [locate_data_file bug22783_cs.brep] a +explode a +explode a_1 e +explode a_1_6 +explode a_1_13 +edge e1 a_1_6_1 a_1_13_1 +edge e2 a_1_6_2 a_1_13_2 +smallview +donly a_1_6 a_1_13 e1 e2 +fit + +filling result 4 0 0 a_1_6 0 a_1_13 0 e1 0 e2 0 +tolerance result +checkshape result +dump result + +set square 0.00456273 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug22786 b/tests/bugs/modalg_2/bug22786 new file mode 100755 index 0000000000..24fffc47f7 --- /dev/null +++ b/tests/bugs/modalg_2/bug22786 @@ -0,0 +1,36 @@ +puts "============" +puts "OCC22786" +puts "============" +puts "" +####################################################################### +# 64bit issue in AdvApp2Var +####################################################################### + +set BugNumber OCC22786 + +restore [locate_data_file OCC22786-c.brep] c + +explode c + +gplate result 5 0 c_1 0 c_2 0 c_3 0 c_4 0 c_5 0 + +set square 2.92409 + +set nb_v_good 4 +set nb_e_good 4 +set nb_w_good 1 +set nb_f_good 1 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 10 + + +vinit +vdisplay c_1 c_2 c_3 c_4 c_5 +vdisplay result +vsetdispmode 1 +vfit + +set only_screen 1 diff --git a/tests/bugs/modalg_2/bug22790 b/tests/bugs/modalg_2/bug22790 new file mode 100755 index 0000000000..15712fa378 --- /dev/null +++ b/tests/bugs/modalg_2/bug22790 @@ -0,0 +1,35 @@ +puts "============" +puts "OCC22790" +puts "============" +puts "" +####################################################################### +# Boolean opeation Fuse fails. +####################################################################### + +set BugNumber OCC22790 + +puts "Load shape ..." +restore [locate_data_file OCC22790-cx.brep] b + +explode b +copy b_1 b1 +copy b_3 b2 + +bop b1 b2 + +bopfuse result + +set square 1.21408e+09 + +set nb_v_good 11 +set nb_e_good 12 +set nb_w_good 4 +set nb_f_good 2 +set nb_sh_good 1 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 31 + +set 3dviewer 1 + diff --git a/tests/bugs/modalg_2/bug22798_1 b/tests/bugs/modalg_2/bug22798_1 new file mode 100755 index 0000000000..aaee325b0b --- /dev/null +++ b/tests/bugs/modalg_2/bug22798_1 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC22798" +puts "============" +puts "" +############################################################################# +# Regression: BRepBuilderAPI_GTransform produces an invalid result on sphere +############################################################################# + +set BugNumber OCC22798 + +psphere a 100 +nurbsconvert result a + +set square 126261 + +set nb_v_good 2 +set nb_e_good 3 +set nb_w_good 1 +set nb_f_good 1 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 9 + +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug22798_2 b/tests/bugs/modalg_2/bug22798_2 new file mode 100755 index 0000000000..94d907594f --- /dev/null +++ b/tests/bugs/modalg_2/bug22798_2 @@ -0,0 +1,27 @@ +puts "============" +puts "OCC22798" +puts "============" +puts "" +############################################################################# +# Regression: BRepBuilderAPI_GTransform produces an invalid result on sphere +############################################################################# + +set BugNumber OCC22798 + +psphere a 100 +scalexyz result a 2 3 4 + +set square 1.12112e+06 + +set nb_v_good 2 +set nb_e_good 3 +set nb_w_good 1 +set nb_f_good 1 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 9 + +set 3dviewer 1 + diff --git a/tests/bugs/modalg_2/bug22801 b/tests/bugs/modalg_2/bug22801 new file mode 100755 index 0000000000..2579527a07 --- /dev/null +++ b/tests/bugs/modalg_2/bug22801 @@ -0,0 +1,36 @@ +puts "============" +puts "OCC22801" +puts "============" +puts "" +####################################################################### +# Boolean operations algorithm fails on two customer's shapes +####################################################################### + +set BugNumber OCC22801 + +puts "Load first shape ..." +restore [locate_data_file OCC22801-first_shape.brep] b1 + +puts "Load second shape ..." +restore [locate_data_file OCC22801-second_shape.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopcut result +puts "Finish boolean operation ..." + +set square 287634 + +set nb_v_good 55 +set nb_e_good 97 +set nb_w_good 44 +set nb_f_good 44 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 243 + +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug22804 b/tests/bugs/modalg_2/bug22804 new file mode 100755 index 0000000000..c8e3e496b2 --- /dev/null +++ b/tests/bugs/modalg_2/bug22804 @@ -0,0 +1,58 @@ +puts "========================" +puts "OCC22804" +puts "========================" +puts "" +####################################################################### +# Sewing increases tolerance of vertices for redundant value. +####################################################################### + +set BugNumber OCC22804 + +catch {pload XDE} + +restore [locate_data_file OCC22804-sew_bug.brep] a + +set tol 200 +sewing result ${tol} a + +set ToleranceList [tolerance result] +regexp {Tolerance MAX=([-0-9.+eE]+)} $ToleranceList full oTolerance +regexp {FACE[ \t]*: MAX=([-0-9.+eE]+)} $ToleranceList full FaceTolerance +regexp {EDGE[ \t]*: MAX=([-0-9.+eE]+)} $ToleranceList full EdgeTolerance +regexp {VERTEX[ \t]*: MAX=([-0-9.+eE]+)} $ToleranceList full VertexTolerance + +set percent_max 0.1 + +proc GetPercent {Value GoodValue} { + set Percent 0. + if {${GoodValue} != 0.} { + set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] + } elseif {${Value} != 0.} { + set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] + } else { + set Percent 0. + } + return ${Percent} +} +set IsOk 1 + +set minTolerance ${EdgeTolerance} +if { ${minTolerance} > ${VertexTolerance} } { + set minTolerance $(VertexTolerance) +} + +set minTolerance_percent [GetPercent ${minTolerance} ${oTolerance}] +puts "minTolerance_percent = ${minTolerance_percent} %" +if { ${minTolerance_percent} > ${percent_max} } { + set IsOk 0 +} + +if { ${IsOk} == 0 } { + puts "${BugNumber}: Faulty" +} else { + puts "${BugNumber}: OK" +} + +set square 1.22542e+09 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug22814 b/tests/bugs/modalg_2/bug22814 new file mode 100755 index 0000000000..c0cecf0a7b --- /dev/null +++ b/tests/bugs/modalg_2/bug22814 @@ -0,0 +1,30 @@ +puts "============" +puts "OCC22814" +puts "============" +puts "" +####################################################################### +# Boolean opeation Section fails +####################################################################### + +set BugNumber OCC22814 + +restore [locate_data_file bug22814_F6_Shell.brep] b1 +restore [locate_data_file bug22814_F6_box.brep] b2 + +bop b1 b2 +bopsection result + +set length 0.667008 + +set nb_v_good 4 +set nb_e_good 4 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 9 + +set 3dviewer 1 + diff --git a/tests/bugs/modalg_2/bug22818_1 b/tests/bugs/modalg_2/bug22818_1 new file mode 100755 index 0000000000..6278cb5780 --- /dev/null +++ b/tests/bugs/modalg_2/bug22818_1 @@ -0,0 +1,37 @@ +puts "================" +puts "OCC22818" +puts "================" +puts "" +####################################################################################### +# Wrong triangulation of Revolution surface with slice angle <= 180 degree +###################################################################################### + +set BugNumber OCC22818 + +vertex v1 0 10 0 +vertex v2 0 10 10 +vertex v3 0 0 -10 +edge e1 v1 v2 +edge e2 v2 v3 +edge e3 v3 v1 +wire w1 e1 e2 e3 +plane pln 0 10 0 1 0 0 +mkface f1 pln +add w1 f1 +don f1 +revol result f1 0 10 0 0 0 1 180 +checkshape result + +set square 823.385 + +set nb_v_good 3 +set nb_e_good 8 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 21 + +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug22818_2 b/tests/bugs/modalg_2/bug22818_2 new file mode 100755 index 0000000000..a50b75a3a3 --- /dev/null +++ b/tests/bugs/modalg_2/bug22818_2 @@ -0,0 +1,38 @@ +puts "================" +puts "OCC22818" +puts "================" +puts "" +####################################################################################### +# Wrong triangulation of Revolution surface with slice angle <= 180 degree +###################################################################################### + +set BugNumber OCC22818 + +vertex v1 0 10 0 +vertex v2 0 10 10 +vertex v3 0 5 5 +vertex v4 0 0 -10 +edge e1 v1 v2 +edge e2 v2 v3 +edge e3 v3 v1 +wire w1 e1 e2 e3 +plane pln 0 5 5 1 0 0 +mkface f1 pln +add w1 f1 +don f1 +revol result f1 0 10 0 0 0 1 180 +checkshape result + +set square 186.072 + +set nb_v_good 3 +set nb_e_good 8 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 21 + +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug22823 b/tests/bugs/modalg_2/bug22823 new file mode 100755 index 0000000000..218f58b224 --- /dev/null +++ b/tests/bugs/modalg_2/bug22823 @@ -0,0 +1,28 @@ +puts "============" +puts "OCC22823" +puts "============" +puts "" +############################################################################################## +# Exception in thickshell operation +############################################################################################## + +catch {pload XDE} + +set BugNumber OCC22823 + +restore [locate_data_file OCC22823-occ_bug_thickshell.brep] sh + +checkshape sh +tolerance sh +set aStatus [catch {thickshell result sh 0.01} ] + +# Resume +puts "" +if { ${aStatus} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +set square 0.38266 +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22828 b/tests/bugs/modalg_2/bug22828 new file mode 100755 index 0000000000..d1a27b5a47 --- /dev/null +++ b/tests/bugs/modalg_2/bug22828 @@ -0,0 +1,28 @@ +puts "============" +puts "OCC22828" +puts "============" +puts "" +####################################################################### +# Fuse on simple shapes with conical surfaces crashes +####################################################################### + +set BugNumber OCC22828 + +restore [locate_data_file bug22828_shape1.brep] b1 +restore [locate_data_file bug22828_shape2.brep] b2 +catch { bfuse result b1 b2 } + +set square 4029.04 + +set nb_v_good 11 +set nb_e_good 15 +set nb_w_good 12 +set nb_f_good 9 +set nb_sh_good 2 +set nb_sol_good 2 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 52 + +set 3dviewer 1 + diff --git a/tests/bugs/modalg_2/bug22830 b/tests/bugs/modalg_2/bug22830 new file mode 100755 index 0000000000..62520d6fa1 --- /dev/null +++ b/tests/bugs/modalg_2/bug22830 @@ -0,0 +1,30 @@ +puts "================" +puts "OCC22830" +puts "================" +puts "" +####################################################################################### +# BRep mesh can't apply mesh for the face +###################################################################################### + +set BugNumber OCC22830 + +restore [locate_data_file OCC22830-maze.brep] result +vinit +tclean result +vsetdispmode 1 +vdisplay result +vfit + +set square 52482 + +set nb_v_good 300 +set nb_e_good 300 +set nb_w_good 30 +set nb_f_good 1 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 631 + +set only_screen 1 diff --git a/tests/bugs/modalg_2/bug22833 b/tests/bugs/modalg_2/bug22833 new file mode 100755 index 0000000000..c4413e1c94 --- /dev/null +++ b/tests/bugs/modalg_2/bug22833 @@ -0,0 +1,33 @@ +puts "========================" +puts "OCC22833" +puts "========================" +puts "" +####################################################################### +# Command "checkshape" in DRAWEXE give error "Self intersection wire" on attached shape +####################################################################### + +set BugNumber OCC22833 + +restore [locate_data_file OCC22833-bugInt.brep] result + +set text [checkshape result f] +set last1 [lindex $text end] +set last2 [lindex $text end-1] + +set status 0 +set s1 "OK" +set s2 "looks" + +if { [string equal $last1 $s1] && [string equal $last2 $s2] } { + set status 0 +} else { + set status 1 } + +if { ${status} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +set square 63427.2 +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug22864 b/tests/bugs/modalg_2/bug22864 new file mode 100755 index 0000000000..47c6d02e89 --- /dev/null +++ b/tests/bugs/modalg_2/bug22864 @@ -0,0 +1,101 @@ +puts "============" +puts "OCC22864" +puts "============" +puts "" +############################################################################################## +# The algorithm BiTgte_Blend obtains instable results +############################################################################################## + +set BugNumber OCC22864 + +restore [locate_data_file bug22864_face1.brep] f1 +restore [locate_data_file bug22864_face2.brep] f2 + +shape aShape C +add f1 aShape +add f2 aShape + +# +set status 0 +# +set nb_v_good 2 +set nb_e_good 3 +set nb_w_good 1 +set nb_f_good 1 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 8 +# +set Numbers 11 +# +for {set i 0} {$i < ${Numbers}} {incr i} { + puts "i=$i" + rollingball result aShape 15 @ f1 f2 + + set nb_info [nbshapes result] + regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full nb_v + regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full nb_e + regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full nb_w + regexp {FACE +: +([-0-9.+eE]+)} $nb_info full nb_f + regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full nb_sh + regexp {SOLID +: +([-0-9.+eE]+)} $nb_info full nb_sol + regexp {COMPSOLID +: +([-0-9.+eE]+)} $nb_info full nb_compsol + regexp {COMPOUND +: +([-0-9.+eE]+)} $nb_info full nb_compound + regexp {SHAPE +: +([-0-9.+eE]+)} $nb_info full nb_shape + + if {$nb_v != $nb_v_good || $nb_e != $nb_e_good || + $nb_w != $nb_w_good || $nb_f != $nb_f_good || + $nb_sh != $nb_sh_good || $nb_sol != $nb_sol_good || + $nb_compsol != $nb_compsol_good || $nb_compound != $nb_compound_good || + $nb_shape != $nb_shape_good } { + set status 1 + } + + set aFile $imagedir/${test_image}.brep + puts "aFile=${aFile}" + file delete ${aFile} + if { [file exists ${aFile}] } { + puts "There is old ${aFile} file; Error" + set status 1 + } + # + save result ${aFile} + catch {exec chmod 777 ${aFile}} + if { ![file exists ${aFile}] } { + puts "There is not ${aFile} file; save command: Error" + set status 1 + } + + set fp [open ${aFile} "r"] + set Log [read -nonewline ${fp}] + close ${fp} + # + if {$i == 0} { + set StandardLog ${Log} + } else { + set info_result [string compare ${Log} ${StandardLog}] + if {${info_result} == 0} { + # Log == StandardLog + puts "Log == StandardLog" + } else { + # Log != StandardLog + set status 1 + puts "Log != StandardLog" + } + } +} + +# Resume +puts "" +if {${status} == 0} { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} + +set square 6935.38 +set 2dviewer 0 + + diff --git a/tests/bugs/modalg_2/bug22881 b/tests/bugs/modalg_2/bug22881 new file mode 100755 index 0000000000..9cf18bd225 --- /dev/null +++ b/tests/bugs/modalg_2/bug22881 @@ -0,0 +1,27 @@ +puts "================" +puts "OCC22881" +puts "================" +puts "" +####################################################################################### +# Sewing does not sew edge to its copy +###################################################################################### + +set BugNumber OCC22881 + +restore [locate_data_file OCC22881-sewing-pb.brep] a + +sewing result a + +set square 12.819 + +set nb_v_good 4 +set nb_e_good 6 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 19 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22884 b/tests/bugs/modalg_2/bug22884 new file mode 100755 index 0000000000..03aa90c26a --- /dev/null +++ b/tests/bugs/modalg_2/bug22884 @@ -0,0 +1,53 @@ +pload QAcommands + +puts "============" +puts "OCC22884" +puts "============" +puts "" +############################################################################# +# The attached face cannot be displayed in shading mode +############################################################################# + +set BugNumber OCC22884 + +set x1 136 +set y1 176 + +restore [locate_data_file bug22884_Face_1.brep] result +vinit +vdisplay result +vfit +vsetdispmode 1 + +set square 697.812 + +set nb_v_good 46 +set nb_e_good 46 +set nb_w_good 3 +set nb_f_good 1 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 96 + +set Color [QAGetPixelColor $x1 $y1] +set R [lindex ${Color} 2] +set G [lindex ${Color} 5] +set B [lindex ${Color} 8] +set color_status 0 +if { $R == 0 && $G == 0 && $B == 0 } { + set color_status 1 +} else { + set color_status 0 +} + + +if { ${color_status} == 0} { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} + +set 3dviewer 0 + diff --git a/tests/bugs/modalg_2/bug22893 b/tests/bugs/modalg_2/bug22893 new file mode 100755 index 0000000000..fa98fb2884 --- /dev/null +++ b/tests/bugs/modalg_2/bug22893 @@ -0,0 +1,29 @@ +puts "============" +puts "OCC22893" +puts "============" +puts "" +############################################################################# +# Possible regression is tesselation algorithm of OCCT 6.5.2 +############################################################################# + +set BugNumber OCC22893 + +catch {pload XDE} + +igesread [locate_data_file OCC22893-thread_22534_boing777.igs] result * + +set square 26974.5 + +set nb_v_good 4183 +set nb_e_good 4191 +set nb_w_good 653 +set nb_f_good 639 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 9667 + +set 2dviewer 0 + + diff --git a/tests/bugs/modalg_2/bug22946 b/tests/bugs/modalg_2/bug22946 new file mode 100755 index 0000000000..7717eb422c --- /dev/null +++ b/tests/bugs/modalg_2/bug22946 @@ -0,0 +1,17 @@ +puts "================" +puts "OCC22946" +puts "================" +puts "" +####################################################################################### +# BRepFeat_SplitShape crashes on splitting a face by two edges +###################################################################################### + +set BugNumber OCC22946 + +restore [locate_data_file OCC22946-FaceWithNewCurves.brep] a +restore [locate_data_file OCC22946-CompoundWithoutPcurves.brep] b + +splitshape result a a b + +set square 6.06498e+08 +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22967 b/tests/bugs/modalg_2/bug22967 new file mode 100755 index 0000000000..3f0fa17119 --- /dev/null +++ b/tests/bugs/modalg_2/bug22967 @@ -0,0 +1,59 @@ +puts "============" +puts "OCC22967" +puts "============" +puts "" +############################################################################################################ +# Boolean operations between two cylinders with orthogonal axis generate a shape with big vertex tolerance +########################################################################################################### + +set BugNumber OCC22967 +set check_value 1.04742e-05 + +restore [locate_data_file bug22967_Cylinder_1.brep] b1 +restore [locate_data_file bug22967_Scale_1.brep] b2 +bop b1 b2 +bopfuse result +set info [ maxtolerance result ] + +regexp {Edge[ \t]*:.*Max[ \t]*([-0-9.+eE]+)} $info full last1 +regexp {Vertex[ \t]*:.*Max[ \t]*([-0-9.+eE]+)} $info full last + +proc GetPercent {Value GoodValue} { + set Percent 0. + if {${GoodValue} != 0.} { + set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] + } elseif {${Value} != 0.} { + set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] + } else { + set Percent 0. + } + return ${Percent} +} + +set percent_max 5 +set status 0 + +set Tolerance_percent [expr abs ( [GetPercent ${last} ${check_value}] ) ] +if {${Tolerance_percent} > ${percent_max}} { + set status 1 +} else { + set status 0 +} + +set Tolerance_percent [expr abs ( [GetPercent ${last1} ${check_value}] ) ] +if {${Tolerance_percent} > ${percent_max}} { + set status 1 +} else { + set status 0 +} + +# Resume +if {${status} > 0} { + puts "${BugNumber}: Faulty" +} else { + puts "OK ${BugNumber}" +} + +set square 671262 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug22968 b/tests/bugs/modalg_2/bug22968 new file mode 100755 index 0000000000..8b431cb194 --- /dev/null +++ b/tests/bugs/modalg_2/bug22968 @@ -0,0 +1,28 @@ +puts "================" +puts "OCC22968" +puts "================" +puts "" +###################################################################################### +# RebuildShape exchanges 2d-curves +###################################################################################### + +set BugNumber OCC22968 + +pload XDE + +restore [locate_data_file OCC22968-cylface.brep] a +checkshape a f +removeloc result a +set info [ checkshape result f ] + +if { [regexp {The Shape result looks OK} $info] } { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} + +set square 3141.59 +set 2dviewer 0 + + + diff --git a/tests/bugs/modalg_2/bug22986 b/tests/bugs/modalg_2/bug22986 new file mode 100755 index 0000000000..f754280238 --- /dev/null +++ b/tests/bugs/modalg_2/bug22986 @@ -0,0 +1,27 @@ +puts "===========" +puts "OCC22986" +puts "===========" +puts "" +####################################################################### +# Regression with OCCT652 on Windows. DRAWEXE craches during featprism +####################################################################### + +set BugNumber OCC22986 + +#eval datadir ${CfeDir}/data/900 + +restore [locate_data_file CFE900_cts21gbs.rle] base +restore [locate_data_file cts21322_face.rle] wire + +explode base face +copy base_6 fsketch + +splitshape result fsketch fsketch wire +if { [llength [explode result f]] != 3 } { + puts "Faulty ${BugNumber} : The result of splitshape command is incorrect." +} else { + puts "${BugNumber} OK" +} + +set square 414 +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug22990 b/tests/bugs/modalg_2/bug22990 new file mode 100755 index 0000000000..d764ba85fc --- /dev/null +++ b/tests/bugs/modalg_2/bug22990 @@ -0,0 +1,24 @@ +puts "============" +puts "OCC22990" +puts "============" +puts "" +############################################################################################################ +# Regression vs 6.5.2: splitting sphere across the seam is incomplete +########################################################################################################### + +set BugNumber OCC22990 + +psphere s 10 +plane p 2 0 0 1 0 0 +mkface f p -100 100 -100 100 +bsection e s f -2d + +explode s f +explode e e + +splitshape result s s_1 e_1 e_2 + +set nb_f_good 3 +set square 1256.64 +set 3dviewer 0 + diff --git a/tests/bugs/modalg_2/bug23 b/tests/bugs/modalg_2/bug23 new file mode 100755 index 0000000000..be9031fb08 --- /dev/null +++ b/tests/bugs/modalg_2/bug23 @@ -0,0 +1,29 @@ +puts "TODO OCC12345 ALL: Faulty OCC23 : Checkshape command works wrongly" +puts "TODO OCC12345 ALL: Error : The length of result shape is" +puts "================" +puts "OCC23" +puts "================" +puts "" +##################################################################### +## Checkshape gives result that there is a selfintersection on wire, but there are no intersection on it. +##################################################################### + +restore [locate_data_file OCC23.brep] sh + +decho off +set che [checkshape sh] +decho on + +if { [regexp {Faulty} $che] == 1 } { + puts "Faulty OCC23 : Checkshape command works wrongly" +} else { + puts "OCC23 OK : Checkshape command works properly" +} + +explode sh f +explode sh_2 w + +renamevar sh_2_1 result + +set length 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug23004 b/tests/bugs/modalg_2/bug23004 new file mode 100755 index 0000000000..d66fb64e74 --- /dev/null +++ b/tests/bugs/modalg_2/bug23004 @@ -0,0 +1,27 @@ +puts "===========" +puts "OCC23004" +puts "===========" +###################################################### +# Boolean operation cut produces incorrect result +###################################################### + +set BugNumber OCC23004 + +restore [locate_data_file bug23004_b_7_1] b1 +restore [locate_data_file bug23004_b_7_2] b2 +bop b1 b2 +bopcut result + +set square 31308.8 + +set nb_v_good 26 +set nb_e_good 41 +set nb_w_good 17 +set nb_f_good 17 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 104 + +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug23008 b/tests/bugs/modalg_2/bug23008 new file mode 100755 index 0000000000..8b3c7251c7 --- /dev/null +++ b/tests/bugs/modalg_2/bug23008 @@ -0,0 +1,34 @@ +puts "================" +puts "OCC23008" +puts "================" +puts "" +###################################################################################### +# Too many intersection vertices between line and cylinder +###################################################################################### + +set BugNumber OCC23008 + +restore [locate_data_file bug23008_ez15] b1 +restore [locate_data_file bug23008_fz37] b2 +bop b1 b2 +set info [ bopnews -v ] +for {set i 0} {$i <= 100} {incr i} { + set word [lsearch $info z$i] + if {$word == -1} { + lappend check_z 0 + } else { + lappend check_z 1 + } +} + +# Resume +puts "" +set result [lsearch $check_z 1] +if { ${result} == -1 } { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} + +set 3dviewer 0 + diff --git a/tests/bugs/modalg_2/bug23029 b/tests/bugs/modalg_2/bug23029 new file mode 100755 index 0000000000..0726aed0ce --- /dev/null +++ b/tests/bugs/modalg_2/bug23029 @@ -0,0 +1,34 @@ +puts "============" +puts "OCC23029" +puts "============" +puts "" +####################################################################### +# split shape algorithm works incorrectly in some cases +####################################################################### + +set BugNumber OCC23029 + +restore [locate_data_file OCC23029-F.brep] f +restore [locate_data_file OCC23029-W.brep] w + +checkshape f +checkshape w + +splitshape res f f w +explode res +renamevar res_2 result + +set square 27.3919 + +set nb_v_good 5 +set nb_e_good 5 +set nb_w_good 1 +set nb_f_good 1 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 12 + +set 3dviewer 1 + diff --git a/tests/bugs/modalg_2/bug23029_1 b/tests/bugs/modalg_2/bug23029_1 new file mode 100755 index 0000000000..b6b72cddbc --- /dev/null +++ b/tests/bugs/modalg_2/bug23029_1 @@ -0,0 +1,56 @@ +puts "============" +puts "OCC23029" +puts "============" +puts "" +####################################################################### +# split shape algorithm works incorrectly in some cases +####################################################################### + +set BugNumber OCC23029 + +catch { pload XDE } + +testreadstep [locate_data_file OCC23029-ProblemF.stp] a +restore [locate_data_file OCC23029-TempW.brep] t + +checkshape a +explode a f +splitshape result a a_1 t + +set square 215.198 + +set nb_v_good 19 +set nb_e_good 21 +set nb_w_good 2 +set nb_f_good 2 +set nb_sh_good 1 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 45 + +set CheckShape_status 0 + +set ll [ llength [explode result f2 ] ] + +if { $ll != 2 } { + set CheckShape_status 1 +} + +# Resume +puts "" +if { ${CheckShape_status} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +vinit +vsetdispmode 1 +vdisplay result +vfit + +vmoveto 252 289 + +set only_screen 1 + diff --git a/tests/bugs/modalg_2/bug23031 b/tests/bugs/modalg_2/bug23031 new file mode 100755 index 0000000000..7cd9ad4074 --- /dev/null +++ b/tests/bugs/modalg_2/bug23031 @@ -0,0 +1,28 @@ +puts "========" +puts "OCC23031" +puts "========" +puts "" +########################################################### +# Empty result for the extrema between a circle and a line. +########################################################### + +set BugNumber OCC23031 + + +restore [locate_data_file OCC23031-b1.brep] b1 +restore [locate_data_file OCC23031-b2.brep] b2 + +mkcurve c1 b1 +mkcurve c2 b2 + +set extrema_res [extrema c1 c2] +set extrema_length [llength ${extrema_res} ] + +if {${extrema_length} != 1 } { + puts "${BugNumber}: Faulty" +} else { + puts "${BugNumber}: OK" +} + +set 3dviewer 0 + diff --git a/tests/bugs/modalg_2/bug23043 b/tests/bugs/modalg_2/bug23043 new file mode 100755 index 0000000000..6c0faf59d3 --- /dev/null +++ b/tests/bugs/modalg_2/bug23043 @@ -0,0 +1,31 @@ +puts "========================" +puts "OCC23043" +puts "========================" +puts "" +################################################################################################################ +# Wrong results of BRepExtrema_DistShapeShape: non-null minimum distance between intersecting line and cylinder +################################################################################################################ + +set BugNumber OCC23043 + +restore [locate_data_file bug23043_croix.brep] a +restore [locate_data_file bug23043_cylindre.brep] b +vdisplay a b +vfit +distmini dd a b +set dist1 [ dval dd ] +set dist2 [ dval dd2 ] +set dist3 [ dval dd3 ] +set dist4 [ dval dd4 ] + + +puts "" +if { $dist1 == 0 && $dist2 == 0 && $dist3 == 0 && $dist4 == 0 } { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} + +set 3dviewer 0 + + diff --git a/tests/bugs/modalg_2/bug23060 b/tests/bugs/modalg_2/bug23060 new file mode 100755 index 0000000000..2069fc3be3 --- /dev/null +++ b/tests/bugs/modalg_2/bug23060 @@ -0,0 +1,17 @@ +puts "===========" +puts "OCC23060" +puts "===========" +puts "" +####################################################################### +# Exception is raised during intersection of two edges +####################################################################### + +set BugNumber OCC23060 + +restore [locate_data_file bug23060_ce.brep] result +explode result +bop result_1 result_2 + +set length 176.06 +set 3dviewer 0 + diff --git a/tests/bugs/modalg_2/bug23089 b/tests/bugs/modalg_2/bug23089 new file mode 100755 index 0000000000..a0b56b3522 --- /dev/null +++ b/tests/bugs/modalg_2/bug23089 @@ -0,0 +1,27 @@ +puts "================" +puts "OCC23089" +puts "================" +puts "" +########################################################################################## +# Wrong result done by solid classifier algorithm +########################################################################################## + +set BugNumber OCC23089 + +restore [locate_data_file bug23088_Pipe_1.brep] b2 +restore [locate_data_file bug23089_px.draw] px +set info [ bclassify b2 px ] +set word1 [string compare [lindex ${info} end] "shape"] +set word2 [string compare [lindex ${info} end-1] "IN"] +set word3 [string compare [lindex ${info} end-2] "is"] +set word4 [string compare [lindex ${info} end-3] "point"] +set word5 [string compare [lindex ${info} end-4] "The"] + +# Resume +puts "" +if { ${word1} == 0 && ${word2} == 0 && ${word3} == 0 && ${word4} == 0 && ${word5} == 0 } { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug23100 b/tests/bugs/modalg_2/bug23100 new file mode 100755 index 0000000000..31e74f6211 --- /dev/null +++ b/tests/bugs/modalg_2/bug23100 @@ -0,0 +1,34 @@ +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" + +puts "============" +puts "OCC23100" +puts "============" +puts "" +####################################################################### +# Wrong adjustment of p-curves on a cylinder +####################################################################### + +set BugNumber OCC23100 + +restore [locate_data_file bug23100_qf.brep] qf + +explode qf +copy qf_1 b1 +copy qf_2 b2 + +catch {bop b1 b2} +catch {bopfuse result} + +set square 50252.6 + +set nb_v_good 7 +set nb_e_good 8 +set nb_w_good 2 +set nb_f_good 2 +set nb_sh_good 2 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 22 + +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug23114 b/tests/bugs/modalg_2/bug23114 new file mode 100755 index 0000000000..b323d17396 --- /dev/null +++ b/tests/bugs/modalg_2/bug23114 @@ -0,0 +1,23 @@ +puts "================" +puts "OCC23114" +puts "================" +puts "" +####################################################################################### +# Extrema algorithm throws the exception +###################################################################################### + +set BugNumber OCC23114 + +restore [locate_data_file OCC23114-c1.draw] c1 +restore [locate_data_file OCC23114-c2.draw] c2 +trim c1t c1 6.8444417666253693e-010 3.3201579728233819e-007 +trim c2t c2 0.57529999999422077 0.99999999996162448 +set exception_status [ catch { extrema c1t c2t } ] + +if { ${exception_status} == 0 } { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug23125 b/tests/bugs/modalg_2/bug23125 new file mode 100755 index 0000000000..b27d8ed793 --- /dev/null +++ b/tests/bugs/modalg_2/bug23125 @@ -0,0 +1,23 @@ +puts "================" +puts "OCC23125" +puts "================" +puts "" +########################################################################################## +# Wrong result done by classifier algorithm for a point and a solid +########################################################################################## + +set BugNumber OCC23125 + +restore [locate_data_file bug23125_ref] b +restore [locate_data_file bug23125_pref] p +set info [ bclassify b p ] + +# Resume +puts "" +if { [regexp "The point is IN shape" $info] != 1 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug23137_1 b/tests/bugs/modalg_2/bug23137_1 new file mode 100755 index 0000000000..cd7ab82f50 --- /dev/null +++ b/tests/bugs/modalg_2/bug23137_1 @@ -0,0 +1,21 @@ +puts "============" +puts "CR23137" +puts "============" +puts "" +########################################################################################################## +# Class BRepAlgoAPI_Cut does not made correct result on attached shapes. +########################################################################################################## + +restore [locate_data_file bug23137_bspl_cut.brep] b +explode b +copy b_1 b1 +copy b_2 b2 +#to provide positive volume of b2 +invert b2 + +bop b1 b2 +bopcut result + +set square 44460.7 + +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug23137_2 b/tests/bugs/modalg_2/bug23137_2 new file mode 100755 index 0000000000..92a35b1cc2 --- /dev/null +++ b/tests/bugs/modalg_2/bug23137_2 @@ -0,0 +1,21 @@ +puts "============" +puts "CR23137" +puts "============" +puts "" +########################################################################################################## +# Class BRepAlgoAPI_Cut does not made correct result on attached shapes. +########################################################################################################## + +restore [locate_data_file bug23137_rev_cut.brep] b +explode b +copy b_1 b1 +copy b_2 b2 +#to provide positive volume of b1 +invert b1 + +bop b1 b2 +bopcut result + +set square 3452.78 + +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug23158 b/tests/bugs/modalg_2/bug23158 new file mode 100755 index 0000000000..8640b5dc66 --- /dev/null +++ b/tests/bugs/modalg_2/bug23158 @@ -0,0 +1,22 @@ +puts "============" +puts "OCC23158" +puts "============" +puts "" +####################################################################### +# ApproxInt_PrmPrmSvSurfaces raises FPE (division by zero) signal +####################################################################### + +set BugNumber OCC23158 + +restore [locate_data_file bug23158_f1.brep] b1 +restore [locate_data_file bug23158_f2.brep] b2 + +set exception_status [ catch { bop b1 b2 } ] + +if { ${exception_status} == 0 } { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug23160 b/tests/bugs/modalg_2/bug23160 new file mode 100755 index 0000000000..caead06792 --- /dev/null +++ b/tests/bugs/modalg_2/bug23160 @@ -0,0 +1,28 @@ +puts "============" +puts "OCC23160" +puts "============" +puts "" +####################################################################### +# Cut operation with the attached shapes produces a not correct result. +####################################################################### + +set BugNumber OCC23160 + +restore [locate_data_file bug23160_tshape.brep] b1 +restore [locate_data_file bug23160_box.brep] b2 +bop b1 b2 +bopcut result + +set square 270192 + +set nb_v_good 16 +set nb_e_good 24 +set nb_w_good 10 +set nb_f_good 10 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 63 + +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug23162_1 b/tests/bugs/modalg_2/bug23162_1 new file mode 100755 index 0000000000..4777151144 --- /dev/null +++ b/tests/bugs/modalg_2/bug23162_1 @@ -0,0 +1,47 @@ +puts "================" +puts "OCC23162" +puts "================" +puts "" +############################################################################## +# BRepOffsetAPI_MakePipeShell works wrong +############################################################################## + +set BugNumber OCC23162 + +catch {pload XDE} + +set status 0 + +set radius 100. +puts "------------- Radius $radius" +# make a ring quarter +vertex v1 [expr $radius / 2] 0 0 +vertex v2 $radius 0 0 +edge e v1 v2 +revol rq e 0 0 0 0 0 1 45 + +# make rq scaled and translated +scaleshape rq2 rq 0.2 +ttranslate rq2 0 0 $radius + +# get wires of rq +explode rq W +explode rq2 W + +# make a spine +vertex v1 0 0 0 +vertex v2 0 0 $radius +edge e v1 v2 +wire spine e + +# make a pipe +mksweep spine +addsweep rq_1 v1 +addsweep rq2_1 v2 +buildsweep result + +# BUG: a pipe is invalid +checkshape result -short + +set square 14572.5 +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug23162_2 b/tests/bugs/modalg_2/bug23162_2 new file mode 100755 index 0000000000..cdf95c3a31 --- /dev/null +++ b/tests/bugs/modalg_2/bug23162_2 @@ -0,0 +1,47 @@ +puts "================" +puts "OCC23162" +puts "================" +puts "" +############################################################################## +# BRepOffsetAPI_MakePipeShell works wrong +############################################################################## + +set BugNumber OCC23162 + +catch {pload XDE} + +set status 0 + +set radius 10. +puts "------------- Radius $radius" +# make a ring quarter +vertex v1 [expr $radius / 2] 0 0 +vertex v2 $radius 0 0 +edge e v1 v2 +revol rq e 0 0 0 0 0 1 45 + +# make rq scaled and translated +scaleshape rq2 rq 0.2 +ttranslate rq2 0 0 $radius + +# get wires of rq +explode rq W +explode rq2 W + +# make a spine +vertex v1 0 0 0 +vertex v2 0 0 $radius +edge e v1 v2 +wire spine e + +# make a pipe +mksweep spine +addsweep rq_1 v1 +addsweep rq2_1 v2 +buildsweep result + +# BUG: a pipe is invalid +checkshape result -short + +set square 145.725 +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug23162_3 b/tests/bugs/modalg_2/bug23162_3 new file mode 100755 index 0000000000..d658253e4f --- /dev/null +++ b/tests/bugs/modalg_2/bug23162_3 @@ -0,0 +1,47 @@ +puts "================" +puts "OCC23162" +puts "================" +puts "" +############################################################################## +# BRepOffsetAPI_MakePipeShell works wrong +############################################################################## + +set BugNumber OCC23162 + +catch {pload XDE} + +set status 0 + +set radius 1. +puts "------------- Radius $radius" +# make a ring quarter +vertex v1 [expr $radius / 2] 0 0 +vertex v2 $radius 0 0 +edge e v1 v2 +revol rq e 0 0 0 0 0 1 45 + +# make rq scaled and translated +scaleshape rq2 rq 0.2 +ttranslate rq2 0 0 $radius + +# get wires of rq +explode rq W +explode rq2 W + +# make a spine +vertex v1 0 0 0 +vertex v2 0 0 $radius +edge e v1 v2 +wire spine e + +# make a pipe +mksweep spine +addsweep rq_1 v1 +addsweep rq2_1 v2 +buildsweep result + +# BUG: a pipe is invalid +checkshape result -short + +set square 1.45725 +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug23162_4 b/tests/bugs/modalg_2/bug23162_4 new file mode 100755 index 0000000000..a8bb3cea7d --- /dev/null +++ b/tests/bugs/modalg_2/bug23162_4 @@ -0,0 +1,47 @@ +puts "================" +puts "OCC23162" +puts "================" +puts "" +############################################################################## +# BRepOffsetAPI_MakePipeShell works wrong +############################################################################## + +set BugNumber OCC23162 + +catch {pload XDE} + +set status 0 + +set radius 0.1 +puts "------------- Radius $radius" +# make a ring quarter +vertex v1 [expr $radius / 2] 0 0 +vertex v2 $radius 0 0 +edge e v1 v2 +revol rq e 0 0 0 0 0 1 45 + +# make rq scaled and translated +scaleshape rq2 rq 0.2 +ttranslate rq2 0 0 $radius + +# get wires of rq +explode rq W +explode rq2 W + +# make a spine +vertex v1 0 0 0 +vertex v2 0 0 $radius +edge e v1 v2 +wire spine e + +# make a pipe +mksweep spine +addsweep rq_1 v1 +addsweep rq2_1 v2 +buildsweep result + +# BUG: a pipe is invalid +checkshape result -short + +set square 0.0145725 +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug23162_5 b/tests/bugs/modalg_2/bug23162_5 new file mode 100755 index 0000000000..778fbb151b --- /dev/null +++ b/tests/bugs/modalg_2/bug23162_5 @@ -0,0 +1,47 @@ +puts "================" +puts "OCC23162" +puts "================" +puts "" +############################################################################## +# BRepOffsetAPI_MakePipeShell works wrong +############################################################################## + +set BugNumber OCC23162 + +catch {pload XDE} + +set status 0 + +set radius 0.01 +puts "------------- Radius $radius" +# make a ring quarter +vertex v1 [expr $radius / 2] 0 0 +vertex v2 $radius 0 0 +edge e v1 v2 +revol rq e 0 0 0 0 0 1 45 + +# make rq scaled and translated +scaleshape rq2 rq 0.2 +ttranslate rq2 0 0 $radius + +# get wires of rq +explode rq W +explode rq2 W + +# make a spine +vertex v1 0 0 0 +vertex v2 0 0 $radius +edge e v1 v2 +wire spine e + +# make a pipe +mksweep spine +addsweep rq_1 v1 +addsweep rq2_1 v2 +buildsweep result + +# BUG: a pipe is invalid +checkshape result -short + +set square 0.000145725 +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug23162_6 b/tests/bugs/modalg_2/bug23162_6 new file mode 100755 index 0000000000..fcd026b1e9 --- /dev/null +++ b/tests/bugs/modalg_2/bug23162_6 @@ -0,0 +1,47 @@ +puts "================" +puts "OCC23162" +puts "================" +puts "" +############################################################################## +# BRepOffsetAPI_MakePipeShell works wrong +############################################################################## + +set BugNumber OCC23162 + +catch {pload XDE} + +set status 0 + +set radius 0.001 +puts "------------- Radius $radius" +# make a ring quarter +vertex v1 [expr $radius / 2] 0 0 +vertex v2 $radius 0 0 +edge e v1 v2 +revol rq e 0 0 0 0 0 1 45 + +# make rq scaled and translated +scaleshape rq2 rq 0.2 +ttranslate rq2 0 0 $radius + +# get wires of rq +explode rq W +explode rq2 W + +# make a spine +vertex v1 0 0 0 +vertex v2 0 0 $radius +edge e v1 v2 +wire spine e + +# make a pipe +mksweep spine +addsweep rq_1 v1 +addsweep rq2_1 v2 +buildsweep result + +# BUG: a pipe is invalid +checkshape result -short + +set square 1.45725e-06 +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug23170 b/tests/bugs/modalg_2/bug23170 new file mode 100755 index 0000000000..4373a54938 --- /dev/null +++ b/tests/bugs/modalg_2/bug23170 @@ -0,0 +1,18 @@ +puts "============" +puts "OCC23170" +puts "============" +puts "" +###################################### +# Bug of creating a full sphere face +###################################### + +set BugNumber OCC23170 + +pload MODELING + +sphere s 10 + +mkface result s 0 6.2831853071795880 -1.5707963267948970 1.5707963267948970 + +set square 1256.63 +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug23174 b/tests/bugs/modalg_2/bug23174 new file mode 100755 index 0000000000..6ee5a6268f --- /dev/null +++ b/tests/bugs/modalg_2/bug23174 @@ -0,0 +1,103 @@ +puts "================" +puts "OCC23174" +puts "================" +puts "" +############################################################################## +# BRepLib_MakeFace(Wire) creates an invalid face on a wire of cylinder bottom +############################################################################## + +set BugNumber OCC23174 + +catch {pload XDE} + +set status 0 + +# make a cylinder +pcylinder cyl 50 150 + +# get wires +explode cyl W + +# make a face from the 3-d wire (planar bottom of the cylinder) +mkplane f cyl_3 0 + +# BUG: face is built on a cylindrical face of the cylinder instead of +# a bottom face +set reslog [checkshape f -short] +puts $reslog +if { $reslog != "This shape seems to be valid" } { set status 1 } + +# ======================================================================== +# Make a new cylindrical face from a wire composed from more than 3 edges +# to check that the bug fix is valid for a wire of more than 1 edge +# ======================================================================== + +# get a bottom edge cyl_1; cyl_2 is a top edge; cyl_3 is a seam edge +nexplode cyl E + +# get its 3D curve +mkcurve c3D cyl_1 + +# split cyl_1 into 3 edges +mkedge e1 c3D 0 2 +mkedge e2 c3D 2 4 +mkedge e3 c3D 4 6.28318530717959 + +# make a reversed seam +copy cyl_3 cyl_3_r +treverse cyl_3_r + +# make a new wire for a new cylindrical face +wire w e1 e2 e3 cyl_3 cyl_2 cyl_3_r + +# get a surface for a new face +nexplode cyl F +mksurface cyl_surf cyl_3 + +# make a new cylindrical face +mkface cyl_face_0 cyl_surf w +fixshape cyl_face cyl_face_0 + +# make a wire of 3 bottom edges to check the fix +explode cyl_face E +wire w cyl_face_2 cyl_face_1 cyl_face_3 + +# check the fix, i.e. that cylindrical surface is rejected and thus a valid face is built +mkplane f w 0 +donly f +set res_log [checkshape f -short] +puts $reslog +if { $reslog != "This shape seems to be valid" } { set status 1 } + +# ================================================================= +#check that mkplane finds cyl_surf if the wire of cyl_face is given +# ================================================================= + +explode cyl_face W +mkplane f cyl_face_1 0 + +# get surface of f +mksurface cyl_surf_2 f + +# compare points of 2 surfaces at same UV +svalue cyl_surf 1 1 x1 y1 z1 +svalue cyl_surf_2 1 1 x2 y2 z2 + +if { [ expr [dval x1] - [dval x2] ] > 0.0 } { set status 1 } +if { [ expr [dval y1] - [dval y2] ] > 0.0 } { set status 1 } +if { [ expr [dval z1] - [dval z2] ] > 0.0 } { set status 1 } + +# Resume +puts "" +if { ${status} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} +renamevar f result +set square 47123.9 +set 2dviewer 0 + + + + diff --git a/tests/bugs/modalg_2/bug23214 b/tests/bugs/modalg_2/bug23214 new file mode 100755 index 0000000000..bff2c5b450 --- /dev/null +++ b/tests/bugs/modalg_2/bug23214 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC23214" +puts "============" +puts "" +####################################################################### +# BOP section operation produces incorrect result. +####################################################################### + +restore [locate_data_file OCC23214-face_1188.brep] b1 +restore [locate_data_file OCC23214-shell_for_line_1188.brep] b2 + +bop b1 b2 +bopsection result + +set length 2.94086 +set nb_good_vertex 4 +set nb_good_edge 2 +set nb_good_wire 0 +set nb_good_face 0 +set nb_good_shell 0 +set nb_good_solid 0 +set nb_good_compsolid 0 +set nb_good_compound 1 +set nb_good_shape 7 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug23218 b/tests/bugs/modalg_2/bug23218 new file mode 100755 index 0000000000..1806c85fbd --- /dev/null +++ b/tests/bugs/modalg_2/bug23218 @@ -0,0 +1,48 @@ +puts "============" +puts "OCC23218" +puts "============" +puts "" +####################################################################### +# Wrong value of tolerance for the intersection curve. +####################################################################### + +set BugNumber OCC23218 + +puts "Load first shape ..." +restore [locate_data_file bug23218_b1] b1 + +puts "Load second shape ..." +restore [locate_data_file bug23218_b4] b2 + +puts "Start project operation ..." +set result [bopcurves b1 b2] +puts $result +puts "Finish project operation ..." + +set GoodToleranceReached 8.9651741230950248e-06 +regexp {Tolerance Reached=([-0-9.+eE]+)} $result full ToleranceReached + +proc GetPercent {Value GoodValue} { + set Percent 0. + if {${GoodValue} != 0.} { + set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] + } elseif {${Value} != 0.} { + set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] + } else { + set Percent 0. + } + return ${Percent} +} + + +set percent_max 0.1 +set ToleranceReached_percent [expr abs ( [GetPercent ${ToleranceReached} ${GoodToleranceReached}] ) ] + +if {${ToleranceReached_percent} > ${percent_max}} { + puts "${BugNumber}: Faulty" +} else { + puts "OK ${BugNumber}" +} + +set 3dviewer 0 + diff --git a/tests/bugs/modalg_2/bug23341 b/tests/bugs/modalg_2/bug23341 new file mode 100755 index 0000000000..98d44b30c6 --- /dev/null +++ b/tests/bugs/modalg_2/bug23341 @@ -0,0 +1,22 @@ +puts "================" +puts "OCC23341" +puts "================" +puts "" +####################################################################### +# Wrong result done by 2D classifier algorithm for a point and a face +####################################################################### + +set BugNumber OCC23341 + +restore [locate_data_file bug23341_f1] f1 +restore [locate_data_file bug23341_p] p +set info [b2dclassify f1 p] +set check [regexp "OUT" $info] + +if { ${check} == 1 } { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} + + diff --git a/tests/bugs/modalg_2/bug23367_1 b/tests/bugs/modalg_2/bug23367_1 new file mode 100755 index 0000000000..21bf887b72 --- /dev/null +++ b/tests/bugs/modalg_2/bug23367_1 @@ -0,0 +1,18 @@ +puts "============" +puts "CR23367" +puts "============" +puts "" +########################################################################################################## +# New functionality restoring the middle path of pipe-like shape +########################################################################################################## + +box b 10 100 10 +explode b f +donly b b_3 b_4 +fit + +middlepath result b b_3 b_4 + +set length 100. + +set 2dviewer 1 diff --git a/tests/bugs/modalg_2/bug23367_10 b/tests/bugs/modalg_2/bug23367_10 new file mode 100755 index 0000000000..fd9e1aea46 --- /dev/null +++ b/tests/bugs/modalg_2/bug23367_10 @@ -0,0 +1,27 @@ +puts "============" +puts "CR23367" +puts "============" +puts "" +########################################################################################################## +# New functionality restoring the middle path of pipe-like shape +########################################################################################################## + +polyline pp 0 0 0 10 0 0 20 10 0 20 20 0 +polyline sp 0 0 0 0 0 100 0 50 200 0 100 100 +mksweep sp +addsweep pp +buildsweep a -R +explode a e +wire w1 a_2 a_5 a_8 +wire w2 a_24 a_22 a_20 +donly a w1 w2 +fit +middlepath result a w1 w2 + +set length 288.824 + +set 2dviewer 1 + + + + diff --git a/tests/bugs/modalg_2/bug23367_11 b/tests/bugs/modalg_2/bug23367_11 new file mode 100755 index 0000000000..036edc9289 --- /dev/null +++ b/tests/bugs/modalg_2/bug23367_11 @@ -0,0 +1,23 @@ +puts "============" +puts "CR23367" +puts "============" +puts "" +########################################################################################################## +# New functionality restoring the middle path of pipe-like shape +########################################################################################################## + +restore [locate_data_file bug23367_pipe1.brep] a +explode a e +wire w1 a_2 +wire w2 a_6 +donly a w1 w2 +fit +middlepath result a w2 w1 + +set length 1386.13 + +set 2dviewer 1 + + + + diff --git a/tests/bugs/modalg_2/bug23367_12 b/tests/bugs/modalg_2/bug23367_12 new file mode 100755 index 0000000000..a59f0ff806 --- /dev/null +++ b/tests/bugs/modalg_2/bug23367_12 @@ -0,0 +1,23 @@ +puts "============" +puts "CR23367" +puts "============" +puts "" +########################################################################################################## +# New functionality restoring the middle path of pipe-like shape +########################################################################################################## + +restore [locate_data_file bug23367_aa.brep] a +explode a e +wire w1 a_57 a_73 a_54 a_71 +wire w2 a_133 a_148 a_130 a_146 +donly a w1 w2 +fit +middlepath result a w2 w1 + +set length 3.46311 + +set 2dviewer 1 + + + + diff --git a/tests/bugs/modalg_2/bug23367_13 b/tests/bugs/modalg_2/bug23367_13 new file mode 100755 index 0000000000..41cfdf4752 --- /dev/null +++ b/tests/bugs/modalg_2/bug23367_13 @@ -0,0 +1,27 @@ +puts "============" +puts "CR23367" +puts "============" +puts "" +########################################################################################################## +# New functionality restoring the middle path of pipe-like shape +########################################################################################################## + +polyline pp 0 0 0 10 0 0 20 10 0 20 20 0 +polyline sp 0 0 0 0 0 100 -50 50 200 -100 100 100 +mksweep sp +addsweep pp +buildsweep a -R +explode a e +wire w1 a_2 a_5 a_8 +wire w2 a_24 a_27 a_30 +donly a w1 w2 +fit +middlepath result a w1 w2 + +set length 352.512 + +set 2dviewer 1 + + + + diff --git a/tests/bugs/modalg_2/bug23367_14 b/tests/bugs/modalg_2/bug23367_14 new file mode 100755 index 0000000000..5471106110 --- /dev/null +++ b/tests/bugs/modalg_2/bug23367_14 @@ -0,0 +1,26 @@ +puts "============" +puts "CR23367" +puts "============" +puts "" +########################################################################################################## +# New functionality restoring the middle path of pipe-like shape +########################################################################################################## + +polyline pp 0 0 0 10 -10 0 20 0 0 10 10 0 0 0 0 +polyline sp 0 0 0 0 0 50 -100 0 0 -50 0 -50 0 0 0 +mksweep sp +addsweep pp +buildsweep a -R +explode a e +wire ww a_11 a_8 a_5 a_2 +donly a ww +fit +middlepath result a ww ww + +set length 365.161 + +set 2dviewer 1 + + + + diff --git a/tests/bugs/modalg_2/bug23367_15 b/tests/bugs/modalg_2/bug23367_15 new file mode 100755 index 0000000000..60c127003f --- /dev/null +++ b/tests/bugs/modalg_2/bug23367_15 @@ -0,0 +1,27 @@ +puts "============" +puts "CR23367" +puts "============" +puts "" +########################################################################################################## +# New functionality restoring the middle path of pipe-like shape +########################################################################################################## + +polyline pp 0 0 0 10 -10 0 20 0 0 10 10 0 0 0 0 +polyline sp 0 0 0 0 0 50 -100 0 0 -50 0 -50 +mksweep sp +addsweep pp +buildsweep a -R +explode a e +wire w1 a_11 a_8 a_5 a_2 +wire w2 a_34 a_36 a_28 a_31 +donly a w1 w2 +fit +middlepath result a w1 w2 + +set length 270.149 + +set 2dviewer 1 + + + + diff --git a/tests/bugs/modalg_2/bug23367_2 b/tests/bugs/modalg_2/bug23367_2 new file mode 100755 index 0000000000..35864df619 --- /dev/null +++ b/tests/bugs/modalg_2/bug23367_2 @@ -0,0 +1,20 @@ +puts "============" +puts "CR23367" +puts "============" +puts "" +########################################################################################################## +# New functionality restoring the middle path of pipe-like shape +########################################################################################################## + +pcylinder a 10 30 180 +explode a f +donly a a_2 a_3 +fit +middlepath result a a_2 a_3 + +set length 30.0036 + +set 2dviewer 1 + + + diff --git a/tests/bugs/modalg_2/bug23367_3 b/tests/bugs/modalg_2/bug23367_3 new file mode 100755 index 0000000000..63b5c6d63f --- /dev/null +++ b/tests/bugs/modalg_2/bug23367_3 @@ -0,0 +1,22 @@ +puts "============" +puts "CR23367" +puts "============" +puts "" +########################################################################################################## +# New functionality restoring the middle path of pipe-like shape +########################################################################################################## + +polyline pp 0 0 0 5 0 0 10 0 0 10 10 0 0 10 0 0 0 0 +mkplane ff pp +prism a ff 0 0 50 +explode a f +donly a a_6 a_7 +fit +middlepath result a a_6 a_7 + +set length 50. + +set 2dviewer 1 + + + diff --git a/tests/bugs/modalg_2/bug23367_4 b/tests/bugs/modalg_2/bug23367_4 new file mode 100755 index 0000000000..91f38404ea --- /dev/null +++ b/tests/bugs/modalg_2/bug23367_4 @@ -0,0 +1,21 @@ +puts "============" +puts "CR23367" +puts "============" +puts "" +########################################################################################################## +# New functionality restoring the middle path of pipe-like shape +########################################################################################################## + +ptorus a 50 10 +explode a e +wire ww a_2 +donly a ww +fit +middlepath result a ww ww + +set length 314.159 + +set 2dviewer 1 + + + diff --git a/tests/bugs/modalg_2/bug23367_5 b/tests/bugs/modalg_2/bug23367_5 new file mode 100755 index 0000000000..f02c1b79a4 --- /dev/null +++ b/tests/bugs/modalg_2/bug23367_5 @@ -0,0 +1,21 @@ +puts "============" +puts "CR23367" +puts "============" +puts "" +########################################################################################################## +# New functionality restoring the middle path of pipe-like shape +########################################################################################################## + +pcylinder a 10 50 +explode a f +donly a a_2 a_3 +fit +middlepath result a a_2 a_3 + +set length 50. + +set 2dviewer 1 + + + + diff --git a/tests/bugs/modalg_2/bug23367_6 b/tests/bugs/modalg_2/bug23367_6 new file mode 100755 index 0000000000..24f19e6689 --- /dev/null +++ b/tests/bugs/modalg_2/bug23367_6 @@ -0,0 +1,22 @@ +puts "============" +puts "CR23367" +puts "============" +puts "" +########################################################################################################## +# New functionality restoring the middle path of pipe-like shape +########################################################################################################## + +restore [locate_data_file bug23367_pipe1.brep] a +explode a e +wire w1 a_2 +wire w2 a_6 +donly a w1 w2 +fit +middlepath result a w1 w2 + +set length 1386.13 + +set 2dviewer 1 + + + diff --git a/tests/bugs/modalg_2/bug23367_7 b/tests/bugs/modalg_2/bug23367_7 new file mode 100755 index 0000000000..b6df910357 --- /dev/null +++ b/tests/bugs/modalg_2/bug23367_7 @@ -0,0 +1,22 @@ +puts "============" +puts "CR23367" +puts "============" +puts "" +########################################################################################################## +# New functionality restoring the middle path of pipe-like shape +########################################################################################################## + +restore [locate_data_file bug23367_aa.brep] a +explode a e +wire w1 a_57 a_73 a_54 a_71 +wire w2 a_133 a_148 a_130 a_146 +donly a w1 w2 +fit +middlepath result a w1 w2 + +set length 3.46311 + +set 2dviewer 1 + + + diff --git a/tests/bugs/modalg_2/bug23367_8 b/tests/bugs/modalg_2/bug23367_8 new file mode 100755 index 0000000000..c2432001f7 --- /dev/null +++ b/tests/bugs/modalg_2/bug23367_8 @@ -0,0 +1,22 @@ +puts "============" +puts "CR23367" +puts "============" +puts "" +########################################################################################################## +# New functionality restoring the middle path of pipe-like shape +########################################################################################################## + +restore [locate_data_file bug23367_bb.brep] b +explode b e +wire w1 b_1 b_29 b_60 b_27 +wire w2 b_11 b_23 b_56 b_33 +donly b w1 w2 +fit +middlepath result b w1 w2 + +set length 1.94244 + +set 2dviewer 1 + + + diff --git a/tests/bugs/modalg_2/bug23367_9 b/tests/bugs/modalg_2/bug23367_9 new file mode 100755 index 0000000000..fdec1ac748 --- /dev/null +++ b/tests/bugs/modalg_2/bug23367_9 @@ -0,0 +1,25 @@ +puts "============" +puts "CR23367" +puts "============" +puts "" +########################################################################################################## +# New functionality restoring the middle path of pipe-like shape +########################################################################################################## + +ptorus a 50 10 0 180 +explode a f +shape b Sh +add a_1 b +explode b e +wire ww b_2 +donly b ww +fit +middlepath result b ww ww + +set length 314.159 + +set 2dviewer 1 + + + + diff --git a/tests/bugs/modalg_2/bug23394 b/tests/bugs/modalg_2/bug23394 new file mode 100755 index 0000000000..d099a3d9c3 --- /dev/null +++ b/tests/bugs/modalg_2/bug23394 @@ -0,0 +1,15 @@ +puts "============" +puts "CR23394" +puts "============" +puts "" +########################################################################################################## +# Problem with BRepOffset_MakeOffset on a cylindrical face +########################################################################################################## + +restore [locate_data_file bug23394_Circular_tube.brep] sh1 + +thickshell result sh1 5 + +set square 128648 + +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug234 b/tests/bugs/modalg_2/bug234 new file mode 100755 index 0000000000..8cd171d1dc --- /dev/null +++ b/tests/bugs/modalg_2/bug234 @@ -0,0 +1,26 @@ +puts "========" +puts "OCC234" +puts "========" + +###################################################################### +##I believe that attached shape is OK but checkshape finds out some problems (Bad Orientation of Subshape). +###################################################################### + +restore [locate_data_file OCC234.brep] result + +set che [checkshape result r] +if { [regexp {OK} $che] != 1 } { + puts "Faulty OCC234 (checkshape) : Checkshape command works wrongly" +} else { + puts "OCC234 OK (checkshape) : Checkshape command works properly" +} + +set che [checkshape result] +if { [regexp {Faulty} $che] == 1 } { + puts "Faulty OCC234 (checkshape) : Checkshape command works wrongly" +} else { + puts "OCC234 OK (checkshape) : Checkshape command works properly" +} + +set square 2464.17 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug23429 b/tests/bugs/modalg_2/bug23429 new file mode 100755 index 0000000000..aa7428ca28 --- /dev/null +++ b/tests/bugs/modalg_2/bug23429 @@ -0,0 +1,24 @@ +puts "============" +puts "CR23429" +puts "============" +puts "" +########################################################################################################## +# BRepFeat_SplitShape algorithm misses some section edges while building result from customer's shape +########################################################################################################## +pload QAcommands + +restore [locate_data_file OCC23388-Shape1.brep] a +restore [locate_data_file CR23429-Shape3.brep] b + +OCC23429 result a b + +set square 1120.52 + +set 2dviewer 1 + + + + + + + diff --git a/tests/bugs/modalg_2/bug23436 b/tests/bugs/modalg_2/bug23436 new file mode 100755 index 0000000000..291ea7f381 --- /dev/null +++ b/tests/bugs/modalg_2/bug23436 @@ -0,0 +1,13 @@ +puts "============" +puts "CR23436" +puts "============" +puts "" +###################################################### +# BRepOffsetAPI_ThruSections crashes when lofting through identical profiles +###################################################### + +restore [locate_data_file bug23436_myloft.brep] s + +explode s + +thrusections result 0 0 s_1 s_2 s_3 diff --git a/tests/bugs/modalg_2/bug23470 b/tests/bugs/modalg_2/bug23470 new file mode 100755 index 0000000000..1b5405bf91 --- /dev/null +++ b/tests/bugs/modalg_2/bug23470 @@ -0,0 +1,23 @@ +puts "============" +puts "CR23470" +puts "============" +puts "" +########################################################################################################## +# Boolean Fuse between two edges fails +########################################################################################################## + +restore [locate_data_file bug23470_qe.brep] qe +explode qe +bop qe_1 qe_2 +bopfuse result + +set nb_v_good 2 +set nb_e_good 1 +set nb_w_good 1 +set nb_shape_good 5 +set length 48.4459 +set command bopfuse + +set 2dviewer 1 + + diff --git a/tests/bugs/modalg_2/bug23472 b/tests/bugs/modalg_2/bug23472 new file mode 100755 index 0000000000..396c439e76 --- /dev/null +++ b/tests/bugs/modalg_2/bug23472 @@ -0,0 +1,22 @@ +puts "============" +puts "CR23472" +puts "============" +puts "" +########################################################################################################## +# BRepAlgoAPI_Section algorithm fails with exception while intersecting two faces +########################################################################################################## + +restore [locate_data_file bug23472_f1.brep] f1 +restore [locate_data_file bug23472_f2.brep] f2 + +bsection result f1 f2 -2d + +regexp {Mass +: +([-0-9.+eE]+)} [lprops result] full l + +if { $l != 0} { + puts "Error : The bsection is not valid" +} + +# Service parameters +set mass -0.1 +set m -0.1 diff --git a/tests/bugs/modalg_2/bug23530 b/tests/bugs/modalg_2/bug23530 new file mode 100755 index 0000000000..ae2158e407 --- /dev/null +++ b/tests/bugs/modalg_2/bug23530 @@ -0,0 +1,18 @@ +puts "========" +puts "CR23530" +puts "========" +puts "" +################################################## +## Error in Draw command "checkshape": invalid face is not recognized +################################################## + +restore [locate_data_file bug23530_BadFace.brep] result +pcurve result + +decho off +set CheckLog [checkshape result] +decho on + +if { [regexp "BRepCheck_UnorientableShape" ${CheckLog}] != 1 } { + puts "CR23530: Error" +} diff --git a/tests/bugs/modalg_2/bug23606 b/tests/bugs/modalg_2/bug23606 new file mode 100755 index 0000000000..2df9c9f47a --- /dev/null +++ b/tests/bugs/modalg_2/bug23606 @@ -0,0 +1,19 @@ +puts "============" +puts "OCC23606" +puts "============" +puts "" +####################################################################### +# Invalid result of pipe operation +####################################################################### + +restore [locate_data_file bug23606_base.brep] sh +restore [locate_data_file bug23606_path.brep] w +pipe result w sh +set n [llength [explode result f]] +if { ${n} != 10 } { + puts "Error : bad number of faces" +} + +# Service parameters +set mass -0.1 +set m -0.1 diff --git a/tests/bugs/modalg_2/bug23651_1 b/tests/bugs/modalg_2/bug23651_1 new file mode 100755 index 0000000000..84593c5053 --- /dev/null +++ b/tests/bugs/modalg_2/bug23651_1 @@ -0,0 +1,13 @@ +puts "============" +puts "CR23651" +puts "============" +puts "" +############################### +## Exception on fillet construction between NURBS and surface of revolution +############################### + +restore [locate_data_file bug23651_turbine_shell_one_edge.brep] s +explode s e +blend result s 1 s_4 + +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug23651_2 b/tests/bugs/modalg_2/bug23651_2 new file mode 100755 index 0000000000..2c4fa32649 --- /dev/null +++ b/tests/bugs/modalg_2/bug23651_2 @@ -0,0 +1,16 @@ +puts "============" +puts "CR23651" +puts "============" +puts "" +############################### +## Exception on fillet construction between NURBS and surface of revolution +############################### + +restore [locate_data_file bug23651_turbine_shell_one_edge.brep ] a +explode a e + +mkevol result a +updatevol a_4 0. 1.5 0.05 1 0.45 1 0.5 1.5 0.55 2 0.95 2 1. 1.5 +buildevol + +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug23676 b/tests/bugs/modalg_2/bug23676 new file mode 100755 index 0000000000..0edbcb8f42 --- /dev/null +++ b/tests/bugs/modalg_2/bug23676 @@ -0,0 +1,26 @@ +puts "============" +puts "CR23676" +puts "============" +puts "" +######################################################### +## Intersection between edge and a face produces extra vertex +######################################################### + +restore [locate_data_file bug23676_q1.brep] b1 + +explode b1 +copy b1_1 b1 +copy b1_3 b2 + +bop b1 b2 +bopcut result + +set nb_v_good 2 +set nb_e_good 1 +set nb_w_good 1 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 5 diff --git a/tests/bugs/modalg_2/bug23699 b/tests/bugs/modalg_2/bug23699 new file mode 100755 index 0000000000..f89bff9f89 --- /dev/null +++ b/tests/bugs/modalg_2/bug23699 @@ -0,0 +1,18 @@ +puts "=========" +puts "CR23699" +puts "=========" +puts "" +############################### +## Exception reaised during intersection between two surfaces +############################### + +restore [locate_data_file bug23699_Compound_sigsegv.brep] b1 + +explode b1 f + +mksurface s1 b1_1 +mksurface s2 b1_2 + +intersect result s1 s2 + +set 2dviewer 1 diff --git a/tests/bugs/modalg_2/bug23711 b/tests/bugs/modalg_2/bug23711 new file mode 100755 index 0000000000..0765851aa9 --- /dev/null +++ b/tests/bugs/modalg_2/bug23711 @@ -0,0 +1,15 @@ +puts "========" +puts "CR23711" +puts "========" +######################################################## +## Incorrect result done by fuse operation +######################################################## + +restore [locate_data_file bug23711_sph1.brep] b1 +restore [locate_data_file bug23711_sph2.brep] b2 + +bop b1 b2 +bopfuse result + +set square 1256.63 +set 2dviewer 1 diff --git a/tests/bugs/modalg_2/bug23716 b/tests/bugs/modalg_2/bug23716 new file mode 100755 index 0000000000..720ebab897 --- /dev/null +++ b/tests/bugs/modalg_2/bug23716 @@ -0,0 +1,16 @@ +puts "========" +puts "CR23716" +puts "========" +######################################################## +## Boolean Fuse between two faces fails +######################################################## + +restore [locate_data_file bug23716_qf.brep] b +explode b + +bop b_1 b_3 +bopfuse result + +set square 45605.9 + +set 2dviewer 1 diff --git a/tests/bugs/modalg_2/bug23732 b/tests/bugs/modalg_2/bug23732 new file mode 100755 index 0000000000..e9a3564921 --- /dev/null +++ b/tests/bugs/modalg_2/bug23732 @@ -0,0 +1,17 @@ +puts "=========" +puts "CR23722" +puts "=========" +puts "" +############################### +## Exception reaised during intersection between two surfaces +############################### + +restore [locate_data_file bug23732_fx1.brep] b1 +restore [locate_data_file bug23732_fx2.brep] b2 + +mksurface s1 b1 +mksurface s2 b1 + +intersect result s1 s2 + +set 2dviewer 1 diff --git a/tests/bugs/modalg_2/bug238_1 b/tests/bugs/modalg_2/bug238_1 new file mode 100755 index 0000000000..cdfd9d737c --- /dev/null +++ b/tests/bugs/modalg_2/bug238_1 @@ -0,0 +1,29 @@ +puts "TODO OCC12345 ALL: Faulty : Result shape is WRONG !!!" +puts "TODO OCC12345 ALL: Error : The length of result shape is" +puts "========================" +puts " OCC238 " +puts "========================" + +################################################# +## puts " BOPCOMMON case_2_solid.brep and case_2_edge1.brep" +################################################# +puts " " +puts [restore [locate_data_file OCC238a.brep] a] +puts [restore [locate_data_file case_2_edge1.brep] b] +puts [bop a b] +puts [bopcommon result b a] + +explode result v +explode a e +distmini di result_1 a_3 +regexp {([-0-9.+eE]+)$} [dump $di_val] full dis +if { [expr $dis > 1.e-5] } { + puts "Faulty : Result shape is WRONG !!!" +} else { + puts " Result shape is COMPLITE" +} + +set nb_v_good 14 +set nb_e_good 7 +set length 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug238_2 b/tests/bugs/modalg_2/bug238_2 new file mode 100755 index 0000000000..e92fd4bb6f --- /dev/null +++ b/tests/bugs/modalg_2/bug238_2 @@ -0,0 +1,29 @@ +puts "TODO OCC12345 ALL: Faulty : Result shape is WRONG !!!" +puts "TODO OCC12345 ALL: Error : The length of result shape is" +puts "========================" +puts " OCC238 " +puts "========================" + +################################################# +## puts " BOPTUC case_2_solid.brep from case_2_edge1.brep" +################################################# +puts " " +puts [restore [locate_data_file OCC238a.brep] a] +puts [restore [locate_data_file case_2_edge1.brep] b] +puts [bop a b] +puts [boptuc result b a] + +explode result v +explode a e +distmini di result_2 a_3 +regexp {([-0-9.+eE]+)$} [dump $di_val] full dis +if { [expr $dis > 1.e-5] } { + puts "Faulty : Result shape is WRONG !!!" +} else { + puts " Result shape is COMPLITE" +} + +set nb_v_good 14 +set nb_e_good 7 +set length 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug239_1 b/tests/bugs/modalg_2/bug239_1 new file mode 100755 index 0000000000..cca3f2e937 --- /dev/null +++ b/tests/bugs/modalg_2/bug239_1 @@ -0,0 +1,21 @@ +puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must contain" +puts "TODO OCC12345 ALL: Error : The length of result shape is" + +puts "========================" +puts " OCC239 " +puts "========================" + +################################################# +## puts " BOPCOMMON case_2_solid.brep and case_2_wire1.brep" +################################################# + puts " " +restore [locate_data_file OCC238a.brep] a +restore [locate_data_file case_2_wire1.brep] b +puts [bop a b] +puts [bopcommon result] + +set nb_v_good 18 +set nb_e_good 10 +set length 0 +set 2dviewer 0 + \ No newline at end of file diff --git a/tests/bugs/modalg_2/bug239_2 b/tests/bugs/modalg_2/bug239_2 new file mode 100755 index 0000000000..ddacd399c9 --- /dev/null +++ b/tests/bugs/modalg_2/bug239_2 @@ -0,0 +1,19 @@ + +puts "========================" +puts " OCC239 " +puts "========================" + +################################################# +## puts " BOPTUC case_2_solid.brep and case_2_wire1.brep" +################################################# + puts " " +restore [locate_data_file OCC238a.brep] a +restore [locate_data_file case_2_wire1.brep] b +puts [bop a b] +puts [boptuc result] + +set nb_v_good 18 +set nb_e_good 11 +set length 2481.26 +set 2dviewer 0 + \ No newline at end of file diff --git a/tests/bugs/modalg_2/bug240_1 b/tests/bugs/modalg_2/bug240_1 new file mode 100755 index 0000000000..9761aa14e7 --- /dev/null +++ b/tests/bugs/modalg_2/bug240_1 @@ -0,0 +1,21 @@ +puts "TODO OCC12345 ALL: Error : The command is not valid" +puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must" + +puts "========================" +puts " OCC240 " +puts "========================" + +################################################# +## puts " BOPCOMMON case_2_shell.brep and case_2_edge2.brep" +################################################# + puts " " +restore [locate_data_file OCC240a.brep] a +restore [locate_data_file case_2_edge2.brep] b +puts [bop a b] +puts [bopcommon result] + +set nb_v_good 14 +set nb_e_good 6 +set length 0 +set 2dviewer 0 + \ No newline at end of file diff --git a/tests/bugs/modalg_2/bug240_2 b/tests/bugs/modalg_2/bug240_2 new file mode 100755 index 0000000000..189f358a1e --- /dev/null +++ b/tests/bugs/modalg_2/bug240_2 @@ -0,0 +1,21 @@ +puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must" +puts "TODO OCC12345 ALL: Error : The length of result shape is" + +puts "========================" +puts " OCC240 " +puts "========================" + +################################################# +## puts " BOPTUC case_2_shell.brep and case_2_edge2.brep" +################################################# + puts " " +restore [locate_data_file OCC240a.brep] a +restore [locate_data_file case_2_edge2.brep] b +puts [bop a b] +puts [boptuc result] + +set nb_v_good 14 +set nb_e_good 7 +set length 0 +set 2dviewer 0 + \ No newline at end of file diff --git a/tests/bugs/modalg_2/bug241_1 b/tests/bugs/modalg_2/bug241_1 new file mode 100755 index 0000000000..c29342aa5b --- /dev/null +++ b/tests/bugs/modalg_2/bug241_1 @@ -0,0 +1,21 @@ +puts "TODO OCC12345 ALL: Error : The command is not valid" +puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must" + +puts "========================" +puts " OCC241 " +puts "========================" + +################################################# +## puts " BOPCOMMON case_2_shell.brep and case_2_edge3.brep" +################################################# + puts " " +restore [locate_data_file OCC240a.brep] a +restore [locate_data_file case_2_edge3.brep] b +puts [bop a b] +puts [bopcommon result] + +set nb_v_good 6 +set nb_e_good 3 +set length 0 +set 2dviewer 0 + \ No newline at end of file diff --git a/tests/bugs/modalg_2/bug241_2 b/tests/bugs/modalg_2/bug241_2 new file mode 100755 index 0000000000..0aecc6e2e9 --- /dev/null +++ b/tests/bugs/modalg_2/bug241_2 @@ -0,0 +1,21 @@ +puts "TODO OCC12345 ALL: Error : The length of result shape is" +puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must" + +puts "========================" +puts " OCC241 " +puts "========================" + +################################################# +## puts " BOPTUC case_2_shell.brep and case_2_edge3.brep" +################################################# + puts " " +restore [locate_data_file OCC240a.brep] a +restore [locate_data_file case_2_edge3.brep] b +puts [bop a b] +puts [boptuc result] + +set nb_v_good 6 +set nb_e_good 3 +set length 0 +set 2dviewer 0 + \ No newline at end of file diff --git a/tests/bugs/modalg_2/bug242_1 b/tests/bugs/modalg_2/bug242_1 new file mode 100755 index 0000000000..1e6dab42f1 --- /dev/null +++ b/tests/bugs/modalg_2/bug242_1 @@ -0,0 +1,21 @@ +puts "TODO OCC12345 ALL: Error : The command is not valid" +puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must" + +puts "========================" +puts " OCC242 " +puts "========================" + +################################################# +## puts " BOPCOMMON case_2_shell.brep and case_2_wire1.brep" +################################################# + puts " " +restore [locate_data_file OCC240a.brep] a +restore [locate_data_file case_2_wire1.brep] b +puts [bop a b] +puts [bopcommon result] + +set nb_v_good 18 +set nb_e_good 9 +set length 0 +set 2dviewer 0 + \ No newline at end of file diff --git a/tests/bugs/modalg_2/bug242_2 b/tests/bugs/modalg_2/bug242_2 new file mode 100755 index 0000000000..1304e72e5f --- /dev/null +++ b/tests/bugs/modalg_2/bug242_2 @@ -0,0 +1,21 @@ +puts "TODO OCC12345 ALL: Error : The length of result shape is" +puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must" + +puts "========================" +puts " OCC242 " +puts "========================" + +################################################# +## puts " BOPTUC case_2_shell.brep and case_2_wire1.brep" +################################################# + puts " " +restore [locate_data_file OCC240a.brep] a +restore [locate_data_file case_2_wire1.brep] b +puts [bop a b] +puts [boptuc result] + +set nb_v_good 18 +set nb_e_good 13 +set length 0 +set 2dviewer 0 + \ No newline at end of file diff --git a/tests/bugs/modalg_2/bug243_1 b/tests/bugs/modalg_2/bug243_1 new file mode 100755 index 0000000000..6cca505a5a --- /dev/null +++ b/tests/bugs/modalg_2/bug243_1 @@ -0,0 +1,19 @@ + +puts "========================" +puts " OCC243 " +puts "========================" + +################################################# +## puts " BOPCOMMON case_4_shell.brep and case_4_wire3.brep" +################################################# + puts " " +restore [locate_data_file case_4_shell.brep] a +restore [locate_data_file case_4_wire3.brep] b +puts [bop a b] +puts [bopcommon result] + +set nb_v_good 15 +set nb_e_good 10 +set length 1150.78 +set 2dviewer 0 + \ No newline at end of file diff --git a/tests/bugs/modalg_2/bug243_2 b/tests/bugs/modalg_2/bug243_2 new file mode 100755 index 0000000000..d7613a902a --- /dev/null +++ b/tests/bugs/modalg_2/bug243_2 @@ -0,0 +1,19 @@ + +puts "========================" +puts " OCC243 " +puts "========================" + +################################################# +## puts " BOPTUC case_4_shell.brep and case_4_wire3.brep" +################################################# + puts " " +restore [locate_data_file case_4_shell.brep] a +restore [locate_data_file case_4_wire3.brep] b +puts [bop a b] +puts [boptuc result] + +set nb_v_good 16 +set nb_e_good 11 +set length 929.278 +set 2dviewer 1 + \ No newline at end of file diff --git a/tests/bugs/modalg_2/bug244 b/tests/bugs/modalg_2/bug244 new file mode 100755 index 0000000000..8b24b1e4a8 --- /dev/null +++ b/tests/bugs/modalg_2/bug244 @@ -0,0 +1,19 @@ + +puts "========================" +puts " OCC244 " +puts "========================" + +################################################# +## puts " BOPCOMMON case_5_solid.brep and case_5_wire3.brep" +################################################# + puts " " +restore [locate_data_file case_5_solid.brep] a +restore [locate_data_file case_4_wire3.brep] b + puts [bop a b] + puts [bopcommon result] + + set nb_v_good 12 + set nb_e_good 11 + set length 1808.02 + set 2dviewer 0 + \ No newline at end of file diff --git a/tests/bugs/modalg_2/bug245_1 b/tests/bugs/modalg_2/bug245_1 new file mode 100755 index 0000000000..ad7f598092 --- /dev/null +++ b/tests/bugs/modalg_2/bug245_1 @@ -0,0 +1,19 @@ + +puts "========================" +puts " OCC245 " +puts "========================" + +################################################# +## puts " BOPCOMMON case_5_shell.brep and case_5_wire3.brep" +################################################# + puts " " +restore [locate_data_file case_5_shell.brep] a +restore [locate_data_file case_4_wire3.brep] b +puts [bop a b] +puts [bopcommon result] + +set nb_v_good 12 +set nb_e_good 11 +set length 1808.02 +set 2dviewer 0 + \ No newline at end of file diff --git a/tests/bugs/modalg_2/bug245_2 b/tests/bugs/modalg_2/bug245_2 new file mode 100755 index 0000000000..ceda3cdb65 --- /dev/null +++ b/tests/bugs/modalg_2/bug245_2 @@ -0,0 +1,19 @@ + +puts "========================" +puts " OCC245 " +puts "========================" + +################################################# +## puts " BOPTUC case_5_shell.brep and case_5_wire3.brep" +################################################# + puts " " +restore [locate_data_file case_5_shell.brep] a +restore [locate_data_file case_4_wire3.brep] b +puts [bop a b] +puts [boptuc result] + +set nb_v_good 3 +set nb_e_good 2 +set length 272.04 +set 2dviewer 0 + \ No newline at end of file diff --git a/tests/bugs/modalg_2/bug246 b/tests/bugs/modalg_2/bug246 new file mode 100755 index 0000000000..dd1ea1d268 --- /dev/null +++ b/tests/bugs/modalg_2/bug246 @@ -0,0 +1,20 @@ +puts "TODO OCC12345 ALL: Error : The length of result shape is" +puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must contains" + +puts "========================" +puts " OCC246 " +puts "========================" + +################################################# +## puts " BOPCOMMON case_1_solid.brep and case_1_wire1.brep" +################################################# + puts " " +restore [locate_data_file OCC246a.brep] a +restore [locate_data_file case_1_wire1.brep] b +puts [bop a b] +puts [bopcommon result] + +set nb_v_good 5 +set nb_e_good 2 +set length 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug248_1 b/tests/bugs/modalg_2/bug248_1 new file mode 100755 index 0000000000..19bd2cfb01 --- /dev/null +++ b/tests/bugs/modalg_2/bug248_1 @@ -0,0 +1,21 @@ +puts "TODO OCC12345 ALL: Error : The command is not valid. The length is" +puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must contains" + +puts "========================" +puts " OCC248 " +puts "========================" + +################################################# +## puts " BOPCOMMON case_8_solid.brep and case_8_wire6.brep" +################################################# + puts " " +restore [locate_data_file OCC247a.brep] a +restore [locate_data_file OCC248b.brep] b +puts [bop a b] +puts [bopcommon result] + +set nb_v_good 1 +set nb_e_good 0 +set length 0 +set 2dviewer 0 + \ No newline at end of file diff --git a/tests/bugs/modalg_2/bug248_2 b/tests/bugs/modalg_2/bug248_2 new file mode 100755 index 0000000000..86644ae15d --- /dev/null +++ b/tests/bugs/modalg_2/bug248_2 @@ -0,0 +1,21 @@ +puts "TODO OCC12345 ALL: Error : The length of result shape is" +puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must contains" + +puts "========================" +puts " OCC248 " +puts "========================" + +################################################# +## puts " BOPTUC case_8_solid.brep and case_8_wire6.brep" +################################################# + puts " " +restore [locate_data_file OCC247a.brep] a +restore [locate_data_file OCC248b.brep] b +puts [bop a b] +puts [boptuc result] + +set nb_v_good 8 +set nb_e_good 8 +set length 0 +set 2dviewer 0 + \ No newline at end of file diff --git a/tests/bugs/modalg_2/bug249_1 b/tests/bugs/modalg_2/bug249_1 new file mode 100755 index 0000000000..718f83c9a7 --- /dev/null +++ b/tests/bugs/modalg_2/bug249_1 @@ -0,0 +1,21 @@ +puts "TODO OCC12345 ALL: Error : The command is not valid. The length is" +puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must contains" + +puts "========================" +puts " OCC249 " +puts "========================" + +################################################# +## puts " BOPCOMMON case_9_wire_a.brep and case_9_edge3.brep" +################################################# + puts " " +restore [locate_data_file case_9_wire_a.brep] a +restore [locate_data_file case_9_edge3.brep] b +puts [bop a b] +puts [bopcommon result] + +set nb_v_good 2 +set nb_e_good 1 +set length 0 +set 2dviewer 0 + \ No newline at end of file diff --git a/tests/bugs/modalg_2/bug249_2 b/tests/bugs/modalg_2/bug249_2 new file mode 100755 index 0000000000..3831479d5b --- /dev/null +++ b/tests/bugs/modalg_2/bug249_2 @@ -0,0 +1,22 @@ +puts "TODO OCC12345 ALL: Error : The length of result shape is" +puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must contains" + +puts "========================" +puts " OCC249 " +puts "========================" + +################################################# +## puts " BOPTUC case_9_wire_a.brep and case_9_edge3.brep" +################################################# + puts " " +restore [locate_data_file case_9_wire_a.brep] a +restore [locate_data_file case_9_edge3.brep] b +puts [bop a b] +puts [boptuc result] + +set nb_v_good 4 +set nb_e_good 2 +set length 0 +set 2dviewer 0 + + \ No newline at end of file diff --git a/tests/bugs/modalg_2/bug249_3 b/tests/bugs/modalg_2/bug249_3 new file mode 100755 index 0000000000..eb6acc1aa0 --- /dev/null +++ b/tests/bugs/modalg_2/bug249_3 @@ -0,0 +1,21 @@ +puts "TODO OCC12345 ALL: Error : The length of result shape is" +puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must contains" + +puts "========================" +puts " OCC249 " +puts "========================" + +################################################# +## puts " BOPCUT case_9_wire_a.brep and case_9_edge3.brep" +################################################# + puts " " +restore [locate_data_file case_9_wire_a.brep] a +restore [locate_data_file case_9_edge3.brep] b +puts [bop a b] +puts [bopcut result] + +set nb_v_good 4 +set nb_e_good 2 +set length 0 +set 2dviewer 0 + \ No newline at end of file diff --git a/tests/bugs/modalg_2/bug249_4 b/tests/bugs/modalg_2/bug249_4 new file mode 100755 index 0000000000..75e0d9cc29 --- /dev/null +++ b/tests/bugs/modalg_2/bug249_4 @@ -0,0 +1,21 @@ +puts "TODO OCC12345 ALL: Error : The length of result shape is" +puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must contains" + +puts "========================" +puts " OCC249 " +puts "========================" + +################################################# +## puts " BOPFUSE case_9_wire_a.brep and case_9_edge3.brep" +################################################# + puts " " +restore [locate_data_file case_9_wire_a.brep] a +restore [locate_data_file case_9_edge3.brep] b +puts [bop a b] +puts [bopfuse result] + +set nb_v_good 6 +set nb_e_good 5 +set length 0 +set 2dviewer 2 + \ No newline at end of file diff --git a/tests/bugs/modalg_2/bug250_1 b/tests/bugs/modalg_2/bug250_1 new file mode 100755 index 0000000000..f45bec692e --- /dev/null +++ b/tests/bugs/modalg_2/bug250_1 @@ -0,0 +1,21 @@ +puts "TODO OCC12345 ALL: Error : The command is not valid. The length is" +puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must contains" + +puts "========================" +puts " OCC250 " +puts "========================" + +################################################# +## puts " BOPCOMMON case_9_wire_a.brep and case_9_wire2.brep" +################################################# + puts " " +restore [locate_data_file case_9_wire_a.brep] a +restore [locate_data_file case_9_wire2.brep] b +puts [bop a b] +puts [bopcommon result] + +set nb_v_good 2 +set nb_e_good 1 +set length 0 +set 2dviewer 0 + \ No newline at end of file diff --git a/tests/bugs/modalg_2/bug250_2 b/tests/bugs/modalg_2/bug250_2 new file mode 100755 index 0000000000..4e98480501 --- /dev/null +++ b/tests/bugs/modalg_2/bug250_2 @@ -0,0 +1,21 @@ +puts "TODO OCC12345 ALL: Error : The length of result shape is" +puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must contains" + +puts "========================" +puts " OCC250 " +puts "========================" + +################################################# +## puts " BOPTUC case_9_wire_a.brep and case_9_wire2.brep" +################################################# + puts " " +restore [locate_data_file case_9_wire_a.brep] a +restore [locate_data_file case_9_wire2.brep] b +puts [bop a b] +puts [boptuc result] + +set nb_v_good 7 +set nb_e_good 6 +set length 0 +set 2dviewer 0 + \ No newline at end of file diff --git a/tests/bugs/modalg_2/bug250_3 b/tests/bugs/modalg_2/bug250_3 new file mode 100755 index 0000000000..5d94ebaa81 --- /dev/null +++ b/tests/bugs/modalg_2/bug250_3 @@ -0,0 +1,21 @@ +puts "TODO OCC12345 ALL: Error : The length of result shape is" +puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must contains" + +puts "========================" +puts " OCC250 " +puts "========================" + +################################################# +## puts " BOPCUT case_9_wire_a.brep and case_9_wire2.brep" +################################################# + puts " " +restore [locate_data_file case_9_wire_a.brep] a +restore [locate_data_file case_9_wire2.brep] b +puts [bop a b] +puts [bopcut result] + +set nb_v_good 4 +set nb_e_good 2 +set length 0 +set 2dviewer 0 + \ No newline at end of file diff --git a/tests/bugs/modalg_2/bug250_4 b/tests/bugs/modalg_2/bug250_4 new file mode 100755 index 0000000000..18a06125f4 --- /dev/null +++ b/tests/bugs/modalg_2/bug250_4 @@ -0,0 +1,20 @@ +puts "TODO OCC12345 ALL: Error : The length of result shape is" +puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must contains" + +puts "========================" +puts " OCC250 " +puts "========================" + +################################################# +## puts " BOPFUSE case_9_wire_a.brep and case_9_wire2.brep" +################################################# + puts " " +restore [locate_data_file case_9_wire_a.brep] a +restore [locate_data_file case_9_wire2.brep] b +puts [bop a b] +puts [bopfuse result] + +set nb_v_good 9 +set nb_e_good 9 +set length 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug251_1 b/tests/bugs/modalg_2/bug251_1 new file mode 100755 index 0000000000..938d0534a9 --- /dev/null +++ b/tests/bugs/modalg_2/bug251_1 @@ -0,0 +1,33 @@ +pload QAcommands + +puts "================" +puts "OCC251" +puts "================" +puts "" +########################################################### +## Section of two faces f1 and f2 depends on order of arguments: section r1 f1 f2 and +## section r2 f2 f1 give different results, one of result is invalid - overlapped edges. +########################################################### + +restore [locate_data_file OCC251.brep] f +explode f +checkshape f_1 +checkshape f_2 + +bsection result f_1 f_2 +explode result + +set status [OCC333 result_1 result_2] +if {[llength ${status}] < 1} { + puts "OCC251 ERROR" +} else { + regexp {([-0-9.+eE]+)} $status full code + if { ${code} == 3 || ${code} == 2} { + puts "OCC251 OK (case 1) : Section command works properly" + } else { + puts "Faulty OCC251 (case 1): Section was made WRONGLY" + } +} + +set length 1. +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug251_2 b/tests/bugs/modalg_2/bug251_2 new file mode 100755 index 0000000000..cf75ceb13f --- /dev/null +++ b/tests/bugs/modalg_2/bug251_2 @@ -0,0 +1,33 @@ +pload QAcommands + +puts "================" +puts "OCC251" +puts "================" +puts "" +########################################################### +## Section of two faces f1 and f2 depends on order of arguments: section r1 f1 f2 and +## section r2 f2 f1 give different results, one of result is invalid - overlapped edges. +########################################################### + +restore [locate_data_file OCC251.brep] f +explode f +checkshape f_1 +checkshape f_2 + +bsection result f_2 f_1 +explode result + +set status [OCC333 result_1 result_2] +if {[llength ${status}] < 1} { + puts "OCC251 ERROR" +} else { + regexp {([-0-9.+eE]+)} $status full code + if { ${code} == 3 || ${code} == 2 } { + puts "OCC251 OK (case 2) : Section command works properly" + } else { + puts "Faulty OCC251 (case 2): Section was made WRONGLY" + } +} + +set length 1. +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug260 b/tests/bugs/modalg_2/bug260 new file mode 100755 index 0000000000..bdb003566c --- /dev/null +++ b/tests/bugs/modalg_2/bug260 @@ -0,0 +1,20 @@ +#INTERFACE IGES +puts "========" +puts "OCC260" +puts "========" + +pload XDE + +if { [catch { igesbrep [locate_data_file OCC260.igs] a * } catch_result] } { + puts "OCC260: Error: there is reading problem" +} else { + regexp {([-0-9.+eE]+) Shape\(s\) listed} [tpcompound result] full ShapeNumber + if {${ShapeNumber} > 0} { + puts "OCC260: OK" + } else { + puts "OCC260: Error" + } +} + +set length 4.41928 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug263 b/tests/bugs/modalg_2/bug263 new file mode 100755 index 0000000000..35d5f52d13 --- /dev/null +++ b/tests/bugs/modalg_2/bug263 @@ -0,0 +1,30 @@ +puts "TODO OCC11111 ALL: Faulty OCC263: here is shading problem" +puts "TODO OCC11111 ALL: Error : The square of result shape is" + +puts "========" +puts "OCC263" +puts "========" + +restore [locate_data_file OCC263.brep] result + +isos result 0 +tclean result + +#Creating mesh +incmesh result 0.01 + +#View the result of mesh +triangles result + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +if { $tri != 989 && $nod != 535 } { + puts "Faulty OCC263: here is shading problem" +} else { + puts "Shading of OCC263 is OK" +} + +set square 0 +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug264_0 b/tests/bugs/modalg_2/bug264_0 new file mode 100755 index 0000000000..91e2a859f6 --- /dev/null +++ b/tests/bugs/modalg_2/bug264_0 @@ -0,0 +1,29 @@ + +puts "========" +puts "OCC264" +puts " (case 0)" +puts "========" + +restore [locate_data_file OCC264_00.rle] result +checkshape result + +tclean result +vinit +vdisplay result +vclear + +isos result 0 +triangles result + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +if { $tri != 6 && $nod != 8 } { + puts "Faulty OCC264_0: here is shading problem" +} else { + puts "Shading of OCC264_0 is OK" +} + +set square 1.3135 +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug264_1 b/tests/bugs/modalg_2/bug264_1 new file mode 100755 index 0000000000..83974cb1b2 --- /dev/null +++ b/tests/bugs/modalg_2/bug264_1 @@ -0,0 +1,31 @@ +puts "TODO OCC12345 ALL: Faulty OCC264_1: here is shading problem" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +puts "========" +puts "OCC264" +puts " (case 1)" +puts "========" + +restore [locate_data_file OCC264_01.brep] result +checkshape result + +tclean result +vinit +vdisplay result +vclear + +isos result 0 +triangles result + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +if { $tri != 26 && $nod != 28 } { + puts "Faulty OCC264_1: here is shading problem" +} else { + puts "Shading of OCC264_1 is OK" +} + +set square 0 +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug264_10 b/tests/bugs/modalg_2/bug264_10 new file mode 100755 index 0000000000..452842d098 --- /dev/null +++ b/tests/bugs/modalg_2/bug264_10 @@ -0,0 +1,32 @@ +puts "TODO OCC12345 ALL: Faulty OCC264_10: here is shading problem" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +puts "========" +puts "OCC264" +puts " (case 10)" +puts "========" + +restore [locate_data_file OCC264_10.brep] result +checkshape result + +tclean result +vinit +vdisplay result +vclear + +isos result 0 +triangles result + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +if { $tri != 8 && $nod != 10 } { + puts "Faulty OCC264_10: here is shading problem" +} else { + puts "Shading of OCC264_10 is OK" +} + +set square 0 +set 3dviewer 0 + diff --git a/tests/bugs/modalg_2/bug264_11 b/tests/bugs/modalg_2/bug264_11 new file mode 100755 index 0000000000..0d0348eb7a --- /dev/null +++ b/tests/bugs/modalg_2/bug264_11 @@ -0,0 +1,32 @@ +puts "TODO OCC12345 ALL: Faulty OCC264_11: here is shading problem" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +puts "========" +puts "OCC264" +puts " (case 11)" +puts "========" + +restore [locate_data_file OCC264_11.brep] result +checkshape result + +tclean result +vinit +vdisplay result +vclear + +isos result 0 +triangles result + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +if { $tri != 32 && $nod != 28 } { + puts "Faulty OCC264_11: here is shading problem" +} else { + puts "Shading of OCC264_11 is OK" +} + +set square 0 +set 3dviewer 0 + diff --git a/tests/bugs/modalg_2/bug264_12 b/tests/bugs/modalg_2/bug264_12 new file mode 100755 index 0000000000..ce6cf1a364 --- /dev/null +++ b/tests/bugs/modalg_2/bug264_12 @@ -0,0 +1,33 @@ +puts "TODO OCC11111 ALL: Faulty OCC264_12: here is shading problem" +puts "TODO OCC11111 ALL: Error : The square of result shape is" + +puts "========" +puts "OCC264" +puts " (case 12)" +puts "========" + +restore [locate_data_file OCC264_12.brep] result + +tclean result +vinit +vdisplay result +vclear + +isos res 0 +triangles result + +#smallview +#fit + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +if { $tri != 19 && $nod != 21 } { + puts "Faulty OCC264_12: here is shading problem" +} else { + puts "Shading of OCC264_12 is OK" +} + +set square 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug264_2 b/tests/bugs/modalg_2/bug264_2 new file mode 100755 index 0000000000..89ac94994e --- /dev/null +++ b/tests/bugs/modalg_2/bug264_2 @@ -0,0 +1,35 @@ +puts "TODO OCC12345 ALL: Faulty OCC264_2: here is shading problem" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +puts "========" +puts "OCC264" +puts " (case 2)" +puts "========" + +restore [locate_data_file OCC264_02.brep] result +checkshape result + +tclean result +vinit +vdisplay result +vclear + +isos result 0 +triangles result + +smallview +fit + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +if { $tri != 10 && $nod != 12 } { + puts "Faulty OCC264_2: here is shading problem" +} else { + puts "Shading of OCC264_2 is OK" +} + +set square 0 +set 3dviewer 0 + diff --git a/tests/bugs/modalg_2/bug264_3 b/tests/bugs/modalg_2/bug264_3 new file mode 100755 index 0000000000..08ab1a75a9 --- /dev/null +++ b/tests/bugs/modalg_2/bug264_3 @@ -0,0 +1,35 @@ +puts "TODO OCC12345 ALL: Faulty OCC264_3: here is shading problem" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +puts "========" +puts "OCC264" +puts " (case 3)" +puts "========" + +restore [locate_data_file OCC264_03.brep] result +checkshape result + +tclean result +vinit +vdisplay result +vclear + +isos result 0 +triangles result + +#smallview +#fit + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +if { $tri != 13 && $nod != 15 } { + puts "Faulty OCC264_3: here is shading problem" +} else { + puts "Shading of OCC264_3 is OK" +} + +set square 0 +set 3dviewer 0 + diff --git a/tests/bugs/modalg_2/bug264_4 b/tests/bugs/modalg_2/bug264_4 new file mode 100755 index 0000000000..397dc2a181 --- /dev/null +++ b/tests/bugs/modalg_2/bug264_4 @@ -0,0 +1,35 @@ +puts "TODO OCC12345 ALL: Faulty OCC264_4: here is shading problem" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +puts "========" +puts "OCC264" +puts " (case 4)" +puts "========" + +restore [locate_data_file OCC264_04.brep] result +checkshape result + +tclean result +vinit +vdisplay result +vclear + +isos result 0 +triangles result + +#smallview +#fit + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +if { $tri != 13 && $nod != 15 } { + puts "Faulty OCC264_4: here is shading problem" +} else { + puts "Shading of OCC264_4 is OK" +} + +set square 0 +set 3dviewer 0 + diff --git a/tests/bugs/modalg_2/bug264_5 b/tests/bugs/modalg_2/bug264_5 new file mode 100755 index 0000000000..3b9ca4cbde --- /dev/null +++ b/tests/bugs/modalg_2/bug264_5 @@ -0,0 +1,35 @@ +puts "TODO OCC12345 ALL: Faulty OCC264_5: here is shading problem" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +puts "========" +puts "OCC264" +puts " (case 5)" +puts "========" + +restore [locate_data_file OCC264_05.brep] result +checkshape result + +tclean result +vinit +vdisplay result +vclear + +isos result 0 +triangles result + +#smallview +#fit + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +if { $tri != 85 && $nod != 87 } { + puts "Faulty OCC264_5: here is shading problem" +} else { + puts "Shading of OCC264_5 is OK" +} + +set square 0 +set 3dviewer 0 + diff --git a/tests/bugs/modalg_2/bug264_6 b/tests/bugs/modalg_2/bug264_6 new file mode 100755 index 0000000000..94b6954c33 --- /dev/null +++ b/tests/bugs/modalg_2/bug264_6 @@ -0,0 +1,32 @@ + +puts "========" +puts "OCC264" +puts " (case 6)" +puts "========" + +restore [locate_data_file OCC264_06.brep] result +checkshape result + +tclean result +vinit +vdisplay result +vclear + +isos result 0 +triangles result + +#smallview +#fit + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +if { $tri != 18 && $nod != 20 } { + puts "Faulty OCC264_6: here is shading problem" +} else { + puts "Shading of OCC264_6 is OK" +} + +set square 19.2399 +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug264_7 b/tests/bugs/modalg_2/bug264_7 new file mode 100755 index 0000000000..f129ed91c0 --- /dev/null +++ b/tests/bugs/modalg_2/bug264_7 @@ -0,0 +1,33 @@ + +puts "========" +puts "OCC264" +puts " (case 7)" +puts "========" + +restore [locate_data_file OCC264_07.brep] result +checkshape result + +tclean result +vinit +vdisplay result +vclear + +isos result 0 +triangles result + +#smallview +#fit + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +if { ($tri != 114 && $nod != 116) && ($tri != 116 && $nod != 118) } { + puts "Shady OCC264_7: here may be shading problem" +} else { + puts "Shading of OCC264_7 is OK" +} + +set square 150.283 +set 3dviewer 0 + diff --git a/tests/bugs/modalg_2/bug264_8 b/tests/bugs/modalg_2/bug264_8 new file mode 100755 index 0000000000..0c5dada804 --- /dev/null +++ b/tests/bugs/modalg_2/bug264_8 @@ -0,0 +1,34 @@ +puts "TODO OCC12345 ALL: Faulty OCC264_8: here is shading problem" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +puts "========" +puts "OCC264" +puts " (case 8)" +puts "========" + +restore [locate_data_file OCC264_08.brep] result +checkshape result + +tclean result +vinit +vdisplay result +vclear + +isos result 0 +triangles result + +#smallview +#fit + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +if { $tri != 19 && $nod != 21 } { + puts "Faulty OCC264_8: here is shading problem" +} else { + puts "Shading of OCC264_8 is OK" +} + +set square 0 +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug264_9 b/tests/bugs/modalg_2/bug264_9 new file mode 100755 index 0000000000..7aafec0e74 --- /dev/null +++ b/tests/bugs/modalg_2/bug264_9 @@ -0,0 +1,34 @@ +puts "TODO OCC12345 ALL: Faulty OCC264_9: here is shading problem" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +puts "========" +puts "OCC264" +puts " (case 9)" +puts "========" + +restore [locate_data_file OCC264_09.brep] result +checkshape result + +tclean result +vinit +vdisplay result +vclear + +isos result 0 +triangles result + +#smallview +#fit + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +if { $tri != 19 && $nod != 21 } { + puts "Faulty OCC264_9: here is shading problem" +} else { + puts "Shading of OCC264_9 is OK" +} + +set square 0 +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug269_1 b/tests/bugs/modalg_2/bug269_1 new file mode 100755 index 0000000000..db76719f71 --- /dev/null +++ b/tests/bugs/modalg_2/bug269_1 @@ -0,0 +1,26 @@ + +puts "======== OCC269 ========" + +restore [locate_data_file OCC269-1.brep] result +checkshape result +isos result 0 +tclean result + +#Creating mesh +incmesh result 0.01 + +#View the result of mesh +triangles result + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +#$tri != 8091 && $nod != 4121,aki251103 +if { $tri != 5853 && $nod != 2999 } { + puts "Shady OCC269: shading problem may be, nb tri & nod changed" +} else { + puts "Shading of OCC269 is OK" +} +set square 32.9479 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug269_2 b/tests/bugs/modalg_2/bug269_2 new file mode 100755 index 0000000000..f56d53058e --- /dev/null +++ b/tests/bugs/modalg_2/bug269_2 @@ -0,0 +1,26 @@ + +puts "======== OCC269 ========" + +restore [locate_data_file OCC269-2.brep] result +checkshape result +isos result 0 +tclean result + +#Creating mesh +incmesh result 0.01 + +#View the result of mesh +triangles result + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +# $tri != 7627 && $nod != 3888,aki251103 +if { $tri != 6849 && $nod != 3498 } { + puts "Shady OCC269: shading problem may be" +} else { + puts "Shading of OCC269 is OK" +} +set square 32.9479 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug269_3 b/tests/bugs/modalg_2/bug269_3 new file mode 100755 index 0000000000..0c73a2ee92 --- /dev/null +++ b/tests/bugs/modalg_2/bug269_3 @@ -0,0 +1,27 @@ + +puts "======== OCC269 ========" + +restore [locate_data_file OCC269-3.brep] result +checkshape result +isos result 0 +tclean result + +#Creating mesh +incmesh result 0.01 + +#View the result of mesh +triangles result + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +# $tri != 7524 && $nod != 3840,aki251103 +if { $tri != 6302 && $nod != 3226 } { + puts "Shady OCC269: shading problem may be, nb tri & nod changed" +} else { + puts "Shading of OCC269 is OK" +} +set square 36.4284 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug269_4 b/tests/bugs/modalg_2/bug269_4 new file mode 100755 index 0000000000..434633696c --- /dev/null +++ b/tests/bugs/modalg_2/bug269_4 @@ -0,0 +1,26 @@ + +puts "======== OCC269 ========" + +restore [locate_data_file OCC269-4.brep] result +checkshape result +isos result 0 +tclean result + +#Creating mesh +incmesh result 0.01 + +#View the result of mesh +triangles result + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +# $tri != 8362 && $nod != 4257 +if { $tri != 7218 && $nod != 3685 } { + puts "Shady OCC269: shading problem may be, nb tri & nod changed" +} else { + puts "Shading of OCC269 is OK" +} +set square 36.4284 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug2785_1 b/tests/bugs/modalg_2/bug2785_1 new file mode 100755 index 0000000000..42b70ffee3 --- /dev/null +++ b/tests/bugs/modalg_2/bug2785_1 @@ -0,0 +1,42 @@ +puts "============" +puts "OCC2785" +puts "============" +puts "" +###################################################### +# Cut and fuse operations for two faces that share same domain give invalid result +###################################################### +# Cut and fuse operations for two faces that share same domain gives invalid +# result, if one face has a hole and other face touches a boundary of this hole. +###################################################### +## (new topology) +## (bcut) +## (bop) +## (boptuc) +## (bfuse) +###################################################### + +############# data ############# +pcylinder c1 2 10 +pcylinder c2 2 2 +explode c1 f +explode c2 f +mksurface gs c2_1 +trim trgs gs 1 2 2 4 +mkface ff trgs +trim trgs gs 0 1 2 4 +mkface ff2 trgs + +bcut rcut1 c1_1 ff +checkshape rcut1 + +bop ff2 rcut1 +boptuc rcut2 +checkshape rcut2 + +bfuse fuse1 rcut2 ff2 +checkshape fuse1 + +bfuse result fuse1 ff + +set square 125.664 +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug2785_2 b/tests/bugs/modalg_2/bug2785_2 new file mode 100755 index 0000000000..93a13db1b3 --- /dev/null +++ b/tests/bugs/modalg_2/bug2785_2 @@ -0,0 +1,40 @@ +puts "============" +puts "OCC2785" +puts "============" +puts "" +###################################################### +# Cut and fuse operations for two faces that share same domain give invalid result +###################################################### +# Cut and fuse operations for two faces that share same domain gives invalid +# result, if one face has a hole and other face touches a boundary of this hole. +###################################################### +## (old topology) +## (cut) +## (fuse) +###################################################### + +############# data ############# +pcylinder c1 2 10 +pcylinder c2 2 2 +explode c1 f +explode c2 f +mksurface gs c2_1 +trim trgs gs 1 2 2 4 +mkface ff trgs +trim trgs gs 0 1 2 4 +mkface ff2 trgs + +bcut rcut1 c1_1 ff +checkshape rcut1 + +bcut rcut2 rcut1 ff2 +checkshape rcut2 + +bfuse fuse1 rcut2 ff2 +checkshape fuse1 + +bfuse result fuse1 ff + +set square 125.664 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_2/bug287 b/tests/bugs/modalg_2/bug287 new file mode 100755 index 0000000000..e7d41ac308 --- /dev/null +++ b/tests/bugs/modalg_2/bug287 @@ -0,0 +1,40 @@ +puts "TODO OCC12345 ALL: Error : The square of result shape is" +puts "TODO OCC12345 ALL: OCC287 : Faulty" + +puts "========================" +puts " OCC287 " +puts "========================" + +restore [locate_data_file shading_170.brep] result +checkshape result + +tclean result +isos result 0 +incmesh result .1 +triangles result + +# set 3dviewer 1 + +set tri 0 +set nod 0 + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +if { $tri != 604 && $nod != 363} { + puts " Warning: OCC287 looks like OK, but visual checking is required !!!!" +} else { + puts "OCC287 : Faulty" +} + +puts "" +puts "Besides, it is impossible to load this shape in 3D Viewer" +vinit +vdisplay result +vfit +vsetdispmode result 1 + +set square 0 +set 3dviewer 0 + diff --git a/tests/bugs/modalg_2/bug291 b/tests/bugs/modalg_2/bug291 new file mode 100755 index 0000000000..e73a69e18a --- /dev/null +++ b/tests/bugs/modalg_2/bug291 @@ -0,0 +1,35 @@ + +puts "================= OCC291 ===================" + +################################################################# +## Some triangles of shading mesh are outside of shape boundaries. (See attached shape). +################################################################# + +restore [locate_data_file shading_171.brep] result +checkshape result + +tclean result +vinit +vdisplay result +vsetdispmode result 1 +vfit + +isos result 0 +triangles result + + set tri 0 + set nod 0 +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +#$tri == 395 && $nod == 350,aki251103. +if { $tri == 382 && $nod == 343 } { + puts " Warning: OCC291 looks like OK, but visual checking is required !" +} else { + puts " Shady OCC291 : nb tri & nod changed" +} + +set square 376.873 +set only_screen 1 + diff --git a/tests/bugs/modalg_2/bug292 b/tests/bugs/modalg_2/bug292 new file mode 100755 index 0000000000..e9b2f8a58b --- /dev/null +++ b/tests/bugs/modalg_2/bug292 @@ -0,0 +1,36 @@ + +puts "========================" +puts " OCC292 " +puts "========================" +puts "" +################################################################# +## Attached face looks as unclosed but command "checkshape" concludes that it is valid. Inspite of that, +## mesh for shading is not creating on this face. +################################################################# + +restore [locate_data_file OCC292.brep] result +checkshape result + +tclean result +vinit +vdisplay result +vsetdispmode result 1 + +isos result 0 +triangles result + + set tri 0 + set nod 0 +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod +if { $tri ==6 && $nod == 8} { + puts " Warning: OCC292 looks like OK, but visual checking is required !!!!" +} else { + puts " OCC292 : Faulty" +} + +set square 1.3135 +set 3dviewer 1 + + diff --git a/tests/bugs/modalg_2/bug293 b/tests/bugs/modalg_2/bug293 new file mode 100755 index 0000000000..692dba4e36 --- /dev/null +++ b/tests/bugs/modalg_2/bug293 @@ -0,0 +1,69 @@ +#by apn on master-master 03.12.2012 +#puts "TODO OCC12345 ALL: An exception was caught" +#puts "TODO OCC12345 ALL: \\*\\* Exception *\\*\\*.*" +#puts "TODO OCC12345 ALL: TEST INCOMPLETE" + +puts "================" +puts "OCC293" +puts "================" +puts "" + +restore [locate_data_file OCC293.brep] a +tclean a +checkshape a + +vinit +#vdisplay a +#vfit + +renamevar a edge +explode edge e + +renamevar edge face +explode face f + +chamf result1 face edge_26 face_5 A 1 45 +checkshape result1 + +chamf result2 face edge_30 face_5 A 1 45 +checkshape result2 + +chamf result3 face edge_34 face_5 A 1 45 +checkshape result3 + +chamf result4 face edge_39 face_5 A 1 45 +checkshape result4 + +chamf result5 face edge_35 face_5 A 1 45 +checkshape result5 + +chamf result6 face edge_31 face_5 A 1 45 +checkshape result6 + +chamf result7 face edge_27 face_5 A 1 45 +checkshape result7 + +chamf result8 face edge_24 face_5 A 1 45 +checkshape result8 + +# all contour is : +#chamf result face edge_26 face_5 A 1 45 edge_28 face_5 A 1 45 edge_30 face_5 A 1 45 edge_32 face_5 A 1 45 edge_34 face_5 A 1 45 edge_36 face_5 A 1 45 edge_38 face_5 A 1 45 edge_40 face_5 A 1 45 edge_13 face_5 A 1 45 edge_14 face_5 A 1 45 edge_39 face_5 A 1 45 edge_37 face_5 A 1 45 edge_35 face_5 A 1 45 edge_33 face_5 A 1 45 edge_31 face_5 A 1 45 edge_29 face_5 A 1 45 edge_27 face_5 A 1 45 edge_6 face_5 A 1 45 edge_4 face_5 A 1 45 edge_19 face_5 A 1 45 edge_22 face_5 A 1 45 edge_23 face_5 A 1 45 edge_24 face_5 A 1 45 edge_25 face_5 A 1 45 edge_26 face_5 A 1 45 + +#checkshape result + +vclear + +#vdisplay result1 +#vdisplay result2 +#vdisplay result3 +#vdisplay result4 +#vdisplay result5 +#vdisplay result6 +#vdisplay result7 +#vdisplay result8 +compound result1 result2 result3 result4 result5 result6 result7 result8 result +vdisplay result +vfit + +set square 9.80214e+06 +set only_screen 1 diff --git a/tests/bugs/modalg_2/bug295 b/tests/bugs/modalg_2/bug295 new file mode 100755 index 0000000000..8c3b82f5e4 --- /dev/null +++ b/tests/bugs/modalg_2/bug295 @@ -0,0 +1,36 @@ +pload QAcommands + +puts "================" +puts "OCC295" +puts "================" +puts "" +############################################################## +## Exception is raised in the GeomConvert_CompCurveToBSplineCurve +##Exception "Run-time exception error +## current exception: xalloc. No handler for exception. +## " is raised during merging to edges in DRAW with command "merge re e1 e2". +############################################################## + +restore [locate_data_file OCC295-1.brep] e1 + +set che [checkshape e1] +if { [regexp {Faulty} $che] == 1} { + puts "Faulty OCC295 (shape1): Source shape is invalid. It was detected by Checkshape command" + puts "Body of the script was NOT executed" + renamevar e1 result +} else { + puts "OCC295 OK (shape1): Source shape is valid" + restore [locate_data_file OCC295-2.brep] e2 + set che [checkshape e2] + if { [regexp {Faulty} $che] == 1} { + puts "Faulty OCC295 (shape2): Source shape is invalid. It was detected by Checkshape command" + puts "Body of the script was NOT executed" + renamevar e2 result + } else { + puts "OCC295 OK (shape2): Source shape is valid" + OCC295 result e1 e2 + } +} + +set length 19.5611 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug297_1 b/tests/bugs/modalg_2/bug297_1 new file mode 100755 index 0000000000..6eeb933b57 --- /dev/null +++ b/tests/bugs/modalg_2/bug297_1 @@ -0,0 +1,34 @@ + +puts "========" +puts "OCC297" +puts "========" + +vertex v1 250 250 0 +vertex v2 -250 250 0 +vertex v3 -250 -250 0 +vertex v4 250 -250 0 + +edge e1 v1 v2 +edge e2 v2 v3 +edge e3 v3 v4 +edge e4 v4 v1 + +wire w1 e1 e2 e3 e4 + +mkplane f w1 + +set x 0 +set y 0 + +set Zpoint -100 +set Zbox -30 + +halfspace hs f $x $y $Zpoint + +box b 0 0 $Zbox 150 200 200 + +bcut result b hs + +set square 179000 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug297_2 b/tests/bugs/modalg_2/bug297_2 new file mode 100755 index 0000000000..9545811e51 --- /dev/null +++ b/tests/bugs/modalg_2/bug297_2 @@ -0,0 +1,33 @@ + +puts "========" +puts "OCC297" +puts "========" + +vertex v1 250 250 0 +vertex v2 -250 250 0 +vertex v3 -250 -250 0 +vertex v4 250 -250 0 + +edge e1 v1 v2 +edge e2 v2 v3 +edge e3 v3 v4 +edge e4 v4 v1 + +wire w1 e1 e2 e3 e4 + +mkplane f w1 + +set x 0 +set y 0 + +set Zpoint 100 +set Zbox -30 + +halfspace hs f $x $y $Zpoint + +box b 0 0 $Zbox 150 200 200 + +bcut result b hs +set square 81000 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug297_3 b/tests/bugs/modalg_2/bug297_3 new file mode 100755 index 0000000000..95b0b951f4 --- /dev/null +++ b/tests/bugs/modalg_2/bug297_3 @@ -0,0 +1,32 @@ + +puts "========" +puts "OCC297" +puts "========" + +vertex v1 250 250 0 +vertex v2 -250 250 0 +vertex v3 -250 -250 0 +vertex v4 250 -250 0 + +edge e1 v1 v2 +edge e2 v2 v3 +edge e3 v3 v4 +edge e4 v4 v1 + +wire w1 e1 e2 e3 e4 + +mkplane f w1 + +set x 0 +set y 0 + +set Zpoint -100 +set Zbox -80 + +halfspace hs f $x $y $Zpoint + +box b 0 0 $Zbox 150 200 200 + +bcut result b hs +set square 144000 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug297_4 b/tests/bugs/modalg_2/bug297_4 new file mode 100755 index 0000000000..9c39fd882d --- /dev/null +++ b/tests/bugs/modalg_2/bug297_4 @@ -0,0 +1,32 @@ + +puts "========" +puts "OCC297" +puts "========" + +vertex v1 250 250 0 +vertex v2 -250 250 0 +vertex v3 -250 -250 0 +vertex v4 250 -250 0 + +edge e1 v1 v2 +edge e2 v2 v3 +edge e3 v3 v4 +edge e4 v4 v1 + +wire w1 e1 e2 e3 e4 + +mkplane f w1 + +set x 0 +set y 0 + +set Zpoint 100 +set Zbox -80 + +halfspace hs f $x $y $Zpoint + +box b 0 0 $Zbox 150 200 200 + +bcut result b hs +set square 116000 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug298 b/tests/bugs/modalg_2/bug298 new file mode 100755 index 0000000000..75d0e848b3 --- /dev/null +++ b/tests/bugs/modalg_2/bug298 @@ -0,0 +1,21 @@ + +puts "========================" +puts " OCC298 " +puts "========================" +puts "" +################################################################# +## Exception during "tcopy" command +################################################################# + +restore [locate_data_file OCC298.brep] result +checkshape result + +if [catch {tcopy result a } result] { + puts "Faulty OCC298: function TCOPY works wrongly" +} else { + puts "OCC298 OK: function TCOPY works properly" +} + +set square 8e+100 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug2986_1 b/tests/bugs/modalg_2/bug2986_1 new file mode 100755 index 0000000000..4201444734 --- /dev/null +++ b/tests/bugs/modalg_2/bug2986_1 @@ -0,0 +1,30 @@ +puts "============" +puts "OCC2986" +puts "============" +puts "" +###################################################### +# Cut&fuse oprs. for 2 toroidal faces, sharing the same domain give invalid result +###################################################### +## (new topology) +## (bop) +## (bopcut) +## (bfuse) +###################################################### + +############# data ############# +ptorus p1 10 4 +explode p1 f +mksurface gs p1_1 +trim trgs gs 1 2 1 2 +mkface ff trgs +############# testing faces are: p1_1 ff ############# + +bop p1_1 ff +bopcut rcut1 +checkshape rcut1 + +bfuse result rcut1 ff + +set square 1579.81 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_2/bug2986_2 b/tests/bugs/modalg_2/bug2986_2 new file mode 100755 index 0000000000..a1f56647c8 --- /dev/null +++ b/tests/bugs/modalg_2/bug2986_2 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC2986" +puts "============" +puts "" +###################################################### +# Cut&fuse oprs. for 2 toroidal faces, sharing the same domain give invalid result +###################################################### +## (old topology) +## (cut) +## (fuse) +###################################################### + +############# data ############# +ptorus p1 10 4 +explode p1 f +mksurface gs p1_1 +trim trgs gs 1 2 1 2 +mkface ff trgs + +bcut rcut1 p1_1 ff +checkshape rcut1 + +bfuse result rcut1 ff + +set square 1579.81 +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug300 b/tests/bugs/modalg_2/bug300 new file mode 100755 index 0000000000..127517613a --- /dev/null +++ b/tests/bugs/modalg_2/bug300 @@ -0,0 +1,37 @@ + +puts "================" +puts "OCC300" +puts "================" +puts "" +################################################# +## Compsolids have no volume. #2432(SAM1380) +################################################# + +restore [locate_data_file OCC300.brep] result + +set che [checkshape result] +if { [regexp {Faulty} $che] == 1 } { + puts "Faulty OCC300: Source shape is invalid. It was detected by Checkshape command" + puts "Body of the script was NOT executed" +} else { + puts "OCC300 OK: Source shape is valid" + + set props [vprops result] + set list [split ${props}] + set listLength [llength ${list}] + if { ${listLength} < 5 } { + puts "OCC300 - Error : listLength= ${listLength}" + } + + regexp {Mass +: +([-0-9.+eE]+)} $props full volume + set maxdelta 0.000001 + if { ${volume} < ${maxdelta} } then { + puts "OCC300 - Error " + } else { + puts "OCC300 - OK" + } + puts "Volume = ${volume}" +} + +set square 750 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug302_1 b/tests/bugs/modalg_2/bug302_1 new file mode 100755 index 0000000000..6ebe5393e8 --- /dev/null +++ b/tests/bugs/modalg_2/bug302_1 @@ -0,0 +1,21 @@ +puts "========================" +puts " OCC302 " +puts "(case 1)" +puts "========================" +puts "" +################################################################# +## After performing command "checkbrep" to attached face I receive "Bad Orientation of Subshape" +## but I believe that orientation of this face is correct. +################################################################# + +restore [locate_data_file OCC302a.brep] result + +set che [checkshape result r] +if { [regexp {OK} $che] != 1} { + puts "Faulty OCC302 (case 1): command checkbrep works wrongly" +} else { + puts "OCC302 OK (case 1) : command checkbrep works properly" +} + +set square 271.611 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug302_2 b/tests/bugs/modalg_2/bug302_2 new file mode 100755 index 0000000000..c6af1775e0 --- /dev/null +++ b/tests/bugs/modalg_2/bug302_2 @@ -0,0 +1,21 @@ +puts "========================" +puts " OCC302 " +puts "(case 2)" +puts "========================" +puts "" +################################################################# +## After performing command "checkbrep" to attached face I receive "Bad Orientation of Subshape" +## but I believe that orientation of this face is correct. +################################################################# + +restore [locate_data_file OCC302b.brep] result + +set che [checkshape result r] +if { [regexp {OK} $che] != 1} { + puts "Faulty OCC302 (case 2): command checkbrep works wrongly" +} else { + puts "OCC302 OK (case 2) : command checkbrep works properly" +} + +set square 1.93998 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug302_3 b/tests/bugs/modalg_2/bug302_3 new file mode 100755 index 0000000000..cc6d332634 --- /dev/null +++ b/tests/bugs/modalg_2/bug302_3 @@ -0,0 +1,21 @@ +puts "========================" +puts " OCC302 " +puts "(case 3)" +puts "========================" +puts "" +################################################################# +## After performing command "checkshape" to attached face I receive "Bad Orientation of Subshape" +## but I believe that orientation of this face is correct. +################################################################# + +restore [locate_data_file OCC302c.brep] result + +set che [checkshape result r] +if { [regexp {OK} $che] !=1 } { + puts "Faulty OCC302 (case 3): command checkshape works wrongly" +} else { + puts "OCC302 OK (case 3) : command checkshape works properly" +} + +set square 23240.8 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug305 b/tests/bugs/modalg_2/bug305 new file mode 100755 index 0000000000..18958b02e2 --- /dev/null +++ b/tests/bugs/modalg_2/bug305 @@ -0,0 +1,83 @@ +puts "TODO OCC12345 ALL: Tcl Exception: result is not a topological shape!!!" +puts "TODO OCC12345 ALL: TEST INCOMPLETE" + +puts "========" +puts "OCC305" +puts "========" +puts "" +###################################################### +# BRepOffsetAPI_MakeOffset: problem with offsetting a wire +###################################################### + +puts "" +puts "Bug's attributes" +puts "################" +puts "" +puts "Customer : Telco" +puts "Channel : External" +puts "Version : 4.0" +puts "OS : IRIX" +puts "Urgency : High" +puts "Type : BUG" +puts "" +puts "Summary: BRepOffsetAPI_MakeOffset: problem with offsetting a wire" +puts "" +puts "Description:" +puts "I am attaching the brep file of a curve, obtained from intersection with a" +puts "plane. Its a planer curve and we want to offset it by the amount which" +puts "is feasible. after trying with all options we were not able to offset it." +puts "But the same wire when we read inside EUCLID3 as well as CATIA it does" +puts "the offset correctly." +puts "" +puts "" +puts "Bug's advancement" +puts "#################" +puts "" +puts "Customer version Development version" +puts "Status : CLOSED Status : CLOSED" +puts "Resolution : NOT Resolution : NOT" +puts "Leave as CLOSED NOT Leave as CLOSED NOT" +puts "" +puts "" +puts "Bug's history" +puts "#############" +puts "" +puts "------- Additional Comments From Igor NAZAROV-BUGMASTER 2002-04-19 16:21 -------" +puts "Dear Sergey," + +puts "Below you will find conclusion of JGV about thia bug" +puts "Bugmaster" +puts " This case can not be done by existing algorithm. It is mathematical" +puts "limitation: the offset may be performed only from at least C1-continuous" +puts "curve, but all the 12 edges of initial wire are based on C0-continuous" +puts "curves." +puts " I may modify the algorithm so that it splits initial edges into" +puts "C1-continuous curves, but then resulting wire will consist of too many" +puts "small edges (in our case the number of edges will increase about 100" +puts "times)." +puts " But user may obtain initial wire more smooth: when he intersects" +puts "something with a plane by command \"section\", he can add the key \"-a\"" +puts "(force approximation)." +puts "" +puts "" + +catch {pload XDE} + +restore [locate_data_file OCC305.brep] a +checkshape a + +if [catch {mkoffset result a 1 0.5 } catch_result] { + puts "Faulty OCC305 : function MKOFFSET works wrongly" +} else { + decho off + set che [checkshape result] + decho on + if { [regexp {This shape seems to be valid} $che] == 1} { + puts "OCC305 OK" + } else { + puts "Faulty OCC305" + } +} +set square 0 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug307_1 b/tests/bugs/modalg_2/bug307_1 new file mode 100755 index 0000000000..2e9110ce2c --- /dev/null +++ b/tests/bugs/modalg_2/bug307_1 @@ -0,0 +1,36 @@ +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_1" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +pload QAcommands + +puts "================" +puts "OCC307" +puts "SAM1265" +puts "================" +puts "" + +restore [locate_data_file OCC307.brep] f + +set che [checkshape f] +if { [regexp {Faulty} $che ] == 1} { + puts "Warning OCC307: Source shape is invalid. It was detected by Checkshape command" +} else { + puts "OCC307 OK: Source shape is valid" +} + +explode f f + +renamevar f w + +explode w w + +OCC307 result1 f_4 w_6 0 +OCC307 result2 f_5 result1 0 + +checkshape result1 +renamevar result2 result + +set square 0 +set 2dviewer 0 + + diff --git a/tests/bugs/modalg_2/bug307_2 b/tests/bugs/modalg_2/bug307_2 new file mode 100755 index 0000000000..98fa95a354 --- /dev/null +++ b/tests/bugs/modalg_2/bug307_2 @@ -0,0 +1,34 @@ +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_1" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +pload QAcommands + +puts "================" +puts "OCC307" +puts "SAM1265" +puts "================" +puts "" + +restore [locate_data_file OCC307.brep] f + +set che [checkshape f] +if { [regexp {Faulty} $che] == 1} { + puts "Warning OCC307: Source shape is invalid. It was detected by Checkshape command" +} else { + puts "OCC307 OK: Source shape is valid" +} + +explode f f + +renamevar f w + +explode w w + +OCC307 result1 f_4 w_6 1 +OCC307 result2 f_5 result1 1 + +checkshape result1 +renamevar result2 result + +set square 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug315 b/tests/bugs/modalg_2/bug315 new file mode 100755 index 0000000000..411b1818db --- /dev/null +++ b/tests/bugs/modalg_2/bug315 @@ -0,0 +1,15 @@ + +puts "================" +puts "OCC315" +puts "================" +puts "" + +restore [locate_data_file OCC315-1.brep] f1 +restore [locate_data_file OCC315-2.brep] f2 +checkshape f1 +checkshape f2 + +bcut result f1 f2 + +set square 58584.1 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug317 b/tests/bugs/modalg_2/bug317 new file mode 100755 index 0000000000..964366bb2c --- /dev/null +++ b/tests/bugs/modalg_2/bug317 @@ -0,0 +1,36 @@ +puts "========================" +puts " OCC317 " +puts "========================" +puts "" +################################################## +## A Solid "so" is valid, whereas wire "so_5" from the solid is not valid. +################################################## + +restore [locate_data_file OCC317.brep] result + +set che [checkshape result] +if { [regexp {Faulty} $che] == 1} { + puts "Faulty OCC317: Source shape is invalid. It was detected by Checkshape command" + puts "Body of the script was NOT executed" +} else { + puts "OCC317 OK: Source shape is valid" + explode result w + + set che [checkshape result_5] + if { [regexp {Faulty} $che] == 1} { + puts "Faulty OCC317: Wire is invalid. It was detected by Checkshape command" + } else { + puts "OCC317 OK : Wire is valid." + } + + set che [checkshape result r] + if { [regexp {OK} $che] != 1 } { + puts "Faulty OCC317: Wire is invalid. It was detected by Checkshape command" + } else { + puts "OCC317 OK : Wire is valid." + } +} + +set square 2104.21 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug318 b/tests/bugs/modalg_2/bug318 new file mode 100755 index 0000000000..07e02d1a59 --- /dev/null +++ b/tests/bugs/modalg_2/bug318 @@ -0,0 +1,22 @@ + +puts "========================" +puts " OCC318 " +puts "========================" +puts "" +################################################## +## Checkshape works wrong with Semi-Infinite Prism (s) +################################################## + +box mb -0.5 -0.5 -0.5 1 1 1 +explode mb F +prism result mb_1 1 0 0 SemiInf + +set che [checkshape result] +if { [regexp {Faulty} $che] == 1} { + puts "Faulty OCC318: Result shape is invalid. It was detected by Checkshape command" +} else { + puts "OCC318 OK: Result shape is valid" +} + +set square 8e+100 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug322 b/tests/bugs/modalg_2/bug322 new file mode 100755 index 0000000000..e8e39e022d --- /dev/null +++ b/tests/bugs/modalg_2/bug322 @@ -0,0 +1,29 @@ +puts "================" +puts "OCC322" +puts "================" +puts "" + +pload QAcommands + +restore [locate_data_file OCC322.brep] a +checkshape a + +sewing result a + +vinit +vdisplay result +vfit + +set x_coord 204 +set y_coord 297 + +checkcolor $x_coord $y_coord 1 1 0 + +set x_coord 251 +set y_coord 232 + +checkcolor $x_coord $y_coord 1 1 0 + +set square 20000 +set only_screen 1 + diff --git a/tests/bugs/modalg_2/bug323 b/tests/bugs/modalg_2/bug323 new file mode 100755 index 0000000000..a2b10acc70 --- /dev/null +++ b/tests/bugs/modalg_2/bug323 @@ -0,0 +1,51 @@ + +puts "================" +puts "OCC323" +puts "OCC229" +puts "================" +puts "" + +restore [locate_data_file OCC323.brep] f +explode f + +decho off +set che [checkshape f_1] +decho on + +if { [regexp {Faulty} $che ] == 1 } { + puts "Warning OCC323 (shape1): Source shape is NOT correct. It was detected by Checkshape command" +} else { + puts "OCC323 OK (shape1): Source shape is valid" +} + +decho off +set che [checkshape f_2] +decho on + +if { [regexp {Faulty} $che ] == 1 } { + puts "Warning OCC323 (shape2): Source shape is NOT correct. It was detected by Checkshape command" +} else { + puts "OCC323 OK (shape2): Source shape is valid" +} + +bsection r f_1 f_2 +checkshape r +puts [checksection r] + +decho off +set che [checkshape f_3] +decho on + +if { [regexp {Faulty} $che ] == 1 } { + puts "Warning OCC323 (shape3): Source shape is invalid. It was detected by Checkshape command" +} else { + puts "OCC323 OK (shape3): Source shape is valid" +} + +bsection result f_1 f_3 + +set length 1 +set 2dviewer 0 + + + diff --git a/tests/bugs/modalg_2/bug327_1 b/tests/bugs/modalg_2/bug327_1 new file mode 100755 index 0000000000..6f8b0d5407 --- /dev/null +++ b/tests/bugs/modalg_2/bug327_1 @@ -0,0 +1,17 @@ +puts "========================" +puts " OCC327 " +puts " case 1 " +puts "========================" + +restore [locate_data_file OCC327a.brep] result + +set che [checkshape result r] +if { [regexp {OK} $che] == 1 } { + puts " OCC327 case 1: OK" +} else { + puts " OCC327 case 1: Faulty" +} + +set square 1477.93 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug327_2 b/tests/bugs/modalg_2/bug327_2 new file mode 100755 index 0000000000..efc3284861 --- /dev/null +++ b/tests/bugs/modalg_2/bug327_2 @@ -0,0 +1,16 @@ +puts "========================" +puts " OCC327 " +puts " case 2 " +puts "========================" + +restore [locate_data_file OCC327b.brep] result + +set che [checkshape result r] +if { [regexp {OK} $che] == 1 } { + puts " OCC327 case 2: OK" +} else { + puts " OCC327 case 2: Faulty" +} + +set square 5674.84 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug327_3 b/tests/bugs/modalg_2/bug327_3 new file mode 100755 index 0000000000..4ddda576c2 --- /dev/null +++ b/tests/bugs/modalg_2/bug327_3 @@ -0,0 +1,16 @@ +puts "========================" +puts " OCC327 " +puts " case 3 " +puts "========================" + +restore [locate_data_file OCC327c.brep] result + +set che [checkshape result r] +if { [regexp {OK} $che] == 1 } { + puts " OCC327 case 3: OK" +} else { + puts " OCC327 case 3: Faulty" +} + +set square 61013.8 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug327_4 b/tests/bugs/modalg_2/bug327_4 new file mode 100755 index 0000000000..348483639c --- /dev/null +++ b/tests/bugs/modalg_2/bug327_4 @@ -0,0 +1,18 @@ +puts "========================" +puts " OCC327 " +puts " case 4 " +puts "========================" + +restore [locate_data_file OCC327d.brep] result + +set che [checkshape result r] +if { [regexp {OK} $che] == 1 } { + puts " OCC327 case 4: OK" +} else { + puts " OCC327 case 4: Faulty" +} + +set square 7793.26 +set 2dviewer 0 + + diff --git a/tests/bugs/modalg_2/bug330 b/tests/bugs/modalg_2/bug330 new file mode 100755 index 0000000000..bdf17c6aff --- /dev/null +++ b/tests/bugs/modalg_2/bug330 @@ -0,0 +1,25 @@ +puts "TODO OCC12345 ALL: Faulty OCC330: Checkshape command works wrongly" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +puts "========================" +puts " OCC330 " +puts "========================" +puts "" +################################################## +## checkshape command consider the shape with incorrect order of tolerance as valid. +################################################## + +restore [locate_data_file OCC330.brep] result + +decho off +set che [checkshape result] +decho on + +if { [regexp {Faulty} $che ] != 1 } { + puts "Faulty OCC330: Checkshape command works wrongly" +} else { + puts "OCC330 OK : Checkshape command works properly" +} + +set square 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug334 b/tests/bugs/modalg_2/bug334 new file mode 100755 index 0000000000..42f6932ba7 --- /dev/null +++ b/tests/bugs/modalg_2/bug334 @@ -0,0 +1,17 @@ + +puts "============" +puts "BUC60928" +puts "OCC334" +puts "============" + +restore [locate_data_file BUC60928.brep] a + +explode a +checkshape a_1 +checkshape a_2 + +bcut result a_2 a_1 + +set square 358258 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug335 b/tests/bugs/modalg_2/bug335 new file mode 100755 index 0000000000..cd19995f86 --- /dev/null +++ b/tests/bugs/modalg_2/bug335 @@ -0,0 +1,20 @@ + +puts "============" +puts "BUC60931" +puts "OCC335" +puts "============" +puts "" +################################################################################# +## It's impossible to make boolean operations (common)for the two solids in the file attached. Samcef Modeler project bug +################################################################################# + +restore [locate_data_file BUC60931.brep] a + +explode a +checkshape a_1 +checkshape a_2 + +bcommon result a_1 a_2 + +set square 22715.9 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug336 b/tests/bugs/modalg_2/bug336 new file mode 100755 index 0000000000..a61d42abae --- /dev/null +++ b/tests/bugs/modalg_2/bug336 @@ -0,0 +1,16 @@ + +puts "============" +puts "BUC60939" +puts "OCC336" +puts "============" + +restore [locate_data_file BUC60939.brep] a + +explode a +checkshape a_1 +checkshape a_2 + +bfuse result a_1 a_2 + +set square 32903.1 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug337 b/tests/bugs/modalg_2/bug337 new file mode 100755 index 0000000000..0d821463b4 --- /dev/null +++ b/tests/bugs/modalg_2/bug337 @@ -0,0 +1,37 @@ + +puts "================" +puts "OCC337" +puts "================" +puts "" +############################################ +## It's impossible to fuse two solids in the file attached. +############################################ + +restore [locate_data_file OCC337_clone1.brep] a +explode a + +set che [checkshape a_1] + +if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty OCC337 (shape 1): Source shape is invalid. It was detected by Checkshape command" + puts "Body of the script was NOT executed" + renamevar a_1 result +} else { + puts "OCC337 OK (shape 1): Source shape is valid" + set che [checkshape a_2] + if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty OCC337 (shape 2): Source shape is invalid. It was detected by Checkshape command" + puts "Body of the script was NOT executed" + renamevar a_2 result + } else { + puts "OCC337 OK (shape 2): Source shape is valid" + bfuse result a_1 a_2 + } +} + +set square 35009.9 +set 2dviewer 0 + + + + diff --git a/tests/bugs/modalg_2/bug338 b/tests/bugs/modalg_2/bug338 new file mode 100755 index 0000000000..6531b2f515 --- /dev/null +++ b/tests/bugs/modalg_2/bug338 @@ -0,0 +1,18 @@ + +puts "========" +puts "BUC60996" +puts "OCC338" +puts "========" +puts "" + +restore [locate_data_file buc60996.brep] b +explode b +checkshape b_1 +checkshape b_2 + +bfuse f1 b_1 b_2 +checkshape f1 +bfuse result b_2 b_1 + +set square 73561.9 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug340 b/tests/bugs/modalg_2/bug340 new file mode 100755 index 0000000000..1ed717a5d3 --- /dev/null +++ b/tests/bugs/modalg_2/bug340 @@ -0,0 +1,13 @@ + +puts "========" +puts "BUC61005" +puts "OCC340" +puts "========" +puts "" + +restore [locate_data_file buc61005.brep] w +checkshape w +revol result w 0 0 0 0 0 1 360 1 + +set square 55795.4 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug341 b/tests/bugs/modalg_2/bug341 new file mode 100755 index 0000000000..12cf04e767 --- /dev/null +++ b/tests/bugs/modalg_2/bug341 @@ -0,0 +1,15 @@ + +puts "========" +puts "BUC61008" +puts "OCC341" +puts "========" +puts "" + +restore [locate_data_file buc61008.brep] w +checkshape w + +mkplane f w +prism result f 0 0 100 + +set square 24991 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug345 b/tests/bugs/modalg_2/bug345 new file mode 100755 index 0000000000..0098a5c926 --- /dev/null +++ b/tests/bugs/modalg_2/bug345 @@ -0,0 +1,16 @@ + +puts "================" +puts "BUC61048" +puts "OCC345" +puts "================" +puts "" +############################################ +## Command sameparametr in DRAW hangs on attached edge. +############################################ + +restore [locate_data_file OCC345.brep] result + +sameparameter result +set length 3.89067 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug347_1 b/tests/bugs/modalg_2/bug347_1 new file mode 100755 index 0000000000..3471512529 --- /dev/null +++ b/tests/bugs/modalg_2/bug347_1 @@ -0,0 +1,31 @@ + +puts "========================" +puts " BUC60959 " +puts " OCC347 " +puts " (case 1) " +puts "========================" + +restore [locate_data_file OCC347a.brep] result +checkshape result + +tclean result +vinit +vdisplay result +vfit +vsetdispmode result 1 +set 3dviewer 1 + +set tri 0 +set nod 0 +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +if { $tri == 72 && $nod == 74} { + puts " OCC347 case 1: OK" +} else { + puts " OCC347 case 1: Faulty" +} + +set square 314.159 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug347_2 b/tests/bugs/modalg_2/bug347_2 new file mode 100755 index 0000000000..635521d079 --- /dev/null +++ b/tests/bugs/modalg_2/bug347_2 @@ -0,0 +1,32 @@ + +puts "========================" +puts " BUC60959 " +puts " OCC347 " +puts " (case 2) " +puts "========================" + +restore [locate_data_file OCC347b.brep] result +checkshape result + +tclean result +vinit +vdisplay result +vfit +vsetdispmode result 1 +set 3dviewer 1 + +set tri 0 +set nod 0 +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +if { $tri == 71 && $nod == 73} { + puts " OCC347 case 2: OK" +} else { + puts " OCC347 case 2: Faulty" +} + +set square 100.531 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug356 b/tests/bugs/modalg_2/bug356 new file mode 100755 index 0000000000..86563ed5d4 --- /dev/null +++ b/tests/bugs/modalg_2/bug356 @@ -0,0 +1,36 @@ + +puts "================" +puts "OCC356" +puts "================" +puts "" +####################################################### +## The Draw command "wexplo" gives one edge instead of 6 for the face. +####################################################### + +restore [locate_data_file OCC356.brep] result +checkshape result + +explode result w + +wexplo result_1 result + +set nom 0 +set j 1 +repeat 10 { + set err "" + regexp { is a shape ([A-Z]+)} [whatis WEDGE_$j] full err + if { $err != "EDGE"} { + break + } else { + set nom [expr $nom + 1] + } + incr j +} +if { $nom != 6} { + puts "Faulty OCC356 : Command WEXPLO works WRONGLY" +} else { + puts "OCC356 OK : Command WEXPLO works properly" +} + +set square 6207.83 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug357 b/tests/bugs/modalg_2/bug357 new file mode 100755 index 0000000000..6477a5567c --- /dev/null +++ b/tests/bugs/modalg_2/bug357 @@ -0,0 +1,20 @@ + +puts "========" +puts "OCC357" +puts "BUC60970" +puts "========" + +restore [locate_data_file buc60970a.brep] a +checkshape a +## small/brep/OCC358a.brep - second shape +restore [locate_data_file OCC358a.brep] b +checkshape b + +if { [catch { pipe result a b } catch_result] } { + puts "$catch_result" +} + +set square 44761.1 +set 2dviewer 0 + + diff --git a/tests/bugs/modalg_2/bug358 b/tests/bugs/modalg_2/bug358 new file mode 100755 index 0000000000..086df9f7b2 --- /dev/null +++ b/tests/bugs/modalg_2/bug358 @@ -0,0 +1,40 @@ +puts "========================" +puts " BUC60977 " +puts " OCC358 " +puts "========================" +##### +puts "The helical pipe is not shaded in AISViewer" +##### + +restore [locate_data_file OCC358a.brep] f +checkshape f + +restore [locate_data_file OCC358b.brep] w +checkshape w + +pipe result w f + +vinit +vdisplay result +vfit +vsetdispmode result 1 +# checkshape res +# maxtolerance res + +set tri 0 +set nod 0 + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +if { $tri == 12966 && $nod == 6896} { + puts " OCC358 looks like OK" +} else { + puts [format " tri= %s nod= %s " $tri $nod] + puts " OCC358 : Shady (bad shading)" +} + +set square 24861.2 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug369 b/tests/bugs/modalg_2/bug369 new file mode 100755 index 0000000000..c514c42830 --- /dev/null +++ b/tests/bugs/modalg_2/bug369 @@ -0,0 +1,20 @@ +pload QAcommands + +puts "========" +puts "OCC369" +puts "BUC61031" +puts "========" +puts "" +################################################################# +## BndLib_Add3dCurve raised an exception on edges which range is out of the domain of the curve. +################################################################# + +restore [locate_data_file OCC369.brep] result +OCC369 result + +set square 0.077223 +set 2dviewer 0 + + + + diff --git a/tests/bugs/modalg_2/bug395 b/tests/bugs/modalg_2/bug395 new file mode 100755 index 0000000000..338806cbe7 --- /dev/null +++ b/tests/bugs/modalg_2/bug395 @@ -0,0 +1,37 @@ +pload QAcommands + +puts "================" +puts "OCC395" +puts "SAM1296" +puts "================" +puts "" +############################################################## +## After merge two edges with help GeomConvert_CompCurveToBSplineCurve result is bad. +############################################################## + +restore [locate_data_file OCC395-1.brep] e1 + +set che [checkshape e1] +if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty OCC395: Source shape is invalid. It was detected by Checkshape command" + puts "Body of the script was NOT executed" + renamevar e1 result +} else { + puts "OCC395 OK: Source shape is valid" + + restore [locate_data_file OCC395-2.brep] e2 + set che [checkshape e2] + if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty OCC395: Source shape is invalid. It was detected by Checkshape command" + puts "Body of the script was NOT executed" + renamevar e2 result + } else { + puts "OCC395 OK: Source shape is valid" + OCC395 result e1 e2 + } +} + +set length 34.9073 +set 2dviewer 0 + + diff --git a/tests/bugs/modalg_2/bug397 b/tests/bugs/modalg_2/bug397 new file mode 100755 index 0000000000..63aed4de49 --- /dev/null +++ b/tests/bugs/modalg_2/bug397 @@ -0,0 +1,33 @@ +puts "========================" +puts " OCC397 " +puts "========================" + +pload QAcommands + +restore [locate_data_file OCC397.brep] a +checkshape a + +tclean a +explode a f +renamevar a_55 result + +vinit +vdisplay result +vfit +vsetdispmode result 1 + +set x_coord 235 +set y_coord 180 + +checkcolor $x_coord $y_coord 0.5 0.35 0.05 + +if { ${stat} != 1 } { + puts "Error : Shading is missing in 3D Viewer" +} + +vselect 220 170 + +set square 92.9029 +set only_screen 1 + + diff --git a/tests/bugs/modalg_2/bug397_1 b/tests/bugs/modalg_2/bug397_1 new file mode 100755 index 0000000000..2df65432f6 --- /dev/null +++ b/tests/bugs/modalg_2/bug397_1 @@ -0,0 +1,37 @@ +puts "TODO OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" +puts "TODO OCC11111 ALL: Error : The square of result shape is" + +puts "================" +puts "OCC397" +puts "================" +puts "" +####################################################################################### +# One face from IGES is not shaded +###################################################################################### + +set BugNumber OCC8370 + +catch { pload XDE } + +igesread [locate_data_file Amino_komatsu.igs] result * + +set square 25310.8 + +set nb_v_good 5060 +set nb_e_good 5105 +set nb_w_good 416 +set nb_f_good 399 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 10981 + +vinit +tclean result +vsetdispmode 1 +vdisplay result +vfit + +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug398 b/tests/bugs/modalg_2/bug398 new file mode 100755 index 0000000000..829c95cb9e --- /dev/null +++ b/tests/bugs/modalg_2/bug398 @@ -0,0 +1,24 @@ +#INTERFACE IGES +puts "========" +puts "OCC398" +puts "========" +puts "" +############################################################# +## ShapeHealing modification 1:1 increases number of unique shapes in compound structure. +############################################################# + +pload XDE + +restore [locate_data_file OCC398.brep] a +#statsh a +#nbshapes a +#Statshape should give 3 solids +#Nbshape should return 1 solid + +scaleshape result a 10 + +#statsh res + +set nb_sol_good 1 +set square 180000. +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug399 b/tests/bugs/modalg_2/bug399 new file mode 100755 index 0000000000..1a4f9fc8b0 --- /dev/null +++ b/tests/bugs/modalg_2/bug399 @@ -0,0 +1,29 @@ +if { [array get env os_type] != "" } { + set os $env(os_type) +} +if { [string compare $os "windows"] != 0 } { + puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_2" + puts "TODO OCC12345 ALL: Faulty OCC399: Command checkshape works wrongly: Source shape is invalid but this shape must be OK" +### by apn master 16.12.2012 +### puts "TODO OCC12345 ALL: Error : The square of result shape is" +} + +puts "========" +puts "OCC399" +puts "========" +puts "" +######################################### +## Checkshape gives wrong result for valid face +######################################### + +restore [locate_data_file OCC399.brep] result + +set che [checkshape result] +if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty OCC399: Command checkshape works wrongly: Source shape is invalid but this shape must be OK" +} else { + puts "OCC399 OK : Source shape is valid. Command checkshape works properly." +} + +set square 4558.53 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug400 b/tests/bugs/modalg_2/bug400 new file mode 100755 index 0000000000..fcdc4131a4 --- /dev/null +++ b/tests/bugs/modalg_2/bug400 @@ -0,0 +1,31 @@ +puts "TODO OCC11111 ALL: OCC358 : Faulty" +puts "TODO OCC11111 ALL: Error : The square of result shape is" + +puts "========================" +puts " OCC400 " +puts "========================" + +restore [locate_data_file OCC400.brep] result + +tclean result +isos result 0 + +vinit +vdisplay result +vfit +vsetdispmode result 1 + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +if { $tri == 66 && $nod ==70} { + puts " Warning: OCC358 looks like OK, but visual checking is required !!!!" +} else { + puts "OCC358 : Faulty , but visual checking is required !!!!" +} + +set square 0 +set 3dviewer 1 + + diff --git a/tests/bugs/modalg_2/bug400_1 b/tests/bugs/modalg_2/bug400_1 new file mode 100755 index 0000000000..7b3819a08a --- /dev/null +++ b/tests/bugs/modalg_2/bug400_1 @@ -0,0 +1,31 @@ +puts "========================" +puts "OCC400" +puts "========================" +puts "" +####################################################################### +# Wrong triangulation of faces +####################################################################### + +set BugNumber OCC400 + +restore [locate_data_file OCC400.brep] result + +set square 6607.38 + +set nb_v_good 26 +set nb_e_good 26 +set nb_w_good 2 +set nb_f_good 2 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 57 + +vinit +tclean result +vsetdispmode 1 +vdisplay result +vfit + +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug405 b/tests/bugs/modalg_2/bug405 new file mode 100755 index 0000000000..612f2ba75c --- /dev/null +++ b/tests/bugs/modalg_2/bug405 @@ -0,0 +1,27 @@ +pload QAcommands + +puts "================" +puts "OCC405" +puts "OCC435" +puts "SAM1296" +puts "================" +puts "" + +restore [locate_data_file OCC395-1.brep] e1 +restore [locate_data_file OCC405-2.brep] e2 + +checkshape e1 +checkshape e2 + +OCC405 result e1 e2 + +regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection result] full num + +if { $num == 2 } { + puts "OCC405 OK : Result shape is CORRECT !!! " +} else { + puts " Faulty OCC405: Result shape is INcorrect !!! " +} + +set length 17.5348 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug406 b/tests/bugs/modalg_2/bug406 new file mode 100755 index 0000000000..57f14706c3 --- /dev/null +++ b/tests/bugs/modalg_2/bug406 @@ -0,0 +1,23 @@ +puts "TODO OCC12345 ALL: Faulty OCC406: Command checkshape works wrongly: Source shape looks invalid" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +puts "========" +puts "OCC406" +puts "========" +puts "" +######################################### +## Checkshape says face is Ok, but it looks invalid +######################################### + +restore [locate_data_file OCC406.brep] result + +set che [checkshape result] + +if { [regexp {Faulty} $che ] != 1 } { + puts "Faulty OCC406: Command checkshape works wrongly: Source shape looks invalid" +} else { + puts "OCC406 OK : Source shape is invalid. Command checkshape works properly." +} + +set square 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug407_1 b/tests/bugs/modalg_2/bug407_1 new file mode 100755 index 0000000000..17da337994 --- /dev/null +++ b/tests/bugs/modalg_2/bug407_1 @@ -0,0 +1,18 @@ + +puts "========================" +puts " OCC407 " +puts "(case 1)" +puts "========================" +puts "" + +pcylinder b1 1 4 +pcylinder b2 1 4 +trotate b2 0 0 2 1 0 0 90 +trotate b2 0 0 2 0 1 0 60 + +bfuse result b2 b1 +checkshape -top result + +set square 46.8319 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug407_2 b/tests/bugs/modalg_2/bug407_2 new file mode 100755 index 0000000000..3d925fce6b --- /dev/null +++ b/tests/bugs/modalg_2/bug407_2 @@ -0,0 +1,18 @@ + +puts "========================" +puts " OCC407 " +puts "(case 2)" +puts "========================" +puts "" + +pcylinder b1 1 4 +pcylinder b2 1 4 +trotate b2 0 0 2 1 0 0 90 +trotate b2 0 0 2 0 1 0 60 + +bcut result b2 b1 +checkshape -top result + +set square 31.4159 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug409 b/tests/bugs/modalg_2/bug409 new file mode 100755 index 0000000000..f7e42168cf --- /dev/null +++ b/tests/bugs/modalg_2/bug409 @@ -0,0 +1,16 @@ + +puts "========================" +puts " OCC409 " +puts "========================" +puts "" + +restore [locate_data_file f2] b1 +checkshape b1 + +restore [locate_data_file f6] b2 +checkshape b2 + +bcommon result b1 b2 + +set square 45.5929 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug410_1 b/tests/bugs/modalg_2/bug410_1 new file mode 100755 index 0000000000..80d03e0dc2 --- /dev/null +++ b/tests/bugs/modalg_2/bug410_1 @@ -0,0 +1,17 @@ + +puts "========================" +puts " OCC410 " +puts "(case 1)" +puts "========================" +puts "" + +restore [locate_data_file f7] b1 +checkshape b1 + +restore [locate_data_file f3] b2 +checkshape b2 + +bcommon result b1 b2 + +set square 63.4508 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug410_2 b/tests/bugs/modalg_2/bug410_2 new file mode 100755 index 0000000000..3e4a1d3bda --- /dev/null +++ b/tests/bugs/modalg_2/bug410_2 @@ -0,0 +1,18 @@ + +puts "========================" +puts " OCC410 " +puts "(case 2)" +puts "========================" +puts "" + +restore [locate_data_file f7] b1 +checkshape b1 + +restore [locate_data_file f3] b2 +checkshape b2 + +bfuse result b1 b2 + +set square 172.169 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug410_3 b/tests/bugs/modalg_2/bug410_3 new file mode 100755 index 0000000000..15426fb5a4 --- /dev/null +++ b/tests/bugs/modalg_2/bug410_3 @@ -0,0 +1,17 @@ + +puts "========================" +puts " OCC410 " +puts "(case 3)" +puts "========================" +puts "" + +restore [locate_data_file f7] b1 +checkshape b1 + +restore [locate_data_file f3] b2 +checkshape b2 + +bcut result b1 b2 + +set square 15.0891 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug410_4 b/tests/bugs/modalg_2/bug410_4 new file mode 100755 index 0000000000..7e71d71212 --- /dev/null +++ b/tests/bugs/modalg_2/bug410_4 @@ -0,0 +1,22 @@ + +puts "========================" +puts " OCC410 " +puts "(case 4)" +puts "========================" +puts "" + +restore [locate_data_file f7] b1 +checkshape b1 + +restore [locate_data_file f3] b2 +checkshape b2 + + +if [catch {bcut result b2 b1 } result] { + puts "Faulty OCC410: function CUT works wrongly" +} else { + puts " OCC410 OK: function CUT works properly" +} + +set square 93.6289 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug411 b/tests/bugs/modalg_2/bug411 new file mode 100755 index 0000000000..f409769c0f --- /dev/null +++ b/tests/bugs/modalg_2/bug411 @@ -0,0 +1,16 @@ + +puts "========================" +puts " OCC411 " +puts "========================" +puts "" + +restore [locate_data_file f4] b1 +checkshape b1 + +restore [locate_data_file f5] b2 +checkshape b2 + +bfuse result b1 b2 + +set square 314.159 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug412 b/tests/bugs/modalg_2/bug412 new file mode 100755 index 0000000000..613ffa282a --- /dev/null +++ b/tests/bugs/modalg_2/bug412 @@ -0,0 +1,16 @@ + +puts "========================" +puts " OCC412 " +puts "========================" +puts "" + +restore [locate_data_file f2] b1 +checkshape b1 + +restore [locate_data_file f3] b2 +checkshape b2 + +bcut result b1 b2 + +set square 43.6332 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug413_1 b/tests/bugs/modalg_2/bug413_1 new file mode 100755 index 0000000000..1d86ff3986 --- /dev/null +++ b/tests/bugs/modalg_2/bug413_1 @@ -0,0 +1,17 @@ + +puts "========================" +puts " OCC413 " +puts "(case 1)" +puts "========================" +puts "" + +restore [locate_data_file so1] b1 +checkshape b1 + +restore [locate_data_file so4] b2 +checkshape b2 + +bcommon result b1 b2 + +set square 549.779 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug413_2 b/tests/bugs/modalg_2/bug413_2 new file mode 100755 index 0000000000..09c35acdfc --- /dev/null +++ b/tests/bugs/modalg_2/bug413_2 @@ -0,0 +1,17 @@ + +puts "========================" +puts " OCC413 " +puts "(case 2)" +puts "========================" +puts "" + +restore [locate_data_file so1] b1 +checkshape b1 + +restore [locate_data_file so4] b2 +checkshape b2 + +bcut result b1 b2 + +set square 863.938 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug415 b/tests/bugs/modalg_2/bug415 new file mode 100755 index 0000000000..ed71398f33 --- /dev/null +++ b/tests/bugs/modalg_2/bug415 @@ -0,0 +1,32 @@ + +puts "========================" +puts " OCC415 " +puts "PRO5557" +puts "========================" +puts "" + +restore [locate_data_file pro5557_revol.brep] revol1 +checkshape revol1 +restore [locate_data_file pro5557_bsurf.brep] bsurf2 +checkshape bsurf2 + +zoom 660 +normals bsurf2 0.27 +point pnt1 0 -0.3 0 +halfspace space2 bsurf2 0 -0.3 0 + +bcut result revol1 space2 + +set testinfos(info) \ + "pro5557 : cut a cylinder by an infinite surface extrusion" +set testinfos(infoX) -0.2 +set testinfos(infoY) -0.2 +set testinfos(infoZ) -0.34 +set testinfos(infoZ2) -0.3 + +checkshape -top result + +set square 0.402138 +set 2dviewer 0 + + diff --git a/tests/bugs/modalg_2/bug416 b/tests/bugs/modalg_2/bug416 new file mode 100755 index 0000000000..82e9091d50 --- /dev/null +++ b/tests/bugs/modalg_2/bug416 @@ -0,0 +1,21 @@ + +puts "========================" +puts " OCC416 " +puts "CTS19305" +puts "========================" +puts "" + +restore [locate_data_file CTO900_cts19305-part.rle] part +checkshape part + +restore [locate_data_file CTO900_cts19305-tool.rle] tool +checkshape tool + +bcut result part tool + +checkshape -top result + +set square 76632.9 +set 2dviewer 0 + + diff --git a/tests/bugs/modalg_2/bug417 b/tests/bugs/modalg_2/bug417 new file mode 100755 index 0000000000..4fc8bbce44 --- /dev/null +++ b/tests/bugs/modalg_2/bug417 @@ -0,0 +1,17 @@ + +puts "========================" +puts " OCC417 " +puts "CTS21128" +puts "========================" +puts "" + +restore [locate_data_file cts21128c.rle] c +checkshape c + +restore [locate_data_file cts21128d.rle] d +checkshape d + +bcut result c d + +set square 2814.01 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug418_1 b/tests/bugs/modalg_2/bug418_1 new file mode 100755 index 0000000000..5eca381a1a --- /dev/null +++ b/tests/bugs/modalg_2/bug418_1 @@ -0,0 +1,22 @@ + +puts "========================" +puts " OCC418 " +puts "CTS20370" +puts "(case 1)" +puts "========================" +puts "" + +restore [locate_data_file CTO904_cts20370-part.rle] part +checkshape part + +restore [locate_data_file cts20370-tool.rle] tool +checkshape tool + +bsection sec part tool +checkshape -top sec + +bcut result part tool +checkshape -top result + +set square 273365. +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug418_2 b/tests/bugs/modalg_2/bug418_2 new file mode 100755 index 0000000000..4ddd04b4c8 --- /dev/null +++ b/tests/bugs/modalg_2/bug418_2 @@ -0,0 +1,22 @@ + +puts "========================" +puts " OCC418 " +puts "CTS20370" +puts "(case 2)" +puts "========================" +puts "" + +restore [locate_data_file CTO904_cts20370-part.rle] a +checkshape a + +restore [locate_data_file cts20370-tool.rle] b +checkshape b + +bsection sec a b + +bfuse result a b +checkshape -top result + +set square 261265. +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug419 b/tests/bugs/modalg_2/bug419 new file mode 100755 index 0000000000..dc8e9d4a15 --- /dev/null +++ b/tests/bugs/modalg_2/bug419 @@ -0,0 +1,22 @@ +# Original bug : + +puts "========================" +puts " OCC419 " +puts "FRA50047" +puts "========================" +puts "" + +restore [locate_data_file CTO904_fra50047a.rle] a +checkshape a + +restore [locate_data_file fra50047b.rle] b +checkshape b + +bsection sec a b +checkshape -top sec + +bfuse result a b +checkshape -top result + +set square 508496. +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug420 b/tests/bugs/modalg_2/bug420 new file mode 100755 index 0000000000..580852589e --- /dev/null +++ b/tests/bugs/modalg_2/bug420 @@ -0,0 +1,25 @@ +puts "TODO OCC12345 ALL: Error : The square of result shape is" +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" + +puts "========================" +puts " OCC420 " +puts "PRO12473" +puts "========================" +puts "" + +restore [locate_data_file CTO909_objects.brep] a +checkshape a + +restore [locate_data_file CTO909_tool_4.brep] b +checkshape b + +bsection sec a b +puts [checksection sec] +checkshape sec +explode a so +renamevar a_1 a + +bcut result a b + +set square 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug421 b/tests/bugs/modalg_2/bug421 new file mode 100755 index 0000000000..b8be0ec45c --- /dev/null +++ b/tests/bugs/modalg_2/bug421 @@ -0,0 +1,18 @@ + +puts "========================" +puts " OCC421 " +puts "========================" +puts "" + +profile p c 5 180 l 5 t 0 5 d -1 0 c 5 180 l 5 +polyline w 0 0 0 0 0 10 +pipe p w p +nexplode p f + +depouille result p 0 0 1 p_1 5 0 0 0 0 0 1 \ +p_7 1 0 0 0 0 0 1 \ +p_8 5 0 0 0 0 0 1 \ +p_2 1 0 0 0 0 0 1 + +set square 659.647 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug422_1 b/tests/bugs/modalg_2/bug422_1 new file mode 100755 index 0000000000..e7cb936edb --- /dev/null +++ b/tests/bugs/modalg_2/bug422_1 @@ -0,0 +1,19 @@ + +puts "========================" +puts " OCC422 " +puts "(case 1)" +puts "========================" +puts "" + +plane p 0 0 0 0 0 1 -1 0 0 +psphere p p 20 0 90 +#profile pf o -4 -4 1 l 8 d 0 1 l 8 d -1 0 l 8 +profile pf o -4 -4 1 l 8 c 2 90 l 8 d -1 0 l 8 +prism p2 pf 0 0 40 +bfuse f p p2 +nexplode f f + +depouille result f 0 0 1 f_7 5 0 0 40 0 0 1 + +set square 4630.78 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug422_2 b/tests/bugs/modalg_2/bug422_2 new file mode 100755 index 0000000000..f5a230891d --- /dev/null +++ b/tests/bugs/modalg_2/bug422_2 @@ -0,0 +1,19 @@ + +puts "========================" +puts " OCC422 " +puts "(case 2)" +puts "========================" +puts "" + +plane ps 10 -3 0 1 0 0 0 .2 1 +psphere ps ps 20 +profile pf o 5 1 5 l 10 c 2 90 l 5 d -1 0 \ +l 14 d 0 -1 l 5 c 2 90 +prism pr pf 0 0 30 +bfuse f ps pr +nexplode f f + +depouille result f 0 0 1 f_4 4 0 0 30 0 0 1 + +set square 5719.09 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug423_1 b/tests/bugs/modalg_2/bug423_1 new file mode 100755 index 0000000000..be5b56e832 --- /dev/null +++ b/tests/bugs/modalg_2/bug423_1 @@ -0,0 +1,27 @@ + +puts "========================" +puts " OCC423 " +puts "(case 1)" +puts "========================" +puts "" + +restore [locate_data_file cylindre.rle] cyl +checkshape cyl + +restore [locate_data_file contour.rle] cont +checkshape cont + +mkplane cont cont +nexplode cyl F + +ttranslate cont 0 200 0 +featdprism cyl cont cont 10 1 1 + +if [catch {featperformval dprism result 55 cyl_3 } catch_result] { + puts "Faulty OCC423 (case 1): function FEATPERFORMVAL works wrongly" +} else { + puts "OCC423 OK (case 1): function FEATPERFORMVAL works properly" +} + +set square 94944.4 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug423_2 b/tests/bugs/modalg_2/bug423_2 new file mode 100755 index 0000000000..b56c0977d0 --- /dev/null +++ b/tests/bugs/modalg_2/bug423_2 @@ -0,0 +1,23 @@ + +puts "========================" +puts " OCC423 " +puts "(case 2)" +puts "========================" +puts "" + +restore [locate_data_file pro15515_base.rle] base +checkshape base + +restore [locate_data_file pro15515_face.rle] cont +checkshape cont + +explode base face +copy base_4 ffrom +copy base_3 funtil + +### From Until +featrevol base cont cont 54.06494140625 70.2841796875 0 0 0 1 1 1 +featperform revol result funtil ffrom + +set square 560028. +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug424_1 b/tests/bugs/modalg_2/bug424_1 new file mode 100755 index 0000000000..81ed440127 --- /dev/null +++ b/tests/bugs/modalg_2/bug424_1 @@ -0,0 +1,21 @@ + +puts "========================" +puts " OCC424 " +puts "(case 1)" +puts "========================" +puts "" + +restore [locate_data_file CFE_e_lonfzx.rle] E +nexplode E f + +profile cont S E_10 F 50 -100 X 50 Y -100 X -50 +featdprism E cont E_10 10 1 1 + +if [catch {featperform dprism result E_5 E_6 } catch_result] { + puts "Faulty OCC424 (case 1): function FEATPERFORM works wrongly" +} else { + puts "OCC424 OK (case 1): function FEATPERFORM works properly" +} + +set square 978236. +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug424_2 b/tests/bugs/modalg_2/bug424_2 new file mode 100755 index 0000000000..4c46214524 --- /dev/null +++ b/tests/bugs/modalg_2/bug424_2 @@ -0,0 +1,21 @@ + +puts "========================" +puts " OCC424 " +puts "(case 2)" +puts "========================" +puts "" + +restore [locate_data_file CFE_e_lonfzx.rle] E +nexplode E f + +profile cont S E_10 F 50 -100 X 50 Y -100 X -50 +featdprism E cont E_10 10 1 1 + +if [catch {featperform dprism result } catch_result] { + puts "Faulty OCC424 (case 2): function FEATPERFORM works wrongly" +} else { + puts "OCC424 OK (case 2): function FEATPERFORM works properly" +} + +set square 978236. +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug426 b/tests/bugs/modalg_2/bug426 new file mode 100755 index 0000000000..7f335447f8 --- /dev/null +++ b/tests/bugs/modalg_2/bug426 @@ -0,0 +1,34 @@ +if {[array get env os_type] != ""} { + set os $env(os_type) +} +if {[string compare $os "windows"] != 0 } { + puts "TODO OCC12345 ALL: Exception" + puts "TODO OCC12345 ALL: An exception was caught" + puts "TODO OCC12345 ALL: TEST INCOMPLETE" +} + +pload QAcommands + +puts "========" +puts "OCC426" +puts "OCC50" +puts "========" +############################################################################# +## The result of fuse operation is invalid +############################################################################# +## BRepFilletAPI_MakeFillet presents a bug on fillet computation (build()) +############################################################################# +## (old topology) +############################################################################# + +OCC426 result rs1 rs2 rs3 fuse32 fuse321 0 + +checkshape rs1 +checkshape rs2 +checkshape rs3 +checkshape fuse32 +checkshape fuse321 + +set square 7507.61 +set 2dviewer 1 + diff --git a/tests/bugs/modalg_2/bug426_1 b/tests/bugs/modalg_2/bug426_1 new file mode 100755 index 0000000000..a6b43d1b9f --- /dev/null +++ b/tests/bugs/modalg_2/bug426_1 @@ -0,0 +1,26 @@ +puts "TODO OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO OCC11111 ALL: Error : The square of result shape is" + +pload QAcommands + +puts "========" +puts "OCC426" +puts "OCC50" +puts "========" +############################################################################# +## The result of fuse operation is invalid +############################################################################# +## BRepFilletAPI_MakeFillet presents a bug on fillet computation (build()) +############################################################################# + +OCC426 result rs1 rs2 rs3 fuse32 fuse321 + +checkshape rs1 +checkshape rs2 +checkshape rs3 +checkshape fuse32 +checkshape fuse321 + +set square 7507.61 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_2/bug427_1 b/tests/bugs/modalg_2/bug427_1 new file mode 100755 index 0000000000..3366b36c8f --- /dev/null +++ b/tests/bugs/modalg_2/bug427_1 @@ -0,0 +1,26 @@ + +puts "=========" +puts " OCC427 " +puts "(case 1)" +puts "=========" +puts "" +cpulimit 1200 +proc OFFSETSHAPE {distance faces calcul type} { + uplevel #0 explode s f + uplevel #0 offsetparameter 1e-7 $calcul $type + uplevel #0 offsetload s $distance $faces + uplevel #0 offsetperform result +} + +#Shell no rough and rounded mode + +set calcul "c" +set type "i" + +pcone s 9 4 15 90 +trotate s 0 0 0 0 0 1 90 + +OFFSETSHAPE 1 {} $calcul $type + +set square 671.382 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug427_2 b/tests/bugs/modalg_2/bug427_2 new file mode 100755 index 0000000000..785a8dd3dd --- /dev/null +++ b/tests/bugs/modalg_2/bug427_2 @@ -0,0 +1,26 @@ + +puts "========================" +puts " OCC427 " +puts "(case 2)" +puts "========================" +puts "" +cpulimit 1200 +proc OFFSETSHAPE {distance faces calcul type} { + uplevel #0 explode s f + uplevel #0 offsetparameter 1e-7 $calcul $type + uplevel #0 offsetload s $distance $faces + uplevel #0 offsetperform result +} + +#Shell no rough and rounded mode + +set calcul "c" +set type "i" + +pcone s 9 4 15 90 +trotate s 0 0 0 0 0 1 90 + +OFFSETSHAPE 1 {s_5} $calcul $type + +set square 858.167 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug427_3 b/tests/bugs/modalg_2/bug427_3 new file mode 100755 index 0000000000..e260fb5023 --- /dev/null +++ b/tests/bugs/modalg_2/bug427_3 @@ -0,0 +1,26 @@ + +puts "========================" +puts " OCC427 " +puts "(case 3)" +puts "========================" +puts "" +cpulimit 1200 +proc OFFSETSHAPE {distance faces calcul type} { + uplevel #0 explode s f + uplevel #0 offsetparameter 1e-7 $calcul $type + uplevel #0 offsetload s $distance $faces + uplevel #0 offsetperform result +} + +#Shell no rough and rounded mode + +set calcul "c" +set type "i" + +pcone s 9 4 15 90 +trotate s 0 0 0 0 0 1 90 + +OFFSETSHAPE 1 {s_2 s_3} $calcul $type + +set square 885.688 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug427_4 b/tests/bugs/modalg_2/bug427_4 new file mode 100755 index 0000000000..010e2aa3ed --- /dev/null +++ b/tests/bugs/modalg_2/bug427_4 @@ -0,0 +1,30 @@ + +puts "========================" +puts " OCC427 " +puts "(case 4)" +puts "========================" +puts "" +cpulimit 1200 +proc OFFSETSHAPE {distance faces calcul type} { + uplevel #0 explode s f + uplevel #0 offsetparameter 1e-7 $calcul $type + uplevel #0 offsetload s $distance $faces + uplevel #0 offsetperform result +} + +#Shell no rough and rounded mode + +set calcul "c" +set type "i" + +circle w -20 0 0 20 +mkedge w w 0 pi*2/5 +wire w w +polyline profile 0 0 0 10 0 0 5 0 5 0 0 0 +mkplane profile profile +pipe s w profile + +OFFSETSHAPE 1 {} $calcul $type + +set square 1306.3 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug427_5 b/tests/bugs/modalg_2/bug427_5 new file mode 100755 index 0000000000..d469afa53a --- /dev/null +++ b/tests/bugs/modalg_2/bug427_5 @@ -0,0 +1,30 @@ + +puts "========================" +puts " OCC427 " +puts "(case 5)" +puts "========================" +puts "" +cpulimit 1200 +proc OFFSETSHAPE {distance faces calcul type} { + uplevel #0 explode s f + uplevel #0 offsetparameter 1e-7 $calcul $type + uplevel #0 offsetload s $distance $faces + uplevel #0 offsetperform result +} + +#Shell no rough and rounded mode + +set calcul "c" +set type "i" + +circle w -20 0 0 20 +mkedge w w 0 pi*2/5 +wire w w +polyline profile 0 0 0 10 0 0 5 0 5 0 0 0 +mkplane profile profile +pipe s w profile + +OFFSETSHAPE 1 {s_2} $calcul $type + +set square 1297.39 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug427_6 b/tests/bugs/modalg_2/bug427_6 new file mode 100755 index 0000000000..5065de996a --- /dev/null +++ b/tests/bugs/modalg_2/bug427_6 @@ -0,0 +1,30 @@ + +puts "========================" +puts " OCC427 " +puts "(case 6)" +puts "========================" +puts "" +cpulimit 1200 +proc OFFSETSHAPE {distance faces calcul type} { + uplevel #0 explode s f + uplevel #0 offsetparameter 1e-7 $calcul $type + uplevel #0 offsetload s $distance $faces + uplevel #0 offsetperform result +} + +#Shell no rough and rounded mode + +set calcul "c" +set type "i" + +circle w -20 0 0 20 +mkedge w w 0 pi*2/5 +wire w w +polyline profile 0 0 0 10 0 0 5 0 5 0 0 0 +mkplane profile profile +pipe s w profile + +OFFSETSHAPE 1 {s_4 s_5} $calcul $type + +set square 808.448 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug434 b/tests/bugs/modalg_2/bug434 new file mode 100755 index 0000000000..65aa2e1b5a --- /dev/null +++ b/tests/bugs/modalg_2/bug434 @@ -0,0 +1,29 @@ +pload QAcommands + +puts "================" +puts "OCC434" +puts "SAM1296" +puts "================" +puts "" + +######################################################## +## Exception is raised on NT, SUN in the GeomConvert_CompCurveToBSplineCurve +######################################################## + +restore [locate_data_file OCC434.brep] e +checkshape e +explode e e + +OCC405 result e_1 e_2 + +regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection result] full num + +if { $num == 2 } { + puts "OCC434 OK : Result shape is CORRECT !!! " +} else { + puts " Faulty OCC434: Result shape is INcorrect !!! " +} + +set length 8.74616 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug435 b/tests/bugs/modalg_2/bug435 new file mode 100755 index 0000000000..2b126e957a --- /dev/null +++ b/tests/bugs/modalg_2/bug435 @@ -0,0 +1,28 @@ +pload QAcommands + +#INTERFACE IGES +puts "========================" +puts " OCC435 " +puts " OCC405 " +puts "========================" +puts "" +############################################################### +## Exception Standard_ConstructuionError is rased in DRAW in the +## GeomConvert_CompCurveToBSplineCurve on the attached shapes during command merge +############################################################### + +restore [locate_data_file OCC435a.brep] a +explode a +set j 1 +repeat 8 { + explode a_$j + if { [catch {OCC405 result a_${j}_1 a_${j}_2} catch_result] } { + puts "Faulty OCC435 : merge operation was made incorrect" + } else { + puts " OCC435 OK: merge operation was made properly" + } + incr j +} + +set length 17.2848 +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug437 b/tests/bugs/modalg_2/bug437 new file mode 100755 index 0000000000..513c9e6675 --- /dev/null +++ b/tests/bugs/modalg_2/bug437 @@ -0,0 +1,20 @@ +puts "========================" +puts " OCC437 " +puts "========================" +puts "" +########################################## +## different checkshape result under ros and rosdeb in KAS:dev. +########################################## + +restore [locate_data_file OCC437.brep] result + +set che [checkshape result r] + +if { [regexp {OK} $che] != 1 } { + puts " Faulty OCC437: function CHECKSHAPE works wrongly" +} else { + puts " OCC437 OK: function CHECKSHAPE works properly" +} + +set square 0.000201234 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug439 b/tests/bugs/modalg_2/bug439 new file mode 100755 index 0000000000..91c43ffc1b --- /dev/null +++ b/tests/bugs/modalg_2/bug439 @@ -0,0 +1,26 @@ + +puts "========================" +puts " OCC439 " +puts "========================" +puts "" +##################################################### +## Cut operation produces NOT Valid result on attached shapes +##################################################### + +restore [locate_data_file OCC439.brep] a +explode a + +checkshape a_1 +checkshape a_2 + +bcut result a_1 a_2 + +set che [checkshape result] +if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty OCC134: Resulte shape is invalid. It was detected by Checkshape command" +} else { + puts "OCC134 OK: Result shape is valid" +} + +set square 247000 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug442 b/tests/bugs/modalg_2/bug442 new file mode 100755 index 0000000000..6007de9782 --- /dev/null +++ b/tests/bugs/modalg_2/bug442 @@ -0,0 +1,33 @@ + +puts "========" +puts "OCC442" +puts "========" +puts "" +######################################################## +## The Revolution Algo produces result, but during check using IsValid method from +## BRepAlgoAPI the exception is raised +######################################################## + +restore [locate_data_file OCC442.brep] a +checkshape a + +explode a v + +mkpoint p_1 a_1 +mkpoint p_2 a_3 +coord p_1 x1 y1 z1 +coord p_2 x2 y2 z2 +set ax [dval x1] +set ay [dval y1] +set az [dval z1] +set bx [dval x2] +set by [dval y2] +set bz [dval z2] +set dx [expr $ax - $bx] +set dy [expr $ay - $by] +set dz [expr $az - $bz] + +revol result a $ax $ay $az $dx $dy $dz 360 + +set square 692942 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug446_1 b/tests/bugs/modalg_2/bug446_1 new file mode 100755 index 0000000000..8dc81ddc22 --- /dev/null +++ b/tests/bugs/modalg_2/bug446_1 @@ -0,0 +1,25 @@ +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_2" +puts "TODO OCC12345 ALL: Faulty OCC446" +###puts "TODO OCC12345 ALL: Error : The square of result shape is" + +puts "========" +puts "OCC446" +puts "OCC447" +puts "(case 1)" +puts "========" +puts "" +###################################### +## As result I have fail on shape that it is not closed. +###################################### + +restore [locate_data_file OCC446a.brep] result + +set che [checkshape result] +if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty OCC446 (case 1): Source shape is NotClosed" +} else { + puts "OCC446 OK (case 1): Source shape is Closed" +} +set square 108.845 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug446_2 b/tests/bugs/modalg_2/bug446_2 new file mode 100755 index 0000000000..f6fcfd0ebf --- /dev/null +++ b/tests/bugs/modalg_2/bug446_2 @@ -0,0 +1,22 @@ + +puts "========" +puts "OCC446" +puts "OCC447" +puts "(case 2)" +puts "========" +puts "" +###################################### +## As result I have fail on shape that it is not closed. +###################################### + +restore [locate_data_file OCC446b.brep] result + +set che [checkshape result] +if { [regexp {Faulty} $che ] == 1} { + puts "Faulty OCC446 (case 2): Source shape is NotClosed" +} else { + puts "OCC446 OK (case 2): Source shape is Closed" +} +set square 24272.8 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug446_3 b/tests/bugs/modalg_2/bug446_3 new file mode 100755 index 0000000000..cf1efa8ae9 --- /dev/null +++ b/tests/bugs/modalg_2/bug446_3 @@ -0,0 +1,23 @@ + +puts "========" +puts "OCC446" +puts "OCC447" +puts "(case 3)" +puts "========" +puts "" +###################################### +## As result I have fail on shape that it is not closed. +###################################### + +restore [locate_data_file OCC446c.brep] result + +set che [checkshape result] +if { [regexp {Faulty} $che ] == 1} { + puts "Faulty OCC446 (case 3): Source shape is NotClosed" +} else { + puts "OCC446 OK (case 3): Source shape is Closed" +} +set square 13694.6 +set 2dviewer 0 + + diff --git a/tests/bugs/modalg_2/bug446_4 b/tests/bugs/modalg_2/bug446_4 new file mode 100755 index 0000000000..d4f43df460 --- /dev/null +++ b/tests/bugs/modalg_2/bug446_4 @@ -0,0 +1,22 @@ + +puts "========" +puts "OCC446" +puts "OCC447" +puts "(case 4)" +puts "========" +puts "" +###################################### +## As result I have fail on shape that it is not closed. +###################################### + +restore [locate_data_file OCC446d.brep] result + +set che [checkshape result] +if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty OCC446 (case 4): Source shape is NotClosed" +} else { + puts "OCC446 OK (case 4): Source shape is Closed" +} +set square 629.347 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug449 b/tests/bugs/modalg_2/bug449 new file mode 100755 index 0000000000..fab38a52da --- /dev/null +++ b/tests/bugs/modalg_2/bug449 @@ -0,0 +1,19 @@ + +puts "========================" +puts " OCC449 " +puts "========================" +puts "" +####################### +## Invalid cut result +####################### + +restore [locate_data_file OCC449a.brep] b1 +checkshape b1 + +restore [locate_data_file OCC449b.brep] b2 +checkshape b2 + +bcut result b1 b2 + +set square 43401.5 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug452_1 b/tests/bugs/modalg_2/bug452_1 new file mode 100755 index 0000000000..b5a7745c49 --- /dev/null +++ b/tests/bugs/modalg_2/bug452_1 @@ -0,0 +1,30 @@ + +puts "========" +puts "OCC452" +puts "(case 1)" +puts "========" +puts "" + +pcone pc 10 0 20 +explode pc f + +prism pcy pc_2 0 0 10 + +dchrono h2 reset +dchrono h2 start + +bcut result pc pcy + +dchrono h2 stop +set q2 [ dchrono h2 show ] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $q2 full z2 +puts "$z2" +if { $z2 > 3 } { + puts "Elapsed time is more then 3 seconds - Faulty" +} else { + puts "Elapsed time is less then 3 seconds - OK" +} + +set square 254.16 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug452_2 b/tests/bugs/modalg_2/bug452_2 new file mode 100755 index 0000000000..a938728c05 --- /dev/null +++ b/tests/bugs/modalg_2/bug452_2 @@ -0,0 +1,58 @@ + +puts "========" +puts "GER60239" +puts "OCC452" +puts "(case 2)" +puts "========" +puts "" + +restore [locate_data_file mds-part1.rle] a +set che [checkshape a] +if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty OCC452 (shape 1): Source shape is invalid. It was detected by Checkshape command" +} else { + puts "OCC452 OK (shape 1): Source shape is valid" +} + +restore [locate_data_file mds-part2.rle] b +set che [checkshape b] +if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty OCC452 (shape 2): Source shape is invalid. It was detected by Checkshape command" +} else { + puts "OCC452 OK (shape 2): Source shape is valid" +} + +restore [locate_data_file CTO900_ger60239a.rle] c +set che [checkshape c] +if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty OCC452 (shape 3): Source shape is invalid. It was detected by Checkshape command" +} else { + puts "OCC452 OK (shape 3): Source shape is valid" +} + +restore [locate_data_file CTO900_ger60239b.rle] d +set che [checkshape d] +if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty OCC452 (shape 4): Source shape is invalid. It was detected by Checkshape command" +} else { + puts "OCC452 OK (shape 4): Source shape is valid" +} +dchrono h2 reset +dchrono h2 start + +bfuse r a b +#checkshape r + +bfuse result c d + +dchrono h2 stop +set q2 [ dchrono h2 show ] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $q2 full z2 +puts "$z2" +if { $z2 > 60 } { + puts "Elapsed time is more then 60 seconds - Faulty" +} else { + puts "Elapsed time is less then 60 seconds - OK" +} +set square 3468.6 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug452_3 b/tests/bugs/modalg_2/bug452_3 new file mode 100755 index 0000000000..3ec86b68f2 --- /dev/null +++ b/tests/bugs/modalg_2/bug452_3 @@ -0,0 +1,43 @@ + +puts "========" +puts "GER60239" +puts "OCC452" +puts "(case 3)" +puts "========" +puts "" + +restore [locate_data_file CTO900_ger60239a.rle] a +set che [checkshape a] +if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty OCC452 (shape 5): Source shape is invalid. It was detected by Checkshape command" +} else { + puts "OCC452 OK (shape 5): Source shape is valid" +} + +restore [locate_data_file CTO900_ger60239b.rle] b +set che [checkshape b] +if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty OCC452 (shape 6): Source shape is invalid. It was detected by Checkshape command" +} else { + puts "OCC452 OK (shape 6): Source shape is valid" +} + +dchrono h2 reset +dchrono h2 start + +bfuse result a b +#checkshape -top res + +dchrono h2 stop +set q2 [ dchrono h2 show ] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $q2 full z2 +puts "$z2" +if { $z2 > 50 } { + puts "Elapsed time is more then 50 seconds - Faulty" +} else { + puts "Elapsed time is less then 50 seconds - OK" +} +set square 3468.6 +set 2dviewer 0 + + diff --git a/tests/bugs/modalg_2/bug452_4 b/tests/bugs/modalg_2/bug452_4 new file mode 100755 index 0000000000..0a03e60b0e --- /dev/null +++ b/tests/bugs/modalg_2/bug452_4 @@ -0,0 +1,44 @@ + +puts "========" +puts "PRO7934" +puts "OCC452" +puts "(case 4)" +puts "========" +puts "" + +restore [locate_data_file CTO900_pro7934a.rle] a +set che [checkshape a] +if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty OCC452 (shape 7): Source shape is invalid. It was detected by Checkshape command" +} else { + puts "OCC452 OK (shape 7): Source shape is valid" +} + +restore [locate_data_file CTO900_pro7934b.rle] b +set che [checkshape b] +if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty OCC452 (shape 8): Source shape is invalid. It was detected by Checkshape command" +} else { + puts "OCC452 OK (shape 8): Source shape is valid" +} + +dchrono h2 reset +dchrono h2 start + +bfuse result a b +#checkshape -top res + +dchrono h2 stop +set q2 [ dchrono h2 show ] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $q2 full z2 +puts "$z2" +if { $z2 > 5 } { + puts "Elapsed time is more then 5 seconds - Faulty" +} else { + puts "Elapsed time is less then 5 seconds - OK" +} +set square 201978 +set 2dviewer 0 + + + diff --git a/tests/bugs/modalg_2/bug453_1 b/tests/bugs/modalg_2/bug453_1 new file mode 100755 index 0000000000..9a7c28bd75 --- /dev/null +++ b/tests/bugs/modalg_2/bug453_1 @@ -0,0 +1,35 @@ + +puts "========" +puts "OCC453" +puts "(case 1)" +puts "========" +puts "" + +dchrono h2 reset +dchrono h2 start + +set make_print_out 0 + +dset SCALE 1000. +dset SCALE1 5 +tolblend 0.01 1e-04 1e-05 1e-03 + +restore [locate_data_file CFI_5_f12fgk.rle] s +tscale s 0 0 0 SCALE1 +explode s E + +blend result s 0.5*SCALE1 s_1 0.5*SCALE1 s_4 0.5*SCALE1 s_12 0.5*SCALE1 s_8 0.5*SCALE1 s_6 +explode result sh +tcopy result_1 result + +dchrono h2 stop +set q2 [ dchrono h2 show ] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $q2 full z2 +puts "$z2" +if { $z2 > 50 } { + puts "Elapsed time is more then 50 seconds - Faulty" +} else { + puts "Elapsed time is less then 50 seconds - OK" +} +set square 6021.51 +set 2dviewer 1 diff --git a/tests/bugs/modalg_2/bug453_2 b/tests/bugs/modalg_2/bug453_2 new file mode 100755 index 0000000000..da70eca5d0 --- /dev/null +++ b/tests/bugs/modalg_2/bug453_2 @@ -0,0 +1,36 @@ + +puts "========" +puts "OCC453" +puts "(case 2)" +puts "========" +puts "" + +dchrono h2 reset +dchrono h2 start + +set make_print_out 0 + +dset SCALE 1000. +dset SCALE1 5 +tolblend 0.01 1e-04 1e-05 1e-03 + +restore [locate_data_file shading_137.brep] s +tscale s 0 0 0 SCALE1 +explode s E + + blend result s 4.5*SCALE1 s_2 4.5*SCALE1 s_1 4.5*SCALE1 s_6 4.5*SCALE1 s_8 4.5*SCALE1 s_10 4.5*SCALE1 s_14 4.5*SCALE1 s_4 4.5*SCALE1 s_5 4.5*SCALE1 s_16 4.5*SCALE1 s_11 4.5*SCALE1 s_19 4.5*SCALE1 s_13 + explode result So + tcopy result_1 result + +dchrono h2 stop +set q2 [ dchrono h2 show ] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $q2 full z2 +puts "$z2" +if { $z2 > 110 } { + puts "Elapsed time is more then 110 seconds - Faulty" +} else { + puts "Elapsed time is less then 110 seconds - OK" +} + +set square 3.65777e+06 +set 2dviewer 1 diff --git a/tests/bugs/modalg_2/bug465 b/tests/bugs/modalg_2/bug465 new file mode 100755 index 0000000000..ff96cf53a1 --- /dev/null +++ b/tests/bugs/modalg_2/bug465 @@ -0,0 +1,21 @@ + +puts "========" +puts "OCC465" +puts "========" +puts "" + +restore [locate_data_file OCC465.brep] result + +set dum [dump result] + +regexp {PCurve : 1 on surface 1, range : ([-0-9.+eE]+) ([-0-9.+eE]+)} $dum full err1 err2 +regexp {Curve 3D : 1, range : ([-0-9.+eE]+) ([-0-9.+eE]+)} $dum full err3 err4 + +if { $err1== $err3 && $err2 == $err4 } { + puts "Faulty OCC465: it is reset the PCurve range by range of Curve3d after restoring Curve3d" +} else { + puts "OCC465 OK" +} + +set length 4.21716 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug4717_1 b/tests/bugs/modalg_2/bug4717_1 new file mode 100755 index 0000000000..77f6b34cc7 --- /dev/null +++ b/tests/bugs/modalg_2/bug4717_1 @@ -0,0 +1,43 @@ +puts "TODO OCC12345 ALL: Error : Result shape is WRONG" + +puts "============" +puts "OCC4717" +puts "============" +puts "" +###################################################### +# A regression of new Boolean Operations +# (cfi/002/H3) +###################################################### + +dset SCALE1 10 +protect SCALE1 + +box b -20 -20 -20 40 40 20 +ellipse w1 0 0 0 15 10 +mkedge w1 w1 -pi/2 pi/2 +trotate w1 0 0 0 1 0 0 90 +wire w w1 +revol r w 0 0 0 0 0 1 360 +shape s So +add r s +trotate s b 0 0 0 1 1 0 -40 +trotate s b 0 0 0 0 0 1 -10 +tscale b 0 0 0 SCALE1 +tscale s 0 0 0 SCALE1 + +bop s b +bopfuse result + +set square 680565 + +set nb_v_good 11 +set nb_e_good 16 +set nb_w_good 8 +set nb_f_good 7 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 45 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug4717_2 b/tests/bugs/modalg_2/bug4717_2 new file mode 100755 index 0000000000..edf0106c58 --- /dev/null +++ b/tests/bugs/modalg_2/bug4717_2 @@ -0,0 +1,43 @@ +puts "TODO OCC12345 ALL: Error : Result shape is WRONG" + +puts "============" +puts "OCC4717" +puts "============" +puts "" +###################################################### +# A regression of new Boolean Operations +# (cfi/002/H3) +###################################################### + +dset SCALE1 10 +protect SCALE1 + +box b -20 -20 -20 40 40 20 +ellipse w1 0 0 0 15 10 +mkedge w1 w1 -pi/2 pi/2 +trotate w1 0 0 0 1 0 0 90 +wire w w1 +revol r w 0 0 0 0 0 1 360 +shape s So +add r s +trotate s b 0 0 0 1 1 0 -40 +trotate s b 0 0 0 0 0 1 -10 +tscale b 0 0 0 SCALE1 +tscale s 0 0 0 SCALE1 + +bop b s +bopfuse result + +set square 680565 + +set nb_v_good 11 +set nb_e_good 16 +set nb_w_good 8 +set nb_f_good 7 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 45 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug4717_3 b/tests/bugs/modalg_2/bug4717_3 new file mode 100755 index 0000000000..185f5885b4 --- /dev/null +++ b/tests/bugs/modalg_2/bug4717_3 @@ -0,0 +1,43 @@ +puts "TODO OCC12345 ALL: Error : Result shape is WRONG" + +puts "============" +puts "OCC4717" +puts "============" +puts "" +###################################################### +# A regression of new Boolean Operations +# (cfi/002/H3) +###################################################### + +dset SCALE1 10 +protect SCALE1 + +box b -20 -20 -20 40 40 20 +ellipse w1 0 0 0 15 10 +mkedge w1 w1 -pi/2 pi/2 +trotate w1 0 0 0 1 0 0 90 +wire w w1 +revol r w 0 0 0 0 0 1 360 +shape s So +add r s +trotate s b 0 0 0 1 1 0 -40 +trotate s b 0 0 0 0 0 1 -10 +tscale b 0 0 0 SCALE1 +tscale s 0 0 0 SCALE1 + +bop s b +bopcut result + +set square 181937 + +set nb_v_good 3 +set nb_e_good 4 +set nb_w_good 2 +set nb_f_good 2 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 14 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug4717_4 b/tests/bugs/modalg_2/bug4717_4 new file mode 100755 index 0000000000..c68768ed24 --- /dev/null +++ b/tests/bugs/modalg_2/bug4717_4 @@ -0,0 +1,43 @@ +puts "TODO OCC12345 ALL: Error : Result shape is WRONG" + +puts "============" +puts "OCC4717" +puts "============" +puts "" +###################################################### +# A regression of new Boolean Operations +# (cfi/002/H3) +###################################################### + +dset SCALE1 10 +protect SCALE1 + +box b -20 -20 -20 40 40 20 +ellipse w1 0 0 0 15 10 +mkedge w1 w1 -pi/2 pi/2 +trotate w1 0 0 0 1 0 0 90 +wire w w1 +revol r w 0 0 0 0 0 1 360 +shape s So +add r s +trotate s b 0 0 0 1 1 0 -40 +trotate s b 0 0 0 0 0 1 -10 +tscale b 0 0 0 SCALE1 +tscale s 0 0 0 SCALE1 + +bop b s +bopcut result + +set square 680565 + +set nb_v_good 11 +set nb_e_good 16 +set nb_w_good 8 +set nb_f_good 7 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 45 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug4717_5 b/tests/bugs/modalg_2/bug4717_5 new file mode 100755 index 0000000000..8eae8fa6fc --- /dev/null +++ b/tests/bugs/modalg_2/bug4717_5 @@ -0,0 +1,43 @@ +puts "TODO OCC12345 ALL: Error : Result shape is WRONG" + +puts "============" +puts "OCC4717" +puts "============" +puts "" +###################################################### +# A regression of new Boolean Operations +# (cfi/002/H3) +###################################################### + +dset SCALE1 10 +protect SCALE1 + +box b -20 -20 -20 40 40 20 +ellipse w1 0 0 0 15 10 +mkedge w1 w1 -pi/2 pi/2 +trotate w1 0 0 0 1 0 0 90 +wire w w1 +revol r w 0 0 0 0 0 1 360 +shape s So +add r s +trotate s b 0 0 0 1 1 0 -40 +trotate s b 0 0 0 0 0 1 -10 +tscale b 0 0 0 SCALE1 +tscale s 0 0 0 SCALE1 + +bop s b +boptuc result + +set square 680565 + +set nb_v_good 11 +set nb_e_good 16 +set nb_w_good 8 +set nb_f_good 7 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 45 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug4717_6 b/tests/bugs/modalg_2/bug4717_6 new file mode 100755 index 0000000000..dab4307691 --- /dev/null +++ b/tests/bugs/modalg_2/bug4717_6 @@ -0,0 +1,43 @@ +puts "TODO OCC12345 ALL: Error : Result shape is WRONG" + +puts "============" +puts "OCC4717" +puts "============" +puts "" +###################################################### +# A regression of new Boolean Operations +# (cfi/002/H3) +###################################################### + +dset SCALE1 10 +protect SCALE1 + +box b -20 -20 -20 40 40 20 +ellipse w1 0 0 0 15 10 +mkedge w1 w1 -pi/2 pi/2 +trotate w1 0 0 0 1 0 0 90 +wire w w1 +revol r w 0 0 0 0 0 1 360 +shape s So +add r s +trotate s b 0 0 0 1 1 0 -40 +trotate s b 0 0 0 0 0 1 -10 +tscale b 0 0 0 SCALE1 +tscale s 0 0 0 SCALE1 + +bop b s +boptuc result + +set square 181937 + +set nb_v_good 3 +set nb_e_good 4 +set nb_w_good 2 +set nb_f_good 2 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 14 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug4717_7 b/tests/bugs/modalg_2/bug4717_7 new file mode 100755 index 0000000000..804091e634 --- /dev/null +++ b/tests/bugs/modalg_2/bug4717_7 @@ -0,0 +1,43 @@ +puts "TODO OCC12345 ALL: Error : Result shape is WRONG" + +puts "============" +puts "OCC4717" +puts "============" +puts "" +###################################################### +# A regression of new Boolean Operations +# (cfi/002/H3) +###################################################### + +dset SCALE1 10 +protect SCALE1 + +box b -20 -20 -20 40 40 20 +ellipse w1 0 0 0 15 10 +mkedge w1 w1 -pi/2 pi/2 +trotate w1 0 0 0 1 0 0 90 +wire w w1 +revol r w 0 0 0 0 0 1 360 +shape s So +add r s +trotate s b 0 0 0 1 1 0 -40 +trotate s b 0 0 0 0 0 1 -10 +tscale b 0 0 0 SCALE1 +tscale s 0 0 0 SCALE1 + +bop s b +bopcommon result + +set square 181937 + +set nb_v_good 3 +set nb_e_good 4 +set nb_w_good 2 +set nb_f_good 2 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 14 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug4717_8 b/tests/bugs/modalg_2/bug4717_8 new file mode 100755 index 0000000000..40fe4fa6c6 --- /dev/null +++ b/tests/bugs/modalg_2/bug4717_8 @@ -0,0 +1,43 @@ +puts "TODO OCC12345 ALL: Error : Result shape is WRONG" + +puts "============" +puts "OCC4717" +puts "============" +puts "" +###################################################### +# A regression of new Boolean Operations +# (cfi/002/H3) +###################################################### + +dset SCALE1 10 +protect SCALE1 + +box b -20 -20 -20 40 40 20 +ellipse w1 0 0 0 15 10 +mkedge w1 w1 -pi/2 pi/2 +trotate w1 0 0 0 1 0 0 90 +wire w w1 +revol r w 0 0 0 0 0 1 360 +shape s So +add r s +trotate s b 0 0 0 1 1 0 -40 +trotate s b 0 0 0 0 0 1 -10 +tscale b 0 0 0 SCALE1 +tscale s 0 0 0 SCALE1 + +bop b s +bopcommon result + +set square 181937 + +set nb_v_good 3 +set nb_e_good 4 +set nb_w_good 2 +set nb_f_good 2 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 14 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug472_1 b/tests/bugs/modalg_2/bug472_1 new file mode 100755 index 0000000000..bc835520cf --- /dev/null +++ b/tests/bugs/modalg_2/bug472_1 @@ -0,0 +1,22 @@ +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +puts "========================" +puts " OCC472 " +puts "(case 1)" +puts "========================" +puts "" +##################################################### +## Bad result of Fuse Operation (Cut&Common - bad too). SAM1470 (#2634) +##################################################### + +restore [locate_data_file OCC472a.brep] b1 +checkshape b1 + +restore [locate_data_file OCC472b.brep] b2 +checkshape b2 + +bcut result b1 b2 + +set square 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug472_2 b/tests/bugs/modalg_2/bug472_2 new file mode 100755 index 0000000000..4e79ff3a0d --- /dev/null +++ b/tests/bugs/modalg_2/bug472_2 @@ -0,0 +1,22 @@ +puts "TODO OCC12345 ALL: Error : The square of result shape is" +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" + +puts "========================" +puts " OCC472 " +puts "(case 2)" +puts "========================" +puts "" +##################################################### +## Bad result of Fuse Operation (Cut&Common - bad too). SAM1470 (#2634) +##################################################### + +restore [locate_data_file OCC472a.brep] b1 +checkshape b1 + +restore [locate_data_file OCC472b.brep] b2 +checkshape b2 + +bcommon result b1 b2 + +set square 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug472_3 b/tests/bugs/modalg_2/bug472_3 new file mode 100755 index 0000000000..903b34f5d5 --- /dev/null +++ b/tests/bugs/modalg_2/bug472_3 @@ -0,0 +1,26 @@ +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO OCC12345 ALL: Error : The square of result shape is" +puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must contains 5 vertexes instead of 6" + +puts "========================" +puts " OCC472 " +puts "(case 3)" +puts "========================" +puts "" +##################################################### +## Bad result of Fuse Operation (Cut&Common - bad too). SAM1470 (#2634) +##################################################### + +restore [locate_data_file OCC472a.brep] b1 +checkshape b1 + +restore [locate_data_file OCC472b.brep] b2 +checkshape b2 + +bfuse result b1 b2 + +set nb_v_good 5 +set nb_e_edge 7 +set square 0 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug474 b/tests/bugs/modalg_2/bug474 new file mode 100755 index 0000000000..8c2f82d460 --- /dev/null +++ b/tests/bugs/modalg_2/bug474 @@ -0,0 +1,17 @@ + +puts "========================" +puts " OCC474 " +puts "========================" +puts "" +################################################## +## impossible to put a fillet to none of 5 edges sharing one vertrex +################################################## + +restore [locate_data_file OCC474.brep] s + +explode s e + +blend result s 100 s_16 + +set square 1.54883e+06 +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug476_1 b/tests/bugs/modalg_2/bug476_1 new file mode 100755 index 0000000000..e05d8c9dc0 --- /dev/null +++ b/tests/bugs/modalg_2/bug476_1 @@ -0,0 +1,29 @@ +puts "============" +puts "OCC476" +puts "============" +puts "" +###################################################### +# Regression on reading e3i files with respect of OCC30 and OCC40 +###################################################### + +restore [locate_data_file OCC485b.brep] s1 +restore [locate_data_file OCC485a.brep] s2 + +checkshape s1 +checkshape s2 + +bop s1 s2 +bopfuse result + +set square 9333.96 +set nb_v_good 16 +set nb_e_good 26 +set nb_w_good 11 +set nb_f_good 11 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 67 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug476_2 b/tests/bugs/modalg_2/bug476_2 new file mode 100755 index 0000000000..892685e680 --- /dev/null +++ b/tests/bugs/modalg_2/bug476_2 @@ -0,0 +1,30 @@ +puts "============" +puts "OCC476" +puts "============" +puts "" +###################################################### +# Regression on reading e3i files with respect of OCC30 and OCC40 +###################################################### + +restore [locate_data_file OCC485b.brep] s1 +restore [locate_data_file OCC485a.brep] s2 + +checkshape s1 +checkshape s2 + +bop s2 s1 +bopfuse result + +set square 9333.96 +set nb_v_good 16 +set nb_e_good 26 +set nb_w_good 11 +set nb_f_good 11 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 67 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug476_3 b/tests/bugs/modalg_2/bug476_3 new file mode 100755 index 0000000000..ef5d6ff58b --- /dev/null +++ b/tests/bugs/modalg_2/bug476_3 @@ -0,0 +1,30 @@ +puts "============" +puts "OCC476" +puts "============" +puts "" +###################################################### +# Regression on reading e3i files with respect of OCC30 and OCC40 +###################################################### + +restore [locate_data_file OCC485b.brep] s1 +restore [locate_data_file OCC485a.brep] s2 + +checkshape s1 +checkshape s2 + +bop s1 s2 +bopcut result + +set square 99.5159 +set nb_v_good 12 +set nb_e_good 19 +set nb_w_good 9 +set nb_f_good 9 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 52 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug476_4 b/tests/bugs/modalg_2/bug476_4 new file mode 100755 index 0000000000..55739ac89c --- /dev/null +++ b/tests/bugs/modalg_2/bug476_4 @@ -0,0 +1,29 @@ +puts "============" +puts "OCC476" +puts "============" +puts "" +###################################################### +# Regression on reading e3i files with respect of OCC30 and OCC40 +###################################################### + +restore [locate_data_file OCC485b.brep] s1 +restore [locate_data_file OCC485a.brep] s2 + +checkshape s1 +checkshape s2 + +bop s2 s1 +bopcut result + +set square 9340.03 +set nb_v_good 19 +set nb_e_good 33 +set nb_w_good 14 +set nb_f_good 14 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 83 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug476_5 b/tests/bugs/modalg_2/bug476_5 new file mode 100755 index 0000000000..b7a375c85a --- /dev/null +++ b/tests/bugs/modalg_2/bug476_5 @@ -0,0 +1,29 @@ +puts "============" +puts "OCC476" +puts "============" +puts "" +###################################################### +# Regression on reading e3i files with respect of OCC30 and OCC40 +###################################################### + +restore [locate_data_file OCC485b.brep] s1 +restore [locate_data_file OCC485a.brep] s2 + +checkshape s1 +checkshape s2 + +bop s1 s2 +boptuc result + +set square 9340.03 +set nb_v_good 19 +set nb_e_good 33 +set nb_w_good 14 +set nb_f_good 14 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 83 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug476_6 b/tests/bugs/modalg_2/bug476_6 new file mode 100755 index 0000000000..a43243998f --- /dev/null +++ b/tests/bugs/modalg_2/bug476_6 @@ -0,0 +1,29 @@ +puts "============" +puts "OCC476" +puts "============" +puts "" +###################################################### +# Regression on reading e3i files with respect of OCC30 and OCC40 +###################################################### + +restore [locate_data_file OCC485b.brep] s1 +restore [locate_data_file OCC485a.brep] s2 + +checkshape s1 +checkshape s2 + +bop s2 s1 +boptuc result + +set square 99.5159 +set nb_v_good 12 +set nb_e_good 19 +set nb_w_good 9 +set nb_f_good 9 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 52 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug476_7 b/tests/bugs/modalg_2/bug476_7 new file mode 100755 index 0000000000..e8c9a7efb9 --- /dev/null +++ b/tests/bugs/modalg_2/bug476_7 @@ -0,0 +1,29 @@ +puts "============" +puts "OCC476" +puts "============" +puts "" +###################################################### +# Regression on reading e3i files with respect of OCC30 and OCC40 +###################################################### + +restore [locate_data_file OCC485b.brep] s1 +restore [locate_data_file OCC485a.brep] s2 + +checkshape s1 +checkshape s2 + +bop s1 s2 +bopcommon result + +set square 105.587 +set nb_v_good 15 +set nb_e_good 26 +set nb_w_good 12 +set nb_f_good 12 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 68 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug476_8 b/tests/bugs/modalg_2/bug476_8 new file mode 100755 index 0000000000..f519b5abb6 --- /dev/null +++ b/tests/bugs/modalg_2/bug476_8 @@ -0,0 +1,29 @@ +puts "============" +puts "OCC476" +puts "============" +puts "" +###################################################### +# Regression on reading e3i files with respect of OCC30 and OCC40 +###################################################### + +restore [locate_data_file OCC485b.brep] s1 +restore [locate_data_file OCC485a.brep] s2 + +checkshape s1 +checkshape s2 + +bop s2 s1 +bopcommon result + +set square 105.587 +set nb_v_good 15 +set nb_e_good 26 +set nb_w_good 12 +set nb_f_good 12 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 68 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug481 b/tests/bugs/modalg_2/bug481 new file mode 100755 index 0000000000..367af52bcb --- /dev/null +++ b/tests/bugs/modalg_2/bug481 @@ -0,0 +1,33 @@ + +puts "========================" +puts " OCC481 " +puts "========================" +puts "" +########################################## +##Attached shape could not be displayed in the Shading mode. +########################################## + +restore [locate_data_file OCC481.rle] result +checkshape result + +tclean result +vinit +vdisplay result +vfit +vsetdispmode result 1 + +set tri 0 +set nod 0 + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +if { $tri == 72 && $nod == 74 } { + puts " OCC481 : OK" +} else { + puts " OCC481 : Faulty" +} + +set square 314.159 +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug485 b/tests/bugs/modalg_2/bug485 new file mode 100755 index 0000000000..b33b0806cb --- /dev/null +++ b/tests/bugs/modalg_2/bug485 @@ -0,0 +1,24 @@ + +puts "=========" +puts " OCC485 " +puts "=========" +puts "" +####################################### +## Draw hangs up during performing fuse operation +####################################### + +restore [locate_data_file OCC485a.brep] a_1 +checkshape a_1 + +restore [locate_data_file OCC485a.brep] a_2 +checkshape a_2 + +if [catch {bfuse result a_1 a_2 } result] { + puts "Faulty OCC485: Draw hangs up during performing fuse operation" +} else { + puts "OCC485 OK: function FUSE works without Draw hangs up " +} + +set square 9291.88 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug487 b/tests/bugs/modalg_2/bug487 new file mode 100755 index 0000000000..d5303d28a6 --- /dev/null +++ b/tests/bugs/modalg_2/bug487 @@ -0,0 +1,30 @@ + +puts "========================" +puts " OCC487 " +puts "========================" +####################################################### +## Regression on KAS:dev:ros with respect to OCC4.0 +## Case cfi 900 N3. +## Fillets are created on OCC4.0 +####################################################### + +restore [locate_data_file CFI_pro15441.rle] m +explode m e + +if [catch {blend result m 2 m_36 2 m_21 } result] { + puts "Faulty OCC485: function BLEND works wrongly" +} else { + puts "OCC485 OK: function BLEND works properly " +} + +explode result sh + +renamevar result_1 result + +set square 6265.68 +set 3dviewer 1 + + + + + diff --git a/tests/bugs/modalg_2/bug488 b/tests/bugs/modalg_2/bug488 new file mode 100755 index 0000000000..35bc7540f7 --- /dev/null +++ b/tests/bugs/modalg_2/bug488 @@ -0,0 +1,22 @@ + +puts "=========" +puts " OCC488 " +puts "=========" +puts "" +######################################################## +## Boolean operation returns invalid result, it lead to regression on test cfe/002/C1 +######################################################## + +restore [locate_data_file OCC488a.brep] a_1 +checkshape a_1 + +restore [locate_data_file OCC488b.brep] a_2 +checkshape a_2 + +if [catch {bcommon result a_1 a_2 } catch_result] { + puts "Faulty OCC488: command COMMON works wrongly" +} else { + puts "OCC488 OK: function COMMON works properly " +} +set square 92466.8 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug490 b/tests/bugs/modalg_2/bug490 new file mode 100755 index 0000000000..85939f2845 --- /dev/null +++ b/tests/bugs/modalg_2/bug490 @@ -0,0 +1,22 @@ + +puts "=========" +puts " OCC490 " +puts "=========" +puts "" +######################################################## +## Result of fuse operation is faulty shape although arguments are valid +######################################################## + +restore [locate_data_file OCC490a.brep] a_1 +checkshape a_1 + +restore [locate_data_file OCC490b.brep] a_2 +checkshape a_2 + +if [catch {bfuse result a_1 a_2 } catch_result] { + puts "Faulty OCC490: command FUSE works wrongly" +} else { + puts "OCC490 : function FUSE works without hangs up " +} +set square 2744.08 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug492 b/tests/bugs/modalg_2/bug492 new file mode 100755 index 0000000000..0bf4415746 --- /dev/null +++ b/tests/bugs/modalg_2/bug492 @@ -0,0 +1,22 @@ + +puts "=========" +puts " OCC492 " +puts "=========" +puts "" +############################## +## Exception occurs during fuse operation +############################## + +restore [locate_data_file OCC492a.brep] a_1 +checkshape a_1 + +restore [locate_data_file OCC492b.brep] a_2 +checkshape a_2 + +if [catch {bfuse result a_1 a_2 } catch_result] { + puts "Faulty OCC492: command FUSE works wrongly" +} else { + puts "OCC492 : function FUSE works without hangs up " +} +set square 64.2386 +set 3dviewer 1 diff --git a/tests/bugs/modalg_2/bug497_1 b/tests/bugs/modalg_2/bug497_1 new file mode 100755 index 0000000000..86d8acdc94 --- /dev/null +++ b/tests/bugs/modalg_2/bug497_1 @@ -0,0 +1,25 @@ +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_3" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +puts "=========" +puts " OCC497 " +puts "(case 1)" +puts "=========" +puts "" +######################################################## +## Result of cut and fuse operation are faulty shapes although arguments are valid. +######################################################## + +restore [locate_data_file OCC497a.brep] a_1 +checkshape a_1 + +restore [locate_data_file OCC497b.brep] a_2 +checkshape a_2 + +if [catch {bcut result a_1 a_2 } catch_result] { + puts "Faulty OCC497:function CUT works wrongly " +} else { + puts "OCC497 : function CUT works without hangs up " +} +set square 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug497_2 b/tests/bugs/modalg_2/bug497_2 new file mode 100755 index 0000000000..f899ff8174 --- /dev/null +++ b/tests/bugs/modalg_2/bug497_2 @@ -0,0 +1,23 @@ + +puts "=========" +puts " OCC497 " +puts "(case 2)" +puts "=========" +puts "" +######################################################## +## Result of cut and fuse operation are faulty shapes although arguments are valid. +######################################################## + +restore [locate_data_file OCC497c.brep] a_1 +checkshape a_1 + +restore [locate_data_file OCC497d.brep] a_2 +checkshape a_2 + +if [catch {bcut result a_1 a_2 } catch_result] { + puts "Faulty OCC497:function CUT works wrongly " +} else { + puts "OCC497 : function CUT works without hangs up " +} +set square 2225.65 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug497_3 b/tests/bugs/modalg_2/bug497_3 new file mode 100755 index 0000000000..b42ce3a8ce --- /dev/null +++ b/tests/bugs/modalg_2/bug497_3 @@ -0,0 +1,22 @@ +puts "TODO OCC12345 ALL: result is not a topological shape!!!" +puts "TODO OCC12345 ALL: TEST INCOMPLETE" + +puts "=========" +puts " OCC497 " +puts "(case 3)" +puts "=========" +puts "" +######################################################## +## Result of cut and fuse operation are faulty shapes although arguments are valid. +######################################################## + +restore [locate_data_file OCC497e.brep] a_1 +checkshape a_1 + +restore [locate_data_file OCC497f.brep] a_2 +checkshape a_2 + +bcut result a_1 a_2 + +set square 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug497_4 b/tests/bugs/modalg_2/bug497_4 new file mode 100755 index 0000000000..fd8c384917 --- /dev/null +++ b/tests/bugs/modalg_2/bug497_4 @@ -0,0 +1,23 @@ + +puts "=========" +puts " OCC497 " +puts "(case 4)" +puts "=========" +puts "" +######################################################## +## Result of cut and fuse operation are faulty shapes although arguments are valid. +######################################################## + +restore [locate_data_file OCC497g.brep] a_1 +checkshape a_1 + +restore [locate_data_file OCC497h.brep] a_2 +checkshape a_2 + +if [catch {bfuse result a_1 a_2 } catch_result] { + puts "Faulty OCC497:function FUSE works wrongly " +} else { + puts "OCC497 : function FUSE works without hangs up " +} +set square 8710.56 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug497_5 b/tests/bugs/modalg_2/bug497_5 new file mode 100755 index 0000000000..26fb1892c9 --- /dev/null +++ b/tests/bugs/modalg_2/bug497_5 @@ -0,0 +1,23 @@ + +puts "=========" +puts " OCC497 " +puts "(case 5)" +puts "=========" +puts "" +######################################################## +## Result of cut and fuse operation are faulty shapes although arguments are valid. +######################################################## + +restore [locate_data_file OCC497i.brep] a_1 +checkshape a_1 + +restore [locate_data_file OCC497j.brep] a_2 +checkshape a_2 + +if [catch {bfuse result a_1 a_2 } catch_result] { + puts "Faulty OCC497:function FUSE works wrongly " +} else { + puts "OCC497 : function FUSE works without hangs up " +} +set square 3233.42 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug4993_1 b/tests/bugs/modalg_2/bug4993_1 new file mode 100755 index 0000000000..5641abff35 --- /dev/null +++ b/tests/bugs/modalg_2/bug4993_1 @@ -0,0 +1,31 @@ +puts "============" +puts "OCC4993" +puts "============" +puts "" +###################################################### +# Problem in boolean fusion +# (new topology) +###################################################### + +restore [locate_data_file OCC4993-s1.brep] s1 +restore [locate_data_file OCC4993-s2.brep] s2 + +checkshape s1 +checkshape s2 + +bop s1 s2 +bopfuse result + +set square 4854.51 + +set nb_v_good 40 +set nb_e_good 64 +set nb_w_good 24 +set nb_f_good 24 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 155 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug4993_2 b/tests/bugs/modalg_2/bug4993_2 new file mode 100755 index 0000000000..7c5ff166b5 --- /dev/null +++ b/tests/bugs/modalg_2/bug4993_2 @@ -0,0 +1,31 @@ +puts "============" +puts "OCC4993" +puts "============" +puts "" +###################################################### +# Problem in boolean fusion +# (new topology) +###################################################### + +restore [locate_data_file OCC4993-s1.brep] s1 +restore [locate_data_file OCC4993-s2.brep] s2 + +checkshape s1 +checkshape s2 + +bop s2 s1 +bopfuse result + +set square 4854.51 + +set nb_v_good 40 +set nb_e_good 64 +set nb_w_good 24 +set nb_f_good 24 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 155 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug500 b/tests/bugs/modalg_2/bug500 new file mode 100755 index 0000000000..c5b845234c --- /dev/null +++ b/tests/bugs/modalg_2/bug500 @@ -0,0 +1,22 @@ + +puts "=========" +puts " OCC500 " +puts "=========" +puts "" +############################### +## Result of pipe command of Draw is faulty +############################### + +restore [locate_data_file OCC500a.brep] a_1 +checkshape a_1 + +restore [locate_data_file OCC500b.brep] a_2 +checkshape a_2 + +if [catch {pipe result a_1 a_2 } catch_result] { + puts "Faulty OCC500 : function PIPE works wrongly " +} else { + puts "OCC500 : function PIPE works without hangs up " +} +set square 1246.13 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug501 b/tests/bugs/modalg_2/bug501 new file mode 100755 index 0000000000..9a0ab7775a --- /dev/null +++ b/tests/bugs/modalg_2/bug501 @@ -0,0 +1,18 @@ + +puts "=========" +puts " OCC501 " +puts "=========" +puts "" +################################################## +## Exception during tcopy command (only in 3.0fix), SAM1339 (#2137) +################################################### + +restore [locate_data_file OCC501.brep] result + +if [catch {tcopy result b } catch_result] { + puts "Faulty OCC501 : function TCOPY works wrongly " +} else { + puts "OCC501 OK: function TCOPY works without hangs up " +} +set square 121895 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5157_1 b/tests/bugs/modalg_2/bug5157_1 new file mode 100755 index 0000000000..c34d06e902 --- /dev/null +++ b/tests/bugs/modalg_2/bug5157_1 @@ -0,0 +1,27 @@ +puts "============" +puts "OCC5157" +puts "============" +puts "" +###################################################### +# DRAW commands vprops and sprops with tolerance 1.e-6 hange on attached shape. +###################################################### + +cpulimit 3500 +#dchrono h reset; dchrono h start + +catch { pload XDE } + +set BugNumber OCC5157 + +set status 0 +if {[catch { stepread [locate_data_file OCC5157.stp] a * } catch_result] } { + puts "Faulty ${BugNumber} : here is reading problem" +} else { + tpcompound result +} + +set tol_square 1.e-6 +set square 35273.9 +set 2dviewer 0 + + diff --git a/tests/bugs/modalg_2/bug5157_2 b/tests/bugs/modalg_2/bug5157_2 new file mode 100755 index 0000000000..63b1821fab --- /dev/null +++ b/tests/bugs/modalg_2/bug5157_2 @@ -0,0 +1,24 @@ +puts "============" +puts "OCC5157" +puts "============" +puts "" +###################################################### +# DRAW commands vprops and sprops with tolerance 1.e-6 hange on attached shape. +###################################################### + +cpulimit 3500 +#dchrono h reset; dchrono h start + +catch { pload XDE } + +set BugNumber OCC5157 + +if { [catch { stepread [locate_data_file OCC5157.stp] a * } catch_result] } { + puts "Faulty ${BugNumber} : here is reading problem" +} else { + tpcompound result +} +set tol_square 1.e-6 +set square 35362.3 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug516 b/tests/bugs/modalg_2/bug516 new file mode 100755 index 0000000000..a260ef015b --- /dev/null +++ b/tests/bugs/modalg_2/bug516 @@ -0,0 +1,23 @@ + +puts "========" +puts "OCC516" +puts "========" +puts "" +######################################### +## Wrong classification of the 3D-point with the Solid . +######################################### + +point p 14.99999878745701 5.52319672860377e-07 7.78393041 +vertex v 14.99999878745701 5.52319672860377e-07 7.78393041 +restore [locate_data_file OCC516.brep] result + +set cls [bclassify result p] + +if { [regexp {OUT} $cls] } { + puts "Faulty : Wrong classification of the 3D-point with the Solid" +} else { + puts "CORRECT classification of the 3D-point with the Solid" +} + +set square 7752.98 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug526 b/tests/bugs/modalg_2/bug526 new file mode 100755 index 0000000000..44ea80917a --- /dev/null +++ b/tests/bugs/modalg_2/bug526 @@ -0,0 +1,32 @@ +#INTERFACE IGES +puts "========" +puts "OCC526" +puts "========" +puts "" +################################################ +## BRepAlgoAPI_Section fails to build planar sections on some faces +################################################ + +pload XDE + +restore [locate_data_file OCC592.brep] a + +set Z 67.599311020481764 +plane p 0 0 $Z +psection r1 a p +if ![regexp VERTEX [statshape r1]] {puts [format "OCC526 FAULTY Z=%f" $Z ] } + +set Z 66.599311020481764 +plane p 0 0 $Z +psection r2 a p +if ![regexp VERTEX [statshape r2]] {puts [format "OCC526 FAULTY Z=%f" $Z ] } + +set Z 65.599311020481764 +plane p 0 0 $Z +psection result a p +if ![regexp VERTEX [statshape result]] {puts [format "OCC526 FAULTY Z=%f" $Z ] } + +set length 27.8021 +set 2dviewer 1 + + diff --git a/tests/bugs/modalg_2/bug527 b/tests/bugs/modalg_2/bug527 new file mode 100755 index 0000000000..135d9479fb --- /dev/null +++ b/tests/bugs/modalg_2/bug527 @@ -0,0 +1,16 @@ +pload QAcommands + +puts "========" +puts "OCC527" +puts "========" +puts "" +##################################################### +## BRepAlgoAPI_Section creates very distant geometry on some planar sections +##################################################### + +cpulimit 3600 +restore [locate_data_file OCC527.brep] result +OCC527 result + +set square 3774.42 +set 2dviewer 1 diff --git a/tests/bugs/modalg_2/bug528 b/tests/bugs/modalg_2/bug528 new file mode 100755 index 0000000000..4d11a8cb59 --- /dev/null +++ b/tests/bugs/modalg_2/bug528 @@ -0,0 +1,23 @@ + +puts "========================" +puts "OCC528" +puts "========================" +puts "" +############################################## +## Result of bcut command is faulty although arguments are valid +############################################## + +restore [locate_data_file OCC528_1.brep] c1 +checkshape c1 + +restore [locate_data_file OCC528_2.brep] c2 +checkshape c2 + +if { [catch { bcut result c1 c2 } catch_result] } { + puts "OCC528 Faulty: function BCUT works wrongly" +} else { + puts "OCC528 OK:function BCUT works properly" +} + +set square 124.092 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug530 b/tests/bugs/modalg_2/bug530 new file mode 100755 index 0000000000..d2f9ef0601 --- /dev/null +++ b/tests/bugs/modalg_2/bug530 @@ -0,0 +1,29 @@ +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +puts "=======" +puts "OCC530" +puts "=======" +puts "" +#################################### +## Draw hungs up during performing bfuse operation +#################################### + +cpulimit 3000 + +restore [locate_data_file OCC530_1.brep] c1 +checkshape c1 + +restore [locate_data_file OCC530_2.brep] c2 +checkshape c2 + +if { [catch { bfuse result c1 c2 } catch_result] } { + puts "Faulty OCC530 : function BFUSE works wrongly" +} else { + puts "OCC530 OK: function BFUSE works properly" +} + +set square 0 +set 2dviewer 0 + + diff --git a/tests/bugs/modalg_2/bug534_1 b/tests/bugs/modalg_2/bug534_1 new file mode 100755 index 0000000000..6eab05b4d7 --- /dev/null +++ b/tests/bugs/modalg_2/bug534_1 @@ -0,0 +1,27 @@ + +puts "========================" +puts " OCC534 " +puts " case 1 " +puts "========================" +puts "" + +hyperbola hyperbola 0 0 0 30 10 +extsurf es_hyperbola hyperbola 0 0 1 +offset es_hyperbola_of es_hyperbola 5 +mkface result es_hyperbola_of 0 3 0 40 + + +set tolerance [maxtolerance result] +regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxFaceTolerance +regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxEdgeTolerance +regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxVertexTolerance + +if { $MaxFaceTolerance > 1 || $MaxEdgeTolerance > 1 || $MaxVertexTolerance > 1 } { + puts "Faulty : Tolerance of shape is more then 1.0" +} else { + puts "Tolerance is OK" +} + +set square 11451.2 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug534_2 b/tests/bugs/modalg_2/bug534_2 new file mode 100755 index 0000000000..7a326cce0e --- /dev/null +++ b/tests/bugs/modalg_2/bug534_2 @@ -0,0 +1,29 @@ + +puts "========================" +puts " OCC534 " +puts " case 2 " +puts "========================" +puts "" + +hyperbola hyperbola 0 0 0 30 10 +extsurf es_hyperbola hyperbola 0 0 1 +offset es_hyperbola_of es_hyperbola 5 +offset es_hyperbola_of_of es_hyperbola_of 5 +mkface result es_hyperbola_of_of 0 3 0 40 + +set tolerance [maxtolerance result] +regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxFaceTolerance +regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxEdgeTolerance +regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxVertexTolerance + +if { $MaxFaceTolerance > 1 || $MaxEdgeTolerance > 1 || $MaxVertexTolerance > 1 } { + puts "Faulty : Tolerance of shape is more then 1.0" +} else { + puts "Tolerance is OK" +} + +set square 11460.7 +set 2dviewer 0 + + + diff --git a/tests/bugs/modalg_2/bug534_3 b/tests/bugs/modalg_2/bug534_3 new file mode 100755 index 0000000000..57d84c3831 --- /dev/null +++ b/tests/bugs/modalg_2/bug534_3 @@ -0,0 +1,26 @@ + +puts "========================" +puts " OCC534 " +puts " case 3 " +puts "========================" +puts "" + +hyperbola hyperbola 0 0 0 30 10 +revsurf rs_hyperbola hyperbola 0 400 0 1 0 0 +offset rs_hyperbola_of rs_hyperbola 5 +mkface result rs_hyperbola_of .3 .5 .3 .5 + +set tolerance [maxtolerance result] +regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxFaceTolerance +regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxEdgeTolerance +regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxVertexTolerance + +if { $MaxFaceTolerance > 1 || $MaxEdgeTolerance > 1 || $MaxVertexTolerance > 1 } { + puts "Faulty : Tolerance of shape is more then 1.0" +} else { + puts "Tolerance is OK" +} + +set square 171.992 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug534_4 b/tests/bugs/modalg_2/bug534_4 new file mode 100755 index 0000000000..c15d7e0201 --- /dev/null +++ b/tests/bugs/modalg_2/bug534_4 @@ -0,0 +1,26 @@ + +puts "========================" +puts " OCC534 " +puts " case 4 " +puts "========================" +puts "" + +hyperbola hyperbola 0 0 0 30 10 +revsurf rs_hyperbola hyperbola 0 400 0 1 0 0 +offset rs_hyperbola_of rs_hyperbola 5 +offset rs_hyperbola_of_of rs_hyperbola_of 5 +mkface result rs_hyperbola_of_of .3 .5 .3 .5 + +set tolerance [maxtolerance result] +regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxFaceTolerance +regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxEdgeTolerance +regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxVertexTolerance + +if { $MaxFaceTolerance > 1 || $MaxEdgeTolerance > 1 || $MaxVertexTolerance > 1 } { + puts "Faulty : Tolerance of shape is more then 1.0" +} else { + puts "Tolerance is OK" +} + +set square 84.8861 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug534_5 b/tests/bugs/modalg_2/bug534_5 new file mode 100755 index 0000000000..1b73981893 --- /dev/null +++ b/tests/bugs/modalg_2/bug534_5 @@ -0,0 +1,25 @@ + +puts "========================" +puts " OCC534 " +puts " case 5 " +puts "========================" +puts "" + +parabola parabola 0 0 0 30 +revsurf rs_parabola parabola 0 400 0 1 0 0 +offset rs_parabola_of rs_parabola 10 +mkface result rs_parabola_of .3 .5 .3 .5 + +set tolerance [maxtolerance result] +regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxFaceTolerance +regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxEdgeTolerance +regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxVertexTolerance + +if { $MaxFaceTolerance > 1 || $MaxEdgeTolerance > 1 || $MaxVertexTolerance > 1 } { + puts "Faulty : Tolerance of shape is more then 1.0" +} else { + puts "Tolerance is OK" +} + +set square 13.3227 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug534_6 b/tests/bugs/modalg_2/bug534_6 new file mode 100755 index 0000000000..a8bef01df9 --- /dev/null +++ b/tests/bugs/modalg_2/bug534_6 @@ -0,0 +1,27 @@ + +puts "========================" +puts " OCC534 " +puts " case 6 " +puts "========================" +puts "" + +parabola parabola 0 0 0 30 +revsurf rs_parabola parabola 0 400 0 1 0 0 +offset rs_parabola_of rs_parabola 10 +offset rs_parabola_of_of rs_parabola_of 5 +mkface result rs_parabola_of_of .3 .5 .3 .5 + +set tolerance [maxtolerance result] +regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxFaceTolerance +regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxEdgeTolerance +regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxVertexTolerance + +if { $MaxFaceTolerance > 1 || $MaxEdgeTolerance > 1 || $MaxVertexTolerance > 1 } { + puts "Faulty : Tolerance of shape is more then 1.0" +} else { + puts "Tolerance is OK" +} + +set square 11.9915 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug535 b/tests/bugs/modalg_2/bug535 new file mode 100755 index 0000000000..54bc654f96 --- /dev/null +++ b/tests/bugs/modalg_2/bug535 @@ -0,0 +1,34 @@ +#INTERFACE IGES +puts "=======" +puts "OCC535" +puts "=======" +puts "" +############################################################# +## After command "fixshape" in DRAW on attached shape quantity of shapes obtained +## with help command "nbs" is increased. +############################################################# + +pload XDE + +restore [locate_data_file OCC535.brep] a + +set nb_info_a [nbshapes a] +regexp {SHAPE +: +([-0-9.+eE]+)} $nb_info_a full r1 + +fixshape result a + +set nb_info_res [nbshapes result] +regexp {SHAPE +: +([-0-9.+eE]+)} $nb_info_res full r2 + +puts "" +puts [format "before Shapes = %s after Shapes = %s" $r1 $r2] +puts "" + +if { $r1 == $r2 } { + puts "OCC535 OK" +} else { + puts "OCC535 Faulty" +} + +set square 3554.31 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug539_1 b/tests/bugs/modalg_2/bug539_1 new file mode 100755 index 0000000000..5c3493849c --- /dev/null +++ b/tests/bugs/modalg_2/bug539_1 @@ -0,0 +1,21 @@ + +puts "========================" +puts " OCC539 " +puts "(case 1)" +puts "========================" +puts "" + + puts "===========================================" + puts " BOPCOMMON case_4_shell.brep and case_4_wire3.brep" + puts "===========================================" + puts " " + +restore [locate_data_file case_4_shell.brep] a +restore [locate_data_file case_4_wire3.brep] b +bop a b +bopcommon result + +set nb_v_good 15 +set nb_e_good 10 +set length 1150.78 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug539_2 b/tests/bugs/modalg_2/bug539_2 new file mode 100755 index 0000000000..dc31058c43 --- /dev/null +++ b/tests/bugs/modalg_2/bug539_2 @@ -0,0 +1,22 @@ + +puts "========================" +puts " OCC539 " +puts "(case 2)" +puts "========================" +puts "" + + puts "============================================" + puts " BOPTUC case_4_shell.brep and case_4_wire3.brep" + puts "============================================" + puts " " + +restore [locate_data_file case_4_shell.brep] a +restore [locate_data_file case_4_wire3.brep] b +bop a b +boptuc result + +set nb_v_good 16 +set nb_e_good 11 +set length 929.278 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_2/bug548 b/tests/bugs/modalg_2/bug548 new file mode 100755 index 0000000000..b301f73ed9 --- /dev/null +++ b/tests/bugs/modalg_2/bug548 @@ -0,0 +1,30 @@ +puts "========" +puts "OCC548" +puts "OCC628" +puts "========" +puts "" +################################################################## +# Function BRepTool::IsClosed returns Standard_True although argument is open shell +# Incorrect work of BRepCheck +################################################################## + +pload XDE + +restore [locate_data_file CTO908_topo103-t.brep] a + +decho off + +checkshape a +checkshape a b + +decho on + +fixshape result a 0.001 + +set che [checkshape result c] +if { [regexp {problems} $che] } { + puts "Faulty OCC628" +} + +set square 119630 +set 2dviewer 2 diff --git a/tests/bugs/modalg_2/bug570 b/tests/bugs/modalg_2/bug570 new file mode 100755 index 0000000000..6066927281 --- /dev/null +++ b/tests/bugs/modalg_2/bug570 @@ -0,0 +1,11 @@ +pload QAcommands + +puts "========" +puts "OCC570" +puts "========" +puts "" + +OCC570 result + +set square 58500 +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug571_1 b/tests/bugs/modalg_2/bug571_1 new file mode 100755 index 0000000000..ad320cbd6e --- /dev/null +++ b/tests/bugs/modalg_2/bug571_1 @@ -0,0 +1,22 @@ +puts "========" +puts "OCC571" +puts "========" +puts "" +########################## +## Fillet operation fails on given shape +########################## +## LIMITATION: Builds fillet with 0.03<=r<=1.2 +########################## + +restore [locate_data_file OCC571.brep] a +checkshape a +explode a + +if [catch {fillet result a_1 1.2 a_2 } catch_result] { + puts "Faulty OCC571 exception (case 1): Fillet operation fails on given shape " +} else { + puts " OCC571 (case 1) OK: Fillet operation was made" +} + +set square 21118.1 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug571_2 b/tests/bugs/modalg_2/bug571_2 new file mode 100755 index 0000000000..99c38bbb00 --- /dev/null +++ b/tests/bugs/modalg_2/bug571_2 @@ -0,0 +1,22 @@ +puts "========" +puts "OCC571" +puts "========" +puts "" +########################## +## Fillet operation fails on given shape +########################## +## LIMITATION: Builds fillet with 0.03<=r<=1.2 +########################## + +restore [locate_data_file OCC571.brep] a +checkshape a +explode a + +if [catch {fillet result a_1 0.03 a_2 } catch_result] { + puts "Faulty OCC571 exception (case 2): Fillet operation fails on given shape " +} else { + puts " OCC571 (case 2) OK: Fillet operation was made" +} + +set square 21209.9 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5729 b/tests/bugs/modalg_2/bug5729 new file mode 100755 index 0000000000..a594ca7460 --- /dev/null +++ b/tests/bugs/modalg_2/bug5729 @@ -0,0 +1,41 @@ +puts "============" +puts "OCC5729" +puts "============" +puts "" +###################################################### +# Regression on case cfe 900 K5 +###################################################### + +set BugNumber OCC5729 + +restore [locate_data_file OCC5729-f1.brep] f1 +restore [locate_data_file OCC5729-f2.brep] f2 + +decho off +set che_1 [checkshape f1] +decho on +if { [regexp {Faulty} $che_1] } { + puts "Faulty ${BugNumber} : checkshape is wrong for f1" +} + +decho off +set che_2 [checkshape f2] +decho on +if { [regexp {Faulty} $che_2] } { + puts "Faulty ${BugNumber} : checkshape is wrong for f2" +} + +bfuse result f1 f2 + +set square 28559.8 + +set nb_v_good 13 +set nb_e_good 22 +set nb_w_good 15 +set nb_f_good 13 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 66 + diff --git a/tests/bugs/modalg_2/bug578_1 b/tests/bugs/modalg_2/bug578_1 new file mode 100755 index 0000000000..3993d65e01 --- /dev/null +++ b/tests/bugs/modalg_2/bug578_1 @@ -0,0 +1,25 @@ +puts "================" +puts "OCC578" +puts "OCC584" +puts "================" +puts "" + +restore [locate_data_file OCC578_w1.brep] w1 +checkshape w1 + +restore [locate_data_file OCC578_w2.brep] w2 +checkshape w2 + +set x 1 +set y 1 +set z 0.5 +box b ${x} ${y} ${z} +checkshape b + +bfuse res1 w1 w2 +checkshape res1 + +bcut result b res1 + +set square 4.84596 +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug578_2 b/tests/bugs/modalg_2/bug578_2 new file mode 100755 index 0000000000..89e192879a --- /dev/null +++ b/tests/bugs/modalg_2/bug578_2 @@ -0,0 +1,27 @@ +puts "================" +puts "OCC578" +puts "OCC582" +puts "OCC583" +puts "================" +puts "" + +restore [locate_data_file OCC578_w1.brep] w1 +checkshape w1 + +restore [locate_data_file OCC578_w2.brep] w2 +checkshape w2 + +set x 1 +set y 1 +set z 0.5 +box b ${x} ${y} ${z} +checkshape b + +bfuse res1 w1 w2 +checkshape res1 + +bop b res1 +bopcut result + +set square 4.84596 +set 3dviewer 0 diff --git a/tests/bugs/modalg_2/bug57_1 b/tests/bugs/modalg_2/bug57_1 new file mode 100755 index 0000000000..aa41a12a20 --- /dev/null +++ b/tests/bugs/modalg_2/bug57_1 @@ -0,0 +1,15 @@ + +puts "================" +puts "BUC60974 " +puts " OCC57" +puts "================" +puts "" + +restore [locate_data_file BUC60974.brep] a +explode a +checkshape a_1 +checkshape a_2 + +bfuse result a_1 a_2 +set square 191388 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug57_2 b/tests/bugs/modalg_2/bug57_2 new file mode 100755 index 0000000000..0774f01fae --- /dev/null +++ b/tests/bugs/modalg_2/bug57_2 @@ -0,0 +1,15 @@ + +puts "================" +puts "BUC60974 " +puts " OCC57" +puts "================" +puts "" + +restore [locate_data_file BUC60974.brep] a +explode a +checkshape a_1 +checkshape a_2 + +bfuse result a_2 a_1 +set square 191388 +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_1 b/tests/bugs/modalg_2/bug5805_1 new file mode 100755 index 0000000000..ccde342639 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_1 @@ -0,0 +1,59 @@ +puts "============" +puts "OCC5805" +puts "============" +puts "" +###################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +###################################################### + +set BugNumber OCC5805 + +puts "demonstration of pipes and hollowing for GTISoft" +puts "" +puts "Scenario 2A: Hollowed elliptical cylinder - ThroughSection and MakeThickSolid (work-around: ellipse is split into 2)" + + +ellipse e 10 60 0 1 0 0 5 3 +trim e1 e 0 pi +trim e2 e pi 2*pi +mkedge ee1 e1 +mkedge ee2 e2 +wire w1 ee1 ee2 +copy w1 w2 +ttranslate w2 -20 0 0 + +if { [catch { thrusections rthru2 1 1 w1 w2 } catch_result] } { + puts "Faulty ${BugNumber} : thrusections is wrong" +} + +explode rthru2 f + +if { [catch { offsetshape result rthru2 -0.5 rthru2_3 rthru2_4 } catch_result] } { + puts "Faulty ${BugNumber} : offsetshape is wrong" +} + +if { [catch { set tolmaxres [tolmax result] } catch_result] } { + puts "Faulty ${BugNumber} : tolmax is wrong" +} + +regexp {max tol = ([-0-9.+eE]+)} $tolmaxres full maxtolerance +if { [catch { expr $maxtolerance } result] } { + puts "Faulty ${BugNumber} : maxtolerance is wrong (1)." +} +if { $maxtolerance > 1. } { + puts "Faulty ${BugNumber} : maxtolerance is wrong (2)." +} + +set square 981.941 + +set nb_v_good 6 +set nb_e_good 10 +set nb_w_good 8 +set nb_f_good 6 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 32 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_10 b/tests/bugs/modalg_2/bug5805_10 new file mode 100755 index 0000000000..45b8520436 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_10 @@ -0,0 +1,58 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +# ellipse1 +ellipse ell 10 0 0 1 0 0 5 3 +mkedge ee1 ell +wire UpCover ee1 + +# ellipse2 +copy ee1 ee2 +ttranslate ee2 -20 0 0 +wire BottomCover ee2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {s_2} $calcul $type } + + +set square 1041.35 + +set nb_v_good 3 +set nb_e_good 5 +set nb_w_good 6 +set nb_f_good 5 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 21 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_11 b/tests/bugs/modalg_2/bug5805_11 new file mode 100755 index 0000000000..9bc05c78a6 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_11 @@ -0,0 +1,57 @@ +puts "============" +puts "OCC5805" +puts "============" +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 +cpulimit 1400 +# ellipse1 +ellipse ell 10 0 0 1 0 0 5 3 +mkedge ee1 ell +wire UpCover ee1 + +# ellipse2 +copy ee1 ee2 +ttranslate ee2 -20 0 0 +wire BottomCover ee2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {s_3} $calcul $type } + + +set square 1041.35 + +set nb_v_good 3 +set nb_e_good 5 +set nb_w_good 6 +set nb_f_good 5 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 21 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_12 b/tests/bugs/modalg_2/bug5805_12 new file mode 100755 index 0000000000..417a4b2c68 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_12 @@ -0,0 +1,58 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +# ellipse1 +ellipse ell 10 0 0 1 0 0 5 3 +mkedge ee1 ell +wire UpCover ee1 + +# ellipse2 +copy ee1 ee2 +ttranslate ee2 -20 0 0 +wire BottomCover ee2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {s_2 s_3} $calcul $type } + + +set square 982.254 + +set nb_v_good 3 +set nb_e_good 5 +set nb_w_good 6 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 20 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_13 b/tests/bugs/modalg_2/bug5805_13 new file mode 100755 index 0000000000..208f29e5c8 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_13 @@ -0,0 +1,74 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +# +# v12 v11 +# *---------------------* +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# *---------------------* +# v13 v14 +# + +set z1 5 +set z2 -5 + +# quadrangle1 +polyline UpCover 0 0 ${z1} 5 0 ${z1} 5 5 ${z1} 0 5 ${z1} 0 0 ${z1} + +# quadrangle2 +polyline BottomCover 0 0 ${z2} 5 0 ${z2} 5 5 ${z2} 0 5 ${z2} 0 0 ${z2} + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {} $calcul $type } + + +set square 176 + +set nb_v_good 8 +set nb_e_good 12 +set nb_w_good 6 +set nb_f_good 6 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 34 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_14 b/tests/bugs/modalg_2/bug5805_14 new file mode 100755 index 0000000000..88bb8d91d5 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_14 @@ -0,0 +1,74 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +# +# v12 v11 +# *---------------------* +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# *---------------------* +# v13 v14 +# + +set z1 5 +set z2 -5 + +# quadrangle1 +polyline UpCover 0 0 ${z1} 5 0 ${z1} 5 5 ${z1} 0 5 ${z1} 0 0 ${z1} + +# quadrangle2 +polyline BottomCover 0 0 ${z2} 5 0 ${z2} 5 5 ${z2} 0 5 ${z2} 0 0 ${z2} + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {s_5} $calcul $type } + + +set square 402 + +set nb_v_good 16 +set nb_e_good 24 +set nb_w_good 12 +set nb_f_good 11 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 65 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_15 b/tests/bugs/modalg_2/bug5805_15 new file mode 100755 index 0000000000..e01daaa059 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_15 @@ -0,0 +1,74 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +# +# v12 v11 +# *---------------------* +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# *---------------------* +# v13 v14 +# + +set z1 5 +set z2 -5 + +# quadrangle1 +polyline UpCover 0 0 ${z1} 5 0 ${z1} 5 5 ${z1} 0 5 ${z1} 0 0 ${z1} + +# quadrangle2 +polyline BottomCover 0 0 ${z2} 5 0 ${z2} 5 5 ${z2} 0 5 ${z2} 0 0 ${z2} + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {s_6} $calcul $type } + + +set square 402 + +set nb_v_good 16 +set nb_e_good 24 +set nb_w_good 12 +set nb_f_good 11 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 65 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_16 b/tests/bugs/modalg_2/bug5805_16 new file mode 100755 index 0000000000..07fa432809 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_16 @@ -0,0 +1,74 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +# +# v12 v11 +# *---------------------* +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# *---------------------* +# v13 v14 +# + +set z1 5 +set z2 -5 + +# quadrangle1 +polyline UpCover 0 0 ${z1} 5 0 ${z1} 5 5 ${z1} 0 5 ${z1} 0 0 ${z1} + +# quadrangle2 +polyline BottomCover 0 0 ${z2} 5 0 ${z2} 5 5 ${z2} 0 5 ${z2} 0 0 ${z2} + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {s_5 s_6} $calcul $type } + + +set square 378 + +set nb_v_good 16 +set nb_e_good 24 +set nb_w_good 12 +set nb_f_good 10 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 64 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_17 b/tests/bugs/modalg_2/bug5805_17 new file mode 100755 index 0000000000..a64f73a1b6 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_17 @@ -0,0 +1,67 @@ +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" +puts "TODO ?OCC11111 ALL: Error : The square of result shape is" +puts "TODO ?OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO ?OCC11111 ALL: Faulty OCC5805 : result is not Closed shape" +puts "TODO ?OCC11111 ALL: Error : The command is not valid." +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +set z1 5 +set z2 -5 + +# beziercurve1 +beziercurve bc1 5 5 5 ${z1} 5 -5 ${z1} -5 -5 ${z1} -5 5 ${z1} 5 5 ${z1} +mkedge e1 bc1 +wire UpCover e1 + +# beziercurve2 +copy e1 e2 +ttranslate e2 0 0 ${z2} +wire BottomCover e2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.001 +catch { OFFSETSHAPE $distance {} $calcul $type } +# Null result + + +set square 495.635 + +set nb_v_good 2 +set nb_e_good 3 +set nb_w_good 3 +set nb_f_good 3 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 13 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_18 b/tests/bugs/modalg_2/bug5805_18 new file mode 100755 index 0000000000..0bcf401b6a --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_18 @@ -0,0 +1,65 @@ +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" +puts "TODO OCC11111 ALL: Error : The square of result shape is" + +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +set z1 5 +set z2 -5 + +# beziercurve1 +beziercurve bc1 5 5 5 ${z1} 5 -5 ${z1} -5 -5 ${z1} -5 5 ${z1} 5 5 ${z1} +mkedge e1 bc1 +wire UpCover e1 + +# beziercurve2 +copy e1 e2 +ttranslate e2 0 0 ${z2} +wire BottomCover e2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.001 +catch { OFFSETSHAPE $distance {s_2} $calcul $type } +# Bad result + + +set square 495.635 + +set nb_v_good 2 +set nb_e_good 3 +set nb_w_good 3 +set nb_f_good 3 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 13 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_19 b/tests/bugs/modalg_2/bug5805_19 new file mode 100755 index 0000000000..ea4c692378 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_19 @@ -0,0 +1,66 @@ +puts "TODO ?OCC11111 ALL: Error : Result shape is WRONG" +puts "TODO ?OCC11111 ALL: Error : The square of result shape is" +puts "TODO ?OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" + +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +set z1 5 +set z2 -5 + +# beziercurve1 +beziercurve bc1 5 5 5 ${z1} 5 -5 ${z1} -5 -5 ${z1} -5 5 ${z1} 5 5 ${z1} +mkedge e1 bc1 +wire UpCover e1 + +# beziercurve2 +copy e1 e2 +ttranslate e2 0 0 ${z2} +wire BottomCover e2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.001 +catch { OFFSETSHAPE $distance {s_3} $calcul $type } +# Bad result + + +set square 495.635 + +set nb_v_good 2 +set nb_e_good 3 +set nb_w_good 3 +set nb_f_good 3 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 13 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_2 b/tests/bugs/modalg_2/bug5805_2 new file mode 100755 index 0000000000..b9739e9327 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_2 @@ -0,0 +1,54 @@ +puts "============" +puts "OCC5805" +puts "============" +puts "" +###################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +###################################################### + +set BugNumber OCC5805 + +puts "demonstration of pipes and hollowing for GTISoft" +puts "" +puts "Scenario 2A: Hollowed elliptical cylinder - ThroughSection and MakeThickSolid" + +ellipse e 10 60 0 1 0 0 5 3 +mkedge ee e +wire w1 ee +copy w1 w2 +ttranslate w2 -20 0 0 + +if { [catch { thrusections rthru2 1 1 w1 w2 } catch_result] } { + puts "Faulty ${BugNumber} : thrusections is wrong" +} + +explode rthru2 f + +if { [catch { offsetshape result rthru2 -0.5 rthru2_2 rthru2_3 } catch_result] } { + puts "Faulty ${BugNumber} : offsetshape is wrong" +} + +if { [catch { set tolmaxres [tolmax result] } catch_result] } { + puts "Faulty ${BugNumber} : tolmax is wrong" +} +regexp {max tol = ([-0-9.+eE]+)} $tolmaxres full maxtolerance +if { [catch { expr $maxtolerance } catch_result] } { + puts "Faulty ${BugNumber} : maxtolerance is wrong (1)." +} +if { $maxtolerance > 1. } { + puts "Faulty ${BugNumber} : maxtolerance is wrong (2)." +} + +set square 982.254 + +set nb_v_good 3 +set nb_e_good 5 +set nb_w_good 6 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 20 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_20 b/tests/bugs/modalg_2/bug5805_20 new file mode 100755 index 0000000000..6634ab1936 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_20 @@ -0,0 +1,65 @@ +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" +puts "TODO OCC11111 ALL: Error : The square of result shape is" + +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +set z1 5 +set z2 -5 + +# beziercurve1 +beziercurve bc1 5 5 5 ${z1} 5 -5 ${z1} -5 -5 ${z1} -5 5 ${z1} 5 5 ${z1} +mkedge e1 bc1 +wire UpCover e1 + +# beziercurve2 +copy e1 e2 +ttranslate e2 0 0 ${z2} +wire BottomCover e2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.001 +catch { OFFSETSHAPE $distance {s_2 s_3} $calcul $type } +# Bad result + + +set square 495.635 + +set nb_v_good 2 +set nb_e_good 3 +set nb_w_good 3 +set nb_f_good 3 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 13 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_21 b/tests/bugs/modalg_2/bug5805_21 new file mode 100755 index 0000000000..d3d4fb9cb3 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_21 @@ -0,0 +1,60 @@ +puts "TODO ?OCC11111 ALL: Error : The square of result shape is" + +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +# pbsplinecurve1 +pbsplinecurve pbc1 3 9 0 1 1 1 2 1 3 1 4 1 5 1 6 1 7 1 8 1 -1 0 0 1 -2 2 0 1 0 1 0 1 2 2 0 1 1 0 0 1 2 -2 0 1 0 -1 0 1 -2 -2 0 1 +mkedge e1 pbc1 +wire UpCover e1 + +# pbsplinecurve1 +copy e1 e2 +ttranslate e2 0 0 20 +wire BottomCover e2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.1 +catch { OFFSETSHAPE $distance {} $calcul $type } + + +set square 236.013 + +set nb_v_good 2 +set nb_e_good 3 +set nb_w_good 3 +set nb_f_good 3 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 13 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_22 b/tests/bugs/modalg_2/bug5805_22 new file mode 100755 index 0000000000..20d01407a6 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_22 @@ -0,0 +1,60 @@ +puts "TODO ?OCC11111 ALL: Error : The square of result shape is" + +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +# pbsplinecurve1 +pbsplinecurve pbc1 3 9 0 1 1 1 2 1 3 1 4 1 5 1 6 1 7 1 8 1 -1 0 0 1 -2 2 0 1 0 1 0 1 2 2 0 1 1 0 0 1 2 -2 0 1 0 -1 0 1 -2 -2 0 1 +mkedge e1 pbc1 +wire UpCover e1 + +# pbsplinecurve1 +copy e1 e2 +ttranslate e2 0 0 20 +wire BottomCover e2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.1 +catch { OFFSETSHAPE $distance {s_3} $calcul $type } + + +set square 484.846 + +set nb_v_good 3 +set nb_e_good 5 +set nb_w_good 6 +set nb_f_good 5 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 21 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_23 b/tests/bugs/modalg_2/bug5805_23 new file mode 100755 index 0000000000..0995e525e2 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_23 @@ -0,0 +1,60 @@ +puts "TODO ?OCC11111 ALL: Error : The square of result shape is" + +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +# pbsplinecurve1 +pbsplinecurve pbc1 3 9 0 1 1 1 2 1 3 1 4 1 5 1 6 1 7 1 8 1 -1 0 0 1 -2 2 0 1 0 1 0 1 2 2 0 1 1 0 0 1 2 -2 0 1 0 -1 0 1 -2 -2 0 1 +mkedge e1 pbc1 +wire UpCover e1 + +# pbsplinecurve1 +copy e1 e2 +ttranslate e2 0 0 20 +wire BottomCover e2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.1 +catch { OFFSETSHAPE $distance {s_2} $calcul $type } + + +set square 484.846 + +set nb_v_good 3 +set nb_e_good 5 +set nb_w_good 6 +set nb_f_good 5 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 21 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_24 b/tests/bugs/modalg_2/bug5805_24 new file mode 100755 index 0000000000..d3c2632ab9 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_24 @@ -0,0 +1,60 @@ +puts "TODO ?OCC11111 ALL: Error : The square of result shape is" + +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +# pbsplinecurve1 +pbsplinecurve pbc1 3 9 0 1 1 1 2 1 3 1 4 1 5 1 6 1 7 1 8 1 -1 0 0 1 -2 2 0 1 0 1 0 1 2 2 0 1 1 0 0 1 2 -2 0 1 0 -1 0 1 -2 -2 0 1 +mkedge e1 pbc1 +wire UpCover e1 + +# pbsplinecurve1 +copy e1 e2 +ttranslate e2 0 0 20 +wire BottomCover e2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.1 +catch { OFFSETSHAPE $distance {s_3 s_2} $calcul $type } + + +set square 472.222 + +set nb_v_good 3 +set nb_e_good 5 +set nb_w_good 6 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 20 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_25 b/tests/bugs/modalg_2/bug5805_25 new file mode 100755 index 0000000000..5f50d97c53 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_25 @@ -0,0 +1,85 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +# +# * +# | \ +# | \ +# | \ +# | \ +# | \ +# | \ +# | * v3 \ +# | | \ \ +# | | \ \ +# | | \ \ +# | | \ \ +# | | /* v2 * +# | | / / +# | | / / +# | | / / +# | * / +# | v1 / +# | / +# | / +# | / +# | / +# | / +# |/ +# * +# +cpulimit 1400 +set z1 10 +set z2 -10 + +# triangle1 +polyline UpCover 0 0 ${z1} 5 5 ${z1} 0 10 ${z1} 0 0 ${z1} + +# triangle2 +polyline BottomCover -5 -5 ${z2} 10 10 ${z2} -5 20 ${z2} -5 -5 ${z2} + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {} $calcul $type } + + +set square 914.876 + +set nb_v_good 6 +set nb_e_good 9 +set nb_w_good 5 +set nb_f_good 5 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 27 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_26 b/tests/bugs/modalg_2/bug5805_26 new file mode 100755 index 0000000000..dbdbc167b3 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_26 @@ -0,0 +1,85 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +# +# * +# | \ +# | \ +# | \ +# | \ +# | \ +# | \ +# | * v3 \ +# | | \ \ +# | | \ \ +# | | \ \ +# | | \ \ +# | | /* v2 * +# | | / / +# | | / / +# | | / / +# | * / +# | v1 / +# | / +# | / +# | / +# | / +# | / +# |/ +# * +# + +set z1 10 +set z2 -10 + +# triangle1 +polyline UpCover 0 0 ${z1} 5 5 ${z1} 0 10 ${z1} 0 0 ${z1} + +# triangle2 +polyline BottomCover -5 -5 ${z2} 10 10 ${z2} -5 20 ${z2} -5 -5 ${z2} + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {s_4} $calcul $type } + + +set square 2011.91 + +set nb_v_good 12 +set nb_e_good 18 +set nb_w_good 10 +set nb_f_good 9 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 51 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_27 b/tests/bugs/modalg_2/bug5805_27 new file mode 100755 index 0000000000..909933b8a6 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_27 @@ -0,0 +1,85 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +# +# * +# | \ +# | \ +# | \ +# | \ +# | \ +# | \ +# | * v3 \ +# | | \ \ +# | | \ \ +# | | \ \ +# | | \ \ +# | | /* v2 * +# | | / / +# | | / / +# | | / / +# | * / +# | v1 / +# | / +# | / +# | / +# | / +# | / +# |/ +# * +# + +set z1 10 +set z2 -10 + +# triangle1 +polyline UpCover 0 0 ${z1} 5 5 ${z1} 0 10 ${z1} 0 0 ${z1} + +# triangle2 +polyline BottomCover -5 -5 ${z2} 10 10 ${z2} -5 20 ${z2} -5 -5 ${z2} + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {s_5} $calcul $type } + + +set square 1755.54 + +set nb_v_good 12 +set nb_e_good 18 +set nb_w_good 10 +set nb_f_good 9 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 51 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_28 b/tests/bugs/modalg_2/bug5805_28 new file mode 100755 index 0000000000..19fa61abad --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_28 @@ -0,0 +1,85 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +# +# * +# | \ +# | \ +# | \ +# | \ +# | \ +# | \ +# | * v3 \ +# | | \ \ +# | | \ \ +# | | \ \ +# | | \ \ +# | | /* v2 * +# | | / / +# | | / / +# | | / / +# | * / +# | v1 / +# | / +# | / +# | / +# | / +# | / +# |/ +# * +# + +set z1 10 +set z2 -10 + +# triangle1 +polyline UpCover 0 0 ${z1} 5 5 ${z1} 0 10 ${z1} 0 0 ${z1} + +# triangle2 +polyline BottomCover -5 -5 ${z2} 10 10 ${z2} -5 20 ${z2} -5 -5 ${z2} + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {s_4 s_5} $calcul $type } + + +set square 1735.06 + +set nb_v_good 12 +set nb_e_good 18 +set nb_w_good 10 +set nb_f_good 8 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 50 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_29 b/tests/bugs/modalg_2/bug5805_29 new file mode 100755 index 0000000000..41dfb04a52 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_29 @@ -0,0 +1,63 @@ +puts "============" +puts "OCC5805" +puts "OCC7582" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### +# Bad result of offset operation +####################################################################### + +set BugNumber OCC5805 + +set z1 10 +set z2 -10 + +# circle1 +circle c1 0 0 ${z1} 5 +mkedge ec1 c1 +wire UpCover ec1 + +# circle2 +circle c2 0 0 ${z2} 30 +mkedge ec2 c2 +wire BottomCover ec2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {} $calcul $type } + + +set square 5829.59 + +set nb_v_good 2 +set nb_e_good 3 +set nb_w_good 3 +set nb_f_good 3 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 13 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_3 b/tests/bugs/modalg_2/bug5805_3 new file mode 100755 index 0000000000..44313f3355 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_3 @@ -0,0 +1,50 @@ +puts "============" +puts "OCC5805" +puts "============" +puts "" +###################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +###################################################### + +set BugNumber OCC5805 + +restore [locate_data_file OCC5805.brep] a + +decho off +set che_a [checkshape a] +decho on +if { [regexp {Faulty} $che_a] } { + puts "Faulty ${BugNumber} : checkshape is wrong for a" +} + +explode a f + +if { [catch { offsetshape result a -1 a_6 } catch_result] } { + puts "Faulty ${BugNumber} : offsetshape is wrong" +} + +if { [catch { set tolmaxres [tolmax result] } catch_result] } { + puts "Faulty ${BugNumber} : tolmax is wrong" +} + +regexp {max tol = ([-0-9.+eE]+)} $tolmaxres full maxtolerance +if { [catch { expr $maxtolerance } catch_result] } { + puts "Faulty ${BugNumber} : maxtolerance is wrong (1)." +} +if { $maxtolerance > 1. } { + puts "Faulty ${BugNumber} : maxtolerance is wrong (2)." +} + +set square 1185.03 + +set nb_v_good 10 +set nb_e_good 15 +set nb_w_good 7 +set nb_f_good 7 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 41 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_30 b/tests/bugs/modalg_2/bug5805_30 new file mode 100755 index 0000000000..07c9a551c0 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_30 @@ -0,0 +1,63 @@ +puts "TODO OCC11111 ALL: Error : The square of result shape is" + +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +set z1 10 +set z2 -10 + +# circle1 +circle c1 0 0 ${z1} 5 +mkedge ec1 c1 +wire UpCover ec1 + +# circle2 +circle c2 0 0 ${z2} 30 +mkedge ec2 c2 +wire BottomCover ec2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {s_2} $calcul $type } + + +set square 1336.75 + +set nb_v_good 4 +set nb_e_good 6 +set nb_w_good 6 +set nb_f_good 5 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 23 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_31 b/tests/bugs/modalg_2/bug5805_31 new file mode 100755 index 0000000000..033e89c38f --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_31 @@ -0,0 +1,61 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +set z1 10 +set z2 -10 + +# circle1 +circle c1 0 0 ${z1} 5 +mkedge ec1 c1 +wire UpCover ec1 + +# circle2 +circle c2 0 0 ${z2} 30 +mkedge ec2 c2 +wire BottomCover ec2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {s_3} $calcul $type } + + +set square 7157.43 + +set nb_v_good 4 +set nb_e_good 6 +set nb_w_good 6 +set nb_f_good 5 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 23 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_32 b/tests/bugs/modalg_2/bug5805_32 new file mode 100755 index 0000000000..fce6ed8ef9 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_32 @@ -0,0 +1,66 @@ +puts "TODO OCC11111 ALL: Error : The square of result shape is" + +puts "============" +puts "OCC5805" +puts "OCC7582" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### +# Bad result of offset operation +####################################################################### + +set BugNumber OCC5805 + +set z1 10 +set z2 -10 + +# circle1 +circle c1 0 0 ${z1} 5 +mkedge ec1 c1 +wire UpCover ec1 + +# circle2 +circle c2 0 0 ${z2} 30 +mkedge ec2 c2 +wire BottomCover ec2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {s_2 s_3} $calcul $type } + + +set square 1223.65 + +set nb_v_good 4 +set nb_e_good 6 +set nb_w_good 6 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 22 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_33 b/tests/bugs/modalg_2/bug5805_33 new file mode 100755 index 0000000000..b256334149 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_33 @@ -0,0 +1,61 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +set x1 10 +set x2 -10 + +# ellipse1 +ellipse ell1 ${x1} 0 0 1 0 0 5 3 +mkedge ee1 ell1 +wire UpCover ee1 + +# ellipse2 +ellipse ell2 ${x2} 0 0 1 0 0 4 2 +mkedge ee2 ell2 +wire BottomCover ee2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {} $calcul $type } + + +set square 418.388 + +set nb_v_good 2 +set nb_e_good 3 +set nb_w_good 3 +set nb_f_good 3 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 13 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_34 b/tests/bugs/modalg_2/bug5805_34 new file mode 100755 index 0000000000..4077edd1b7 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_34 @@ -0,0 +1,61 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +set x1 10 +set x2 -10 + +# ellipse1 +ellipse ell1 ${x1} 0 0 1 0 0 5 3 +mkedge ee1 ell1 +wire UpCover ee1 + +# ellipse2 +ellipse ell2 ${x2} 0 0 1 0 0 4 2 +mkedge ee2 ell2 +wire BottomCover ee2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {s_2} $calcul $type } + + +set square 881.591 + +set nb_v_good 4 +set nb_e_good 6 +set nb_w_good 6 +set nb_f_good 5 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 23 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_35 b/tests/bugs/modalg_2/bug5805_35 new file mode 100755 index 0000000000..5cc0100ec5 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_35 @@ -0,0 +1,61 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +set x1 10 +set x2 -10 + +# ellipse1 +ellipse ell1 ${x1} 0 0 1 0 0 5 3 +mkedge ee1 ell1 +wire UpCover ee1 + +# ellipse2 +ellipse ell2 ${x2} 0 0 1 0 0 4 2 +mkedge ee2 ell2 +wire BottomCover ee2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {s_3} $calcul $type } + + +set square 915.469 + +set nb_v_good 4 +set nb_e_good 6 +set nb_w_good 6 +set nb_f_good 5 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 23 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_36 b/tests/bugs/modalg_2/bug5805_36 new file mode 100755 index 0000000000..f2722cc973 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_36 @@ -0,0 +1,61 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +set x1 10 +set x2 -10 + +# ellipse1 +ellipse ell1 ${x1} 0 0 1 0 0 5 3 +mkedge ee1 ell1 +wire UpCover ee1 + +# ellipse2 +ellipse ell2 ${x2} 0 0 1 0 0 4 2 +mkedge ee2 ell2 +wire BottomCover ee2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {s_2 s_3} $calcul $type } + + +set square 856.92 + +set nb_v_good 4 +set nb_e_good 6 +set nb_w_good 6 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 22 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_37 b/tests/bugs/modalg_2/bug5805_37 new file mode 100755 index 0000000000..20716b3ed3 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_37 @@ -0,0 +1,74 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +# +# v12 v11 +# *---------------------* +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# *---------------------* +# v13 v14 +# + +set z1 5 +set z2 -5 + +# quadrangle1 +polyline UpCover 0 0 ${z1} 6 0 ${z1} 6 6 ${z1} 0 6 ${z1} 0 0 ${z1} + +# quadrangle2 +polyline BottomCover 3 -2 ${z2} 8 3 ${z2} 3 8 ${z2} -2 3 ${z2} 3 -2 ${z2} + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {} $calcul $type } + + +set square 246.821 + +set nb_v_good 8 +set nb_e_good 12 +set nb_w_good 6 +set nb_f_good 6 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 34 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_38 b/tests/bugs/modalg_2/bug5805_38 new file mode 100755 index 0000000000..2d746c58d3 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_38 @@ -0,0 +1,74 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +# +# v12 v11 +# *---------------------* +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# *---------------------* +# v13 v14 +# + +set z1 5 +set z2 -5 + +# quadrangle1 +polyline UpCover 0 0 ${z1} 6 0 ${z1} 6 6 ${z1} 0 6 ${z1} 0 0 ${z1} + +# quadrangle2 +polyline BottomCover 3 -2 ${z2} 8 3 ${z2} 3 8 ${z2} -2 3 ${z2} 3 -2 ${z2} + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {s_5} $calcul $type } + + +set square 544.931 + +set nb_v_good 16 +set nb_e_good 24 +set nb_w_good 12 +set nb_f_good 11 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 65 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_39 b/tests/bugs/modalg_2/bug5805_39 new file mode 100755 index 0000000000..73bfe2d737 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_39 @@ -0,0 +1,74 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +# +# v12 v11 +# *---------------------* +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# *---------------------* +# v13 v14 +# + +set z1 5 +set z2 -5 + +# quadrangle1 +polyline UpCover 0 0 ${z1} 6 0 ${z1} 6 6 ${z1} 0 6 ${z1} 0 0 ${z1} + +# quadrangle2 +polyline BottomCover 3 -2 ${z2} 8 3 ${z2} 3 8 ${z2} -2 3 ${z2} 3 -2 ${z2} + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {s_6} $calcul $type } + + +set square 524.758 + +set nb_v_good 16 +set nb_e_good 24 +set nb_w_good 12 +set nb_f_good 11 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 65 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_4 b/tests/bugs/modalg_2/bug5805_4 new file mode 100755 index 0000000000..c5a54e1e87 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_4 @@ -0,0 +1,53 @@ +puts "============" +puts "OCC5805" +puts "============" +puts "" +###################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +###################################################### + +set BugNumber OCC5805 + +restore [locate_data_file OCC5805.brep] a + +decho off +set che_a [checkshape a] +decho on + +if { [regexp {Faulty} $che_a] } { + puts "Faulty ${BugNumber} : checkshape is wrong for a" +} + +explode a f + +offsetparameter 1e-7 c a +offsetload a -1 a_6 + +if { [catch { offsetperform result } catch_result] } { + puts "Faulty ${BugNumber} : offsetshape is wrong" +} + +if { [catch { set tolmaxres [tolmax result] } catch_result] } { + puts "Faulty ${BugNumber} : tolmax is wrong" +} +regexp {max tol = ([-0-9.+eE]+)} $tolmaxres full maxtolerance +if { [catch { expr $maxtolerance } catch_result] } { + puts "Faulty ${BugNumber} : maxtolerance is wrong (1)." +} +if { $maxtolerance > 1. } { + puts "Faulty ${BugNumber} : maxtolerance is wrong (2)." +} + +set square 1185.03 + +set nb_v_good 10 +set nb_e_good 15 +set nb_w_good 7 +set nb_f_good 7 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 41 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_40 b/tests/bugs/modalg_2/bug5805_40 new file mode 100755 index 0000000000..881e0039de --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_40 @@ -0,0 +1,74 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +# +# v12 v11 +# *---------------------* +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# | | +# *---------------------* +# v13 v14 +# + +set z1 5 +set z2 -5 + +# quadrangle1 +polyline UpCover 0 0 ${z1} 6 0 ${z1} 6 6 ${z1} 0 6 ${z1} 0 0 ${z1} + +# quadrangle2 +polyline BottomCover 3 -2 ${z2} 8 3 ${z2} 3 8 ${z2} -2 3 ${z2} 3 -2 ${z2} + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {s_5 s_6} $calcul $type } + + +set square 485.358 + +set nb_v_good 16 +set nb_e_good 24 +set nb_w_good 12 +set nb_f_good 10 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 64 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_41 b/tests/bugs/modalg_2/bug5805_41 new file mode 100755 index 0000000000..1cbb41489b --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_41 @@ -0,0 +1,67 @@ +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" +puts "TODO OCC11111 ALL: Error : The square of result shape is" +puts "TODO ?OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO ?OCC11111 ALL: Faulty OCC5805 : result is not Closed shape" +puts "TODO ?OCC11111 ALL: Error : The command is not valid" +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +set z1 5 +set z2 -5 + +# beziercurve1 +beziercurve bc1 5 5 5 ${z1} 5 -5 ${z1} -5 -5 ${z1} -5 5 ${z1} 5 5 ${z1} +mkedge e1 bc1 +wire UpCover e1 + +# beziercurve2 +beziercurve bc2 5 4 4 ${z2} 4 -4 ${z2} -4 -4 ${z2} -4 4 ${z2} 4 4 ${z2} +mkedge e2 bc2 +wire BottomCover e2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.001 +catch { OFFSETSHAPE $distance {} $calcul $type } +# Null result + + +set square 495.635 + +set nb_v_good 2 +set nb_e_good 3 +set nb_w_good 3 +set nb_f_good 3 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 13 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_42 b/tests/bugs/modalg_2/bug5805_42 new file mode 100755 index 0000000000..cfb897ca1c --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_42 @@ -0,0 +1,67 @@ +puts "TODO ?OCC11111 ALL: Error : Result shape is WRONG" +puts "TODO ?OCC11111 ALL: Faulty OCC5805 : result is not Closed shape" +puts "TODO ?OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO ?OCC11111 ALL: Error : The command is not valid." +puts "TODO ?OCC11111 ALL: Error : The square of result shape is" +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +set z1 5 +set z2 -5 + +# beziercurve1 +beziercurve bc1 5 5 5 ${z1} 5 -5 ${z1} -5 -5 ${z1} -5 5 ${z1} 5 5 ${z1} +mkedge e1 bc1 +wire UpCover e1 + +# beziercurve2 +beziercurve bc2 5 4 4 ${z2} 4 -4 ${z2} -4 -4 ${z2} -4 4 ${z2} 4 4 ${z2} +mkedge e2 bc2 +wire BottomCover e2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.001 +catch { OFFSETSHAPE $distance {s_2} $calcul $type } +# Bad result + + +set square 495.635 + +set nb_v_good 2 +set nb_e_good 3 +set nb_w_good 3 +set nb_f_good 3 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 13 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_43 b/tests/bugs/modalg_2/bug5805_43 new file mode 100755 index 0000000000..f44273aa75 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_43 @@ -0,0 +1,68 @@ +puts "TODO OCC11111 ALL: Error : The square of result shape is" +puts "TODO ?OCC11111 ALL: Error : Result shape is WRONG" +puts "TODO ?OCC11111 ALL: Faulty OCC5805 : result is not Closed shape" +puts "TODO ?OCC11111 ALL: Error : The command is not valid." +puts "TODO ?OCC11111 ALL: Error : The square of result shape is" +puts "TODO ?OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +set z1 5 +set z2 -5 + +# beziercurve1 +beziercurve bc1 5 5 5 ${z1} 5 -5 ${z1} -5 -5 ${z1} -5 5 ${z1} 5 5 ${z1} +mkedge e1 bc1 +wire UpCover e1 + +# beziercurve2 +beziercurve bc2 5 4 4 ${z2} 4 -4 ${z2} -4 -4 ${z2} -4 4 ${z2} 4 4 ${z2} +mkedge e2 bc2 +wire BottomCover e2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.001 +catch { OFFSETSHAPE $distance {s_3} $calcul $type } +# Bad result + + +set square 495.635 + +set nb_v_good 2 +set nb_e_good 3 +set nb_w_good 3 +set nb_f_good 3 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 13 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_44 b/tests/bugs/modalg_2/bug5805_44 new file mode 100755 index 0000000000..93484c7bcf --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_44 @@ -0,0 +1,64 @@ +puts "TODO OCC11111 ALL: Error : The square of result shape is" + +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +set z1 5 +set z2 -5 + +# beziercurve1 +beziercurve bc1 5 5 5 ${z1} 5 -5 ${z1} -5 -5 ${z1} -5 5 ${z1} 5 5 ${z1} +mkedge e1 bc1 +wire UpCover e1 + +# beziercurve2 +beziercurve bc2 5 4 4 ${z2} 4 -4 ${z2} -4 -4 ${z2} -4 4 ${z2} 4 4 ${z2} +mkedge e2 bc2 +wire BottomCover e2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.001 +catch { OFFSETSHAPE $distance {s_2 s_3} $calcul $type } +# Bad result + + +set square 495.635 + +set nb_v_good 2 +set nb_e_good 3 +set nb_w_good 3 +set nb_f_good 3 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 13 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_45 b/tests/bugs/modalg_2/bug5805_45 new file mode 100755 index 0000000000..e85305a1cd --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_45 @@ -0,0 +1,59 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +# pbsplinecurve1 +pbsplinecurve pbc1 3 9 0 1 1 1 2 1 3 1 4 1 5 1 6 1 7 1 8 1 -1 0 0 1 -2 2 0 1 0 1 0 1 2 2 0 1 1 0 0 1 2 -2 0 1 0 -1 0 1 -2 -2 0 1 +mkedge e1 pbc1 +wire UpCover e1 + +# pbsplinecurve1 +copy e1 e2 +ttranslate e2 0 0 20 +tscale e2 0 0 0 2 +wire BottomCover e2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.1 +catch { OFFSETSHAPE $distance {} $calcul $type } + + +set square 754.039 + +set nb_v_good 2 +set nb_e_good 3 +set nb_w_good 3 +set nb_f_good 3 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 13 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_46 b/tests/bugs/modalg_2/bug5805_46 new file mode 100755 index 0000000000..b93c41c113 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_46 @@ -0,0 +1,59 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +# pbsplinecurve1 +pbsplinecurve pbc1 3 9 0 1 1 1 2 1 3 1 4 1 5 1 6 1 7 1 8 1 -1 0 0 1 -2 2 0 1 0 1 0 1 2 2 0 1 1 0 0 1 2 -2 0 1 0 -1 0 1 -2 -2 0 1 +mkedge e1 pbc1 +wire UpCover e1 + +# pbsplinecurve1 +copy e1 e2 +ttranslate e2 0 0 20 +tscale e2 0 0 0 2 +wire BottomCover e2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.1 +catch { OFFSETSHAPE $distance {s_3} $calcul $type } + + +set square 1470.32 + +set nb_v_good 4 +set nb_e_good 6 +set nb_w_good 6 +set nb_f_good 5 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 23 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_47 b/tests/bugs/modalg_2/bug5805_47 new file mode 100755 index 0000000000..7d985b55fb --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_47 @@ -0,0 +1,60 @@ +puts "TODO ?OCC11111 ALL: Error : The square of result shape is" + +puts "============" +puts "OCC5805" +puts "============" +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### +cpulimit 8000 +set BugNumber OCC5805 + +# pbsplinecurve1 +pbsplinecurve pbc1 3 9 0 1 1 1 2 1 3 1 4 1 5 1 6 1 7 1 8 1 -1 0 0 1 -2 2 0 1 0 1 0 1 2 2 0 1 1 0 0 1 2 -2 0 1 0 -1 0 1 -2 -2 0 1 +mkedge e1 pbc1 +wire UpCover e1 + +# pbsplinecurve1 +copy e1 e2 +ttranslate e2 0 0 20 +tscale e2 0 0 0 2 +wire BottomCover e2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.1 +catch { OFFSETSHAPE $distance {s_2} $calcul $type } + + +set square 1511.4 + +set nb_v_good 4 +set nb_e_good 6 +set nb_w_good 6 +set nb_f_good 5 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 23 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_48 b/tests/bugs/modalg_2/bug5805_48 new file mode 100755 index 0000000000..267c6571c0 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_48 @@ -0,0 +1,60 @@ +puts "TODO ?OCC11111 ALL: Error : The square of result shape is" + +puts "============" +puts "OCC5805" +puts "============" +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### +cpulimit 8000 +set BugNumber OCC5805 + +# pbsplinecurve1 +pbsplinecurve pbc1 3 9 0 1 1 1 2 1 3 1 4 1 5 1 6 1 7 1 8 1 -1 0 0 1 -2 2 0 1 0 1 0 1 2 2 0 1 1 0 0 1 2 -2 0 1 0 -1 0 1 -2 -2 0 1 +mkedge e1 pbc1 +wire UpCover e1 + +# pbsplinecurve1 +copy e1 e2 +ttranslate e2 0 0 20 +tscale e2 0 0 0 2 +wire BottomCover e2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.1 +catch { OFFSETSHAPE $distance {s_3 s_2} $calcul $type } + + +set square 1451.05 + +set nb_v_good 4 +set nb_e_good 6 +set nb_w_good 6 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 22 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_49 b/tests/bugs/modalg_2/bug5805_49 new file mode 100755 index 0000000000..a9287d3391 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_49 @@ -0,0 +1,44 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +# pcone +pcone s 30 5 20 + +set distance -0.5 +catch { OFFSETSHAPE $distance {} $calcul $type } + + +set square 5829.59 + +set nb_v_good 2 +set nb_e_good 3 +set nb_w_good 3 +set nb_f_good 3 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 13 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_2/bug5805_5 b/tests/bugs/modalg_2/bug5805_5 new file mode 100755 index 0000000000..341e0c0308 --- /dev/null +++ b/tests/bugs/modalg_2/bug5805_5 @@ -0,0 +1,52 @@ +puts "============" +puts "OCC5805" +puts "============" +puts "" +###################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +###################################################### + +set BugNumber OCC5805 + +restore [locate_data_file OCC5805.brep] a + +decho off +set che_a [checkshape a] +decho on +if { [regexp {Faulty} $che_a] } { + puts "Faulty ${BugNumber} : checkshape is wrong for a" +} + +explode a f + +offsetparameter 1e-7 c a +offsetload a -1 + +if { [catch { offsetperform result } catch_result] } { + puts "Faulty ${BugNumber} : offsetshape is wrong" +} + +if { [catch { set tolmaxres [tolmax result] } catch_result]} { + puts "Faulty ${BugNumber} : tolmax is wrong" +} +regexp {max tol = ([-0-9.+eE]+)} $tolmaxres full maxtolerance +if { [catch { expr $maxtolerance } catch_result] } { + puts "Faulty ${BugNumber} : maxtolerance is wrong (1)." +} +if { $maxtolerance > 1. } { + puts "Faulty ${BugNumber} : maxtolerance is wrong (2)." +} + +set square 876.584 + +set nb_v_good 10 +set nb_e_good 15 +set nb_w_good 7 +set nb_f_good 7 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 41 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_3/begin b/tests/bugs/modalg_3/begin new file mode 100755 index 0000000000..f40c35f0a3 --- /dev/null +++ b/tests/bugs/modalg_3/begin @@ -0,0 +1,20 @@ +set subgroup modalg + +set calcul "p" +set type "i" + +proc OFFSETSHAPE {distance faces calcul type} { + uplevel #0 explode s f + uplevel #0 offsetparameter 1e-7 $calcul $type + uplevel #0 offsetload s $distance $faces + uplevel #0 offsetperform result +} + + + + + + + + + diff --git a/tests/bugs/modalg_3/bug5805_50 b/tests/bugs/modalg_3/bug5805_50 new file mode 100755 index 0000000000..53dbd0e1e3 --- /dev/null +++ b/tests/bugs/modalg_3/bug5805_50 @@ -0,0 +1,44 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +# pcone +pcone s 30 5 20 + +set distance -0.5 +catch { OFFSETSHAPE $distance {s_2} $calcul $type } + + +set square 12150 + +set nb_v_good 4 +set nb_e_good 6 +set nb_w_good 6 +set nb_f_good 5 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 23 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_3/bug5805_51 b/tests/bugs/modalg_3/bug5805_51 new file mode 100755 index 0000000000..10e2c0bd31 --- /dev/null +++ b/tests/bugs/modalg_3/bug5805_51 @@ -0,0 +1,44 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +# pcone +pcone s 30 5 20 + +set distance -0.5 +catch { OFFSETSHAPE $distance {s_3} $calcul $type } + + +set square 7157.43 + +set nb_v_good 4 +set nb_e_good 6 +set nb_w_good 6 +set nb_f_good 5 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 23 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_3/bug5805_52 b/tests/bugs/modalg_3/bug5805_52 new file mode 100755 index 0000000000..b18bfd9a63 --- /dev/null +++ b/tests/bugs/modalg_3/bug5805_52 @@ -0,0 +1,44 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +# pcone +pcone s 30 5 20 + +set distance -0.5 +catch { OFFSETSHAPE $distance {s_2 s_3} $calcul $type } + + +set square 7051.59 + +set nb_v_good 4 +set nb_e_good 6 +set nb_w_good 6 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 22 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_3/bug5805_53 b/tests/bugs/modalg_3/bug5805_53 new file mode 100755 index 0000000000..c777675d1b --- /dev/null +++ b/tests/bugs/modalg_3/bug5805_53 @@ -0,0 +1,71 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +# +# * v3 +# | \ +# | \ +# | \ +# | \ +# | /* v2 +# | / +# | / +# | / +# * +# v1 +# + +set z1 10 +set z2 -10 + +# triangle1 +polyline UpCover 0 0 ${z1} 5 5 ${z1} 0 10 ${z1} 0 0 ${z1} + +# triangle2 +polyline BottomCover 0 0 ${z2} 5 5 ${z2} 0 10 ${z2} 0 0 ${z2} + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {s_4} $calcul $type } + + +set square 889.96 + +set nb_v_good 12 +set nb_e_good 18 +set nb_w_good 10 +set nb_f_good 9 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 51 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_3/bug5805_54 b/tests/bugs/modalg_3/bug5805_54 new file mode 100755 index 0000000000..d2ff51c9e3 --- /dev/null +++ b/tests/bugs/modalg_3/bug5805_54 @@ -0,0 +1,71 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +# +# * v3 +# | \ +# | \ +# | \ +# | \ +# | /* v2 +# | / +# | / +# | / +# * +# v1 +# + +set z1 10 +set z2 -10 + +# triangle1 +polyline UpCover 0 0 ${z1} 5 5 ${z1} 0 10 ${z1} 0 0 ${z1} + +# triangle2 +polyline BottomCover 0 0 ${z2} 5 5 ${z2} 0 10 ${z2} 0 0 ${z2} + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {} $calcul $type } + + +set square 376.733 + +set nb_v_good 6 +set nb_e_good 9 +set nb_w_good 5 +set nb_f_good 5 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 27 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_3/bug5805_55 b/tests/bugs/modalg_3/bug5805_55 new file mode 100755 index 0000000000..23ee9cd730 --- /dev/null +++ b/tests/bugs/modalg_3/bug5805_55 @@ -0,0 +1,71 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +# +# * v3 +# | \ +# | \ +# | \ +# | \ +# | /* v2 +# | / +# | / +# | / +# * +# v1 +# + +set z1 10 +set z2 -10 + +# triangle1 +polyline UpCover 0 0 ${z1} 5 5 ${z1} 0 10 ${z1} 0 0 ${z1} + +# triangle2 +polyline BottomCover 0 0 ${z2} 5 5 ${z2} 0 10 ${z2} 0 0 ${z2} + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {s_5} $calcul $type } + + +set square 889.96 + +set nb_v_good 12 +set nb_e_good 18 +set nb_w_good 10 +set nb_f_good 9 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 51 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_3/bug5805_56 b/tests/bugs/modalg_3/bug5805_56 new file mode 100755 index 0000000000..9bd61633ab --- /dev/null +++ b/tests/bugs/modalg_3/bug5805_56 @@ -0,0 +1,71 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +# +# * v3 +# | \ +# | \ +# | \ +# | \ +# | /* v2 +# | / +# | / +# | / +# * +# v1 +# + +set z1 10 +set z2 -10 + +# triangle1 +polyline UpCover 0 0 ${z1} 5 5 ${z1} 0 10 ${z1} 0 0 ${z1} + +# triangle2 +polyline BottomCover 0 0 ${z2} 5 5 ${z2} 0 10 ${z2} 0 0 ${z2} + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {s_4 s_5} $calcul $type } + + +set square 870.345 + +set nb_v_good 12 +set nb_e_good 18 +set nb_w_good 10 +set nb_f_good 8 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 50 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_3/bug5805_57 b/tests/bugs/modalg_3/bug5805_57 new file mode 100755 index 0000000000..7cb0549c39 --- /dev/null +++ b/tests/bugs/modalg_3/bug5805_57 @@ -0,0 +1,61 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +set z1 10 +set z2 -10 + +# circle1 +circle c1 0 0 ${z1} 5 +mkedge ec1 c1 +wire UpCover ec1 + +# circle2 +circle c2 0 0 ${z2} 5 +mkedge ec2 c2 +wire BottomCover ec2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {} $calcul $type } + + +set square 664.447 + +set nb_v_good 2 +set nb_e_good 3 +set nb_w_good 3 +set nb_f_good 3 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 13 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_3/bug5805_58 b/tests/bugs/modalg_3/bug5805_58 new file mode 100755 index 0000000000..1ed9814539 --- /dev/null +++ b/tests/bugs/modalg_3/bug5805_58 @@ -0,0 +1,61 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +set z1 10 +set z2 -10 + +# circle1 +circle c1 0 0 ${z1} 5 +mkedge ec1 c1 +wire UpCover ec1 + +# circle2 +circle c2 0 0 ${z2} 5 +mkedge ec2 c2 +wire BottomCover ec2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {s_2} $calcul $type } + + +set square 1336.75 + +set nb_v_good 4 +set nb_e_good 6 +set nb_w_good 6 +set nb_f_good 5 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 23 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_3/bug5805_6 b/tests/bugs/modalg_3/bug5805_6 new file mode 100755 index 0000000000..44e88f523d --- /dev/null +++ b/tests/bugs/modalg_3/bug5805_6 @@ -0,0 +1,47 @@ +puts "============" +puts "OCC5805" +puts "============" +puts "" +###################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +###################################################### + +set BugNumber OCC5805 + +restore [locate_data_file OCC5805.brep] a + +decho off +set che_a [checkshape a] +decho on +if { [regexp {Faulty} $che_a] } { + puts "Faulty ${BugNumber} : checkshape is wrong for a" +} + +if { [catch { offsetshape result a -1 } catch_result] } { + puts "Faulty ${BugNumber} : offsetshape is wrong" +} + +if { [catch { set tolmaxres [tolmax result] } catch_result] } { + puts "Faulty ${BugNumber} : tolmax is wrong" +} +regexp {max tol = ([-0-9.+eE]+)} $tolmaxres full maxtolerance +if { [catch { expr $maxtolerance } catch_result] } { + puts "Faulty ${BugNumber} : maxtolerance is wrong (1)." +} +if { $maxtolerance > 1. } { + puts "Faulty ${BugNumber} : maxtolerance is wrong (2)" +} + +set square 876.584 + +set nb_v_good 10 +set nb_e_good 15 +set nb_w_good 7 +set nb_f_good 7 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 41 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_3/bug5805_7 b/tests/bugs/modalg_3/bug5805_7 new file mode 100755 index 0000000000..12d0c00629 --- /dev/null +++ b/tests/bugs/modalg_3/bug5805_7 @@ -0,0 +1,61 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +set z1 10 +set z2 -10 + +# circle1 +circle c1 0 0 ${z1} 5 +mkedge ec1 c1 +wire UpCover ec1 + +# circle2 +circle c2 0 0 ${z2} 5 +mkedge ec2 c2 +wire BottomCover ec2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {s_3} $calcul $type } + + +set square 1336.75 + +set nb_v_good 4 +set nb_e_good 6 +set nb_w_good 6 +set nb_f_good 5 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 23 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_3/bug5805_8 b/tests/bugs/modalg_3/bug5805_8 new file mode 100755 index 0000000000..06b73e67f9 --- /dev/null +++ b/tests/bugs/modalg_3/bug5805_8 @@ -0,0 +1,61 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +set z1 10 +set z2 -10 + +# circle1 +circle c1 0 0 ${z1} 5 +mkedge ec1 c1 +wire UpCover ec1 + +# circle2 +circle c2 0 0 ${z2} 5 +mkedge ec2 c2 +wire BottomCover ec2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {s_2 s_3} $calcul $type } + + +set square 1223.65 + +set nb_v_good 4 +set nb_e_good 6 +set nb_w_good 6 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 22 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_3/bug5805_9 b/tests/bugs/modalg_3/bug5805_9 new file mode 100755 index 0000000000..b320e42e4a --- /dev/null +++ b/tests/bugs/modalg_3/bug5805_9 @@ -0,0 +1,58 @@ +puts "============" +puts "OCC5805" +puts "============" + +####################################################################### +# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. +####################################################################### + +set BugNumber OCC5805 + +# ellipse1 +ellipse ell 10 0 0 1 0 0 5 3 +mkedge ee1 ell +wire UpCover ee1 + +# ellipse2 +copy ee1 ee2 +ttranslate ee2 -20 0 0 +wire BottomCover ee2 + +set issolid 1 +set isruled 1 +if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { + puts "Faulty ${BugNumber} : thrusections is wrong" + +} + +set distance -0.5 +catch { OFFSETSHAPE $distance {} $calcul $type } + + +set square 495.635 + +set nb_v_good 2 +set nb_e_good 3 +set nb_w_good 3 +set nb_f_good 3 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 13 + + +set index [lsearch [whatis s] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : s is not Closed shape" + +} + +set index [lsearch [whatis result] Closed] +if {$index == -1} { + puts "Faulty ${BugNumber} : result is not Closed shape" + +} + + +set 2dviewer 0 diff --git a/tests/bugs/modalg_3/bug594 b/tests/bugs/modalg_3/bug594 new file mode 100755 index 0000000000..625301ed9f --- /dev/null +++ b/tests/bugs/modalg_3/bug594 @@ -0,0 +1,26 @@ + +puts "========================" +puts " SAL594 " +puts "========================" +puts "" +################################### +## It is impossible to put correct fillets on the shape +################################### + +restore [locate_data_file SAL594.brep] a +explode a e + +if [catch {blend result1 a 20 a_23 20 a_25 20 a_26 20 a_28} catch_result] { + puts "Faulty SAL594 (case 1): function BLEND works wrongly" +} else { + puts "SAL594 OK (case 1): function BLEND works OK" +} + +if [catch {blend result result1 2.5 a_15 2.5 a_12 2.5 a_4} catch_result] { + puts "Faulty SAL594 (case 2): function BLEND works wrongly." +} else { + puts "SAL594 OK (case 2): function BLEND works OK" +} + +set square 60513.1 +set 2dviewer 0 diff --git a/tests/bugs/modalg_3/bug59_1 b/tests/bugs/modalg_3/bug59_1 new file mode 100755 index 0000000000..76a81bb97b --- /dev/null +++ b/tests/bugs/modalg_3/bug59_1 @@ -0,0 +1,15 @@ + +puts "================" +puts "BUC60975 " +puts " OCC59" +puts "================" +puts "" + +restore [locate_data_file BUC60975.brep] a +explode a +checkshape a_1 +checkshape a_2 + +bfuse result a_1 a_2 +set square 241843 +set 2dviewer 0 diff --git a/tests/bugs/modalg_3/bug59_2 b/tests/bugs/modalg_3/bug59_2 new file mode 100755 index 0000000000..ea17b72811 --- /dev/null +++ b/tests/bugs/modalg_3/bug59_2 @@ -0,0 +1,15 @@ + +puts "================" +puts "BUC60975 " +puts " OCC59" +puts "================" +puts "" + +restore [locate_data_file BUC60975.brep] a +explode a +checkshape a_1 +checkshape a_2 + +bfuse result a_2 a_1 +set square 241843 +set 2dviewer 1 diff --git a/tests/bugs/modalg_3/bug600 b/tests/bugs/modalg_3/bug600 new file mode 100755 index 0000000000..4c1f33453b --- /dev/null +++ b/tests/bugs/modalg_3/bug600 @@ -0,0 +1,19 @@ +puts "TODO ?OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO ?OCC12345 ALL: Error : The square of result shape is" + +puts "========================" +puts " OCC600" +puts "========================" +## Result of BOPCOMMON operation is unclosed shape inspite of source solids are valid +############################################################ +cpulimit 5000 +restore [locate_data_file OCC600_1.brep] a +checkshape a +restore [locate_data_file OCC600_2.brep] b +checkshape b +bop b a + +bopcommon result + +set square 41970.8 +set 2dviewer 0 diff --git a/tests/bugs/modalg_3/bug602 b/tests/bugs/modalg_3/bug602 new file mode 100755 index 0000000000..0245268c17 --- /dev/null +++ b/tests/bugs/modalg_3/bug602 @@ -0,0 +1,24 @@ +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +puts "========================" +puts " OCC602 " +puts "========================" +puts "" +########################################### +## Exception during filet creation if it cross samedge of cylinder. +########################################### + +restore [locate_data_file OCC602.brep] a +checkshape a + +explode a e + +if [catch {blend result a 20 a_9 } catch_result] { + puts "Faulty OCC602: function BLEND works wrongly" +} else { + puts "OCC602 OK: function BLEND works OK" +} + +set square 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_3/bug605 b/tests/bugs/modalg_3/bug605 new file mode 100755 index 0000000000..d6aa6f1934 --- /dev/null +++ b/tests/bugs/modalg_3/bug605 @@ -0,0 +1,37 @@ + +puts "========================" +puts " OCC605" +puts "========================" +puts "" +############################## +## No any faces in result of pipe command. +############################## + +restore [locate_data_file OCC605a.brep] w1 +checkshape w1 +restore [locate_data_file OCC605b.brep] w2 +checkshape w2 + +if { [catch {pipe result w2 w1 } catch_result] } { + puts "Faulty OCC605: function PIPE works with exception." +} else { + explode result f + set nom 0 + set j 1 + repeat 20 { + if { [regexp {FACE} [whatis result_$j]] != 1 } { + break + } else { + set nom [expr $nom + 1] + } + incr j + } + if { $nom == 0 } { + puts " Faulty OCC605: Result of PIPE operation is incorrect !!! " + } else { + puts "OCC605 OK : Result of PIPE operation is NOT empty shell!!! " + } +} + +set square 20.6253 +set 2dviewer 0 diff --git a/tests/bugs/modalg_3/bug6063 b/tests/bugs/modalg_3/bug6063 new file mode 100755 index 0000000000..d397d8c667 --- /dev/null +++ b/tests/bugs/modalg_3/bug6063 @@ -0,0 +1,24 @@ +puts "============" +puts "OCC6063" +puts "============" +puts "" +###################################################### +# Exception is raised during command "sprops" in DRAW on attached shape. +###################################################### + +set BugNumber OCC6063 +cpulimit 2000 + +restore [locate_data_file OCC6063-2.brep] result + +decho off +set che_res [checkshape result] +decho on +if { [regexp {Faulty} $che_res] } { + puts "Faulty ${BugNumber} : checkshape is wrong for res" +} + +set tol_square 1.e-6 +set square 2465.96 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_3/bug6063_1 b/tests/bugs/modalg_3/bug6063_1 new file mode 100755 index 0000000000..a29cf8ec6a --- /dev/null +++ b/tests/bugs/modalg_3/bug6063_1 @@ -0,0 +1,19 @@ +puts "============" +puts "OCC6063" +puts "============" +puts "" +###################################################### +# Exception is raised during command "sprops" in DRAW on attached shape. +###################################################### + +set BugNumber OCC6063 + +restore [locate_data_file OCC6063.brep] result + +checkshape result + +set tol_square 1.e-6 +set square 413318 +set 3dviewer 1 + + diff --git a/tests/bugs/modalg_3/bug606_1 b/tests/bugs/modalg_3/bug606_1 new file mode 100755 index 0000000000..c8a50d5b93 --- /dev/null +++ b/tests/bugs/modalg_3/bug606_1 @@ -0,0 +1,14 @@ +pload QAcommands + +puts "================" +puts "OCC606" +puts "================" +puts "" + +restore [locate_data_file OCC606_2.brep] w2 +checkshape w2 + +OCC606 result w2 -t + +set square 508.243 +set 3dviewer 0 diff --git a/tests/bugs/modalg_3/bug606_2 b/tests/bugs/modalg_3/bug606_2 new file mode 100755 index 0000000000..4fabb19701 --- /dev/null +++ b/tests/bugs/modalg_3/bug606_2 @@ -0,0 +1,14 @@ +pload QAcommands + +puts "================" +puts "OCC606" +puts "================" +puts "" + +restore [locate_data_file OCC606_10.brep] w10 +checkshape w10 + +OCC606 result w10 -t + +set square 522.56 +set 3dviewer 0 diff --git a/tests/bugs/modalg_3/bug615 b/tests/bugs/modalg_3/bug615 new file mode 100755 index 0000000000..2229d67268 --- /dev/null +++ b/tests/bugs/modalg_3/bug615 @@ -0,0 +1,22 @@ +puts "TODO ?OCC12345 ALL: Error : The square of result shape is" + +puts "========================" +puts " OCC615" +puts "========================" +puts "" +############################# +## Wrong resultat of BLEND operation +############################# + +restore [locate_data_file OCC615.brep] a +checkshape a +explode a e + +if [catch {blend result a 9 a_15 } catch_result] { + puts "Faulty OCC615: function BLEND works with exception" +} else { + puts "OCC615 OK: function CHAMF works OK" +} + +set square 197055. +set 2dviewer 0 diff --git a/tests/bugs/modalg_3/bug616 b/tests/bugs/modalg_3/bug616 new file mode 100755 index 0000000000..386833ecc1 --- /dev/null +++ b/tests/bugs/modalg_3/bug616 @@ -0,0 +1,22 @@ + +puts "========================" +puts " OCC616" +puts "========================" +puts "" +######################################## +## Function MKOFFSET gives exception for attached face +######################################## + +restore [locate_data_file OCC616.brep] a +checkshape a + +if { [catch {mkoffset result a 5 -2} catch_result] } { + puts "Faulty OCC616: function MKOFFSET works with exception" +} else { + renamevar result_1 result + checkshape result + puts "OCC616 OK: function MKOFFSET works OK" +} + +set length 1062.78 +set 2dviewer 0 diff --git a/tests/bugs/modalg_3/bug698 b/tests/bugs/modalg_3/bug698 new file mode 100755 index 0000000000..cd9a6275dc --- /dev/null +++ b/tests/bugs/modalg_3/bug698 @@ -0,0 +1,16 @@ + +puts "======= OCC698 =======" +###################################### +## Cut operation produces bad result on attached shapes +###################################### +cpulimit 10000 +restore [locate_data_file OCC698_1.brep] b4 +checkshape b4 +restore [locate_data_file OCC698_2.brep] b5 +checkshape b5 + +bcut result b5 b4 + +set square 19048.2 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/begin b/tests/bugs/modalg_4/begin new file mode 100755 index 0000000000..f40c35f0a3 --- /dev/null +++ b/tests/bugs/modalg_4/begin @@ -0,0 +1,20 @@ +set subgroup modalg + +set calcul "p" +set type "i" + +proc OFFSETSHAPE {distance faces calcul type} { + uplevel #0 explode s f + uplevel #0 offsetparameter 1e-7 $calcul $type + uplevel #0 offsetload s $distance $faces + uplevel #0 offsetperform result +} + + + + + + + + + diff --git a/tests/bugs/modalg_4/bug13595_1 b/tests/bugs/modalg_4/bug13595_1 new file mode 100755 index 0000000000..e19f0a378e --- /dev/null +++ b/tests/bugs/modalg_4/bug13595_1 @@ -0,0 +1,32 @@ +puts "============" +puts "OCC13595" +puts "============" +puts "" +###################################################### +# MakePipe raises exception +###################################################### + +set BugNumber OCC13595 + +restore [locate_data_file bug13595_spine.brep] sp +restore [locate_data_file bug13595_profile1.brep] p1 +restore [locate_data_file bug13595_profile2.brep] p2 + +if [catch { pipe result sp p1 } catch_result] { + puts "${BugNumber}: Faulty (1)" +} else { +set square 80 + +set nb_v_good 4 +set nb_e_good 6 +set nb_w_good 2 +set nb_f_good 2 +set nb_sh_good 1 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 16 + +} + +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug13595_2 b/tests/bugs/modalg_4/bug13595_2 new file mode 100755 index 0000000000..1b68f8102a --- /dev/null +++ b/tests/bugs/modalg_4/bug13595_2 @@ -0,0 +1,32 @@ +puts "============" +puts "OCC13595" +puts "============" +puts "" +###################################################### +# MakePipe raises exception +###################################################### + +set BugNumber OCC13595 + +restore [locate_data_file bug13595_spine.brep] sp +restore [locate_data_file bug13595_profile2.brep] p2 + +if [catch { pipe result sp p2 } catch_result] { + puts "${BugNumber}: Faulty (1)" +} else { +set square 407.922 + +set nb_v_good 4 +set nb_e_good 6 +set nb_w_good 2 +set nb_f_good 2 +set nb_sh_good 1 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 16 + +} + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug22383 b/tests/bugs/modalg_4/bug22383 new file mode 100755 index 0000000000..7980b02b0c --- /dev/null +++ b/tests/bugs/modalg_4/bug22383 @@ -0,0 +1,45 @@ +puts "============" +puts "OCC22383" +puts "============" +puts "" +###################################################### +# Four and more points at least on curve +###################################################### + +set BugNumber OCC22383 + +restore [locate_data_file bug21645_Scale1_so1_f3.brep] result + +vinit +tclean result +incmesh result 0.01 +vdisplay result +vfit + +set good_trip 16 + +isos result 0 +trinfo result +puts "" +set ll [triepoints result] +set nbpoints [llength $ll] +puts $nbpoints + +## number of discretization points (triepoints command) with fix +## must be less than number on clear occ651 + +set status 0 +if {$nbpoints < $good_trip} { + set status 1 +} + + +if { $status != 0 } { + puts "$BugNumber: OK" +} else { + puts "$BugNumber: Faulty" +} + +set square 2.04205e-08 +set only_screen 1 + diff --git a/tests/bugs/modalg_4/bug22646 b/tests/bugs/modalg_4/bug22646 new file mode 100755 index 0000000000..0a3392b0c3 --- /dev/null +++ b/tests/bugs/modalg_4/bug22646 @@ -0,0 +1,35 @@ +puts "============" +puts "OCC22646" +puts "============" +puts "" +###################################################### +# Error in algorithms BRepOffsetAPI_ThruSections and BRepOffsetAPI_MakePipeShell: +# sections with degenerated edges are processed in +###################################################### + +set BugNumber OCC22646 + + +restore [locate_data_file bug22646_source.brep] s1 +restore [locate_data_file bug22646_scale_translate_xyz.brep] s2 +restore [locate_data_file bug22646_scale_translate_yz.brep] s3 +restore [locate_data_file bug22646_scale_translate_z.brep] s4 + +vinit +explode s1 +explode s2 +explode s3 +explode s4 +vfit + +donly s1_1 s2_1 +thrusections res2 0 0 s1_1 s2_1 + +donly s1_1 s3_1 +thrusections res3 0 0 s1_1 s3_1 + +donly s1_1 s4_1 +thrusections res4 0 0 s1_1 s4_1 + +set only_screen 1 + diff --git a/tests/bugs/modalg_4/bug363_1 b/tests/bugs/modalg_4/bug363_1 new file mode 100644 index 0000000000..ff58b6b179 --- /dev/null +++ b/tests/bugs/modalg_4/bug363_1 @@ -0,0 +1,21 @@ +pload QAcommands + +#INTERFACE XCAF +puts "========================" +puts "OCC363" +puts "BUC60998" +puts "========================" +puts "" +####################################################### +## Incorrect work of persistence during reading and writing of degenerated edges. +####################################################### + +###################################################################### +#set filedir $env(TmpDir) +#puts $filedir +#catch {exec rm $filedir/OCC363.dxc} +pload XDE + +set T [OCC363 OCC363Doc [locate_data_file OCC363.dxc]] +puts $T + diff --git a/tests/bugs/modalg_4/bug5806 b/tests/bugs/modalg_4/bug5806 new file mode 100755 index 0000000000..16eec40e7a --- /dev/null +++ b/tests/bugs/modalg_4/bug5806 @@ -0,0 +1,54 @@ +puts "============" +puts "OCC5806" +puts "============" +puts "" +###################################################### +# BRepOffsetAPI_MakeThickSolid fails to build a result +###################################################### + +set BugNumber OCC5806 + +puts "demonstration of pipes and hollowing for GTISoft" +puts "" +puts "Scenario 3A: Hollowed general pipe - ThroughSection with following shell reconstruction" + +circle c 0 100 0 1 0 0 5 +mkedge ec c +wire wc ec +polyline pl 10 90 -10 10 90 10 10 110 10 10 110 -10 10 90 -10 + +if { [catch { thrusections resthru 1 1 wc pl } catch_result] } { + puts "Faulty ${BugNumber} : thrusections is wrong" +} + +# straighforward hollowing will fail due to problems in the algorithm +explode resthru f + +if { [catch { offsetshape result resthru -0.5 resthru_6 resthru_7 } catch_result] } { + puts "Faulty ${BugNumber} : offsetshape is wrong" +} + +if { [catch { set tolmaxres [tolmax result] } catch_result] } { + puts "Faulty ${BugNumber} : tolmax is wrong" +} +regexp {max tol = ([-0-9.+eE]+)} $tolmaxres full maxtolerance +if { [catch { expr $maxtolerance } catch_result] } { + puts "Faulty ${BugNumber} : maxtolerance is wrong (1)." +} +if { $maxtolerance > 1. } { + puts "Faulty ${BugNumber} : maxtolerance is wrong (2)." +} + +set square 1116.06 + +set nb_v_good 10 +set nb_e_good 15 +set nb_w_good 7 +set nb_f_good 7 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 41 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug6181 b/tests/bugs/modalg_4/bug6181 new file mode 100755 index 0000000000..5a5667d9e1 --- /dev/null +++ b/tests/bugs/modalg_4/bug6181 @@ -0,0 +1,40 @@ +puts "============" +puts "OCC6181" +puts "============" +puts "" +###################################################### +# Incorrect result of boolean cut +###################################################### + +set BugNumber OCC6181 + +restore [locate_data_file OCC6181_A.brep] s1 +restore [locate_data_file OCC6181_B.brep] s2 + +decho off +set che_s1 [checkshape s1] +set che_s2 [checkshape s2] +decho on +if { [regexp {Faulty} $che_s1] } { + puts "Faulty ${BugNumber} : checkshape is wrong for s1" +} + +if { [regexp {Faulty} $che_s2] } { + puts "Faulty ${BugNumber} : checkshape is wrong for s2" +} + +bcut result s1 s2 + +set square 151691 + +set nb_v_good 14 +set nb_e_good 21 +set nb_w_good 9 +set nb_f_good 9 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 56 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug6182 b/tests/bugs/modalg_4/bug6182 new file mode 100755 index 0000000000..f0b12771a4 --- /dev/null +++ b/tests/bugs/modalg_4/bug6182 @@ -0,0 +1,39 @@ +puts "============" +puts "OCC6182" +puts "============" +puts "" +###################################################### +# Incorrect result of boolean cut +###################################################### + +set BugNumber OCC6182 + +restore [locate_data_file OCC6182_A.brep] s1 +restore [locate_data_file OCC6182_B.brep] s2 + +decho off +set che_s1 [checkshape s1] +set che_s2 [checkshape s2] +decho on +if { [regexp {Faulty} $che_s1] } { + puts "Faulty ${BugNumber} : checkshape is wrong for s1" +} +if { [regexp {Faulty} $che_s2] } { + puts "Faulty ${BugNumber} : checkshape is wrong for s2" +} + +bcut result s1 s2 + +set square 318709 + +set nb_v_good 316 +set nb_e_good 502 +set nb_w_good 185 +set nb_f_good 181 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 1187 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug62 b/tests/bugs/modalg_4/bug62 new file mode 100755 index 0000000000..1f2d8d52ac --- /dev/null +++ b/tests/bugs/modalg_4/bug62 @@ -0,0 +1,34 @@ +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_4" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +puts "================" +puts "OCC62" +puts "BUC61001" +puts "================" + +cpulimit 1400 +restore [locate_data_file OCC62.brep] sh + +explode sh +checkshape sh + +bfuse res1 sh_1 sh_3 +checkshape res1 + +bfuse res2 res1 sh_2 +checkshape res2 + +bfuse res3 res2 sh_6 +checkshape res3 + +bfuse res4 res3 sh_4 +checkshape res4 + +bfuse res5 res4 sh_5 +checkshape res5 + +renamevar res5 result + +set square 0 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug620_1 b/tests/bugs/modalg_4/bug620_1 new file mode 100755 index 0000000000..cdf6464683 --- /dev/null +++ b/tests/bugs/modalg_4/bug620_1 @@ -0,0 +1,24 @@ + +puts "========================" +puts "OCC620" +puts "========================" +puts "" +############################ +## No possibility to cut the shapes. +############################ + +restore [locate_data_file OCC620a.brep] a +checkshape a +restore [locate_data_file OCC620b.brep] b +checkshape b + +bop a b + +if [catch { bopcut result } catch_result] { + puts "Faulty OCC620 : BOPCUT operation was made wrongly" +} else { + puts "OCC620 OK: BOPCUT operation works OK" +} + +set square 314742. +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug620_2 b/tests/bugs/modalg_4/bug620_2 new file mode 100755 index 0000000000..94eb0c211b --- /dev/null +++ b/tests/bugs/modalg_4/bug620_2 @@ -0,0 +1,24 @@ + +puts "========================" +puts "OCC620" +puts "========================" +puts "" +############################ +## No possibility to cut the shapes. +############################ + +restore [locate_data_file OCC620a.brep] a +checkshape a +restore [locate_data_file OCC620b.brep] b +checkshape b + +bop a b + +if [catch { boptuc result } catch_result] { + puts "Faulty OCC620 : BOPTUC operation was made wrongly" +} else { + puts "OCC620 OK: BOPTUC operation works OK" +} + +set square 1.15562e+06 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug625 b/tests/bugs/modalg_4/bug625 new file mode 100755 index 0000000000..ddb3607f67 --- /dev/null +++ b/tests/bugs/modalg_4/bug625 @@ -0,0 +1,33 @@ +puts "========================" +puts "OCC625" +puts "========================" +puts "" +############################################################################### +## Created filler looks strange (see attached picture) inspite of checkshapes told about correct source and result shapes. +############################################################################### + +pload QAcommands + +restore [locate_data_file OCC625.brep] a +checkshape a + +vinit +tclean a +explode a e + +blend res1 a 10 a_22 10 a_14 +blend result res1 10 a_17 10 a_4 +checkshape result + +vinit +vdisplay result +vfit +vsetdispmode result 1 + +set x_coord 116 +set y_coord 252 + +checkcolor $x_coord $y_coord 0.82 0.58 0.09 + +set square 19977 +set 3dviewer 1 \ No newline at end of file diff --git a/tests/bugs/modalg_4/bug6272_1 b/tests/bugs/modalg_4/bug6272_1 new file mode 100755 index 0000000000..c162845bee --- /dev/null +++ b/tests/bugs/modalg_4/bug6272_1 @@ -0,0 +1,22 @@ +puts "TODO OCC111111 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO OCC111111 ALL: Error : The square of result shape is" +pload QAcommands + +puts "============" +puts "OCC6272" +puts "============" +puts "" +###################################################### +# Incorrect results of gluing operation +###################################################### + +set BugNumber OCC6272 + +restore [locate_data_file OCC6272_bridge2.brep] a1 +restore [locate_data_file OCC6272_revolution.brep] a2 + +OCC307 result a1 a2 0 + +set square 0 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug6272_2 b/tests/bugs/modalg_4/bug6272_2 new file mode 100755 index 0000000000..0d527f44d0 --- /dev/null +++ b/tests/bugs/modalg_4/bug6272_2 @@ -0,0 +1,22 @@ +puts "TODO OCC111111 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO OCC111111 ALL: Error : The square of result shape is" + +pload QAcommands + +puts "============" +puts "OCC6272" +puts "============" +puts "" +###################################################### +# Incorrect results of gluing operation +###################################################### + +set BugNumber OCC6272 + +restore [locate_data_file OCC6272_bridge2.brep] a1 +restore [locate_data_file OCC6272_revolution.brep] a2 + +OCC307 result a1 a2 1 + +set square 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug6272_3 b/tests/bugs/modalg_4/bug6272_3 new file mode 100755 index 0000000000..d4b9253e82 --- /dev/null +++ b/tests/bugs/modalg_4/bug6272_3 @@ -0,0 +1,23 @@ +puts "TODO OCC111111 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO OCC111111 ALL: Error : The square of result shape is" + +pload QAcommands + +puts "============" +puts "OCC6272" +puts "============" +puts "" +###################################################### +# Incorrect results of gluing operation +###################################################### + +set BugNumber OCC6272 + +restore [locate_data_file OCC6272_bridge2.brep] a1 + +explode a1 +OCC307 result a1_1 a1_2 0 + +set square 0 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug6272_4 b/tests/bugs/modalg_4/bug6272_4 new file mode 100755 index 0000000000..99883aabb7 --- /dev/null +++ b/tests/bugs/modalg_4/bug6272_4 @@ -0,0 +1,22 @@ +puts "TODO OCC111111 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO OCC111111 ALL: Error : The square of result shape is" + +pload QAcommands + +puts "============" +puts "OCC6272" +puts "============" +puts "" +###################################################### +# Incorrect results of gluing operation +###################################################### + +set BugNumber OCC6272 + +restore [locate_data_file OCC6272_bridge2.brep] a1 + +explode a1 +OCC307 result a1_1 a1_2 1 + +set square 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug6272_5 b/tests/bugs/modalg_4/bug6272_5 new file mode 100755 index 0000000000..fc46efeeb1 --- /dev/null +++ b/tests/bugs/modalg_4/bug6272_5 @@ -0,0 +1,33 @@ +puts "============" +puts "OCC6272" +puts "============" +puts "" +###################################################### +# Incorrect results of gluing operation +###################################################### + +set BugNumber OCC6272 + +restore [locate_data_file OCC6272_bridge2.brep] a1 + +explode a1 + +bop a1_1 a1_2 +bopfuse result + +set square 6552.67 + +# Analysis of "nbshapes res" +set nb_v_good 116 +set nb_e_good 176 +set nb_w_good 72 +set nb_f_good 70 +set nb_sh_good 5 +set nb_sol_good 5 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 445 + +set 2dviewer 0 + + diff --git a/tests/bugs/modalg_4/bug6272_6 b/tests/bugs/modalg_4/bug6272_6 new file mode 100755 index 0000000000..2d85e74eaf --- /dev/null +++ b/tests/bugs/modalg_4/bug6272_6 @@ -0,0 +1,35 @@ +puts "TODO OCC11111 ALL: Error : The square of result shape is" + +puts "============" +puts "OCC6272" +puts "============" +puts "" +###################################################### +# Incorrect results of gluing operation +###################################################### + +set BugNumber OCC6272 + +restore [locate_data_file OCC6272_bridge2.brep] a1 +restore [locate_data_file OCC6272_revolution.brep] a2 + +bop a1 a2 +bopfuse result + +# puts "See result in the viewer!!!" + +set square 8979.70 + +# Analysis of "nbshapes res" +set nb_v_good 60 +set nb_e_good 90 +set nb_w_good 42 +set nb_f_good 40 +set nb_sh_good 5 +set nb_sol_good 5 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 243 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug6272_71 b/tests/bugs/modalg_4/bug6272_71 new file mode 100755 index 0000000000..8bb8228ab7 --- /dev/null +++ b/tests/bugs/modalg_4/bug6272_71 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC6272" +puts "============" +puts "" +###################################################### +# Incorrect results of gluing operation +###################################################### + +set BugNumber OCC6272 + +restore [locate_data_file OCC6272_bridge2.brep] a1 + +# +# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids +# + +explode a1 so + +bop a1_3 a1_5 +if { [catch { bopfuse result } ] } { + puts "Faulty ${BugNumber}" +} + +set square 730.993 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug6272_710 b/tests/bugs/modalg_4/bug6272_710 new file mode 100755 index 0000000000..12b3ca8ffb --- /dev/null +++ b/tests/bugs/modalg_4/bug6272_710 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC6272" +puts "============" +puts "" +###################################################### +# Incorrect results of gluing operation +###################################################### + +set BugNumber OCC6272 + +restore [locate_data_file OCC6272_bridge2.brep] a1 + +# +# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids +# + +explode a1 so + +bop a1_6 a1_4 +if { [catch { bopfuse result } ] } { + puts "Faulty ${BugNumber}" +} + +set square 3387.54 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug6272_72 b/tests/bugs/modalg_4/bug6272_72 new file mode 100755 index 0000000000..7b05acbb54 --- /dev/null +++ b/tests/bugs/modalg_4/bug6272_72 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC6272" +puts "============" +puts "" +###################################################### +# Incorrect results of gluing operation +###################################################### + +set BugNumber OCC6272 + +restore [locate_data_file OCC6272_bridge2.brep] a1 + +# +# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids +# + +explode a1 so + +bop a1_5 a1_3 +if { [catch { bopfuse result } ] } { + puts "Faulty ${BugNumber}" +} + +set square 730.993 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug6272_73 b/tests/bugs/modalg_4/bug6272_73 new file mode 100755 index 0000000000..d9f34046bf --- /dev/null +++ b/tests/bugs/modalg_4/bug6272_73 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC6272" +puts "============" +puts "" +###################################################### +# Incorrect results of gluing operation +###################################################### + +set BugNumber OCC6272 + +restore [locate_data_file OCC6272_bridge2.brep] a1 + +# +# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids +# + +explode a1 so + +bop a1_5 a1_1 +if { [catch { bopfuse result } ] } { + puts "Faulty ${BugNumber}" +} + +set square 2037.7 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug6272_74 b/tests/bugs/modalg_4/bug6272_74 new file mode 100755 index 0000000000..f9e0dfc319 --- /dev/null +++ b/tests/bugs/modalg_4/bug6272_74 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC6272" +puts "============" +puts "" +###################################################### +# Incorrect results of gluing operation +###################################################### + +set BugNumber OCC6272 + +restore [locate_data_file OCC6272_bridge2.brep] a1 + +# +# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids +# + +explode a1 so + +bop a1_1 a1_5 +if { [catch { bopfuse result } ] } { + puts "Faulty ${BugNumber}" +} + +set square 2037.7 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug6272_75 b/tests/bugs/modalg_4/bug6272_75 new file mode 100755 index 0000000000..8306731bd7 --- /dev/null +++ b/tests/bugs/modalg_4/bug6272_75 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC6272" +puts "============" +puts "" +###################################################### +# Incorrect results of gluing operation +###################################################### + +set BugNumber OCC6272 + +restore [locate_data_file OCC6272_bridge2.brep] a1 + +# +# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids +# + +explode a1 so + +bop a1_1 a1_2 +if { [catch { bopfuse result } ] } { + puts "Faulty ${BugNumber}" +} + +set square 2314.14 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug6272_76 b/tests/bugs/modalg_4/bug6272_76 new file mode 100755 index 0000000000..a0dc833fb0 --- /dev/null +++ b/tests/bugs/modalg_4/bug6272_76 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC6272" +puts "============" +puts "" +###################################################### +# Incorrect results of gluing operation +###################################################### + +set BugNumber OCC6272 + +restore [locate_data_file OCC6272_bridge2.brep] a1 + +# +# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids +# + +explode a1 so + +bop a1_2 a1_1 +if { [catch { bopfuse result } ] } { + puts "Faulty ${BugNumber}" +} + +set square 2314.14 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug6272_77 b/tests/bugs/modalg_4/bug6272_77 new file mode 100755 index 0000000000..05d7c48819 --- /dev/null +++ b/tests/bugs/modalg_4/bug6272_77 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC6272" +puts "============" +puts "" +###################################################### +# Incorrect results of gluing operation +###################################################### + +set BugNumber OCC6272 + +restore [locate_data_file OCC6272_bridge2.brep] a1 + +# +# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids +# + +explode a1 so + +bop a1_2 a1_4 +if { [catch { bopfuse result } ] } { + puts "Faulty ${BugNumber}" +} + +set square 922.7 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug6272_78 b/tests/bugs/modalg_4/bug6272_78 new file mode 100755 index 0000000000..7ed242a4f8 --- /dev/null +++ b/tests/bugs/modalg_4/bug6272_78 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC6272" +puts "============" +puts "" +###################################################### +# Incorrect results of gluing operation +###################################################### + +set BugNumber OCC6272 + +restore [locate_data_file OCC6272_bridge2.brep] a1 + +# +# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids +# + +explode a1 so + +bop a1_4 a1_2 +if { [catch { bopfuse result } ] } { + puts "Faulty ${BugNumber}" +} + +set square 922.7 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug6272_79 b/tests/bugs/modalg_4/bug6272_79 new file mode 100755 index 0000000000..987aa25e56 --- /dev/null +++ b/tests/bugs/modalg_4/bug6272_79 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC6272" +puts "============" +puts "" +###################################################### +# Incorrect results of gluing operation +###################################################### + +set BugNumber OCC6272 + +restore [locate_data_file OCC6272_bridge2.brep] a1 + +# +# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids +# + +explode a1 so + +bop a1_4 a1_6 +if { [catch { bopfuse result } ] } { + puts "Faulty ${BugNumber}" +} + +set square 3387.54 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug6272_81 b/tests/bugs/modalg_4/bug6272_81 new file mode 100755 index 0000000000..959fac2093 --- /dev/null +++ b/tests/bugs/modalg_4/bug6272_81 @@ -0,0 +1,25 @@ +puts "============" +puts "OCC6272" +puts "============" +puts "" +###################################################### +# Incorrect results of gluing operation +###################################################### + +set BugNumber OCC6272 + +restore [locate_data_file OCC6272_bridge2.brep] a1 + +# +# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids +# + +explode a1 so + +bop a1_3 a1_5 +if { [catch { bopsection result } ] } { + puts "Faulty ${BugNumber}" +} + +set length 36 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug6272_810 b/tests/bugs/modalg_4/bug6272_810 new file mode 100755 index 0000000000..bfa564e265 --- /dev/null +++ b/tests/bugs/modalg_4/bug6272_810 @@ -0,0 +1,25 @@ +puts "============" +puts "OCC6272" +puts "============" +puts "" +###################################################### +# Incorrect results of gluing operation +###################################################### + +set BugNumber OCC6272 + +restore [locate_data_file OCC6272_bridge2.brep] a1 + +# +# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids +# + +explode a1 so + +bop a1_6 a1_4 +if { [catch { bopsection result } ] } { + puts "Faulty ${BugNumber}" +} + +set length 57.3941 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug6272_82 b/tests/bugs/modalg_4/bug6272_82 new file mode 100755 index 0000000000..690c798a1a --- /dev/null +++ b/tests/bugs/modalg_4/bug6272_82 @@ -0,0 +1,25 @@ +puts "============" +puts "OCC6272" +puts "============" +puts "" +###################################################### +# Incorrect results of gluing operation +###################################################### + +set BugNumber OCC6272 + +restore [locate_data_file OCC6272_bridge2.brep] a1 + +# +# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids +# + +explode a1 so + +bop a1_5 a1_3 +if { [catch { bopsection result } ] } { + puts "Faulty ${BugNumber}" +} + +set length 36 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug6272_83 b/tests/bugs/modalg_4/bug6272_83 new file mode 100755 index 0000000000..08c2deb590 --- /dev/null +++ b/tests/bugs/modalg_4/bug6272_83 @@ -0,0 +1,25 @@ +puts "============" +puts "OCC6272" +puts "============" +puts "" +###################################################### +# Incorrect results of gluing operation +###################################################### + +set BugNumber OCC6272 + +restore [locate_data_file OCC6272_bridge2.brep] a1 + +# +# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids +# + +explode a1 so + +bop a1_5 a1_1 +if { [catch { bopsection result } ] } { + puts "Faulty ${BugNumber}" +} + +set length 32 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug6272_84 b/tests/bugs/modalg_4/bug6272_84 new file mode 100755 index 0000000000..1519b34c5d --- /dev/null +++ b/tests/bugs/modalg_4/bug6272_84 @@ -0,0 +1,25 @@ +puts "============" +puts "OCC6272" +puts "============" +puts "" +###################################################### +# Incorrect results of gluing operation +###################################################### + +set BugNumber OCC6272 + +restore [locate_data_file OCC6272_bridge2.brep] a1 + +# +# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids +# + +explode a1 so + +bop a1_1 a1_5 +if { [catch { bopsection result } ] } { + puts "Faulty ${BugNumber}" +} + +set length 32 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug6272_85 b/tests/bugs/modalg_4/bug6272_85 new file mode 100755 index 0000000000..a35fd9446e --- /dev/null +++ b/tests/bugs/modalg_4/bug6272_85 @@ -0,0 +1,25 @@ +puts "============" +puts "OCC6272" +puts "============" +puts "" +###################################################### +# Incorrect results of gluing operation +###################################################### + +set BugNumber OCC6272 + +restore [locate_data_file OCC6272_bridge2.brep] a1 + +# +# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids +# + +explode a1 so + +bop a1_1 a1_2 +if { [catch { bopsection result } ] } { + puts "Faulty ${BugNumber}" +} + +set length 32 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug6272_86 b/tests/bugs/modalg_4/bug6272_86 new file mode 100755 index 0000000000..1c64b335b6 --- /dev/null +++ b/tests/bugs/modalg_4/bug6272_86 @@ -0,0 +1,25 @@ +puts "============" +puts "OCC6272" +puts "============" +puts "" +###################################################### +# Incorrect results of gluing operation +###################################################### + +set BugNumber OCC6272 + +restore [locate_data_file OCC6272_bridge2.brep] a1 + +# +# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids +# + +explode a1 so + +bop a1_2 a1_1 +if { [catch { bopsection result } ] } { + puts "Faulty ${BugNumber}" +} + +set length 32 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug6272_87 b/tests/bugs/modalg_4/bug6272_87 new file mode 100755 index 0000000000..809b9371b9 --- /dev/null +++ b/tests/bugs/modalg_4/bug6272_87 @@ -0,0 +1,25 @@ +puts "============" +puts "OCC6272" +puts "============" +puts "" +###################################################### +# Incorrect results of gluing operation +###################################################### + +set BugNumber OCC6272 + +restore [locate_data_file OCC6272_bridge2.brep] a1 + +# +# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids +# + +explode a1 so + +bop a1_2 a1_4 +if { [catch { bopsection result } ] } { + puts "Faulty ${BugNumber}" +} + +set length 32.1528 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug6272_88 b/tests/bugs/modalg_4/bug6272_88 new file mode 100755 index 0000000000..9418190d0e --- /dev/null +++ b/tests/bugs/modalg_4/bug6272_88 @@ -0,0 +1,25 @@ +puts "============" +puts "OCC6272" +puts "============" +puts "" +###################################################### +# Incorrect results of gluing operation +###################################################### + +set BugNumber OCC6272 + +restore [locate_data_file OCC6272_bridge2.brep] a1 + +# +# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids +# + +explode a1 so + +bop a1_4 a1_2 +if { [catch { bopsection result } ] } { + puts "Faulty ${BugNumber}" +} + +set length 32.1528 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug6272_89 b/tests/bugs/modalg_4/bug6272_89 new file mode 100755 index 0000000000..8aeefc7cf9 --- /dev/null +++ b/tests/bugs/modalg_4/bug6272_89 @@ -0,0 +1,25 @@ +puts "============" +puts "OCC6272" +puts "============" +puts "" +###################################################### +# Incorrect results of gluing operation +###################################################### + +set BugNumber OCC6272 + +restore [locate_data_file OCC6272_bridge2.brep] a1 + +# +# a1 is compound. It containes a_3, a_5, a_1, a_2, a_4, a_6 solids +# + +explode a1 so + +bop a1_4 a1_6 +if { [catch { bopsection result } ] } { + puts "Faulty ${BugNumber}" +} + +set length 57.3941 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug6277 b/tests/bugs/modalg_4/bug6277 new file mode 100755 index 0000000000..fcc3558b47 --- /dev/null +++ b/tests/bugs/modalg_4/bug6277 @@ -0,0 +1,43 @@ +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" + +puts "============" +puts "OCC6277" +puts "============" +puts "" +###################################################### +# Cut operation does not produce any result +###################################################### + +set BugNumber OCC6277 + +restore [locate_data_file OCC6277_A.brep] s1 +restore [locate_data_file OCC6277_B.brep] s2 + +decho off +set che_s1 [checkshape s1] +set che_s2 [checkshape s2] +decho on +if { [regexp {Faulty} $che_s1] } { + puts "Faulty ${BugNumber} : checkshape is wrong for s1" +} + +if { [regexp {Faulty} $che_s2] } { + puts "Faulty ${BugNumber} : checkshape is wrong for s2" +} + +bcut result s1 s2 + +set square 40084.9 + +set nb_v_good 23 +set nb_e_good 34 +set nb_w_good 19 +set nb_f_good 14 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 93 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug6289 b/tests/bugs/modalg_4/bug6289 new file mode 100755 index 0000000000..2697f7fcb8 --- /dev/null +++ b/tests/bugs/modalg_4/bug6289 @@ -0,0 +1,29 @@ +#INTERFACE STEP +puts "============" +puts "OCC6289" +puts "============" +puts "" +###################################################### +# Internal error (code 101) in Section computation +###################################################### + +catch { pload XDE } + +set BugNumber OCC6289 + +if { [catch { stepread [locate_data_file OCC6289.stp] a * } catch_result] } { + puts "Faulty ${BugNumber} : here is reading problem" +} else { + tpcompound comp + + plane pl 0 0 28 0 0 1 + mkface f pl + + if { [catch { bsection result comp f } catch_result] } { + puts "Faulty ${BugNumber}" + } +} + +set length 453.679 +set 3dviewer 0 + diff --git a/tests/bugs/modalg_4/bug629 b/tests/bugs/modalg_4/bug629 new file mode 100755 index 0000000000..79ae742341 --- /dev/null +++ b/tests/bugs/modalg_4/bug629 @@ -0,0 +1,25 @@ +puts "TODO OCC12345 ALL: Error : The square of result shape is" +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" + +puts "================" +puts "OCC629" +puts "================" +puts "" +########################################## +## Exception during attempt to create solid by command PIPE +########################################## + +restore [locate_data_file OCC629a.brep] a +checkshape a + +restore [locate_data_file OCC629b.brep] b +checkshape b + +if [catch {pipe result a b } catch_result] { + puts "Faulty OCC629: function PIPE works wrongly" +} else { + puts "OCC629 OK: function PIPE works properly" +} + +set square 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug6334 b/tests/bugs/modalg_4/bug6334 new file mode 100755 index 0000000000..b90cd69b7e --- /dev/null +++ b/tests/bugs/modalg_4/bug6334 @@ -0,0 +1,69 @@ +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" + +puts "============" +puts "OCC6334" +puts "============" +puts "" +###################################################### +# Invalid result of MakeCylindricalHole when input solid is REVERSED +###################################################### + +set BugNumber OCC6334 + +# 1. Make box +box b 100 100 100 + +subshape b f 1 +offsetshape t b 10 b_1 + +decho off +set che_t [checkshape t] +decho on + +if {[regexp {Faulty} $che_t]} { + puts "Faulty ${BugNumber} : checkshape is wrong for t" +} + +set bnd_t [bounding t] +set ori [lindex [dtyp t] 2] +puts "Orientation of thick solid is $ori" + +# 3. Make hole +hole h t 110 50 50 1 0 0 10 + +set che [checkshape h] +if { [regexp {Faulty} $che] } { + puts "Faulty ${BugNumber} : checkshape is wrong for h" +} + +set bnd_h [bounding h] + +renamevar h result + +set square 117509 + +set nb_v_good 32 +set nb_e_good 53 +set nb_w_good 27 +set nb_f_good 24 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 139 + + +# 4. Check thickness of box and hole +set dx_t [expr [lindex $bnd_t 3] - [lindex $bnd_t 0]] +set dx_h [expr [lindex $bnd_h 3] - [lindex $bnd_h 0]] + +if { [expr abs($dx_h - $dx_t)] > 1e-5 } { + puts "Thickness of solid = $dx_t" + puts "Thickness of solid with hole = $dx_h" + puts "Invalid result of making a hole" + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug636 b/tests/bugs/modalg_4/bug636 new file mode 100755 index 0000000000..88f5cf23c3 --- /dev/null +++ b/tests/bugs/modalg_4/bug636 @@ -0,0 +1,31 @@ + +puts "================" +puts "OCC636" +puts "================" +puts "" +##################################### +## BRepOffsetAPI_MakePipeShell builds twisted pipe +##################################### + +restore [locate_data_file OCC636a.brep] s +checkshape s + +restore [locate_data_file OCC636b.brep] s1 +checkshape s1 + +restore [locate_data_file OCC636c.brep] s2 +checkshape s2 + +mksweep s +addsweep s1 +addsweep s2 + +if [catch { buildsweep result } catch_result] { + puts "Faulty OCC636: function buildsweep works wrongly" +} else { + puts "OCC636 OK: function buildsweep works properly" +} + +set square 3836.92 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug637_1 b/tests/bugs/modalg_4/bug637_1 new file mode 100755 index 0000000000..5e528f146b --- /dev/null +++ b/tests/bugs/modalg_4/bug637_1 @@ -0,0 +1,29 @@ + +puts "================" +puts "OCC637" +puts "(case 1)" +puts "================" +puts "" +########################################## +## BRepOffsetAPI_MakePipeShell crashes with fatal exception +########################################## + +restore [locate_data_file OCC637a.brep] s +checkshape s + +restore [locate_data_file OCC636c.brep] s1 +checkshape s1 + +restore [locate_data_file OCC637c.brep] s2 +checkshape s2 + +mksweep s +addsweep s1 +addsweep s2 + +if [catch { buildsweep result } catch_result] { + puts "Faulty OCC637 (case 1): function buildsweep works wrongly" +} + +set square 1675.58 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug637_2 b/tests/bugs/modalg_4/bug637_2 new file mode 100755 index 0000000000..75c5fc6568 --- /dev/null +++ b/tests/bugs/modalg_4/bug637_2 @@ -0,0 +1,30 @@ + +puts "================" +puts "OCC637" +puts "(case 2)" +puts "================" +puts "" +########################################## +## BRepOffsetAPI_MakePipeShell crashes with fatal exception +########################################## + +restore [locate_data_file OCC637d.brep] s +checkshape s + +restore [locate_data_file OCC637c.brep] s1 +checkshape s1 + +restore [locate_data_file OCC637f.brep] s2 +checkshape s2 + +mksweep s +addsweep s1 +addsweep s2 + +if [catch {buildsweep result } catch_result] { + puts "Faulty OCC637 (case 2): function buildsweep works wrongly" +} + +set square 1090.91 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug6502 b/tests/bugs/modalg_4/bug6502 new file mode 100755 index 0000000000..0a7a2f6796 --- /dev/null +++ b/tests/bugs/modalg_4/bug6502 @@ -0,0 +1,21 @@ +puts "================" +puts "OCC6502" +puts "================" +puts "" +####################################################################################### +# Failure calculation of ShrunkRange resulting to failure of boolean operation +####################################################################################### + +set BugNumber OCC6502 + + +restore [locate_data_file OCC6502.brep] a +plane pl 100 0 0 1 0 0 +mkface f pl + +if { [catch { bsection result a f -a } catch_result] } { + puts "Faulty ${BugNumber}" +} + +set length 37.7831 +set 3dviewer 0 diff --git a/tests/bugs/modalg_4/bug6538 b/tests/bugs/modalg_4/bug6538 new file mode 100755 index 0000000000..dec5dfa13e --- /dev/null +++ b/tests/bugs/modalg_4/bug6538 @@ -0,0 +1,42 @@ +puts "============" +puts "OCC6538" +puts "============" +puts "" +###################################################### +# Empty result obtained by operation "common" for couple of faces +###################################################### + +set BugNumber OCC6538 + +restore [locate_data_file OCC6538-f1.brep] s1 +restore [locate_data_file OCC6538-f2.brep] s2 + +decho off +set che_s1 [checkshape s1] +set che_s2 [checkshape s2] +decho on +if { [regexp {Faulty} $che_s1] } { + puts "Faulty ${BugNumber} : checkshape is wrong for s1" +} + +if { [regexp {Faulty} $che_s2] } { + puts "Faulty ${BugNumber} : checkshape is wrong for s2" +} + + +bop s1 s2 +bopcommon result + +set square 18.695 + +set nb_v_good 16 +set nb_e_good 16 +set nb_w_good 1 +set nb_f_good 1 +set nb_sh_good 1 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 36 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug6554 b/tests/bugs/modalg_4/bug6554 new file mode 100755 index 0000000000..b5cd3b1087 --- /dev/null +++ b/tests/bugs/modalg_4/bug6554 @@ -0,0 +1,39 @@ +puts "============" +puts "OCC6554" +puts "============" +puts "" +###################################################### +# Intersection shell-plane gives a disconnected set of edges +###################################################### + +set BugNumber OCC6554 + +restore [locate_data_file OCC6554-shell.brep] sh +restore [locate_data_file OCC6554-face.brep] f + +decho off +set che_sh [checkshape sh] +set che_f [checkshape f] +decho on +if { [regexp {Faulty} $che_sh] } { + puts "Faulty ${BugNumber} : checkshape is wrong for sh" +} + +if { [regexp {Faulty} $che_f] } { + puts "Faulty ${BugNumber} : checkshape is wrong for f" +} + +bsection result sh f -a + +regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection result] full Vertices + +set good_Vertices 2 + +if { ${Vertices} != ${good_Vertices} } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +set length 110.045 +set 2dviewer 2 diff --git a/tests/bugs/modalg_4/bug67 b/tests/bugs/modalg_4/bug67 new file mode 100755 index 0000000000..73a7ae195c --- /dev/null +++ b/tests/bugs/modalg_4/bug67 @@ -0,0 +1,16 @@ + +puts "================" +puts "BUC61052" +puts "OCC67" +puts "================" +puts "" + +restore [locate_data_file OCC67.brep] sh +checkshape sh + +explode sh e + +fillet result sh 5 sh_18 + +set square 64281.8 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug6725 b/tests/bugs/modalg_4/bug6725 new file mode 100755 index 0000000000..fba7ee5aba --- /dev/null +++ b/tests/bugs/modalg_4/bug6725 @@ -0,0 +1,46 @@ +puts "============" +puts "OCC6725" +puts "============" +puts "" +###################################################### +# Application crashed with "Segmentation Fault" message. Red Hat Linux 8.0 +###################################################### + +set BugNumber OCC6725 + +restore [locate_data_file OCC6725.brep] result + +set text [incmesh result 0.01] +set last [lindex $text end] +set r [string compare $last Failure] + +set status1 0 +if {$r == 0} { + set status1 1 +} + +set square 624989 + +set nb_v_good 3806 +set nb_e_good 3808 +set nb_w_good 756 +set nb_f_good 730 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 9101 + +if { ${status1} != 0} { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +vinit +tclean result +vsetdispmode 1 +vdisplay result +vfit + +set 3dviewer 1 diff --git a/tests/bugs/modalg_4/bug673 b/tests/bugs/modalg_4/bug673 new file mode 100755 index 0000000000..8aa9494d1e --- /dev/null +++ b/tests/bugs/modalg_4/bug673 @@ -0,0 +1,26 @@ +puts "TODO OCC12345 ALL: Faulty OCC673: function SPLITSHAPE works wrongly" + +puts "================" +puts "OCC673" +puts "================" +puts "" +####################################################### +## Exception is raised during splitting face by a wire laying on the face boundary. +####################################################### + +restore [locate_data_file OCC673a.brep] a +checkshape a + +restore [locate_data_file OCC673b.brep] b +checkshape b + +if [catch {spliteshape result a a b} catch_result] { + puts "Faulty OCC673: function SPLITSHAPE works wrongly" +} else { + puts "OCC673 OK : function SPLITSHAPE works OK" + set square 0 + set 2dviewer 0 +} + + + diff --git a/tests/bugs/modalg_4/bug6766_1 b/tests/bugs/modalg_4/bug6766_1 new file mode 100755 index 0000000000..6f6222a947 --- /dev/null +++ b/tests/bugs/modalg_4/bug6766_1 @@ -0,0 +1,38 @@ +puts "================" +puts "OCC6766" +puts "================" +puts "" +####################################################################################### +# Invalid result of intersection of a bspline face with a plane +####################################################################################### + +set BugNumber OCC6766 + +restore [locate_data_file OCC6766.brep] a + +decho off +set che_a [checkshape a] +decho on +if { [regexp {Faulty} $che_a] } { + puts "Faulty ${BugNumber} : checkshape is wrong for s1" +} + +set Y 4 +plane pl 0 ${Y} 0 0 1 0 +mkface f pl +bsection result a f -2d -a + + + +set nb_v_good 4 +set nb_e_good 3 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 8 + +set length 138.474 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug6766_2 b/tests/bugs/modalg_4/bug6766_2 new file mode 100755 index 0000000000..d0e28edac3 --- /dev/null +++ b/tests/bugs/modalg_4/bug6766_2 @@ -0,0 +1,38 @@ +puts "================" +puts "OCC6766" +puts "================" +puts "" +####################################################################################### +# Invalid result of intersection of a bspline face with a plane +####################################################################################### + +set BugNumber OCC6766 + +restore [locate_data_file OCC6766.brep] a + +decho off +set che_a [checkshape a] +decho on +if { [regexp {Faulty} $che_a] } { + puts "Faulty ${BugNumber} : checkshape is wrong for a" +} + +set Y 4 +plane pl 0 ${Y} 0 0 1 0 +mkface f pl +bop a f +bopsection result + + +set nb_v_good 4 +set nb_e_good 3 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 8 + +set length 138.474 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug6766_3 b/tests/bugs/modalg_4/bug6766_3 new file mode 100755 index 0000000000..610bb604ed --- /dev/null +++ b/tests/bugs/modalg_4/bug6766_3 @@ -0,0 +1,37 @@ +puts "================" +puts "OCC6766" +puts "================" +puts "" +####################################################################################### +# Invalid result of intersection of a bspline face with a plane +####################################################################################### + +set BugNumber OCC6766 + +restore [locate_data_file OCC6766.brep] a + +decho off +set che_a [checkshape a] +decho on +if { [regexp {Faulty} $che_a] } { + puts "Faulty ${BugNumber} : checkshape is wrong for a" +} + +set Y 6 +plane pl 0 ${Y} 0 0 1 0 +mkface f pl +bsection result a f -2d -a + + +set nb_v_good 4 +set nb_e_good 3 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 8 + +set length 126.138 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug6766_4 b/tests/bugs/modalg_4/bug6766_4 new file mode 100755 index 0000000000..21479c806d --- /dev/null +++ b/tests/bugs/modalg_4/bug6766_4 @@ -0,0 +1,37 @@ +puts "================" +puts "OCC6766" +puts "================" +puts "" +####################################################################################### +# Invalid result of intersection of a bspline face with a plane +####################################################################################### + +set BugNumber OCC6766 + +restore [locate_data_file OCC6766.brep] a +decho off +set che_a [checkshape a] +decho on +if { [regexp {Faulty} $che_a] } { + puts "Faulty ${BugNumber} : checkshape is wrong for a" +} + +set Y 6 +plane pl 0 ${Y} 0 0 1 0 +mkface f pl +bop a f +bopsection result + + +set nb_v_good 4 +set nb_e_good 3 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 8 + +set length 126.138 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug6811 b/tests/bugs/modalg_4/bug6811 new file mode 100755 index 0000000000..bcbe7e35a0 --- /dev/null +++ b/tests/bugs/modalg_4/bug6811 @@ -0,0 +1,32 @@ +#INTERFACE STEP +puts "================" +puts "OCC6811" +puts "================" +puts "" +####################################################################################### +# Unstable work of the checkshape on the attached file. +####################################################################################### + +catch { pload XDE } + +set BugNumber OCC6811 + +if { [catch { stepread [locate_data_file trj12_b3-tu-203.stp] a * } catch_result] } { + puts "Faulty ${BugNumber} : here is reading problem" +} else { + decho off + set che_a_1 [checkshape a_1 f] + set che_a_2 [checkshape a_1 f] + decho on + if { [regexp {Faulty} $che_a_1] } { + puts "Faulty ${BugNumber} : checkshape 1 is wrong for a" + } + if { [regexp {Faulty} $che_a_2] } { + puts "Faulty ${BugNumber} : checkshape 2 is wrong for a" + } + + renamevar a_1 result +} + +set square 1.48021e+06 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug68_1 b/tests/bugs/modalg_4/bug68_1 new file mode 100755 index 0000000000..c262ce645b --- /dev/null +++ b/tests/bugs/modalg_4/bug68_1 @@ -0,0 +1,17 @@ + +puts "================" +puts "BUC61053" +puts "OCC68" +puts "================" +puts "" + +restore [locate_data_file OCC68.brep] sh +checkshape sh + +explode sh + +bfuse result sh_1 sh_2 + +set square 3675.77 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug68_2 b/tests/bugs/modalg_4/bug68_2 new file mode 100755 index 0000000000..d65312a182 --- /dev/null +++ b/tests/bugs/modalg_4/bug68_2 @@ -0,0 +1,18 @@ + +puts "================" +puts "BUC61053" +puts "OCC68" +puts "================" +puts "" + +restore [locate_data_file OCC68.brep] sh +checkshape sh + +explode sh + +bfuse result sh_2 sh_1 +set square 3675.77 +set 2dviewer 0 + + + diff --git a/tests/bugs/modalg_4/bug693 b/tests/bugs/modalg_4/bug693 new file mode 100755 index 0000000000..ec4a96a3c1 --- /dev/null +++ b/tests/bugs/modalg_4/bug693 @@ -0,0 +1,79 @@ +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO OCC12345 ALL: Error : The square of result shape is " + +puts "================" +puts "OCC693" +puts "================" +puts "" +################################################### +## The boolean operations give incorrect result if one of shapes is compound +## consisting of several adjoint solids +#################################################### + +box h1 234 52 0 41 98 40 +box v1 241 136 20 31 31 15 +box h3 215 120 20 78 15 15 + +#mu4 +#fit + +compound h1 c1 +compound v1 c2 + +tcopy c1 cc1 +tcopy c2 cc2 +bcommon int1 cc1 cc2 +##########checkshape -top int1 +checkshape -top int1 + +tcopy c1 cc1 +tcopy c2 cc2 +bcut cut1 cc1 cc2 +checkshape -top cut1 + +tcopy c1 cc1 +tcopy c2 cc2 +bcut cut2 cc2 cc1 +##########checkshape -top cut2 +checkshape -top cut2 + +compound int1 cut1 cut2 comp3 +##########checkshape -top comp3 +checkshape -top comp3 +#donly comp3 + +tcopy comp3 ccomp3 +tcopy h3 ch3 +bcommon int2 ccomp3 ch3 +##########checkshape -top int2 +checkshape -top int2 +#donly int2 + +tcopy comp3 ccomp3 +tcopy h3 ch3 +bcut cut3 ccomp3 ch3 +##########checkshape -top cut3 +checkshape -top cut3 +#donly cut3 + +tcopy comp3 ccomp3 +tcopy h3 ch3 +bcut cut4 ch3 ccomp3 +##########checkshape -top cut4 +checkshape -top cut4 + +compound int2 cut3 cut4 result +##########checkshape -top res +checkshape -top result + +##########set che [checkshape -top res] +########## +##########set err [lindex $che [expr [llength $che] - 7]] +##########if { $err == "Faulty"} { +########## puts "Faulty OCC693" +##########} else { +########## puts "OCC693 OK " +##########} + +set square 33196 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug693_1 b/tests/bugs/modalg_4/bug693_1 new file mode 100755 index 0000000000..51bacabb5d --- /dev/null +++ b/tests/bugs/modalg_4/bug693_1 @@ -0,0 +1,78 @@ +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +puts "================" +puts "OCC693" +puts "================" +puts "" +################################################### +## The boolean operations give incorrect result if one of shapes is compound +## consisting of several adjoint solids +#################################################### + +box h1 234 52 0 41 98 40 +box v1 241 136 20 31 31 15 +box h3 215 120 20 78 15 15 + +compound h1 c1 +compound v1 c2 + +tcopy c1 cc1 +tcopy c2 cc2 + +bop cc1 cc2 +bopcommon int1 + +checkshape -top int1 + +tcopy c1 cc1 +tcopy c2 cc2 + +bop cc1 cc2 +bopcut cut1 + +checkshape -top cut1 + +tcopy c1 cc1 +tcopy c2 cc2 + +bop cc2 cc1 +bopcut cut2 + +checkshape -top cut2 + +compound int1 cut1 cut2 comp3 + +checkshape -top comp3 + +tcopy comp3 ccomp3 +tcopy h3 ch3 + +bop ccomp3 ch3 +bopcommon int2 + +checkshape -top int2 + +tcopy comp3 ccomp3 +tcopy h3 ch3 + +bop ccomp3 ch3 +bopcut cut3 + +checkshape -top cut3 + +tcopy comp3 ccomp3 +tcopy h3 ch3 + +bop ch3 ccomp3 +bopcut cut4 + +checkshape -top cut4 + +compound int2 cut3 cut4 result + +checkshape -top result + +set square 33196 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_4/bug697_1 b/tests/bugs/modalg_4/bug697_1 new file mode 100755 index 0000000000..e499447515 --- /dev/null +++ b/tests/bugs/modalg_4/bug697_1 @@ -0,0 +1,25 @@ +puts "============" +puts "OCC697" +puts "============" +puts "" +###################################################### +# Fuse operation does not work +###################################################### +## (old topology) +## (fuse) +###################################################### + +restore [locate_data_file OCC697_1.brep] b1 +restore [locate_data_file OCC697_2.brep] b2 + +checkshape b1 +checkshape b2 +############################################## +if { [catch {bfuse result b1 b2} catch_result] } { +############################################## + puts "Faulty : an exception was caught" +} + +set square 8879.41 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug697_2 b/tests/bugs/modalg_4/bug697_2 new file mode 100755 index 0000000000..5c97f8eb92 --- /dev/null +++ b/tests/bugs/modalg_4/bug697_2 @@ -0,0 +1,29 @@ +puts "============" +puts "OCC697" +puts "============" +puts "" +###################################################### +# Fuse operation does not work +###################################################### +## (old topology) +## (fuse) +###################################################### + +puts "#" +puts "Non stable test case on Linux. MKV. 28.04.2010" +puts "#" + +restore [locate_data_file OCC697_2.brep] b2 +restore [locate_data_file OCC697_3.brep] b3 + +checkshape b2 +checkshape b3 +############################################## +if { [catch {bfuse result b2 b3} catch_result] } { +############################################## + puts "Faulty : an exception was caught" +} + +set square 25357.5 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug697_3 b/tests/bugs/modalg_4/bug697_3 new file mode 100755 index 0000000000..062a87919f --- /dev/null +++ b/tests/bugs/modalg_4/bug697_3 @@ -0,0 +1,23 @@ +puts "============" +puts "OCC697" +puts "============" +puts "" +###################################################### +# Fuse operation does not work +###################################################### +## (new topology) +## (bfuse) +###################################################### + +restore [locate_data_file OCC697_1.brep] b1 +restore [locate_data_file OCC697_2.brep] b2 + +checkshape b1 +checkshape b2 + +if { [catch {bfuse result b2 b1} catch_result] } { + puts "Faulty OCC697" +} + +set square 8879.41 +set 3dviewer 1 diff --git a/tests/bugs/modalg_4/bug697_4 b/tests/bugs/modalg_4/bug697_4 new file mode 100755 index 0000000000..69adc12578 --- /dev/null +++ b/tests/bugs/modalg_4/bug697_4 @@ -0,0 +1,23 @@ +puts "============" +puts "OCC697" +puts "============" +puts "" +###################################################### +# Fuse operation does not work +###################################################### +## (new topology) +## (bfuse) +###################################################### + +restore [locate_data_file OCC697_2.brep] b2 +restore [locate_data_file OCC697_3.brep] b3 + +checkshape b2 +checkshape b3 + +if { [catch {bfuse result b3 b2} catch_result] } { + puts "Faulty OCC697" +} +set square 25357.5 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_4/bug697_5 b/tests/bugs/modalg_4/bug697_5 new file mode 100755 index 0000000000..c9c5e67dad --- /dev/null +++ b/tests/bugs/modalg_4/bug697_5 @@ -0,0 +1,24 @@ +puts "============" +puts "OCC697" +puts "============" +puts "" +###################################################### +# Fuse operation does not work +###################################################### +## (new topology) +## (bopfuse) +###################################################### + +restore [locate_data_file OCC697_1.brep] b1 +restore [locate_data_file OCC697_2.brep] b2 + +checkshape b1 +checkshape b2 + +bop b1 b2 +if { [catch {bopfuse result} catch_result] } { + puts "Faulty OCC697" +} +set square 8879.41 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_4/bug697_6 b/tests/bugs/modalg_4/bug697_6 new file mode 100755 index 0000000000..2188a19a5d --- /dev/null +++ b/tests/bugs/modalg_4/bug697_6 @@ -0,0 +1,24 @@ +puts "============" +puts "OCC697" +puts "============" +puts "" +###################################################### +# Fuse operation does not work +###################################################### +## (new topology) +## (bopfuse) +###################################################### + +restore [locate_data_file OCC697_1.brep] b1 +restore [locate_data_file OCC697_2.brep] b2 + +checkshape b1 +checkshape b2 + +bop b2 b1 +if { [catch {bopfuse result} catch_result] } { + puts "Faulty OCC697" +} +set square 8879.41 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_4/bug697_7 b/tests/bugs/modalg_4/bug697_7 new file mode 100755 index 0000000000..c897130e3d --- /dev/null +++ b/tests/bugs/modalg_4/bug697_7 @@ -0,0 +1,24 @@ +puts "============" +puts "OCC697" +puts "============" +puts "" +###################################################### +# Fuse operation does not work +###################################################### +## (new topology) +## (bopfuse) +###################################################### + +restore [locate_data_file OCC697_2.brep] b2 +restore [locate_data_file OCC697_3.brep] b3 + +checkshape b2 +checkshape b3 + +bop b2 b3 +if { [catch {bopfuse result} catch_result] } { + puts "Faulty OCC697 " +} +set square 25357.5 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_4/bug697_8 b/tests/bugs/modalg_4/bug697_8 new file mode 100755 index 0000000000..fe0095349e --- /dev/null +++ b/tests/bugs/modalg_4/bug697_8 @@ -0,0 +1,24 @@ +puts "============" +puts "OCC697" +puts "============" +puts "" +###################################################### +# Fuse operation does not work +###################################################### +## (new topology) +## (bopfuse) +###################################################### + +restore [locate_data_file OCC697_2.brep] b2 +restore [locate_data_file OCC697_3.brep] b3 + +checkshape b2 +checkshape b3 + +bop b3 b2 +if { [catch {bopfuse result} catch_result] } { + puts "Faulty OCC697" +} +set square 25357.5 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_4/bug702 b/tests/bugs/modalg_4/bug702 new file mode 100755 index 0000000000..5339ae46d0 --- /dev/null +++ b/tests/bugs/modalg_4/bug702 @@ -0,0 +1,25 @@ + +puts "=======" +puts "OCC702" +puts "SAM1541" +puts "=======" +puts "" +######################## +## No possibility to make a prism. +######################## + +restore [locate_data_file OCC702.brep] a + +if [ catch { prism result a 100 100 100 } catch_result ] { + puts "Faulty OCC702 (case 1)" +} else { + regexp {Mass +: +([-0-9.+eE]+)} [sprops result] full sq + if { $sq <= 0. } { + puts "Faulty OCC702 (case 2)" + } else { + puts "OCC702 OK" + } +} + +set square 308957. +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug712_1 b/tests/bugs/modalg_4/bug712_1 new file mode 100755 index 0000000000..87ed25a6e6 --- /dev/null +++ b/tests/bugs/modalg_4/bug712_1 @@ -0,0 +1,23 @@ + +puts "========" +puts "OCC712" +puts "========" +puts "" +######################################################### +## Exeption is raised in DRAW during building draft with help command "depouille" +## on face in the attached shape. +######################################################### + +restore [locate_data_file OCC712.brep] a +checkshape a + +explode a f + +if [catch {depouille result a 0 0 1 a_2 10 0 39.6875 0 0. 0. -1 } catch_result] { + puts "Faulty OCC712" +} else { + puts "OCC712 OK" +} + +set square 41956.4 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug714 b/tests/bugs/modalg_4/bug714 new file mode 100755 index 0000000000..41152a8658 --- /dev/null +++ b/tests/bugs/modalg_4/bug714 @@ -0,0 +1,34 @@ +#INTERFACE IGES +puts "========" +puts "OCC714" +puts "========" +puts "" +#################################################### +## After command sew in DRAW on attached shape free wires are disappeared. +#################################################### + +restore [locate_data_file OCC714.brep] a +checkshape a + +set nb_info1 [nbshapes a] +regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info1 full ve1 +regexp {EDGE +: +([-0-9.+eE]+)} $nb_info1 full ed1 +regexp {WIRE +: +([-0-9.+eE]+)} $nb_info1 full we1 + +sewing result 0.1 a + +set nb_info2 [nbshapes a] +regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info2 full ve2 +regexp {EDGE +: +([-0-9.+eE]+)} $nb_info2 full ed2 +regexp {WIRE +: +([-0-9.+eE]+)} $nb_info2 full we2 + +if { $ve1 != $ve2 || $ed1 != $ed2 || $we1 != $we2} { + puts [format "Faulty OCC714 : SEWING operation was made WRONGLY: vertexes before %s, edges before %s, wires before %s" $ve1 $ed1 $we1] + puts [format " vertexes after %s, edges after %s, wires after %s" $ve1 $ed1 $we1] +} else { + puts "OK OCC714: SEWING operation was made PROPERLY" +} + +set square 12917.1 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug715 b/tests/bugs/modalg_4/bug715 new file mode 100755 index 0000000000..fa53cc6391 --- /dev/null +++ b/tests/bugs/modalg_4/bug715 @@ -0,0 +1,28 @@ + +puts "========" +puts "OCC715" +puts "SAM1582" +puts "========" +puts "" +########################################## +## section of two faces produces wrong number of section edges +########################################## + +restore [locate_data_file OCC715_2.brep] f2 +restore [locate_data_file OCC715_3.brep] f3 + +bsection result f2 f3 + +set expl [explode result] + +set length [llength $expl] +puts "Result is $length section edge" + +if {$length != 3} { + puts "Faulty OCC715" +} else { + puts "OCC715 OK" +} + +set length 100. +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug726_1 b/tests/bugs/modalg_4/bug726_1 new file mode 100755 index 0000000000..74a941b321 --- /dev/null +++ b/tests/bugs/modalg_4/bug726_1 @@ -0,0 +1,21 @@ +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +puts "========" +puts "OCC726" +puts "SAM1594" +puts "========" +puts "" +###################################### +## Boolean operations are impossible on the attachment. +###################################### + +restore [locate_data_file OCC726.brep] a +explode a +checkshape a_1 +checkshape a_2 + +bcommon result a_1 a_2 + +set square 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug726_2 b/tests/bugs/modalg_4/bug726_2 new file mode 100755 index 0000000000..2104c3475b --- /dev/null +++ b/tests/bugs/modalg_4/bug726_2 @@ -0,0 +1,21 @@ +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +puts "========" +puts "OCC726" +puts "SAM1594" +puts "========" +puts "" +###################################### +## Boolean operations are impossible on the attachment. +###################################### + +restore [locate_data_file OCC726.brep] a +explode a +checkshape a_1 +checkshape a_2 + +bcut result a_1 a_2 + +set square 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug726_3 b/tests/bugs/modalg_4/bug726_3 new file mode 100755 index 0000000000..58dbf30ab2 --- /dev/null +++ b/tests/bugs/modalg_4/bug726_3 @@ -0,0 +1,21 @@ +puts "TODO OCC12345 ALL: Tcl Exception: result is not a topological shape!!!" +puts "TODO OCC12345 ALL: TEST INCOMPLETE" + +puts "========" +puts "OCC726" +puts "SAM1594" +puts "========" +puts "" +###################################### +## Boolean operations are impossible on the attachment. +###################################### + +restore [locate_data_file OCC726.brep] a +explode a +checkshape a_1 +checkshape a_2 + +bcut result a_2 a_1 + +set square 10 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug743 b/tests/bugs/modalg_4/bug743 new file mode 100755 index 0000000000..1742d89715 --- /dev/null +++ b/tests/bugs/modalg_4/bug743 @@ -0,0 +1,42 @@ + +puts "========" +puts "OCC743" +puts "========" +puts "" +####################################### +## The result of offset operation on a planar wire is wrong +####################################### + +restore [locate_data_file OCC743_corr2.brep] a +checkshape a + +if { [catch { mkoffset result a 1 -15 } status] } { + puts "Faulty OCC743" +} else { + renamevar result_1 result + set nb_info [nbshapes result] + regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve + puts [format "Result shape result contains %s vertexes" $ve] + if { $ve == 0 } { + puts [format "Faulty : Result shape is NULL shape"] + } else { + regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi + if {$wi > 1 } { + set ll [explode result w] + set num [llength $ll] + puts [format "Faulty : Result shape result is COMPOUND and contains %s wires" $num] + foreach {k} $ll { + checkshape $k + regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection $k] full cs + if { $cs != 0 } { + puts [format "Faulty : Result shape is UNclosed wire !!! " $k] + } else { + puts [format "OK: Result shape is CLOSED wire !!! "] + } + } + } + } +} + +set length 3533.52 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug745_1 b/tests/bugs/modalg_4/bug745_1 new file mode 100755 index 0000000000..812b587770 --- /dev/null +++ b/tests/bugs/modalg_4/bug745_1 @@ -0,0 +1,44 @@ + +puts "========" +puts "OCC745" +puts "========" +puts "" +####################################################### +## There are several cases where the offset algo works wrong for various reasons +## for wires containing only linear segments and arcs of circle. +####################################################### + +restore [locate_data_file OCC745_1.brep] a +checkshape a + +if { [catch { mkoffset result a 1 -10 } status] } { + puts "Faulty : an exception was caught" +} else { + renamevar result_1 result + set nb_info [nbshapes result] + regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve + puts [format "Result shape result contains %s vertexes" $ve] + if { $ve == 0 } { + puts [format "Faulty : Result shape is NULL shape"] + } else { + regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi + if {$wi > 1 } { + set ll [explode result w] + set num [llength $ll] + puts [format "Faulty : Result shape result is COMPOUND and contains %s wires" $num] + foreach {k} $ll { + checkshape $k + regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection $k] full cs + if { $cs != 0 } { + puts [format "Faulty : Result shape is UNclosed wire !!! " $k] + } else { + puts [format "OK: Result shape is CLOSED wire !!! "] + } + } + } + } +} + +set length 932.825 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug745_10 b/tests/bugs/modalg_4/bug745_10 new file mode 100755 index 0000000000..95ac508628 --- /dev/null +++ b/tests/bugs/modalg_4/bug745_10 @@ -0,0 +1,27 @@ +puts "TODO OCC12345 ALL: Faulty OCC745" +puts "TODO OCC12345 ALL: Error : The length of result shape is" + +puts "========" +puts "OCC745" +puts "========" +puts "" +############################################# +# Negative offset parameter leads to positive offset and vise +# versa. Result of the offset represent an edge instead of wire. +############################################# + +restore [locate_data_file OCC745_nb1.brep] w +mkoffset result w 1 -1 + +set list [whatis result_1] + +if { [regexp {WIRE} $list] == 0 } { + puts "Faulty OCC745" +} else { + puts "OCC745 OK" +} + +renamevar result_1 result + +set length 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug745_11 b/tests/bugs/modalg_4/bug745_11 new file mode 100755 index 0000000000..143e2acb1f --- /dev/null +++ b/tests/bugs/modalg_4/bug745_11 @@ -0,0 +1,52 @@ + +puts "========" +puts "OCC745" +puts "========" +puts "" +######################### +# Not correct creation of bisector loci. +######################### + +restore [locate_data_file OCC745_nb2.brep] w +mkplane f w +topoload f +drawcont + +mat +result + +################################################## +#Exception thrown: Standard_ConstructionError: Offset wire is not closed. +################################################## + +if { [catch { mkoffset result w 10 -7 } status] } { + puts "Faulty OCC745" +} else { + renamevar result_1 result + set nb_info [nbshapes result] + regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve + puts [format "Result shape result contains %s vertexes" $ve] + if { $ve == 0 } { + puts [format "Faulty : Result shape is NULL shape"] + } else { + regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi + if {$wi > 1 } { + set ll [explode result w] + set num [llength $ll] + puts [format "Faulty : Result shape result is COMPOUND and contains %s wires" $num] + foreach {k} $ll { + checkshape $k + regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection $k] full cs + if { $cs != 0 } { + puts [format "Faulty : Result shape is UNclosed wire !!! " $k] + } else { + puts [format "OK: Result shape is CLOSED wire !!! "] + } + } + } + } +} + +set length 1930.99 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug745_12 b/tests/bugs/modalg_4/bug745_12 new file mode 100755 index 0000000000..99e6796b5b --- /dev/null +++ b/tests/bugs/modalg_4/bug745_12 @@ -0,0 +1,44 @@ +puts "TODO OCC12345 ALL: An exception was caught" +puts "TODO OCC12345 ALL: Exception " +puts "TODO OCC12345 ALL: Faulty OCC745" + +puts "========" +puts "OCC745" +puts "========" +puts "" +################################################## +# Exception thrown: Standard_ConstructionError: Offset wire is not closed. +################################################## + +restore [locate_data_file OCC745_nb3.brep] w +checkshape w + +if { [catch { mkoffset result w 1 10 } status] } { + puts "Faulty OCC745" +} else { + renamevar result_1 result + set nb_info [nbshapes result] + regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve + puts [format "Result shape result contains %s vertexes" $ve] + if { $ve == 0 } { + puts [format "Faulty : Result shape is NULL shape"] + } else { + regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi + if {$wi > 1 } { + set ll [explode result w] + set num [llength $ll] + puts [format "Faulty : Result shape result is COMPOUND and contains %s wires" $num] + foreach {k} $ll { + checkshape $k + regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection $k] full cs + if { $cs != 0 } { + puts [format "Faulty : Result shape is UNclosed wire !!! " $k] + } else { + puts [format "OK: Result shape is CLOSED wire !!! "] + } + } + } + } + set length 0 + set 2dviewer 0 +} diff --git a/tests/bugs/modalg_4/bug745_13 b/tests/bugs/modalg_4/bug745_13 new file mode 100755 index 0000000000..50769b4131 --- /dev/null +++ b/tests/bugs/modalg_4/bug745_13 @@ -0,0 +1,25 @@ + +puts "========" +puts "OCC745" +puts "========" +puts "" +################################# +# Infinite loop during bisector loci calculation. +################################# + +restore [locate_data_file OCC745_nb5.brep] w +checkshape w +mkplane result w +topoload result +drawcont + +cpulimit 600 + +mat + +result + +puts "OCC745 OK" + +set square 5844.54 +set 2dviewer 1 diff --git a/tests/bugs/modalg_4/bug745_2 b/tests/bugs/modalg_4/bug745_2 new file mode 100755 index 0000000000..d8d60d5215 --- /dev/null +++ b/tests/bugs/modalg_4/bug745_2 @@ -0,0 +1,26 @@ + +puts "========" +puts "OCC745" +puts "========" +puts "" +################################################## +## This test does not terminate due to infinite loop in bissector calculation +################################################## + +restore [locate_data_file OCC745_2.brep] a +checkshape a +mkplane pl a +topoload pl +drawcont +smallview -2D- +2dfit + +set min 30 +cpulimit [expr 60 * $min] + +mat +puts "OCC745 OK" + +renamevar pl result +set square 5844.55 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug745_3 b/tests/bugs/modalg_4/bug745_3 new file mode 100755 index 0000000000..b153bec444 --- /dev/null +++ b/tests/bugs/modalg_4/bug745_3 @@ -0,0 +1,29 @@ + +puts "========" +puts "OCC745" +puts "========" +puts "" +########################### +## Incorrect MAT (map of bissectors) +########################### + +puts "#" +puts "Non stable test case on Linux. MKV. 04.02.2011" +puts " ( Gif )" +puts "#" + +restore [locate_data_file OCC745_ellipse.brep] w +checkshape w +mkplane result w +topoload result +drawcont + +smallview -2D- +2dfit + +mat +#result + +set square 8357.41 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug745_4 b/tests/bugs/modalg_4/bug745_4 new file mode 100755 index 0000000000..a4b335ef56 --- /dev/null +++ b/tests/bugs/modalg_4/bug745_4 @@ -0,0 +1,49 @@ +puts "TODO OCC12345 ALL: Faulty : Result shape is NULL shape" +puts "TODO OCC12345 ALL: Exception: result is not a topological shape!!!" +puts "TODO OCC12345 ALL: TEST INCOMPLETE" + +pload QAcommands + +puts "========" +puts "OCC745" +puts "========" +puts "" +########################################### +# Exception Standard_NullValue while performing the offset: +########################################### + +restore [locate_data_file OCC745_pocket1.brep] a +checkshape a + +if { [catch { mkoffset result a 1 -10 } status] } { + puts "Faulty OCC745" +} else { + renamevar result_1 result + set nb_info [nbshapes result] + set ve 0 + regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve + puts [format "Result shape result contains %s vertexes" $ve] + if { $ve == 0 } { + puts [format "Faulty : Result shape is NULL shape"] + } else { + regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi + if {$wi > 1 } { + set ll [explode result w] + set num [llength $ll] + puts [format "Faulty : Result shape result is COMPOUND and contains %s wires" $num] + foreach {k} $ll { + checkshape $k + regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection $k] full cs + if { $cs != 0 } { + puts [format "Faulty : Result shape is UNclosed wire !!! " $k] + } else { + puts [format "OK: Result shape is CLOSED wire !!! "] + } + } + } + } +} + +set length 0 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug745_5 b/tests/bugs/modalg_4/bug745_5 new file mode 100755 index 0000000000..0365d3761f --- /dev/null +++ b/tests/bugs/modalg_4/bug745_5 @@ -0,0 +1,24 @@ + +puts "========" +puts "OCC745" +puts "========" +puts "" +############################ +# Not correct creation of bisector loci: +############################ + +restore [locate_data_file OCC745_pocket4.brep] w +checkshape w +plane p +mkface result p w +topoload result +drawcont + +smallview -2D- +2dfit + +mat +result + +set square 5844.21 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug745_6 b/tests/bugs/modalg_4/bug745_6 new file mode 100755 index 0000000000..d07d2536b7 --- /dev/null +++ b/tests/bugs/modalg_4/bug745_6 @@ -0,0 +1,46 @@ +puts "TODO OCC12345 ALL: Faulty : Result shape is NULL shape" +puts "TODO OCC12345 ALL: Error : The command is not valid. The length is" + +puts "========" +puts "OCC745" +puts "BUC60878" +puts "========" +puts "" +################################ +# There are discontinuities in offset contours: +################################ + +restore [locate_data_file BUC60878-wire3.brep] a +checkshape a + +if { [catch { mkoffset result a 1 -10 } status] } { + puts "Faulty OCC745" +} else { + renamevar result_1 result + set nb_info [nbshapes result] + regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve + puts [format "Result shape result contains %s vertexes" $ve] + if { $ve == 0 } { + puts [format "Faulty : Result shape is NULL shape"] + } else { + regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi + if {$wi > 1 } { + set ll [explode result w] + set num [llength $ll] + puts [format "Faulty : Result shape result is COMPOUND and contains %s wires" $num] + foreach {k} $ll { + checkshape $k + regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection $k] full cs + if { $cs != 0 } { + puts [format "Faulty : Result shape is UNclosed wire !!! " $k] + } else { + puts [format "OK: Result shape is CLOSED wire !!! "] + } + } + } + } +} + +set length 0 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug745_7 b/tests/bugs/modalg_4/bug745_7 new file mode 100755 index 0000000000..ed125119db --- /dev/null +++ b/tests/bugs/modalg_4/bug745_7 @@ -0,0 +1,45 @@ +puts "TODO OCC12345 ALL: Faulty : Result shape is NULL shape" +puts "TODO OCC12345 ALL: Error : The command is not valid. The length is" + +puts "========" +puts "OCC745" +puts "========" +puts "" +###################################################### +## Exception thrown: Standard_ConstructionError: Offset wire is not closed: +###################################################### + +source [locate_data_file OCC745_cont1.dat] +checkshape pp + +if { [catch { mkoffset result pp 1 -10 } status] } { + puts "Faulty OCC745" +} else { + renamevar result_1 result + set nb_info [nbshapes result] + regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve + puts [format "Result shape result contains %s vertexes" $ve] + if { $ve == 0 } { + puts [format "Faulty : Result shape is NULL shape"] + } else { + regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi + if {$wi > 1 } { + set ll [explode result w] + set num [llength $ll] + puts [format "Faulty : Result shape result is COMPOUND and contains %s wires" $num] + foreach {k} $ll { + checkshape $k + regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection $k] full cs + if { $cs != 0 } { + puts [format "Faulty : Result shape is UNclosed wire !!! " $k] + } else { + puts [format "OK: Result shape is CLOSED wire !!! "] + } + } + } + } +} + +set length 0 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug745_8 b/tests/bugs/modalg_4/bug745_8 new file mode 100755 index 0000000000..8fa54a95a0 --- /dev/null +++ b/tests/bugs/modalg_4/bug745_8 @@ -0,0 +1,43 @@ + +puts "========" +puts "OCC745" +puts "========" +puts "" +################################################### +## Exception thrown: Standard_ConstructionError: Offset wire is not closed: +################################################### + +restore [locate_data_file BUC60830-face2.brep] f +checkshape f + +if { [catch { mkoffset result f 45 -0.042225 } status] } { + puts "Faulty OCC745" +} else { + renamevar result_1 result + set nb_info [nbshapes result] + regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve + puts [format "Result shape result contains %s vertexes" $ve] + if { $ve == 0 } { + puts [format "Faulty : Result shape is NULL shape"] + } else { + regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi + if {$wi > 1 } { + set ll [explode result w] + set num [llength $ll] + puts [format "Faulty : Result shape result is COMPOUND and contains %s wires" $num] + foreach {k} $ll { + checkshape $k + regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection $k] full cs + if { $cs != 0 } { + puts [format "Faulty : Result shape is UNclosed wire !!! " $k] + } else { + puts [format "OK: Result shape is CLOSED wire !!! "] + } + } + } + } +} + +set length 72.1851 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug745_9 b/tests/bugs/modalg_4/bug745_9 new file mode 100755 index 0000000000..1ad8a6cabd --- /dev/null +++ b/tests/bugs/modalg_4/bug745_9 @@ -0,0 +1,45 @@ +puts "TODO OCC12345 ALL: Error : The command is not valid. The length is" +puts "TODO OCC12345 ALL: Faulty : Result shape is NULL shape" + +puts "========" +puts "OCC745" +puts "========" +puts "" +##################################################### +# The latter command enters an endless loop: it was not completed in 30 min: +##################################################### + +source [locate_data_file OCC745_cont2.dat] +checkshape pq + +if { [catch { mkoffset result pq 1 -10 } status] } { + puts "Faulty OCC745" +} else { + renamevar result_1 result + set nb_info [nbshapes result] + regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve + puts [format "Result shape result contains %s vertexes" $ve] + if { $ve == 0 } { + puts [format "Faulty : Result shape is NULL shape"] + } else { + regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi + if {$wi > 1 } { + set ll [explode result w] + set num [llength $ll] + puts [format "Faulty : Result shape result is COMPOUND and contains %s wires" $num] + foreach {k} $ll { + checkshape $k + regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection $k] full cs + if { $cs != 0 } { + puts [format "Faulty : Result shape is UNclosed wire !!! " $k] + } else { + puts [format "OK: Result shape is CLOSED wire !!! "] + } + } + } + } +} + +set length 0 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug748 b/tests/bugs/modalg_4/bug748 new file mode 100755 index 0000000000..053e0bf5c9 --- /dev/null +++ b/tests/bugs/modalg_4/bug748 @@ -0,0 +1,18 @@ + +puts "========" +puts "OCC748" +puts "========" +puts "" +################################## +## Incorrect work of DRAW-command "common" +################################## + +restore [locate_data_file OCC748_1.brep] s1 +checkshape s1 +restore [locate_data_file OCC748_2.brep] s2 +checkshape s2 + +bcommon result s1 s2 + +set square 628.319 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug755_1 b/tests/bugs/modalg_4/bug755_1 new file mode 100755 index 0000000000..6866b0d977 --- /dev/null +++ b/tests/bugs/modalg_4/bug755_1 @@ -0,0 +1,34 @@ + +puts "========" +puts "OCC755" +puts "SAM1607" +puts "(case 1)" +puts "========" +puts "" +#################################################################### +##Result of cut of capteur2 from capteur1 is a solid. It must be a compound, as it consists of 2 bodies. +#################################################################### + +restore [locate_data_file OCC755_1.brep] a1 +checkshape a1 +restore [locate_data_file OCC755_2.brep] a2 +checkshape a2 + +bcut result a1 a2 + +set wt_is [whatis result] + +set lth [llength $wt_is] + +if {$lth < 5} { + puts "Faulty OCC755 (case 1)" +} else { + if {[regexp {COMPOUND} $wt_is] == 1} { + puts "OCC755 OK (case 2)" + } else { + puts "Faulty OCC755 (case 2)" + } +} + +set square 1.57358e+06 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug758 b/tests/bugs/modalg_4/bug758 new file mode 100755 index 0000000000..cfe478409e --- /dev/null +++ b/tests/bugs/modalg_4/bug758 @@ -0,0 +1,26 @@ + +puts "========" +puts "OCC758" +puts "SAM1613" +puts "========" +puts "" +################################################### +##It's impossible to cut two little shapes from the big one in the attached file. +################################################### + +restore [locate_data_file OCC758.brep] a +explode a +checkshape a_1 +checkshape a_2 +checkshape a_3 + +bcut res1 a_1 a_2 + +checkshape res1 + +bcut result res1 a_3 + +set square 49473.6 +set 2dviewer 0 + + diff --git a/tests/bugs/modalg_4/bug7626_1 b/tests/bugs/modalg_4/bug7626_1 new file mode 100755 index 0000000000..4eb38094ab --- /dev/null +++ b/tests/bugs/modalg_4/bug7626_1 @@ -0,0 +1,29 @@ +puts "============" +puts "OCC7626" +puts "============" +puts "" +###################################################### +# Bad result of bcut operation +###################################################### + +set BugNumber OCC7626 + +psphere s 10 +box b 10 0 0 20 20 20 +trotate b 10 0 0 0 0 1 45 + +bcut result s b + +set square 1271.7 + +set nb_v_good 4 +set nb_e_good 7 +set nb_w_good 4 +set nb_f_good 3 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 21 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug7626_2 b/tests/bugs/modalg_4/bug7626_2 new file mode 100755 index 0000000000..406de37ad2 --- /dev/null +++ b/tests/bugs/modalg_4/bug7626_2 @@ -0,0 +1,30 @@ +puts "============" +puts "OCC7626" +puts "============" +puts "" +###################################################### +# Bad result of bcut operation +###################################################### + +set BugNumber OCC7626 + +psphere s 10 +box b 10 0 0 20 20 20 +trotate b 10 0 0 0 0 1 45 + +bcommon result s b + +set square 199.095 + +set nb_v_good 2 +set nb_e_good 3 +set nb_w_good 3 +set nb_f_good 3 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 14 + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug763 b/tests/bugs/modalg_4/bug763 new file mode 100755 index 0000000000..f1ee1169a0 --- /dev/null +++ b/tests/bugs/modalg_4/bug763 @@ -0,0 +1,20 @@ + +puts "========" +puts "OCC763" +puts "========" +puts "" +#################################### +## Bad result of fuse operation between two cylinders +#################################### + +restore [locate_data_file OCC763_c1.brep] c1 +checkshape c1 +restore [locate_data_file OCC763_c2.brep] c2 +checkshape c2 + +bop c1 c2 +bopfuse result + +set square 23189.4 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug7668 b/tests/bugs/modalg_4/bug7668 new file mode 100755 index 0000000000..e3704ab77e --- /dev/null +++ b/tests/bugs/modalg_4/bug7668 @@ -0,0 +1,36 @@ +puts "============" +puts "OCC7668" +puts "============" +puts "" +####################################################################### +# BRepOffsetAPI_MakeOffset wrong generated list +####################################################################### + +puts "#" +puts "Non stable test case on Linux. MKV. 29.12.2010" +puts " ( VERTEX : 136 or VERTEX : 134 )" +puts "#" + +set BugNumber OCC7668 + +restore [locate_data_file OCC7668.brep] a1 + +wire w1 a1 + +mkoffset result w1 1 2 + +renamevar result_1 result + +# Analysis of "nbshapes res" +set nb_v_good 134 +set nb_e_good 134 +set nb_w_good 1 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 269 + +set length 136.008 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug767 b/tests/bugs/modalg_4/bug767 new file mode 100755 index 0000000000..d53e007c40 --- /dev/null +++ b/tests/bugs/modalg_4/bug767 @@ -0,0 +1,15 @@ + +puts "=======" +puts "OCC767" +puts "=======" +puts "" +############################################ +## Command sameparametr in DRAW hangs on attached edge. +############################################ + +restore [locate_data_file OCC767.brep] result + +sameparameter result + +set length 7.6901 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug77 b/tests/bugs/modalg_4/bug77 new file mode 100755 index 0000000000..ef994793ec --- /dev/null +++ b/tests/bugs/modalg_4/bug77 @@ -0,0 +1,21 @@ +puts "========================" +puts " BUC60866 " +puts " OCC77 " +puts "========================" +puts "" +###################################################### +# The BRepFill_Pipe fails +###################################################### + +restore [locate_data_file buc60866a.rle] f +checkshape f + +restore [locate_data_file buc60866b.rle] w +checkshape w + +pipe result w f + +set square 1.12048e+07 +set 2dviewer 0 + + diff --git a/tests/bugs/modalg_4/bug770 b/tests/bugs/modalg_4/bug770 new file mode 100755 index 0000000000..a16f240721 --- /dev/null +++ b/tests/bugs/modalg_4/bug770 @@ -0,0 +1,27 @@ +puts "TODO ?OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO ?OCC12345 ALL: Error : The square of result shape is" +puts "TODO ?OCC12345 ALL: TEST INCOMPLETE" + +puts "========" +puts "OCC770" +puts "SAM1636" +puts "========" +puts "" +############################ +## Impossible fusing 3 attached shapes +############################ + +restore [locate_data_file OCC770.brep] a +explode a +checkshape a_1 +checkshape a_2 +checkshape a_3 + +bfuse res1 a_1 a_2 + +checkshape res1 + +bfuse result res1 a_3 + +set square 962546. +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug771 b/tests/bugs/modalg_4/bug771 new file mode 100755 index 0000000000..58f902941d --- /dev/null +++ b/tests/bugs/modalg_4/bug771 @@ -0,0 +1,25 @@ + +puts "========" +puts "OCC771" +puts "SAM1639" +puts "========" +puts "" +########################### +## Impossible fusung 3 shapes attached +########################### + +restore [locate_data_file OCC771.brep] a +explode a +checkshape a_1 +checkshape a_2 +checkshape a_3 + +bfuse res1 a_1 a_2 + +checkshape res1 + +bfuse result res1 a_3 + +set square 1306.68 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug772 b/tests/bugs/modalg_4/bug772 new file mode 100755 index 0000000000..3b3233171f --- /dev/null +++ b/tests/bugs/modalg_4/bug772 @@ -0,0 +1,21 @@ +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +puts "========" +puts "OCC772" +puts "SAM1643" +puts "========" +puts "" +###################################### +## Impossible to make a common of the shapes attached. +###################################### + +restore [locate_data_file OCC772.brep] a +explode a +checkshape a_1 +checkshape a_2 + +bcommon result a_1 a_2 + +set square 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug774_1 b/tests/bugs/modalg_4/bug774_1 new file mode 100755 index 0000000000..b8a4a1a21e --- /dev/null +++ b/tests/bugs/modalg_4/bug774_1 @@ -0,0 +1,22 @@ + +puts "========" +puts "OCC774" +puts "SAM1647" +puts "(case 1)" +puts "========" +puts "" +################################# +## It's impossible to cut one shape from another. +################################# + +restore [locate_data_file OCC774.brep] a +explode a +checkshape a_1 +checkshape a_2 + +if { [catch { bcut result a_1 a_2 } status] } { + puts "Faulty OCC774 (case 1)" +} + +set square 50704.6 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug774_2 b/tests/bugs/modalg_4/bug774_2 new file mode 100755 index 0000000000..8d902616ce --- /dev/null +++ b/tests/bugs/modalg_4/bug774_2 @@ -0,0 +1,22 @@ +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +puts "========" +puts "OCC774" +puts "SAM1647" +puts "(case 2)" +puts "========" +puts "" +################################# +## +restore [locate_data_file OCC774.brep] a +explode a +checkshape a_1 +checkshape a_2 + +if { [catch { bcut result a_2 a_1 } status] } { + puts "Faulty OCC774 (case 2)" +} + +set square 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug775 b/tests/bugs/modalg_4/bug775 new file mode 100755 index 0000000000..09239ef1c3 --- /dev/null +++ b/tests/bugs/modalg_4/bug775 @@ -0,0 +1,19 @@ + +puts "========" +puts "OCC775" +puts "SAM1650" +puts "========" +puts "" +############################# +## Impossible to fuse two attached shapes. +############################# + +restore [locate_data_file OCC775.brep] a +explode a +checkshape a_1 +checkshape a_2 + +bfuse result a_1 a_2 + +set square 61146.4 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug776_1 b/tests/bugs/modalg_4/bug776_1 new file mode 100755 index 0000000000..2478e60984 --- /dev/null +++ b/tests/bugs/modalg_4/bug776_1 @@ -0,0 +1,20 @@ + +puts "========" +puts "OCC776" +puts "SAM1654" +puts "(case 1)" +puts "========" +puts "" +########################################## +## Impossible to cut one shape from another in the attachment +########################################## + +restore [locate_data_file OCC776.brep] a +explode a +checkshape a_1 +checkshape a_2 + +bcut result a_1 a_2 + +set square 112637. +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug776_2 b/tests/bugs/modalg_4/bug776_2 new file mode 100755 index 0000000000..cc8962d7a0 --- /dev/null +++ b/tests/bugs/modalg_4/bug776_2 @@ -0,0 +1,20 @@ + +puts "========" +puts "OCC776" +puts "SAM1654" +puts "(case 2)" +puts "========" +puts "" +########################################## +## Impossible to cut one shape from another in the attachment +########################################## + +restore [locate_data_file OCC776.brep] a +explode a +checkshape a_1 +checkshape a_2 + +bcut result a_2 a_1 + +set square 40403.2 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug778_1 b/tests/bugs/modalg_4/bug778_1 new file mode 100755 index 0000000000..8dfba8f219 --- /dev/null +++ b/tests/bugs/modalg_4/bug778_1 @@ -0,0 +1,20 @@ + +puts "========" +puts "OCC778" +puts "SAM1656" +puts "(case 1)" +puts "========" +puts "" +###################################### +## Incorrect result of cut of the cylinder from the shape. +###################################### + +restore [locate_data_file OCC778.brep] a +explode a +checkshape a_1 +checkshape a_2 + +bcut result a_1 a_2 + +set square 13633.6 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug778_2 b/tests/bugs/modalg_4/bug778_2 new file mode 100755 index 0000000000..0fead207eb --- /dev/null +++ b/tests/bugs/modalg_4/bug778_2 @@ -0,0 +1,20 @@ + +puts "========" +puts "OCC778" +puts "SAM1656" +puts "(case 2)" +puts "========" +puts "" +##################################### +## Incorrect result of cut of the cylinder from the shape +##################################### + +restore [locate_data_file OCC778.brep] a +explode a +checkshape a_1 +checkshape a_2 + +bcut result a_2 a_1 + +set square 678.584 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug779 b/tests/bugs/modalg_4/bug779 new file mode 100755 index 0000000000..e6d938f954 --- /dev/null +++ b/tests/bugs/modalg_4/bug779 @@ -0,0 +1,22 @@ + +puts "========" +puts "OCC779" +puts "========" +puts "" +################################ +## Common operation produces invalid shape +################################ + +restore [locate_data_file OCC779_s1.brep] s1 +checkshape s1 +restore [locate_data_file OCC779_s2.brep] s2 +checkshape s2 + +ttranslate s1 0 0 -30 +prism s1p s1 0 0 70 +checkshape s1p + +bcommon result s1p s2 + +set square 64191.2 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug78 b/tests/bugs/modalg_4/bug78 new file mode 100755 index 0000000000..5b01cb84be --- /dev/null +++ b/tests/bugs/modalg_4/bug78 @@ -0,0 +1,18 @@ +puts "============" +puts "BUC60875" +puts "OCC78" +puts "============" +puts "" +############################### +## Pipe is created incorrectly on two wires +############################### + +#datadir /disk4/QA/hotline/GRIDS/chl/data +restore [locate_data_file BUC60875_wire.brep] w +restore [locate_data_file BUC60875_profile.brep] p +checkshape w +checkshape p + +pipe result w p +set square 10191.8 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug780_1 b/tests/bugs/modalg_4/bug780_1 new file mode 100755 index 0000000000..41a967261a --- /dev/null +++ b/tests/bugs/modalg_4/bug780_1 @@ -0,0 +1,20 @@ + +puts "========" +puts "OCC780" +puts "SAM1239" +puts "(case 1)" +puts "========" +puts "" +######################################### +## Fuse and common between two faces are wrong (SAM1239) +######################################### + +restore [locate_data_file OCC780.brep] f +explode f f +checkshape f_1 +checkshape f_2 + +bcommon result f_1 f_2 + +set square 6283.19 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug780_2 b/tests/bugs/modalg_4/bug780_2 new file mode 100755 index 0000000000..6c90fe6669 --- /dev/null +++ b/tests/bugs/modalg_4/bug780_2 @@ -0,0 +1,20 @@ + +puts "========" +puts "OCC780" +puts "SAM1239" +puts "(case 2)" +puts "========" +puts "" +######################################### +## Fuse and common between two faces are wrong (SAM1239) +######################################### + +restore [locate_data_file OCC780.brep] f +explode f f +checkshape f_1 +checkshape f_2 + +bfuse result f_1 f_2 + +set square 12566.4 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug788_1 b/tests/bugs/modalg_4/bug788_1 new file mode 100755 index 0000000000..7bf800cefb --- /dev/null +++ b/tests/bugs/modalg_4/bug788_1 @@ -0,0 +1,20 @@ + +puts "=========" +puts " OCC788 " +puts "=========" +puts "" +################################################# +## ThruSection cannot determine correctly correspondence between wires +################################################# +restore [locate_data_file OCC788_s1w.brep] w1 +explode w1 +wire ww1 w1_1 + +restore [locate_data_file OCC788_s2w.brep] w2 +explode w2 +wire ww2 w2_1 + +thrusections result 0 0 ww1 ww2 + +set 2dviewer 0 +set square 148608. diff --git a/tests/bugs/modalg_4/bug788_2 b/tests/bugs/modalg_4/bug788_2 new file mode 100755 index 0000000000..cbb20238b1 --- /dev/null +++ b/tests/bugs/modalg_4/bug788_2 @@ -0,0 +1,24 @@ + +puts "=========" +puts " OCC788 " +puts "=========" +puts "" +################################################## +## ThruSection cannot determine correctly correspondence between wires +################################################## + +restore [locate_data_file OCC788_s1w.brep] w1 +explode w1 +wire ww1 w1_1 + +restore [locate_data_file OCC788_s2w.brep] w2 +explode w2 +wire ww2 w2_1 + + +thrusections result 0 0 ww1 ww2 + +puts "It necessary to analyse the photo" + +set 2dviewer 0 +set square 148608. diff --git a/tests/bugs/modalg_4/bug789 b/tests/bugs/modalg_4/bug789 new file mode 100755 index 0000000000..59e95ec2d2 --- /dev/null +++ b/tests/bugs/modalg_4/bug789 @@ -0,0 +1,25 @@ + +puts "=========" +puts " OCC789 " +puts "=========" +puts "" +######################################################## +## When working on 2 closed wires (each of 1 edge), the thrusection algorithm creates +## a surface with isolines which oscillate in longitudinal direction somewhere in the +## middle between end sections. +######################################################## + +restore [locate_data_file OCC789_s3.brep] w1 +explode w1 +wire ww1 w1_1 + +restore [locate_data_file OCC789_s4.brep] w2 +explode w2 +wire ww2 w2_1 + +thrusections result 0 0 ww1 ww2 + +puts "It necessary to analyse the photo" + +set square 142424. +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug794 b/tests/bugs/modalg_4/bug794 new file mode 100755 index 0000000000..b840b8e330 --- /dev/null +++ b/tests/bugs/modalg_4/bug794 @@ -0,0 +1,27 @@ +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "=========" +puts " OCC794 " +puts "=========" +puts "" +##################################################### +## The offset algorithm produced invalid result when offseting an attached face +##################################################### + +pload QAcommands + +restore [locate_data_file OCC794.brep] a + +offsetshape result a 10 + +set x_coord 120 +set y_coord 150 + +vinit +vdisplay result +vsetdispmode 1 +vfit + +checkcolor $x_coord $y_coord 0.77 0.54 0.09 + +set square 206399 +set 3dviewer 1 diff --git a/tests/bugs/modalg_4/bug80 b/tests/bugs/modalg_4/bug80 new file mode 100755 index 0000000000..84e95b82d3 --- /dev/null +++ b/tests/bugs/modalg_4/bug80 @@ -0,0 +1,22 @@ +puts "============" +puts "BUC60877" +puts "OCC80" +puts "============" +puts "" +########################################################## +## The command "section" in Draw gives exception "attempt to access to null objec " +########################################################## + +restore [locate_data_file BUC60877_lh.brep] sh +checkshape sh + +plane pl 820 198 140 -1e-06 0 1 +mkface f pl -1000 500 -300 100 + +if [catch {bsection result sh f } catch_result] { + puts "Faulty BUC60877: function SECTION works wrongly" +} else { + puts "BUC60877 OK: function SECTION works properly" +} +set length 1358.63 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug81 b/tests/bugs/modalg_4/bug81 new file mode 100755 index 0000000000..31ccd3acf7 --- /dev/null +++ b/tests/bugs/modalg_4/bug81 @@ -0,0 +1,28 @@ +puts "============" +puts "BUC60907" +puts "OCC81" +puts "============" +puts "" +############################### +## Section shell by plane gives overlapped edges +############################### + +restore [locate_data_file BUC60907_px1.rle] sh +checkshape sh + +plane f 60 0 0 1 0 0 +mkface f f +bsection result sh f +puts "Info: it should be 12 edges" + +set nb_info [nbshapes result] +regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full ne + +if { $ne != 12 } { + puts "Faulty :Number of edges is wrong" +} else { + puts "Number of edges is OK" +} + +set length 33.6353 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug817_1 b/tests/bugs/modalg_4/bug817_1 new file mode 100755 index 0000000000..2c1f12346d --- /dev/null +++ b/tests/bugs/modalg_4/bug817_1 @@ -0,0 +1,32 @@ +puts "TODO OCC12345 ALL: OCC817: Error" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +pload QAcommands + +puts "============" +puts "OCC817" +puts "============" +puts "" +############################# +## Bad results of BRepAlgoAPI_Common +############################# + +set InfoList [OCC817 result 10] + +set OriginalVolume 0 +regexp {Info: Original volume = ([-0-9.+eE]+)} $InfoList full OriginalVolume + +set AccumulatedMeshedVolume 0 +regexp {Info: Accumulated meshed volume = ([-0-9.+eE]+)} $InfoList full AccumulatedMeshedVolume + +set percent_max 0.1 +set percent [expr abs(${AccumulatedMeshedVolume} - ${OriginalVolume}) / (${OriginalVolume}) * 100.] + +if {${percent} > ${percent_max}} { + puts "OCC817: Error" +} else { + puts "OCC817: OK" +} + +set 2dviewer 0 +set square 0 diff --git a/tests/bugs/modalg_4/bug817_2 b/tests/bugs/modalg_4/bug817_2 new file mode 100755 index 0000000000..75a2c042c8 --- /dev/null +++ b/tests/bugs/modalg_4/bug817_2 @@ -0,0 +1,28 @@ +pload QAcommands + +puts "============" +puts "OCC817" +puts "============" +puts "" +############################# +## Bad results of BRepAlgoAPI_Common +############################# + +set InfoList [OCC817 result 15] + +set OriginalVolume 0 +regexp {Info: Original volume = ([-0-9.+eE]+)} $InfoList full OriginalVolume + +set AccumulatedMeshedVolume 0 +regexp {Info: Accumulated meshed volume = ([-0-9.+eE]+)} $InfoList full AccumulatedMeshedVolume + +set percent_max 0.1 +set percent [expr abs(${AccumulatedMeshedVolume} - ${OriginalVolume}) / (${OriginalVolume}) * 100.] + +if {${percent} > ${percent_max}} { + puts "OCC817: Error" +} else { + puts "OCC817: OK" +} +set 2dviewer 0 +set square 6000 diff --git a/tests/bugs/modalg_4/bug817_3 b/tests/bugs/modalg_4/bug817_3 new file mode 100755 index 0000000000..a97e252549 --- /dev/null +++ b/tests/bugs/modalg_4/bug817_3 @@ -0,0 +1,29 @@ +pload QAcommands + +puts "============" +puts "OCC817" +puts "============" +puts "" +############################# +## Bad results of BRepAlgoAPI_Common +############################# + +set InfoList [OCC817 result 30] + + +set OriginalVolume 0 +regexp {Info: Original volume = ([-0-9.+eE]+)} $InfoList full OriginalVolume + +set AccumulatedMeshedVolume 0 +regexp {Info: Accumulated meshed volume = ([-0-9.+eE]+)} $InfoList full AccumulatedMeshedVolume + +set percent_max 0.1 +set percent [expr abs(${AccumulatedMeshedVolume} - ${OriginalVolume}) / (${OriginalVolume}) * 100.] + +if {${percent} > ${percent_max}} { + puts "OCC817: Error" +} else { + puts "OCC817: OK" +} +set 2dviewer 0 +set square 6000 diff --git a/tests/bugs/modalg_4/bug82 b/tests/bugs/modalg_4/bug82 new file mode 100755 index 0000000000..ce7fe2f0f9 --- /dev/null +++ b/tests/bugs/modalg_4/bug82 @@ -0,0 +1,32 @@ +puts "============" +puts "BUC60908" +puts "OCC82" +puts "============" +puts "" +############################### +## Incomplete section of shell by plane +############################### + +restore [locate_data_file BUC60907_px1.rle] sh +checkshape sh + +plane f 0 14.8053 0 0 1 0 +mkface f f +bsection result sh f + +set nb_info [nbshapes result] +regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full nb_verices +regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full nb_edges + +set nnv [expr $nb_verices-1] + +puts "VERTEX : $nb_verices, EDGE : $nb_edges" + +if { $nnv > $nb_edges } { + puts "Surplus of vertices, Faulty section" +} else { + puts "Number of vertices correspond edges: OK" +} +set length 113.703 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug8228 b/tests/bugs/modalg_4/bug8228 new file mode 100755 index 0000000000..570e5e26f9 --- /dev/null +++ b/tests/bugs/modalg_4/bug8228 @@ -0,0 +1,37 @@ +puts "============" +puts "OCC8228" +puts "============" +puts "" +###################################################### +# exeption is raised during the vprops in DRAW on the attached shape +###################################################### + +set BugNumber OCC8228 + +catch {pload XDE} +catch {pload DCAF} + +# Create a new document and set UndoLimit + +NewDocument D MDTV-XCAF +UndoLimit D 100 + +# Open a transaction +NewCommand D + +ReadStep D [locate_data_file OCC8228.stp] +XGetOneShape result D + +set square 1.46159e+06 + +set nb_v_good 1296 +set nb_e_good 2041 +set nb_w_good 826 +set nb_f_good 761 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 4926 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug822_1 b/tests/bugs/modalg_4/bug822_1 new file mode 100755 index 0000000000..f35be9857a --- /dev/null +++ b/tests/bugs/modalg_4/bug822_1 @@ -0,0 +1,27 @@ +pload QAcommands + +puts "========" +puts "OCC822" +puts "========" +puts "" +##################################### +## BRepMesh_IncrementalMesh fails on some faces +##################################### +## (old topology) +##################################### + +if {[ catch { set info_result [OCC822_1 a1 a2 result 0] } ] } { + puts "Faulty OCC822" +} else { + if { [regexp {FAILED} $info_result] } { + puts "Faulty OCC822" + } + + set ExplodeList [explode result] + if {[llength ${ExplodeList}] < 1} { + puts "Faulty OCC822" + } +} + +set square 133931 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug822_2 b/tests/bugs/modalg_4/bug822_2 new file mode 100755 index 0000000000..add7d038ed --- /dev/null +++ b/tests/bugs/modalg_4/bug822_2 @@ -0,0 +1,26 @@ +pload QAcommands + +puts "=======" +puts "OCC822" +puts "=======" +puts "" +##################################### +## BRepMesh_IncrementalMesh fails on some faces +##################################### +## (old topology) +##################################### + +if { [ catch { set info_result [OCC822_2 a1 a2 result 0] } ] } { + puts "Faulty OCC822" +} else { + if { [regexp {FAILED} $info_result] } { + puts "Faulty OCC822" + } + + set ExplodeList [explode result] + if {[llength ${ExplodeList}] < 1} { + puts "Faulty OCC822" + } +} +set square 61963.5 +set 3dviewer 1 diff --git a/tests/bugs/modalg_4/bug823 b/tests/bugs/modalg_4/bug823 new file mode 100755 index 0000000000..3cc1481bfe --- /dev/null +++ b/tests/bugs/modalg_4/bug823 @@ -0,0 +1,26 @@ +pload QAcommands + +puts "=======" +puts "OCC823" +puts "=======" +puts "" +############################### +## BRepAlgoAPI_Fuse fails on two cylinders +############################### +## (old topology) +##################################### + +if { [ catch { set info_result [OCC823 a1 a2 result] } ] } { + puts "Faulty OCC823" +} else { + if { [regexp {FAILED} $info_result] } { + puts "Faulty OCC823" + } + + set ExplodeList [explode result] + if {[llength ${ExplodeList}] < 1} { + puts "Faulty OCC823 : Resulting shape is empty COMPOUND" + } +} +set square 23189.5 +set 2dviewer 1 diff --git a/tests/bugs/modalg_4/bug823_1 b/tests/bugs/modalg_4/bug823_1 new file mode 100755 index 0000000000..36655d3c1d --- /dev/null +++ b/tests/bugs/modalg_4/bug823_1 @@ -0,0 +1,30 @@ +pload QAcommands + +puts "============" +puts "OCC823" +puts "============" +puts "" +################################ +## BRepAlgoAPI_Fuse fails on two cylinders +################################ +## +## Note: test for old topology +## +################################ + +if { [ catch { set info_result [OCC823 a1 a2 a3] } ] } { + puts "Faulty : exception was caught" +} else { + checkshape a1 + checkshape a2 + bfuse result a1 a2 + + set ExplodeList [explode result] + if {[llength ${ExplodeList}] < 1} { + puts "Faulty : Resulting shape is empty COMPOUND" + } +} + +set square 23189.5 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug824 b/tests/bugs/modalg_4/bug824 new file mode 100755 index 0000000000..d24c36a964 --- /dev/null +++ b/tests/bugs/modalg_4/bug824 @@ -0,0 +1,27 @@ +pload QAcommands + +puts "============" +puts "OCC824" +puts "============" +puts "" +#################################### +## BRepAlgoAPI_Fuse fails on cylinder and sphere +#################################### +## (old topology) +##################################### + +if { [ catch { set info_result [OCC824 a1 a2 result 0] } ] } { + puts "Faulty OCC824" +} else { + if { [regexp {FAILED} $info_result] } { + puts "Faulty OCC824" + } + + set ExplodeList [explode result] + if {[llength ${ExplodeList}] < 1} { + puts "Faulty OCC824" + } +} + +set square 16336.3 +set 2dviewer 1 diff --git a/tests/bugs/modalg_4/bug824_1 b/tests/bugs/modalg_4/bug824_1 new file mode 100755 index 0000000000..ffc7e9acdd --- /dev/null +++ b/tests/bugs/modalg_4/bug824_1 @@ -0,0 +1,30 @@ +pload QAcommands + +puts "=======" +puts "OCC824" +puts "=======" +puts "" +#################################### +## BRepAlgoAPI_Fuse fails on cylinder and sphere +#################################### +## +## Note: test for old topology +## +################################ + +if { [ catch { set info_result [OCC824 a1 a2 a3] } ] } { + puts "Faulty : exception was catch" +} else { + checkshape a1 + checkshape a2 + bfuse result a1 a2 + + set ExplodeList [explode result] + if {[llength ${ExplodeList}] < 1} { + puts "Faulty : Resulting shape is empty COMPOUND" + } +} + +set square 16336.3 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug825 b/tests/bugs/modalg_4/bug825 new file mode 100755 index 0000000000..6005e515fd --- /dev/null +++ b/tests/bugs/modalg_4/bug825 @@ -0,0 +1,37 @@ +puts "TODO OCC12345 ALL: Faulty OCC825" +puts "TODO OCC12345 ALL: Error : The command is not valid. The square is" + +pload QAcommands + +puts "============" +puts "OCC825" +puts "============" +puts "" +###################################### +## BRepAlgoAPI_Cut fails on sphere and b-spline face +###################################### +## (old topology) +##################################### + +if { [ catch { set info_result [OCC825 a1 a2 a3 res1 res2 0] } ] } { + puts "Faulty OCC825" +} else { + if { [regexp {FAILED} $info_result] } { + puts "Faulty OCC825" + } + + set ExplodeList [explode res1] + if {[llength ${ExplodeList}] < 1} { + puts "Faulty OCC825" + } + + set ExplodeList [explode res2] + if {[llength ${ExplodeList}] < 1} { + puts "Faulty OCC825" + } + checkshape res1 + renamevar res2 result +} + +set square 0 +set 2dviewer 1 diff --git a/tests/bugs/modalg_4/bug825_1 b/tests/bugs/modalg_4/bug825_1 new file mode 100755 index 0000000000..85e294e339 --- /dev/null +++ b/tests/bugs/modalg_4/bug825_1 @@ -0,0 +1,31 @@ +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +pload QAcommands + +puts "=======" +puts "OCC825" +puts "=======" +puts "" +###################################### +## BRepAlgoAPI_Cut fails on sphere and b-spline face +###################################### +## +## Note: test for old topology +## +################################ + +if { [ catch { set info_result [OCC825 a1 a2 a3 a4 a5] } ] } { + puts "Faulty : an exception was caught" +} else { + checkshape a1 + checkshape a2 + bcut result a2 a1 + set ExplodeList [explode result] + if {[llength ${ExplodeList}] < 1} { + puts "Faulty : Resulting shape is empty COMPOUND" + } +} + +set square 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug825_2 b/tests/bugs/modalg_4/bug825_2 new file mode 100755 index 0000000000..59f72fbd76 --- /dev/null +++ b/tests/bugs/modalg_4/bug825_2 @@ -0,0 +1,32 @@ +pload QAcommands +puts "TODO OCC12345 ALL: Error : The square of result shape is" +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" + +puts "========" +puts "OCC825" +puts "========" +puts "" +###################################### +## BRepAlgoAPI_Cut fails on sphere and b-spline face +###################################### +## +## Note: test for old topology +## +################################ + +if { [ catch { set info_result [OCC825 a1 a2 a3 a4 a5] } ] } { + puts "Faulty : an exception was caught" +} else { + checkshape a1 + checkshape a3 + + bcut result a3 a1 + + set ExplodeList [explode result] + if {[llength ${ExplodeList}] < 1} { + puts "Faulty : Resulting shape is empty COMPOUND" + } +} + +set square 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug826 b/tests/bugs/modalg_4/bug826 new file mode 100755 index 0000000000..f6349bfa9a --- /dev/null +++ b/tests/bugs/modalg_4/bug826 @@ -0,0 +1,27 @@ +pload QAcommands + +puts "============" +puts "OCC826" +puts "============" +puts "" +################################### +## BRepAlgoAPI_Fuse fails on revolved and sphere +################################### +## (old topology) +##################################### + +if { [ catch { set info_result [OCC826 a1 a2 result] } ] } { + puts "Faulty OCC826" +} else { + if { [regexp {FAILED} $info_result] } { + puts "Faulty OCC826" + } + + set ExplodeList [explode result] + if {[llength ${ExplodeList}] < 1} { + puts "Faulty OCC826" + } +} + +set square 272939 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug826_1 b/tests/bugs/modalg_4/bug826_1 new file mode 100755 index 0000000000..eef30204e5 --- /dev/null +++ b/tests/bugs/modalg_4/bug826_1 @@ -0,0 +1,29 @@ +pload QAcommands + +puts "============" +puts "OCC826" +puts "============" +puts "" +################################### +## BRepAlgoAPI_Fuse fails on revolved and sphere +################################### +## +## Note: test for old topology +## +################################ + +if { [ catch { set result [OCC826 a1 a2 a3] } ] } { + puts "Faulty : an exception was caught" +} else { + checkshape a1 + checkshape a2 + bfuse result a1 a2 + + set ExplodeList [explode result] + if {[llength ${ExplodeList}] < 1} { + puts "Faulty : Resulting shape is empty COMPOUND" + } +} + +set square 272939 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug827 b/tests/bugs/modalg_4/bug827 new file mode 100755 index 0000000000..675aa6d77d --- /dev/null +++ b/tests/bugs/modalg_4/bug827 @@ -0,0 +1,45 @@ +pload QAcommands + +puts "========" +puts "OCC827" +puts "========" +puts "" +################################### +## BRepAlgoAPI_Fuse fails on cylinder and torus +################################### + +# +# a1 - Cylinder +# a2 - Torus1 +# a3 - Torus1 +# res1 - Fuse(Torus1 & Cylinder) +# res2 - Fuse(Torus2 & res1) +# + +if { [ catch { set info_result [OCC827 a1 a2 a3 result1 result2] } ] } { + puts "Faulty : an exception was caught" +} else { + if { [lsearch ${info_result} FAILED] > -1} { + puts "Faulty OCC827 (case 1)" + } + checkshape a1 + checkshape a2 + checkshape a3 + checkshape result1 + checkshape result2 + + set ExplodeList [explode result1] + if {[llength ${ExplodeList}] < 1} { + puts "Faulty : Resulting shape is empty COMPOUND" + } + + set ExplodeList [explode result2] + if {[llength ${ExplodeList}] < 1} { + puts "Faulty : Resulting shape is empty COMPOUND" + } + + renamevar result2 result +} + +set square 11847.7 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug827_1 b/tests/bugs/modalg_4/bug827_1 new file mode 100755 index 0000000000..b0e9123317 --- /dev/null +++ b/tests/bugs/modalg_4/bug827_1 @@ -0,0 +1,48 @@ +puts "TODO OCC12345 ALL: Error : The square of result shape is" +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO OCC12345 ALL: Faulty OCC827" + +pload QAcommands + +puts "========" +puts "OCC827" +puts "========" +puts "" +################################### +## BRepAlgoAPI_Fuse fails on cylinder and torus +################################### +## (old topology) +##################################### + +# +# a1 - Cylinder +# a2 - Torus1 +# a3 - Torus1 +# res1 - Fuse(Torus1 & Cylinder) +# res2 - Fuse(Torus2 & res1) +# + +if { [ catch { set info_result [OCC827 a1 a2 a3 res1 res2 0] } ] } { + puts "Faulty OCC827" +} else { + if { [regexp {FAILED} $info_result] } { + puts "Faulty OCC827" + } + checkshape a1 + checkshape a2 + checkshape a3 + checkshape res1 + + set ExplodeList [explode res1] + if {[llength ${ExplodeList}] < 1} { + puts "Faulty OCC827" + } + + set ExplodeList [explode res2] + if {[llength ${ExplodeList}] < 1} { + puts "Faulty OCC827" + } + renamevar res2 result +} +set square 0 +set 2dviewer 1 diff --git a/tests/bugs/modalg_4/bug827_2 b/tests/bugs/modalg_4/bug827_2 new file mode 100755 index 0000000000..e4ff7e600c --- /dev/null +++ b/tests/bugs/modalg_4/bug827_2 @@ -0,0 +1,42 @@ +pload QAcommands + +puts "=======" +puts "OCC827" +puts "=======" +puts "" +#################################### +## BRepAlgoAPI_Fuse fails on cylinder and torus +#################################### + + +# +# a1 - Cylinder +# a2 - Torus1 +# a3 - Torus1 +# res1 - Fuse(Torus1 & Cylinder) +# res2 - Fuse(Torus2 & res1) +# + +if { [ catch { set info_result [OCC827 a1 a2 a3 a4 a5] } ] } { + puts "Faulty OCC827" +} else { + checkshape a1 + checkshape a2 + checkshape a3 + bop a1 a2 + bopfuse res1 + checkshape res1 + set ExplodeList [explode res1] + if {[llength ${ExplodeList}] < 1} { + puts "Faulty OCC827 : Resulting shape is empty COMPOUND" + } + bop res1 a3 + bopfuse result + set ExplodeList [explode result] + if {[llength ${ExplodeList}] < 1} { + puts "Faulty OCC827 : Resulting shape is empty COMPOUND" + } +} +set square 11847.7 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug827_3 b/tests/bugs/modalg_4/bug827_3 new file mode 100755 index 0000000000..4905ae2867 --- /dev/null +++ b/tests/bugs/modalg_4/bug827_3 @@ -0,0 +1,43 @@ +pload QAcommands + +puts "=======" +puts "OCC827" +puts "=======" +puts "" +#################################### +## BRepAlgoAPI_Fuse fails on cylinder and torus +#################################### + +# +# a1 - Cylinder +# a2 - Torus1 +# a3 - Torus1 +# res1 - Fuse(Torus1 & Cylinder) +# res2 - Fuse(Torus2 & res1) +# + +if { [ catch { set info_result [OCC827 a1 a2 a3 a4 a5] } ] } { + puts "Faulty OCC827" +} else { + checkshape a1 + checkshape a2 + checkshape a3 + bop a2 a1 + bopfuse res1 + checkshape res1 + set ExplodeList [explode res1] + if {[llength ${ExplodeList}] < 1} { + puts "Faulty OCC827 : Resulting shape is empty COMPOUND" + } + bop a3 res1 + bopfuse result + + set ExplodeList [explode result] + if {[llength ${ExplodeList}] < 1} { + puts "Faulty OCC827 : Resulting shape is empty COMPOUND" + } +} + +set square 11847.7 +set 2dviewer 1 + diff --git a/tests/bugs/modalg_4/bug828 b/tests/bugs/modalg_4/bug828 new file mode 100755 index 0000000000..c13182cfdb --- /dev/null +++ b/tests/bugs/modalg_4/bug828 @@ -0,0 +1,28 @@ +pload QAcommands + +puts "========" +puts "OCC828" +puts "========" +puts "" +############################### +## BRepFilletAPI_MakeFillet fails on prism +############################### + +if { [ catch { set info_result [OCC828 a1] } ] } { + puts "Faulty : an exception was caught" +} else { + if { [lsearch ${info_result} FAILED] > -1} { + puts "Faulty : command was FAILED" + } + checkshape a1 + explode a1 e + blend result a1 10 a1_7 10 a1_6 + + set ExplodeList [explode result] + if {[llength ${ExplodeList}] < 1} { + puts "Faulty : Resulting shape is empty COMPOUND" + } +} + +set square 17816.2 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug829_1 b/tests/bugs/modalg_4/bug829_1 new file mode 100755 index 0000000000..8c4cd8c9bb --- /dev/null +++ b/tests/bugs/modalg_4/bug829_1 @@ -0,0 +1,46 @@ +puts "TODO OCC12345 ALL: An exception was caught" +puts "TODO OCC12345 ALL: Exception" + +puts "========" +puts "OCC829" +puts "========" +puts "" +################################### +## BRepOffsetAPI_MakeOffset fails on given wires +################################### +puts " This part - LIMITATION for existed algorithms" +################################### + +restore [locate_data_file OCC829_w1.brep] a +checkshape a +explode a w + +if { [catch { mkoffset result a_1 1 5 } status] } { + puts "Faulty : An exception was caught" +} else { + renamevar result_1 result + set nb_info [nbshapes result] + regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve + puts [format "Result shape result contains %s vertexes" $ve] + if { $ve == 0 } { + puts [format "Faulty : Result shape is NULL shape"] + } else { + regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi + if {$wi > 1 } { + set ll [explode result w] + set num [llength $ll] + puts [format "Faulty : Result shape result is COMPOUND and contains %s wires" $num] + foreach {k} $ll { + checkshape $k + regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection $k] full cs + if { $cs != 0 } { + puts [format "Faulty : Result shape is UNclosed wire !!! " $k] + } else { + puts [format "OK: Result shape is CLOSED wire !!! "] + } + } + } + } + set length 0 + set 2dviewer 0 +} diff --git a/tests/bugs/modalg_4/bug829_2 b/tests/bugs/modalg_4/bug829_2 new file mode 100755 index 0000000000..c26735518e --- /dev/null +++ b/tests/bugs/modalg_4/bug829_2 @@ -0,0 +1,43 @@ + +puts "========" +puts "OCC829" +puts "========" +puts "" +################################### +## BRepOffsetAPI_MakeOffset fails on given wires +################################### +restore [locate_data_file OCC829_w2.brep] a +checkshape a +explode a w + +if { [catch { mkoffset result a_1 1 5 } status] } { + puts "Faulty OCC829 (case 1)" +} else { + renamevar result_1 result + set nb_info [nbshapes result] + regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve + puts [format "Result shape result contains %s vertexes" $ve] + if { $ve == 0 } { + puts [format "Faulty : Result shape is NULL shape"] + } else { + regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi + if {$wi > 1 } { + set ll [explode result w] + set num [llength $ll] + puts [format "Faulty : Result shape result is COMPOUND and contains %s wires" $num] + foreach {k} $ll { + checkshape $k + regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection $k] full cs + if { $cs != 0 } { + puts [format "Faulty : Result shape is UNclosed wire !!! " $k] + } else { + puts [format "OK: Result shape is CLOSED wire !!! "] + } + } + } + } +} + +set length 3690.75 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug8370 b/tests/bugs/modalg_4/bug8370 new file mode 100755 index 0000000000..c8fca38d92 --- /dev/null +++ b/tests/bugs/modalg_4/bug8370 @@ -0,0 +1,33 @@ +puts "================" +puts "OCC8370" +puts "================" +puts "" +####################################################################################### +# One face is not displayed in shading mode +###################################################################################### + +set BugNumber OCC8370 + +pload XDE + +igesread [locate_data_file OCC8370-part1.igs] result * + +set square 25310.8 + +set nb_v_good 5060 +set nb_e_good 5105 +set nb_w_good 416 +set nb_f_good 399 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 10981 + +vinit +tclean result +vsetdispmode 1 +vdisplay result +vfit + +set 3dviewer 1 diff --git a/tests/bugs/modalg_4/bug8372 b/tests/bugs/modalg_4/bug8372 new file mode 100755 index 0000000000..5a7cfaa4d7 --- /dev/null +++ b/tests/bugs/modalg_4/bug8372 @@ -0,0 +1,28 @@ +puts "============" +puts "OCC8372" +puts "============" +puts "" +###################################################### +# Twisted result of ThruSections operation +###################################################### + +set BugNumber OCC8372 + +restore [locate_data_file OCC8372_1.brep] w1 +restore [locate_data_file OCC8372_2.brep] w2 + +thrusections result 1 1 w1 w2 + +set square 4140.46 + +set nb_v_good 12 +set nb_e_good 18 +set nb_w_good 8 +set nb_f_good 8 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 48 + +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug83_1 b/tests/bugs/modalg_4/bug83_1 new file mode 100755 index 0000000000..e063bdc58d --- /dev/null +++ b/tests/bugs/modalg_4/bug83_1 @@ -0,0 +1,38 @@ +puts "============" +puts "BUC60912" +puts "OCC83" +puts "============" +puts "" +############################### +## Section of simple BSpline surfaces is performed too slow +############################### + +puts "1 case: perform section with plane" +restore [locate_data_file BUC60912_sec_slow.brep] c +explode c +checkshape c_1 +checkshape c_2 + +renamevar c_1 sh +renamevar c_2 pr +plane f 0 0 0 1 0 0 +mkface f f -11 11 -11 11 + +dchrono h reset +dchrono h start +bsection result f pr + +dchrono h stop +set q2 [dchrono h show] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $q2 full z +puts "$z" +if { $z > 5 } { + puts "Elapsed time is more then 5 seconds - Faulty" +} else { + puts "Elapsed time is less then 5 - OK" +} + +set length 42.879 +set 2dviewer 0 + + diff --git a/tests/bugs/modalg_4/bug83_2 b/tests/bugs/modalg_4/bug83_2 new file mode 100755 index 0000000000..e73545e7e2 --- /dev/null +++ b/tests/bugs/modalg_4/bug83_2 @@ -0,0 +1,36 @@ +puts "============" +puts "BUC60912" +puts "OCC83" +puts "============" +puts "" +############################### +## Section of simple BSpline surfaces is performed too slow +############################### + +puts "2 case: perform section with planar BSpline surface" +restore [locate_data_file BUC60912_sec_slow.brep] c +explode c +checkshape c_1 +checkshape c_2 + +renamevar c_1 sh +renamevar c_2 pr +plane f 0 0 0 1 0 0 +mkface f f -11 11 -11 11 + +puts "Info: perform section with planar BSpline surface" +dchrono h2 reset +dchrono h2 start +bsection result sh pr +dchrono h2 stop +set q2 [ dchrono h2 show ] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $q2 full z2 +puts "$z2" +if { $z2 > 40 } { + puts "Elapsed time is more then 40 seconds - Faulty" +} else { + puts "Elapsed time is less then 40 - OK" +} +set length 42.879 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug86 b/tests/bugs/modalg_4/bug86 new file mode 100755 index 0000000000..c6e6c34767 --- /dev/null +++ b/tests/bugs/modalg_4/bug86 @@ -0,0 +1,19 @@ + +puts "========================" +puts " BUC60957 " +puts " OCC86 " +puts "========================" + +puts "Restoring the wires :" +restore [locate_data_file OCC86a.brep] w1 +checkshape w1 +restore [locate_data_file OCC86b.brep] w2 +checkshape w2 + +puts "Do Thrusection by following command: thrusections res 0 0 w1 w2 " + +thrusections result 0 0 w1 w2 + +set length 102.832 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug87 b/tests/bugs/modalg_4/bug87 new file mode 100755 index 0000000000..5905aad316 --- /dev/null +++ b/tests/bugs/modalg_4/bug87 @@ -0,0 +1,32 @@ +puts "TODO OCC12345 ALL: Faulty : Now w1,w2 have bspline curves as basic !!!" +puts "TODO OCC12345 ALL: Error : The square of result shape is" + +puts "========================" +puts " BUC60958 " +puts " OCC87 " +puts "========================" + +puts "Restoring the wires :" +restore [locate_data_file OCC86a.brep] w1 +checkshape w1 +restore [locate_data_file OCC86b.brep] w2 +checkshape w2 + +set first1 [dump w1] +set second1 [dump w2] + +# puts "Do Thrusection by following command: thrusections res 0 0 w1 w2 " + +thrusections result 0 0 w1 w2 + +set first2 [dump w1] +set second2 [dump w2] + +if {$first1 != $first2 || $second1 != $second2} { + puts "Faulty : Now w1,w2 have bspline curves as basic !!!" +} else { + puts "Correct result: Wires have circle curves as basic" +} + +set square 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug8842_1 b/tests/bugs/modalg_4/bug8842_1 new file mode 100755 index 0000000000..16073f8852 --- /dev/null +++ b/tests/bugs/modalg_4/bug8842_1 @@ -0,0 +1,49 @@ +puts "============" +puts "OCC8842" +puts "============" +puts "" +####################################################################### +# Errors in Offset Shape algorithm working with bspline and surface of revolution +####################################################################### + +set BugNumber OCC8842 + +if {[info commands testreadiges] == ""} {pload XSDRAW} + +proc myoffset {result sh val tan} { + if {$tan == 1} { + offsetparameter 1e-7 p i + } else { + offsetparameter 1e-7 p a + } + uplevel offsetload $sh $val + uplevel offsetperform $result +} + +testreadiges [locate_data_file OCC8842_cone_CATIA.igs] a1 + +sewing con1 a1 + +# join type Arc +puts "***** offsetting with join type Arc" +puts " cone_CATIA + 5" + +if [catch { myoffset result con1 5 0 } catch_result] { + puts "${BugNumber}: Faulty (1)" +} else { + +set square 32396.2 + +set nb_v_good 5 +set nb_e_good 8 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 23 + +} + +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug8842_10 b/tests/bugs/modalg_4/bug8842_10 new file mode 100755 index 0000000000..f01678d75e --- /dev/null +++ b/tests/bugs/modalg_4/bug8842_10 @@ -0,0 +1,47 @@ +puts "============" +puts "OCC8842" +puts "============" +puts "" +####################################################################### +# Errors in Offset Shape algorithm working with bspline and surface of revolution +####################################################################### + +set BugNumber OCC8842 + +if {[info commands testreadiges] == ""} {pload XSDRAW} + +proc myoffset {result sh val tan} { + if {$tan == 1} { + offsetparameter 1e-7 p i + } else { + offsetparameter 1e-7 p a + } + uplevel offsetload $sh $val + uplevel offsetperform $result +} + +testreadiges [locate_data_file OCC8842_cylinder_CATIA.igs] a3 + +sewing cyl1 a3 + +# join type Arc +puts "***** offsetting with join type Arc" +puts " cylinder_CATIA - 5" + +if [catch { myoffset result cyl1 -5 0 } catch_result] { + puts "${BugNumber}: Faulty (1)" +} else { + +set square 55514.4 +set nb_v_good 8 +set nb_e_good 14 +set nb_w_good 8 +set nb_f_good 8 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 40 +} + +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug8842_11 b/tests/bugs/modalg_4/bug8842_11 new file mode 100755 index 0000000000..cf8a3ec170 --- /dev/null +++ b/tests/bugs/modalg_4/bug8842_11 @@ -0,0 +1,48 @@ +puts "============" +puts "OCC8842" +puts "============" +puts "" +####################################################################### +# Errors in Offset Shape algorithm working with bspline and surface of revolution +####################################################################### + +set BugNumber OCC8842 + +if {[info commands testreadiges] == ""} {pload XSDRAW} + +proc myoffset {result sh val tan} { + if {$tan == 1} { + offsetparameter 1e-7 p i + } else { + offsetparameter 1e-7 p a + } + uplevel offsetload $sh $val + uplevel offsetperform $result +} + +testreadiges [locate_data_file OCC8842_cylinder_CATIA.igs] a3 + +sewing cyl1 a3 + +# join type Intersection +puts "***** offsetting with join type Intersection" +puts " cylinder_CATIA + 5" + +if [catch { myoffset result cyl1 5 1 } catch_result] { + puts "${BugNumber}: Faulty (1)" +} else { + +set square 38170.4 +set nb_v_good 4 +set nb_e_good 6 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 20 + +} + +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug8842_12 b/tests/bugs/modalg_4/bug8842_12 new file mode 100755 index 0000000000..ca218a9ce7 --- /dev/null +++ b/tests/bugs/modalg_4/bug8842_12 @@ -0,0 +1,49 @@ +puts "============" +puts "OCC8842" +puts "============" +puts "" +####################################################################### +# Errors in Offset Shape algorithm working with bspline and surface of revolution +####################################################################### + +set BugNumber OCC8842 + +if {[info commands testreadiges] == ""} {pload XSDRAW} + +proc myoffset {result sh val tan} { + if {$tan == 1} { + offsetparameter 1e-7 p i + } else { + offsetparameter 1e-7 p a + } + uplevel offsetload $sh $val + uplevel offsetperform $result +} + +testreadiges [locate_data_file OCC8842_cylinder_CATIA.igs] a3 + +sewing cyl1 a3 + +# join type Intersection +puts "***** offsetting with join type Intersection" +puts " cylinder_CATIA - 5" + +if [catch { myoffset result cyl1 -5 1 } catch_result] { + puts "${BugNumber}: Faulty (1)" +} else { + +set square 57019.9 +set nb_v_good 4 +set nb_e_good 6 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 20 + +} + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug8842_13 b/tests/bugs/modalg_4/bug8842_13 new file mode 100755 index 0000000000..c9843d8e66 --- /dev/null +++ b/tests/bugs/modalg_4/bug8842_13 @@ -0,0 +1,48 @@ +puts "============" +puts "OCC8842" +puts "============" +puts "" +####################################################################### +# Errors in Offset Shape algorithm working with bspline and surface of revolution +####################################################################### + +set BugNumber OCC8842 + +if {[info commands testreadiges] == ""} {pload XSDRAW} + +proc myoffset {result sh val tan} { + if {$tan == 1} { + offsetparameter 1e-7 p i + } else { + offsetparameter 1e-7 p a + } + uplevel offsetload $sh $val + uplevel offsetperform $result +} + +testreadiges [locate_data_file OCC8842_cylinder_Ideas.igs] a4 + +DT_ShapeDivide cyl2 a4 + +# join type Arc +puts "***** offsetting with join type Arc" +puts " cylinder_Ideas + 5" + +if [catch { myoffset result cyl2 5 0 } catch_result] { + puts "${BugNumber}: Faulty (1)" +} else { + +set square 34980.9 +set nb_v_good 20 +set nb_e_good 33 +set nb_w_good 15 +set nb_f_good 15 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 85 + +} + +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug8842_14 b/tests/bugs/modalg_4/bug8842_14 new file mode 100755 index 0000000000..a98d2ed375 --- /dev/null +++ b/tests/bugs/modalg_4/bug8842_14 @@ -0,0 +1,48 @@ +puts "============" +puts "OCC8842" +puts "============" +puts "" +####################################################################### +# Errors in Offset Shape algorithm working with bspline and surface of revolution +####################################################################### + +set BugNumber OCC8842 + +if {[info commands testreadiges] == ""} {pload XSDRAW} + +proc myoffset {result sh val tan} { + if {$tan == 1} { + offsetparameter 1e-7 p i + } else { + offsetparameter 1e-7 p a + } + uplevel offsetload $sh $val + uplevel offsetperform $result +} + +testreadiges [locate_data_file OCC8842_cylinder_Ideas.igs] a4 + +DT_ShapeDivide cyl2 a4 + +# join type Arc +puts "***** offsetting with join type Arc" +puts " cylinder_Ideas - 5" + +if [catch { myoffset result cyl2 -5 0 } catch_result] { + puts "${BugNumber}: Faulty (1)" +} else { + +set square 20106.2 +set nb_v_good 6 +set nb_e_good 9 +set nb_w_good 5 +set nb_f_good 5 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 27 + +} + +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug8842_15 b/tests/bugs/modalg_4/bug8842_15 new file mode 100755 index 0000000000..a1d7c30493 --- /dev/null +++ b/tests/bugs/modalg_4/bug8842_15 @@ -0,0 +1,52 @@ +puts "TODO ?OCC11111 ALL: OCC8842: Faulty" +puts "TODO ?OCC11111 ALL: Exception" +puts "TODO ?OCC11111 ALL: An exception was caught" + +puts "============" +puts "OCC8842" +puts "============" +puts "" +####################################################################### +# Errors in Offset Shape algorithm working with bspline and surface of revolution +####################################################################### + +set BugNumber OCC8842 + +if {[info commands testreadiges] == ""} {pload XSDRAW} + +proc myoffset {result sh val tan} { + if {$tan == 1} { + offsetparameter 1e-7 p i + } else { + offsetparameter 1e-7 p a + } + uplevel offsetload $sh $val + uplevel offsetperform $result +} + +testreadiges [locate_data_file OCC8842_cylinder_Ideas.igs] a4 + +DT_ShapeDivide cyl2 a4 + +# join type Intersection +puts "***** offsetting with join type Intersection" +puts " cylinder_Ideas + 5" + +if [catch { myoffset result cyl2 5 1 } catch_result] { + puts "${BugNumber}: Faulty (1)" +} else { +set square 35814.2 +set nb_v_good 6 +set nb_e_good 9 +set nb_w_good 5 +set nb_f_good 5 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 27 + +} + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug8842_16 b/tests/bugs/modalg_4/bug8842_16 new file mode 100755 index 0000000000..8d9d67cfba --- /dev/null +++ b/tests/bugs/modalg_4/bug8842_16 @@ -0,0 +1,55 @@ +puts "TODO ?OCC11111 ALL: OCC8842: Faulty" +puts "TODO ?OCC11111 ALL: Exception" +puts "TODO ?OCC11111 ALL: An exception was caught" +puts "TODO ?OCC11111 ALL: Error : Result shape is WRONG" +puts "TODO ?OCC11111 ALL: Error : The square of result shape is" + +puts "============" +puts "OCC8842" +puts "============" +puts "" +####################################################################### +# Errors in Offset Shape algorithm working with bspline and surface of revolution +####################################################################### + +set BugNumber OCC8842 + +if {[info commands testreadiges] == ""} {pload XSDRAW} + +proc myoffset {result sh val tan} { + if {$tan == 1} { + offsetparameter 1e-7 p i + } else { + offsetparameter 1e-7 p a + } + uplevel offsetload $sh $val + uplevel offsetperform $result +} + +testreadiges [locate_data_file OCC8842_cylinder_Ideas.igs] a4 + +DT_ShapeDivide cyl2 a4 + +# join type Intersection +puts "***** offsetting with join type Intersection" +puts " cylinder_Ideas - 5" + +if [catch { myoffset result cyl2 -5 1 } catch_result] { + puts "${BugNumber}: Faulty (1)" +} else { + +set square 3542.24 +set nb_v_good 60 +set nb_e_good 90 +set nb_w_good 42 +set nb_f_good 40 +set nb_sh_good 5 +set nb_sol_good 5 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 243 + +} + +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug8842_2 b/tests/bugs/modalg_4/bug8842_2 new file mode 100755 index 0000000000..ff027a9cc3 --- /dev/null +++ b/tests/bugs/modalg_4/bug8842_2 @@ -0,0 +1,53 @@ +puts "TODO OCC11111 ALL: OCC8842: Faulty" +puts "TODO OCC11111 ALL: Exception" +puts "TODO OCC11111 ALL: An exception was caught" + +puts "============" +puts "OCC8842" +puts "============" +puts "" +####################################################################### +# Errors in Offset Shape algorithm working with bspline and surface of revolution +####################################################################### + +set BugNumber OCC8842 + +if {[info commands testreadiges] == ""} {pload XSDRAW} + +proc myoffset {result sh val tan} { + if {$tan == 1} { + offsetparameter 1e-7 p i + } else { + offsetparameter 1e-7 p a + } + uplevel offsetload $sh $val + uplevel offsetperform $result +} + +testreadiges [locate_data_file OCC8842_cone_CATIA.igs] a1 + +sewing con1 a1 + +# join type Arc +puts "***** offsetting with join type Arc" +puts " cone_CATIA - 5" + +if [catch { myoffset result con1 -5 0 } catch_result] { + puts "${BugNumber}: Faulty (1)" +} else { + +set square 3542.24 + +set nb_v_good 60 +set nb_e_good 90 +set nb_w_good 42 +set nb_f_good 40 +set nb_sh_good 5 +set nb_sol_good 5 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 243 + +} + +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug8842_3 b/tests/bugs/modalg_4/bug8842_3 new file mode 100755 index 0000000000..d8f2e6ab9f --- /dev/null +++ b/tests/bugs/modalg_4/bug8842_3 @@ -0,0 +1,54 @@ +puts "TODO OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" +puts "TODO OCC11111 ALL: Error : The square of result shape is" + +puts "============" +puts "OCC8842" +puts "============" +puts "" +####################################################################### +# Errors in Offset Shape algorithm working with bspline and surface of revolution +####################################################################### + +set BugNumber OCC8842 + +if {[info commands testreadiges] == ""} {pload XSDRAW} + +proc myoffset {result sh val tan} { + if {$tan == 1} { + offsetparameter 1e-7 p i + } else { + offsetparameter 1e-7 p a + } + uplevel offsetload $sh $val + uplevel offsetperform $result +} + +testreadiges [locate_data_file OCC8842_cone_CATIA.igs] a1 + +sewing con1 a1 + +# join type Intersection +puts "***** offsetting with join type Intersection" +puts " cone_CATIA + 5" + +if [catch { myoffset result con1 5 1 } catch_result] { + puts "${BugNumber}: Faulty (1)" +} else { + +set square 3542.24 + +set nb_v_good 60 +set nb_e_good 90 +set nb_w_good 42 +set nb_f_good 40 +set nb_sh_good 5 +set nb_sol_good 5 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 243 + + +} + +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug8842_4 b/tests/bugs/modalg_4/bug8842_4 new file mode 100755 index 0000000000..c7ff33b6d7 --- /dev/null +++ b/tests/bugs/modalg_4/bug8842_4 @@ -0,0 +1,51 @@ +puts "TODO OCC11111 ALL: OCC8842: Faulty" +puts "TODO OCC11111 ALL: Exception" +puts "TODO OCC11111 ALL: An exception was caught" + +puts "============" +puts "OCC8842" +puts "============" +puts "" +####################################################################### +# Errors in Offset Shape algorithm working with bspline and surface of revolution +####################################################################### + +set BugNumber OCC8842 + +if {[info commands testreadiges] == ""} {pload XSDRAW} + +proc myoffset {result sh val tan} { + if {$tan == 1} { + offsetparameter 1e-7 p i + } else { + offsetparameter 1e-7 p a + } + uplevel offsetload $sh $val + uplevel offsetperform $result +} + +testreadiges [locate_data_file OCC8842_cone_CATIA.igs] a1 + +sewing con1 a1 + +# join type Intersection +puts "***** offsetting with join type Intersection" +puts " cone_CATIA - 5" + +if [catch { myoffset result con1 -5 1 } catch_result] { + puts "${BugNumber}: Faulty (1)" +} else { +set square 3542.24 +set nb_v_good 60 +set nb_e_good 90 +set nb_w_good 42 +set nb_f_good 40 +set nb_sh_good 5 +set nb_sol_good 5 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 243 + +} + +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug8842_5 b/tests/bugs/modalg_4/bug8842_5 new file mode 100755 index 0000000000..4654a2d084 --- /dev/null +++ b/tests/bugs/modalg_4/bug8842_5 @@ -0,0 +1,52 @@ +puts "TODO OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO OCC11111 ALL: Error : Result shape is WRONG" +puts "TODO OCC11111 ALL: Error : The square of result shape is" + +puts "============" +puts "OCC8842" +puts "============" +puts "" +####################################################################### +# Errors in Offset Shape algorithm working with bspline and surface of revolution +####################################################################### + +set BugNumber OCC8842 + +if {[info commands testreadiges] == ""} {pload XSDRAW} + +proc myoffset {result sh val tan} { + if {$tan == 1} { + offsetparameter 1e-7 p i + } else { + offsetparameter 1e-7 p a + } + uplevel offsetload $sh $val + uplevel offsetperform $result +} + +testreadiges [locate_data_file OCC8842_cone_Ideas.igs] a2 + +DT_ShapeDivide con2 a2 + +# join type Arc +puts "***** offsetting with join type Arc" +puts " cone_Ideas + 5" + +if [catch { myoffset result con2 5 0 } catch_result] { + puts "${BugNumber}: Faulty (1)" +} else { + +set square 3542.24 +set nb_v_good 60 +set nb_e_good 90 +set nb_w_good 42 +set nb_f_good 40 +set nb_sh_good 5 +set nb_sol_good 5 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 243 + +} + +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug8842_6 b/tests/bugs/modalg_4/bug8842_6 new file mode 100755 index 0000000000..7bfc6b9a1f --- /dev/null +++ b/tests/bugs/modalg_4/bug8842_6 @@ -0,0 +1,52 @@ +puts "TODO OCC11111 ALL: OCC8842: Faulty" +puts "TODO OCC11111 ALL: Exception" +puts "TODO OCC11111 ALL: An exception was caught" + +puts "============" +puts "OCC8842" +puts "============" +puts "" +####################################################################### +# Errors in Offset Shape algorithm working with bspline and surface of revolution +####################################################################### + +set BugNumber OCC8842 + +if {[info commands testreadiges] == ""} {pload XSDRAW} + +proc myoffset {result sh val tan} { + if {$tan == 1} { + offsetparameter 1e-7 p i + } else { + offsetparameter 1e-7 p a + } + uplevel offsetload $sh $val + uplevel offsetperform $result +} + +testreadiges [locate_data_file OCC8842_cone_Ideas.igs] a2 + +DT_ShapeDivide con2 a2 + +# join type Arc +puts "***** offsetting with join type Arc" +puts " cone_Ideas - 5" + +if [catch { myoffset result con2 -5 0 } catch_result] { + puts "${BugNumber}: Faulty (1)" +} else { + +set square 9885.2 +set nb_v_good 4 +set nb_e_good 9 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 23 + +} + +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug8842_7 b/tests/bugs/modalg_4/bug8842_7 new file mode 100755 index 0000000000..575f4d3362 --- /dev/null +++ b/tests/bugs/modalg_4/bug8842_7 @@ -0,0 +1,52 @@ +puts "TODO ?OCC11111 ALL: OCC8842: Faulty" +puts "TODO ?OCC11111 ALL: Exception" +puts "TODO ?OCC11111 ALL: An exception was caught" + +puts "============" +puts "OCC8842" +puts "============" +puts "" +####################################################################### +# Errors in Offset Shape algorithm working with bspline and surface of revolution +####################################################################### + +set BugNumber OCC8842 + +if {[info commands testreadiges] == ""} {pload XSDRAW} + +proc myoffset {result sh val tan} { + if {$tan == 1} { + offsetparameter 1e-7 p i + } else { + offsetparameter 1e-7 p a + } + uplevel offsetload $sh $val + uplevel offsetperform $result +} + +testreadiges [locate_data_file OCC8842_cone_Ideas.igs] a2 + +DT_ShapeDivide con2 a2 + +# join type Intersection +puts "***** offsetting with join type Intersection" +puts " cone_Ideas + 5" + +if [catch { myoffset result con2 5 1 } catch_result] { + puts "${BugNumber}: Faulty (1)" +} else { + +set square 22391 +set nb_v_good 4 +set nb_e_good 9 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 23 + +} + +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug8842_8 b/tests/bugs/modalg_4/bug8842_8 new file mode 100755 index 0000000000..43fe8e56d7 --- /dev/null +++ b/tests/bugs/modalg_4/bug8842_8 @@ -0,0 +1,55 @@ +puts "TODO ?OCC11111 ALL: OCC8842: Faulty" +puts "TODO ?OCC11111 ALL: Exception" +puts "TODO ?OCC11111 ALL: An exception was caught" +puts "TODO ?OCC11111 ALL: Error : The square of result shape is" + +puts "============" +puts "OCC8842" +puts "============" +puts "" +####################################################################### +# Errors in Offset Shape algorithm working with bspline and surface of revolution +####################################################################### + +set BugNumber OCC8842 + +cpulimit 500 + +if {[info commands testreadiges] == ""} {pload XSDRAW} + +proc myoffset {result sh val tan} { + if {$tan == 1} { + offsetparameter 1e-7 p i + } else { + offsetparameter 1e-7 p a + } + uplevel offsetload $sh $val + uplevel offsetperform $result +} + +testreadiges [locate_data_file OCC8842_cone_Ideas.igs] a2 + +DT_ShapeDivide con2 a2 + +# join type Intersection +puts "***** offsetting with join type Intersection" +puts " cone_Ideas - 5" + +if [catch { myoffset result con2 -5 1 } catch_result] { + puts "${BugNumber}: Faulty (1)" +} else { + +set square 22391 +set nb_v_good 4 +set nb_e_good 9 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 23 + +} + +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug8842_9 b/tests/bugs/modalg_4/bug8842_9 new file mode 100755 index 0000000000..ba9b083b4e --- /dev/null +++ b/tests/bugs/modalg_4/bug8842_9 @@ -0,0 +1,48 @@ +puts "============" +puts "OCC8842" +puts "============" +puts "" +####################################################################### +# Errors in Offset Shape algorithm working with bspline and surface of revolution +####################################################################### + +set BugNumber OCC8842 + +if {[info commands testreadiges] == ""} {pload XSDRAW} + +proc myoffset {result sh val tan} { + if {$tan == 1} { + offsetparameter 1e-7 p i + } else { + offsetparameter 1e-7 p a + } + uplevel offsetload $sh $val + uplevel offsetperform $result +} + +testreadiges [locate_data_file OCC8842_cylinder_CATIA.igs] a3 + +sewing cyl1 a3 + +# join type Arc +puts "***** offsetting with join type Arc" +puts " cylinder_CATIA + 5" + +if [catch { myoffset result cyl1 5 0 } catch_result] { + puts "${BugNumber}: Faulty (1)" +} else { + +set square 38170.4 +set nb_v_good 4 +set nb_e_good 6 +set nb_w_good 4 +set nb_f_good 4 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 20 + +} + +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug890 b/tests/bugs/modalg_4/bug890 new file mode 100755 index 0000000000..27f9fdd443 --- /dev/null +++ b/tests/bugs/modalg_4/bug890 @@ -0,0 +1,22 @@ + +puts "=======" +puts "OCC890" +puts "SAM1681" +puts "=======" +puts "" +############################## +## No possibility to fuse the attached prisms. +############################## + +restore [locate_data_file OCC890.brep] a +explode a + +checkshape a_1 +checkshape a_2 + +if { [ catch { bfuse result a_1 a_2 } catch_result ] } { + puts "Faulty OCC890 (case 3)" +} + +set square 1.8276e+06 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug895 b/tests/bugs/modalg_4/bug895 new file mode 100755 index 0000000000..2d2edccf50 --- /dev/null +++ b/tests/bugs/modalg_4/bug895 @@ -0,0 +1,56 @@ +puts "============" +puts "OCC895" +puts "============" +puts "" +######################################################### +## In one case, twisted surface is created. +## The problem is in incorrect computation of mutual orientations of wire segments. +######################################################### + +pload QAcommands + +set scale 73.609 +set center_X 7.93702 +set center_Y 0.264503 +set proj_X 0.523995 +set proj_Y 0.359655 +set proj_Z 0.77206 +set up_X -0.739036 +set up_Y -0.258607 +set up_Z 0.622051 +set at_X 9.06773 +set at_Y -1.93771 +set at_Z 1.45124 + +set x_coord 210 +set y_coord 210 + +set status 0 + +set angle 5 +set reverse 0 +set order 0 + +if { [ catch { OCC895 result ${angle} ${reverse} ${order} } ] } { + puts "Faulty : an exception was caught" +} + +if { ${status} == 0} { + vinit + vsetdispmode 1 + vdisplay result + + vviewparams ${scale} ${center_X} ${center_Y} \ + ${proj_X} ${proj_Y} ${proj_Z} \ + ${up_X} ${up_Y} ${up_Z} \ + ${at_X} ${at_Y} ${at_Z} + + checkcolor $x_coord $y_coord 0.98 0.72 0.13 + + if { ${stat} != 1 } { + puts "Faulty OCC895 (case 2)" + } +} + +set square 18.1614 +set 3dviewer 1 diff --git a/tests/bugs/modalg_4/bug906 b/tests/bugs/modalg_4/bug906 new file mode 100755 index 0000000000..5140c7eed5 --- /dev/null +++ b/tests/bugs/modalg_4/bug906 @@ -0,0 +1,18 @@ +puts "=======" +puts "DXF906" +puts "OCC889" +puts "OCC1013" +puts "=======" +puts "" +######################################################### +## After fix OCC157 we have plane surface in face (instead bspline as in C40). +## But now checkshape founds number of errors on new face. I think that face from +## c40 is not better than in dev +######################################################### + +restore [locate_data_file DXF906.rle] a + +mkplane result a + +set square 92131.6 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug910 b/tests/bugs/modalg_4/bug910 new file mode 100755 index 0000000000..e2798a7697 --- /dev/null +++ b/tests/bugs/modalg_4/bug910 @@ -0,0 +1,49 @@ +#INTERFACE DXF +puts "============" +puts "OCC910" +puts "============" +puts "" +##################################################### +## The problem with sat files depends on problem of BRepTools_WireExplorer +##################################################### + +pload XDE + +restore [locate_data_file OCC910.rle] a + +checkshape a +explode a w +checkshape a_7 + +set list1 [expwire a_7] +regexp {TopoDS_Iterator\(EDGE\) donne ([-0-9.+eE]+) Edges} $list1 full TopoDS_Iterator1 +regexp {TopExp_Explorer\(EDGE\) donne ([-0-9.+eE]+) Edges} $list1 full TopExp_Explorer1 +regexp {BRepTools_WireExplorer donne ([-0-9.+eE]+) Edges} $list1 full BRepTools_WireExplorer1 + + +set list2 [expwire a_7 a] +regexp {TopoDS_Iterator\(EDGE\) donne ([-0-9.+eE]+) Edges} $list1 full TopoDS_Iterator2 +regexp {TopExp_Explorer\(EDGE\) donne ([-0-9.+eE]+) Edges} $list1 full TopExp_Explorer2 +regexp {BRepTools_WireExplorer donne ([-0-9.+eE]+) Edges} $list1 full BRepTools_WireExplorer2 + +puts "TopoDS_Iterator1 = ${TopoDS_Iterator1}" +puts "TopExp_Explorer1 = ${TopExp_Explorer1}" +puts "BRepTools_WireExplorer1 = ${BRepTools_WireExplorer1}" + +puts "TopoDS_Iterator2 = ${TopoDS_Iterator2}" +puts "TopExp_Explorer2 = ${TopExp_Explorer2}" +puts "BRepTools_WireExplorer2 = ${BRepTools_WireExplorer2}" + +if { ${TopoDS_Iterator1} != ${TopoDS_Iterator2} || \ + ${TopExp_Explorer1} != ${TopExp_Explorer2} || \ + ${BRepTools_WireExplorer1} != ${BRepTools_WireExplorer2} } { + puts "Faulty OCC910" +} else { + puts "OCC910 OK" +} + +renamevar a_7 result + +set length 149.816 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/bug919 b/tests/bugs/modalg_4/bug919 new file mode 100755 index 0000000000..dcca9030fd --- /dev/null +++ b/tests/bugs/modalg_4/bug919 @@ -0,0 +1,33 @@ + +puts "=======" +puts "OCC919" +puts "SAM1623" +puts "=======" +puts "" +############################# +## Impossible to fuse the shapes. +############################## + +restore [locate_data_file OCC919.brep] a + +explode a + +# See comment in CR23244: +restore [locate_data_file OCC919-PROC.brep] a_1 +# + +checkshape a_1 +checkshape a_2 + +if { [ catch { bfuse result a_1 a_2} catch_result ] } { + puts "Faulty OCC919 (case 1)" +} else { + if { [ catch { checkshape result } catch_result ] } { + puts "Faulty OCC919 (case 2)" + } else { + puts "OCC919 OK" + } +} + +set square 272591. +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/bug951_1 b/tests/bugs/modalg_4/bug951_1 new file mode 100755 index 0000000000..ea45927a6d --- /dev/null +++ b/tests/bugs/modalg_4/bug951_1 @@ -0,0 +1,38 @@ +puts "=========" +puts " OCC951 " +puts "=========" +puts "" +################################################## +##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes +################################################## +## (old topology) +## (common) +## (section) +###################################################### + +restore [locate_data_file OCC951_1.brep] b +restore [locate_data_file OCC951_2.brep] a + +checkshape b +checkshape a + +bcommon result b a + +set nb_info [nbshapes result] +regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve +regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full ed +regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi +regexp {FACE +: +([-0-9.+eE]+)} $nb_info full fa +regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full sh +regexp {SOLID +: +([-0-9.+eE]+)} $nb_info full so +regexp {COMPSOLID +: +([-0-9.+eE]+)} $nb_info full cm +regexp {COMPOUND +: +([-0-9.+eE]+)} $nb_info full co +regexp {SHAPE +: +([-0-9.+eE]+)} $nb_info full shl +if { $ve != 0 || $ed != 0 || $wi != 0 || $fa != 0 || $sh != 0 || $so != 0 || $cm != 0 || $co != 0 || $shl != 0 } { + puts " OCC951 : COMMON operation was made PROPERLY" +} else { + puts "Faulty OCC951 : result of COMMON operation is EMPTY compound" +} + +set square 560.908 +set 3dviewer 1 diff --git a/tests/bugs/modalg_4/bug951_2 b/tests/bugs/modalg_4/bug951_2 new file mode 100755 index 0000000000..fd39ccdf8d --- /dev/null +++ b/tests/bugs/modalg_4/bug951_2 @@ -0,0 +1,39 @@ +puts "=========" +puts " OCC951 " +puts "=========" +puts "" +################################################## +##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes +################################################## +## (new topology) +## (bopcommon) +## (bopsection) +###################################################### + +restore [locate_data_file OCC951_1.brep] b +restore [locate_data_file OCC951_2.brep] a + +checkshape b +checkshape a + +bop b a +bopcommon result + +set nb_info [nbshapes result] +regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve +regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full ed +regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi +regexp {FACE +: +([-0-9.+eE]+)} $nb_info full fa +regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full sh +regexp {SOLID +: +([-0-9.+eE]+)} $nb_info full so +regexp {COMPSOLID +: +([-0-9.+eE]+)} $nb_info full cm +regexp {COMPOUND +: +([-0-9.+eE]+)} $nb_info full co +regexp {SHAPE +: +([-0-9.+eE]+)} $nb_info full shl +if { $ve != 0 || $ed != 0 || $wi != 0 || $fa != 0 || $sh != 0 || $so != 0 || $cm != 0 || $co != 0 || $shl != 0 } { + puts " OCC951 : COMMON operation was made PROPERLY" +} else { + puts "Faulty OCC951 : result of COMMON operation is EMPTY compound" +} + +set square 560.908 +set 3dviewer 1 diff --git a/tests/bugs/modalg_4/bug951_3 b/tests/bugs/modalg_4/bug951_3 new file mode 100755 index 0000000000..bf8f0a239d --- /dev/null +++ b/tests/bugs/modalg_4/bug951_3 @@ -0,0 +1,39 @@ +puts "=========" +puts " OCC951 " +puts "=========" +puts "" +################################################## +##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes +################################################## +## (old topology) +## (common) +## (section) +###################################################### + +restore [locate_data_file OCC951_1.brep] b +restore [locate_data_file OCC951_2.brep] a + +checkshape b +checkshape a + +bsection result b a + +set nb_info [nbshapes result] +regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve +regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full ed +regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi +regexp {FACE +: +([-0-9.+eE]+)} $nb_info full fa +regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full sh +regexp {SOLID +: +([-0-9.+eE]+)} $nb_info full so +regexp {COMPSOLID +: +([-0-9.+eE]+)} $nb_info full cm +regexp {COMPOUND +: +([-0-9.+eE]+)} $nb_info full co +regexp {SHAPE +: +([-0-9.+eE]+)} $nb_info full shl +if { $ve != 0 || $ed != 0 || $wi != 0 || $fa != 0 || $sh != 0 || $so != 0 || $cm != 0 || $co != 0 || $shl != 0 } { + puts " OCC951 : COMMON operation was made PROPERLY" +} else { + puts "Faulty OCC951 : result of COMMON operation is EMPTY compound" +} + +set length 39.8616 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_4/bug951_31 b/tests/bugs/modalg_4/bug951_31 new file mode 100755 index 0000000000..0cbdd41ef4 --- /dev/null +++ b/tests/bugs/modalg_4/bug951_31 @@ -0,0 +1,43 @@ +puts "=========" +puts " OCC951 " +puts "=========" +puts "" +################################################## +##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes +################################################## +## (old topology) +## (common) +## (section) +###################################################### + +restore [locate_data_file OCC951_1.brep] b +restore [locate_data_file OCC951_2.brep] a + +checkshape b +checkshape a + +bcommon result a b + +set nb_info [nbshapes result] + +regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve +regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full ed +regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi +regexp {FACE +: +([-0-9.+eE]+)} $nb_info full fa +regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full sh +regexp {SOLID +: +([-0-9.+eE]+)} $nb_info full so +regexp {COMPSOLID +: +([-0-9.+eE]+)} $nb_info full cm +regexp {COMPOUND +: +([-0-9.+eE]+)} $nb_info full co +regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full shl + +if { $ve != 0 || $ed != 0 || $wi != 0 || $fa != 0 || $sh != 0 || $so != 0 || $cm != 0 || $co != 0 || $shl != 0 } { + puts " OCC951 : COMMON operation was made PROPERLY" + puts "" +} else { + puts "Faulty OCC951 : result of COMMON operation is EMPTY compound" + puts "" +} + +set square 560.908 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_4/bug951_32 b/tests/bugs/modalg_4/bug951_32 new file mode 100755 index 0000000000..8d181b16eb --- /dev/null +++ b/tests/bugs/modalg_4/bug951_32 @@ -0,0 +1,43 @@ +puts "=========" +puts " OCC951 " +puts "=========" +puts "" +################################################## +##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes +################################################## +## (old topology) +## (common) +## (section) +###################################################### + +restore [locate_data_file OCC951_1.brep] b +restore [locate_data_file OCC951_2.brep] a + +checkshape b +checkshape a + +bsection result a b + +set nb_info [nbshapes result] + +regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve +regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full ed +regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi +regexp {FACE +: +([-0-9.+eE]+)} $nb_info full fa +regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full sh +regexp {SOLID +: +([-0-9.+eE]+)} $nb_info full so +regexp {COMPSOLID +: +([-0-9.+eE]+)} $nb_info full cm +regexp {COMPOUND +: +([-0-9.+eE]+)} $nb_info full co +regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full shl + + + +if { $ve != 0 || $ed != 0 || $wi != 0 || $fa != 0 || $sh != 0 || $so != 0 || $cm != 0 || $co != 0 || $shl != 0 } { + puts " OCC951 : SECTION operation was made PROPERLY" + puts "" +} else { + puts "Faulty OCC951 : result of SECTION operation is EMPTY compound" + puts "" +} +set length 39.8616 +set 3dviewer 1 diff --git a/tests/bugs/modalg_4/bug951_4 b/tests/bugs/modalg_4/bug951_4 new file mode 100755 index 0000000000..3dd6465216 --- /dev/null +++ b/tests/bugs/modalg_4/bug951_4 @@ -0,0 +1,39 @@ +puts "=========" +puts " OCC951 " +puts "=========" +puts "" +################################################## +##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes +################################################## +## (new topology) +## (bopcommon) +## (bopsection) +###################################################### + +restore [locate_data_file OCC951_1.brep] b +restore [locate_data_file OCC951_2.brep] a + +checkshape b +checkshape a + +bop b a +bopsection result + +set nb_info [nbshapes result] +regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve +regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full ed +regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi +regexp {FACE +: +([-0-9.+eE]+)} $nb_info full fa +regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full sh +regexp {SOLID +: +([-0-9.+eE]+)} $nb_info full so +regexp {COMPSOLID +: +([-0-9.+eE]+)} $nb_info full cm +regexp {COMPOUND +: +([-0-9.+eE]+)} $nb_info full co +regexp {SHAPE +: +([-0-9.+eE]+)} $nb_info full shl +if { $ve != 0 || $ed != 0 || $wi != 0 || $fa != 0 || $sh != 0 || $so != 0 || $cm != 0 || $co != 0 || $shl != 0 } { + puts " OCC951 : COMMON operation was made PROPERLY" +} else { + puts "Faulty OCC951 : result of COMMON operation is EMPTY compound" +} + +set length 39.8616 +set 3dviewer 1 diff --git a/tests/bugs/modalg_4/bug951_41 b/tests/bugs/modalg_4/bug951_41 new file mode 100755 index 0000000000..dcf984e10d --- /dev/null +++ b/tests/bugs/modalg_4/bug951_41 @@ -0,0 +1,24 @@ +puts "============" +puts "OCC951" +puts "============" +puts "" +###################################################### +##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes +###################################################### +## (new topology) +## (bopcommon) +## (bopsection) +###################################################### + +restore [locate_data_file OCC951_1.brep] s1 +restore [locate_data_file OCC951_2.brep] s2 + +checkshape s1 +checkshape s2 + +bop s1 s2 +bopcommon result + +set square 560.908 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_4/bug951_42 b/tests/bugs/modalg_4/bug951_42 new file mode 100755 index 0000000000..e801200b83 --- /dev/null +++ b/tests/bugs/modalg_4/bug951_42 @@ -0,0 +1,24 @@ +puts "============" +puts "OCC951" +puts "============" +puts "" +###################################################### +##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes +###################################################### +## (new topology) +## (bopcommon) +## (bopsection) +###################################################### + +restore [locate_data_file OCC951_1.brep] s1 +restore [locate_data_file OCC951_2.brep] s2 + +checkshape s1 +checkshape s2 + +bop s1 s2 +bopsection result + +set length 39.8616 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_4/bug951_5 b/tests/bugs/modalg_4/bug951_5 new file mode 100755 index 0000000000..b82848fa0b --- /dev/null +++ b/tests/bugs/modalg_4/bug951_5 @@ -0,0 +1,43 @@ +puts "=========" +puts " OCC951 " +puts "=========" +puts "" +################################################## +##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes +################################################## +## (new topology) +## (bopcommon) +## (bopsection) +###################################################### + +restore [locate_data_file OCC951_1.brep] b +restore [locate_data_file OCC951_2.brep] a + +checkshape b +checkshape a + +############ +bop a b +bopcommon result +############ +set nb_info [nbshapes result] +regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve +regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full ed +regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi +regexp {FACE +: +([-0-9.+eE]+)} $nb_info full fa +regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full sh +regexp {SOLID +: +([-0-9.+eE]+)} $nb_info full so +regexp {COMPSOLID +: +([-0-9.+eE]+)} $nb_info full cm +regexp {COMPOUND +: +([-0-9.+eE]+)} $nb_info full co +regexp {SHAPE +: +([-0-9.+eE]+)} $nb_info full shl + +if { $ve != 0 || $ed != 0 || $wi != 0 || $fa != 0 || $sh != 0 || $so != 0 || $cm != 0 || $co != 0 || $shl != 0 } { + puts " OCC951 : COMMON operation was made PROPERLY" + puts "" +} else { + puts "Faulty OCC951 : result of COMMON operation is EMPTY compound" + puts "" +} + +set square 560.908 +set 3dviewer 0 diff --git a/tests/bugs/modalg_4/bug951_51 b/tests/bugs/modalg_4/bug951_51 new file mode 100755 index 0000000000..3f561bf95a --- /dev/null +++ b/tests/bugs/modalg_4/bug951_51 @@ -0,0 +1,24 @@ +puts "============" +puts "OCC951" +puts "============" +puts "" +###################################################### +##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes +###################################################### +## (new topology) +## (bopcommon) +## (bopsection) +###################################################### + +restore [locate_data_file OCC951_1.brep] s1 +restore [locate_data_file OCC951_2.brep] s2 + +checkshape s1 +checkshape s2 + +bop s2 s1 +bopcommon result + +set square 560.908 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_4/bug951_52 b/tests/bugs/modalg_4/bug951_52 new file mode 100755 index 0000000000..79fd3a630b --- /dev/null +++ b/tests/bugs/modalg_4/bug951_52 @@ -0,0 +1,24 @@ +puts "============" +puts "OCC951" +puts "============" +puts "" +###################################################### +##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes +###################################################### +## (new topology) +## (bopcommon) +## (bopsection) +###################################################### + +restore [locate_data_file OCC951_1.brep] s1 +restore [locate_data_file OCC951_2.brep] s2 + +checkshape s1 +checkshape s2 + +bop s2 s1 +bopsection result + +set length 39.8616 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_4/bug951_6 b/tests/bugs/modalg_4/bug951_6 new file mode 100755 index 0000000000..8b0800d618 --- /dev/null +++ b/tests/bugs/modalg_4/bug951_6 @@ -0,0 +1,43 @@ +puts "=========" +puts " OCC951 " +puts "=========" +puts "" +################################################## +##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes +################################################## +## (new topology) +## (bopcommon) +## (bopsection) +###################################################### + +restore [locate_data_file OCC951_1.brep] b +restore [locate_data_file OCC951_2.brep] a + +checkshape b +checkshape a + +bop a b +bopcommon res1 +bopsection result + +set nb_info [nbshapes result] +regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve +regexp {EDGE +: +([-0-9.+eE]+)} $nb_info full ed +regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi +regexp {FACE +: +([-0-9.+eE]+)} $nb_info full fa +regexp {SHELL +: +([-0-9.+eE]+)} $nb_info full sh +regexp {SOLID +: +([-0-9.+eE]+)} $nb_info full so +regexp {COMPSOLID +: +([-0-9.+eE]+)} $nb_info full cm +regexp {COMPOUND +: +([-0-9.+eE]+)} $nb_info full co +regexp {SHAPE +: +([-0-9.+eE]+)} $nb_info full shl + +if { $ve != 0 || $ed != 0 || $wi != 0 || $fa != 0 || $sh != 0 || $so != 0 || $cm != 0 || $co != 0 || $shl != 0 } { + puts " OCC951 : COMMON operation was made PROPERLY" + puts "" +} else { + puts "Faulty OCC951 : result of COMMON operation is EMPTY compound" + puts "" +} + +set length 39.8616 +set 3dviewer 0 diff --git a/tests/bugs/modalg_4/bug951_61 b/tests/bugs/modalg_4/bug951_61 new file mode 100755 index 0000000000..23e752c547 --- /dev/null +++ b/tests/bugs/modalg_4/bug951_61 @@ -0,0 +1,23 @@ +puts "============" +puts "OCC951" +puts "============" +puts "" +###################################################### +##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes +###################################################### +## (old topology) +## (common) +## (section) +###################################################### + +restore [locate_data_file OCC951_1.brep] s1 +restore [locate_data_file OCC951_2.brep] s2 + +checkshape s1 +checkshape s2 + +bcommon result s1 s2 + +set square 560.908 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_4/bug951_62 b/tests/bugs/modalg_4/bug951_62 new file mode 100755 index 0000000000..50ebc0733e --- /dev/null +++ b/tests/bugs/modalg_4/bug951_62 @@ -0,0 +1,23 @@ +puts "============" +puts "OCC951" +puts "============" +puts "" +###################################################### +##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes +###################################################### +## (old topology) +## (common) +## (section) +###################################################### + +restore [locate_data_file OCC951_1.brep] s1 +restore [locate_data_file OCC951_2.brep] s2 + +checkshape s1 +checkshape s2 + +bsection result s1 s2 + +set length 39.8616 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_4/bug951_71 b/tests/bugs/modalg_4/bug951_71 new file mode 100755 index 0000000000..8217619dd2 --- /dev/null +++ b/tests/bugs/modalg_4/bug951_71 @@ -0,0 +1,23 @@ +puts "============" +puts "OCC951" +puts "============" +puts "" +###################################################### +##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes +###################################################### +## (old topology) +## (common) +## (section) +###################################################### + +restore [locate_data_file OCC951_1.brep] s1 +restore [locate_data_file OCC951_2.brep] s2 + +checkshape s1 +checkshape s2 + +bcommon result s2 s1 + +set square 560.908 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_4/bug951_72 b/tests/bugs/modalg_4/bug951_72 new file mode 100755 index 0000000000..82a31c9976 --- /dev/null +++ b/tests/bugs/modalg_4/bug951_72 @@ -0,0 +1,23 @@ +puts "============" +puts "OCC951" +puts "============" +puts "" +###################################################### +##BRepAlgoAPI_Section and BRepAlgoAPI_Common fail on given shapes +###################################################### +## (old topology) +## (common) +## (section) +###################################################### + +restore [locate_data_file OCC951_1.brep] s1 +restore [locate_data_file OCC951_2.brep] s2 + +checkshape s1 +checkshape s2 + +bsection result s2 s1 + +set length 39.8616 +set 3dviewer 1 + diff --git a/tests/bugs/modalg_4/bug957 b/tests/bugs/modalg_4/bug957 new file mode 100755 index 0000000000..58e157bbf8 --- /dev/null +++ b/tests/bugs/modalg_4/bug957 @@ -0,0 +1,15 @@ +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO OCC12345 ALL: Error : The length of result shape is" + +puts "========" +puts "OCC957" +puts "========" +puts "" +############################################################## +##Draw function PSPHERE creates incorrect shape (according to CHECKSHAPE function) +############################################################## + +psphere result 10 10 10 + +set length 0 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/fra62369 b/tests/bugs/modalg_4/fra62369 new file mode 100755 index 0000000000..00157154f2 --- /dev/null +++ b/tests/bugs/modalg_4/fra62369 @@ -0,0 +1,20 @@ + +puts "===========" +puts "FRA62369" +puts "===========" + +restore [locate_data_file fra62369a.brep] a +checkshape a + +compound result + +set i 1 +repeat 100 { + plane p_$i 0 0 200+$i + mkface f_$i p_$i + bsection s_$i a f_$i -2d -a + compound s_$i result result + incr i +} +set length 3961.04 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/pro16983 b/tests/bugs/modalg_4/pro16983 new file mode 100755 index 0000000000..3ba6a9239b --- /dev/null +++ b/tests/bugs/modalg_4/pro16983 @@ -0,0 +1,17 @@ + +puts "============" +puts "PRO16983" +puts "============" + +restore [locate_data_file pro16983a.brep] B +checkshape B +plane p 0 0 0 1 0 0 +vertex v1 0 90.16396 252.4591 +vertex v2 0 252.459 -9.835989 +edge e v2 v1 +wire w e +featlf B w p -5 0 0 5 0 0 1 1 +featperform lf result + +set square 796476 +set 2dviewer 0 diff --git a/tests/bugs/modalg_4/pro18892 b/tests/bugs/modalg_4/pro18892 new file mode 100755 index 0000000000..3e91f5a1b3 --- /dev/null +++ b/tests/bugs/modalg_4/pro18892 @@ -0,0 +1,35 @@ +puts "TODO OCC12345 ALL: Faulty : Result is BAD. Distance is more than MaxTolerance" +puts "TODO OCC12345 ALL: Error : The length of result shape is" + +puts "==========" +puts "PRO18892" +puts "==========" +# Version de test: K4O, PATCH LEVEL: +# GEOMETRY-M4-6A : 3 +# GEOMLITE-M4-6A : 1 +# TOPOLOGY-M4-6A : 2 + +restore [locate_data_file pro18892.rle] a +checkshape a + +explode a +bsection result a_1 a_2 -2d -a +explode result + +mkcurve c result_1 +cvalue c 1 X Y Z +vertex v X Y Z +explode a e + +distmini d v a_8 + +set tol [ maxtolerance a_8 ] +regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tol full MaxEdgeTolerance +regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tol full MaxVertexTolerance +regexp {([-0-9.+eE]+)$} [dump d_val] full d + +if { [expr $d > $MaxEdgeTolerance] || [expr $d > $MaxVertexTolerance] } { + puts "Faulty : Result is BAD. Distance is more than MaxTolerance" +} + +set length 0 diff --git a/tests/bugs/modalg_4/pro19424 b/tests/bugs/modalg_4/pro19424 new file mode 100755 index 0000000000..1a3d49176e --- /dev/null +++ b/tests/bugs/modalg_4/pro19424 @@ -0,0 +1,19 @@ + +puts "==========" +puts "PRO19424" +puts "==========" + +restore [locate_data_file pro19424a.brep] b +checkshape b +restore [locate_data_file pro19424b.brep] p +checkshape p + +if [catch {evolved result b p o } catch_result] { + puts "Faulty PRO19424 : function EVOLVED works wrongly" +} else { + puts "PRO19424 OK: function EVOLVED works properly" +} + +set square 246.506 +set 2dviewer 0 + diff --git a/tests/bugs/modalg_4/pro19626 b/tests/bugs/modalg_4/pro19626 new file mode 100755 index 0000000000..b583d566d1 --- /dev/null +++ b/tests/bugs/modalg_4/pro19626 @@ -0,0 +1,22 @@ + +puts "============" +puts "PRO19626" +puts "============" + +restore [locate_data_file pro19626a.brep] a +checkshape a +restore [locate_data_file pro19626b.brep] b +checkshape b + +bsection result a b +regexp { nb alone Vertices : +([-0-9.+eE]+)} [checksection result] full num +if { $num != 2 } { + puts " Faulty PRO19626: Result shape is INcorrect !!! " +} else { + puts "PRO19626 OK : Result shape is CORRECT !!! " +} + +set length 174.597 +set 2dviewer 0 + + diff --git a/tests/bugs/modalg_4/pro19653 b/tests/bugs/modalg_4/pro19653 new file mode 100755 index 0000000000..9bcd875300 --- /dev/null +++ b/tests/bugs/modalg_4/pro19653 @@ -0,0 +1,29 @@ +puts "TODO OCC12345 ALL: Faulty : TEST FAILED" +puts "TODO OCC12345 ALL: Error : The length of result shape is" + +puts "============" +puts "PRO19653" +puts "BREPALGO_BOOLEANOPERATION does not return result." +puts "==================================" +puts "It takes visual check for this BUG" +puts "==================================" + +restore [locate_data_file pro19653a.brep] a +checkshape a +restore [locate_data_file pro19653b.brep] b +checkshape b +bsection result a b + +explode result e +checkshape result_1 +explode a e +regexp {Mass +: +([-0-9.+eE]+)} [lprops result_1] full ll_1 +regexp {Mass +: +([-0-9.+eE]+)} [lprops a_4] full ll_2 +if { $ll_1 != $ll_2 } { + puts "Faulty : TEST FAILED" +} else { + puts "PRO19653 OK : BREPALGO_BOOLEANOPERATION returns result" +} + +set length 0 +set 2dviewer 0 diff --git a/tests/bugs/moddata/begin b/tests/bugs/moddata/begin deleted file mode 100755 index 572d363e8b..0000000000 --- a/tests/bugs/moddata/begin +++ /dev/null @@ -1,9 +0,0 @@ -set subgroup moddata - - - - - - - - diff --git a/tests/bugs/moddata/buc60607_1 b/tests/bugs/moddata/buc60607_1 deleted file mode 100755 index 4e5979db9f..0000000000 --- a/tests/bugs/moddata/buc60607_1 +++ /dev/null @@ -1,21 +0,0 @@ -puts "=======================" -puts "BUC60607" -puts "It takes visual check for this BUC" -puts "=======================" - -set len_ch 2513 - -point p 1600 300 -line l 0 500 2000 500 -cirtang c p l 400 - -set info1 [length $c_1] -set info2 [length $c_2] -regexp {The length c_1 is +([-0-9.+eE]+)} $info1 full len1 -regexp {The length c_2 is +([-0-9.+eE]+)} $info2 full len2 -set len_int1 [expr int($len1)] -set len_int2 [expr int($len2)] - -if { ${len_int1} != ${len_ch} || ${len_int2} != ${len_ch} } { - puts "Error : Length is invalid" -} diff --git a/tests/bugs/moddata/buc60607_2 b/tests/bugs/moddata/buc60607_2 deleted file mode 100755 index f602def4d5..0000000000 --- a/tests/bugs/moddata/buc60607_2 +++ /dev/null @@ -1,8 +0,0 @@ -puts "=======================" -puts "BUC60607" -puts "It takes visual check for this BUC" -puts "=======================" - -point p 1600 300 -line l 0 500 2000 500 -cirtang c1 p l 200 diff --git a/tests/bugs/moddata/buc60607_3 b/tests/bugs/moddata/buc60607_3 deleted file mode 100755 index e4a5088de8..0000000000 --- a/tests/bugs/moddata/buc60607_3 +++ /dev/null @@ -1,8 +0,0 @@ -puts "=======================" -puts "BUC60607" -puts "It takes visual check for this BUC" -puts "=======================" - -point p2 1400 1400 -line l2 3000 1700 1000 1550 -cirtang c3 p2 l2 300 diff --git a/tests/bugs/moddata/buc60607_4 b/tests/bugs/moddata/buc60607_4 deleted file mode 100755 index b461cb1307..0000000000 --- a/tests/bugs/moddata/buc60607_4 +++ /dev/null @@ -1,8 +0,0 @@ -puts "=======================" -puts "BUC60607" -puts "It takes visual check for this BUC" -puts "=======================" - -point p2 1400 1400 -line l2 3000 1700 1000 1550 -cirtang result p2 l2 150 diff --git a/tests/bugs/moddata/buc60609 b/tests/bugs/moddata/buc60609 deleted file mode 100755 index c601a7411f..0000000000 --- a/tests/bugs/moddata/buc60609 +++ /dev/null @@ -1,26 +0,0 @@ -puts "================" -puts "BUC60609" -puts "================" - -pload QAcommands - -set INF [BUC60609 [locate_data_file buc60609a.brep] a] -set ll [llength $INF] -set first [lindex $INF [expr $ll - 5]] -set second [lindex $INF [expr $ll - 1]] - -if {$first != "INSIDE" && $first != "inside"} { - puts "Faulty BUC60609 first: $first is not right result. It should be INSIDE" -} else { - puts "BUC60609 first OK: It is INSIDE" -} - -if {$second != "INSIDE"} { - puts "Faulty BUC60609 second: $second is not right result. It should be INSIDE" -} else { - puts "BUC60609 second OK: It is INSIDE" -} - -renamevar a result -set 2dviewer 0 - diff --git a/tests/bugs/moddata/buc60618 b/tests/bugs/moddata/buc60618 deleted file mode 100755 index 6d1ed6267d..0000000000 --- a/tests/bugs/moddata/buc60618 +++ /dev/null @@ -1,59 +0,0 @@ -puts "==================================" -puts "BUC60618" -puts "==================================" -puts "There was a problem filter of solutions. Several solutions were skipped." -puts "" -puts "It takes visual check for this BUG" -puts "==================================" -puts "" -set len_ch1 3568 -set len_ch2 9964 -set len_ch3 2082 -set len_ch4 32696 -set len_ch5 1681 -set len_ch6 3097 -set len_ch7 1545 -set len_ch8 772 - -circle c1 0 0 100 -circle c2 500 -400 300 -circle c3 300 200 200 -cirtang result c1 c2 c3 - -set info1 [length $result_1] -set info2 [length $result_2] -set info3 [length $result_3] -set info4 [length $result_4] -set info5 [length $result_5] -set info6 [length $result_6] -set info7 [length $result_7] -set info8 [length $result_8] - -regexp {The length result_1 is +([-0-9.+eE]+)} $info1 full len1 -regexp {The length result_2 is +([-0-9.+eE]+)} $info2 full len2 -regexp {The length result_3 is +([-0-9.+eE]+)} $info3 full len3 -regexp {The length result_4 is +([-0-9.+eE]+)} $info4 full len4 -regexp {The length result_5 is +([-0-9.+eE]+)} $info5 full len5 -regexp {The length result_6 is +([-0-9.+eE]+)} $info6 full len6 -regexp {The length result_7 is +([-0-9.+eE]+)} $info7 full len7 -regexp {The length result_8 is +([-0-9.+eE]+)} $info8 full len8 - -set len_int1 [expr int($len1)] -set len_int2 [expr int($len2)] -set len_int3 [expr int($len3)] -set len_int4 [expr int($len4)] -set len_int5 [expr int($len5)] -set len_int6 [expr int($len6)] -set len_int7 [expr int($len7)] -set len_int8 [expr int($len8)] - -if { ${len_int1} != ${len_ch1} - || ${len_int2} != ${len_ch2} - || ${len_int3} != ${len_ch3} - || ${len_int4} != ${len_ch4} - || ${len_int5} != ${len_ch5} - || ${len_int6} != ${len_ch6} - || ${len_int7} != ${len_ch7} - || ${len_int8} != ${len_ch8} } { - puts "Error : Length is invalid" -} diff --git a/tests/bugs/moddata/buc60622_1 b/tests/bugs/moddata/buc60622_1 deleted file mode 100755 index 2bbee56643..0000000000 --- a/tests/bugs/moddata/buc60622_1 +++ /dev/null @@ -1,14 +0,0 @@ -puts "==========" -puts "BUC60622" -puts "==========" -puts "" -puts "==================================" -puts "It takes visual check for this BUG" -puts "==================================" -puts "" - -circle c1 2900 800 500 -circle c2 2900 900 400 -circle c3 2900 1000 300 -catch {cirtang result c1 c2 c3} - diff --git a/tests/bugs/moddata/buc60622_2 b/tests/bugs/moddata/buc60622_2 deleted file mode 100755 index 559ff29006..0000000000 --- a/tests/bugs/moddata/buc60622_2 +++ /dev/null @@ -1,33 +0,0 @@ -puts "==================================" -puts "BUC60622" -puts "==================================" -puts "There was an infinity of solutions and also c1, c2 and c3 are solutions" -puts "" -puts "It takes visual check for this BUG" -puts "==================================" -puts "" - -set len_ch1 2513 -set len_ch2 837 -set len_ch3 279 - -circle c1 500 1800 500 -circle c2 500 1900 400 -circle c3 700 1900 200 -cirtang result c1 c2 c3 - -set info1 [length $result_1] -set info2 [length $result_2] -set info3 [length $result_3] -regexp {The length result_1 is +([-0-9.+eE]+)} $info1 full len1 -regexp {The length result_2 is +([-0-9.+eE]+)} $info2 full len2 -regexp {The length result_3 is +([-0-9.+eE]+)} $info3 full len3 -set len_int1 [expr int($len1)] -set len_int2 [expr int($len2)] -set len_int3 [expr int($len3)] - -if { ${len_int1} != ${len_ch1} - || ${len_int2} != ${len_ch2} - || ${len_int3} != ${len_ch3} } { - puts "Error : Length is invalid" -} diff --git a/tests/bugs/moddata/buc60622_3 b/tests/bugs/moddata/buc60622_3 deleted file mode 100755 index 0ef8996c23..0000000000 --- a/tests/bugs/moddata/buc60622_3 +++ /dev/null @@ -1,46 +0,0 @@ -puts "==================================" -puts "BUC60622" -puts "==================================" -puts "There was an infinity of solutions and also c1, c2 and c3 are solutions" -puts "" -puts "It takes visual check for this BUG" -puts "==================================" -puts "" - -set len_ch1 1570 -set len_ch2 785 -set len_ch3 785 -set len_ch4 523 -set len_ch5 523 - -circle c3 500 3000 250 -circle c2 375 3000 125 -circle c1 625 3000 125 -cirtang result c1 c2 c3 - -set info1 [length $result_1] -set info2 [length $result_2] -set info3 [length $result_3] -set info4 [length $result_4] -set info5 [length $result_5] - -regexp {The length result_1 is +([-0-9.+eE]+)} $info1 full len1 -regexp {The length result_2 is +([-0-9.+eE]+)} $info2 full len2 -regexp {The length result_3 is +([-0-9.+eE]+)} $info3 full len3 -regexp {The length result_4 is +([-0-9.+eE]+)} $info4 full len4 -regexp {The length result_5 is +([-0-9.+eE]+)} $info5 full len5 - -set len_int1 [expr int($len1)] -set len_int2 [expr int($len2)] -set len_int3 [expr int($len3)] -set len_int4 [expr int($len4)] -set len_int5 [expr int($len5)] - -if { ${len_int1} != ${len_ch1} - || ${len_int2} != ${len_ch2} - || ${len_int3} != ${len_ch3} - || ${len_int4} != ${len_ch4} - || ${len_int5} != ${len_ch5} } { - puts "Error : Length is invalid" -} - diff --git a/tests/bugs/moddata/buc60623_3 b/tests/bugs/moddata/buc60623_3 deleted file mode 100755 index 6f847aa8c6..0000000000 --- a/tests/bugs/moddata/buc60623_3 +++ /dev/null @@ -1,30 +0,0 @@ -puts "========================" -puts "BUC60623" -puts "========================" - -restore [locate_data_file buc60623a.brep] a -checkshape a -restore [locate_data_file buc60623b.brep] b -checkshape b - -mksurface S1 a -mksurface S2 b - -intersect I1 S1 S2 -regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection I1] full cs2 -if { $cs2 != 0 } { - puts " Faulty : Intersection is not correct" -} else { - puts "Intersection of S1 and S2 is correct" -} - -intersect I2 S2 S1 -regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection I2] full cs2 -if { $cs2 != 0 } { - puts " Faulty : Intersection is not correct" -} else { - puts "Intersection of S2 and S1 is correct" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/buc60637 b/tests/bugs/moddata/buc60637 deleted file mode 100755 index e7ac755bf1..0000000000 --- a/tests/bugs/moddata/buc60637 +++ /dev/null @@ -1,10 +0,0 @@ - -puts "========================" -puts "BUC60637" -puts "========================" - -restore [locate_data_file buc60637a.brep] result -fsameparameter result - -set square 144.866 -set 2dviewer 0 diff --git a/tests/bugs/moddata/buc60652_1 b/tests/bugs/moddata/buc60652_1 deleted file mode 100755 index 20d10721b9..0000000000 --- a/tests/bugs/moddata/buc60652_1 +++ /dev/null @@ -1,14 +0,0 @@ - -puts "==========" -puts "BUC60652" -puts "Case 1" -puts "==========" - -pload QAcommands - -restore [locate_data_file buc60652a.brep] result -checkshape result -BUC60652 result - -set square 19614.8 -set 2dviewer 0 diff --git a/tests/bugs/moddata/buc60652_2 b/tests/bugs/moddata/buc60652_2 deleted file mode 100755 index fb8e4e54de..0000000000 --- a/tests/bugs/moddata/buc60652_2 +++ /dev/null @@ -1,15 +0,0 @@ - -puts "==========" -puts "BUC60652" -puts "Case 2" -puts "==========" - -pload QAcommands - -restore [locate_data_file buc60652b.brep] result -checkshape result -BUC60652 result - -set square 29961 -set 2dviewer 0 - diff --git a/tests/bugs/moddata/buc60652_3 b/tests/bugs/moddata/buc60652_3 deleted file mode 100755 index bde1f9333c..0000000000 --- a/tests/bugs/moddata/buc60652_3 +++ /dev/null @@ -1,14 +0,0 @@ - -puts "===========" -puts "BUC60652" -puts "Case 3" -puts "===========" - -pload QAcommands - -restore [locate_data_file buc60652c.brep] result -checkshape result -BUC60652 result - -set square 77815.1 -set 2dviewer 0 diff --git a/tests/bugs/moddata/buc60652_4 b/tests/bugs/moddata/buc60652_4 deleted file mode 100755 index 04d72aa5c7..0000000000 --- a/tests/bugs/moddata/buc60652_4 +++ /dev/null @@ -1,14 +0,0 @@ - -puts "==========" -puts "BUC60652" -puts "Case 4" -puts "==========" - -pload QAcommands - -restore [locate_data_file shading_104.brep] result -checkshape result -BUC60652 result - -set square 119134 -set 2dviewer 0 diff --git a/tests/bugs/moddata/buc60667 b/tests/bugs/moddata/buc60667 deleted file mode 100755 index 1690c15927..0000000000 --- a/tests/bugs/moddata/buc60667 +++ /dev/null @@ -1,12 +0,0 @@ - -puts "===================" -puts "BUC60667" -puts "===================" - -restore [locate_data_file buc60667a.brep] result -fsameparameter result -checkshape result - -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/buc60707 b/tests/bugs/moddata/buc60707 deleted file mode 100755 index dfe66d1b45..0000000000 --- a/tests/bugs/moddata/buc60707 +++ /dev/null @@ -1,25 +0,0 @@ - -puts "===========" -puts "BUC60707" -puts "===========" -puts "" -################################################# -## Fillets created in CasCade version 3 do not display as shaded surfaces. -################################################# -restore [locate_data_file buc60707a.brep] result -checkshape result - -tclean result -incmesh result .1 -triangles result -set info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $info full Maxtriangl - -if { $Maxtriangl < 1 } { - puts "Error : inside mesh for shading wasn't build" -} - -set 3dviewer 0 - - - diff --git a/tests/bugs/moddata/buc60729 b/tests/bugs/moddata/buc60729 deleted file mode 100755 index 19426926c4..0000000000 --- a/tests/bugs/moddata/buc60729 +++ /dev/null @@ -1,14 +0,0 @@ - -puts "========================" -puts "BUC60729" -puts "========================" - -pload QAcommands - -if [catch {BUC60729} ] { - puts "BUC60729: Error" -} else { - puts "BUC60729: OK" -} - -set 3dviewer 1 diff --git a/tests/bugs/moddata/buc60755 b/tests/bugs/moddata/buc60755 deleted file mode 100755 index 46c988e6f3..0000000000 --- a/tests/bugs/moddata/buc60755 +++ /dev/null @@ -1,22 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" - -puts "========================" -puts "BUC60755" -puts "========================" - -restore [locate_data_file buc60755a.brep] a -checkshape a - -######################################### -# "tcopy" command of a valid shape give a no-valid shape. -######################################### - -tcopy a result -checkshape result - -set square 623.832 -set 2dviewer 0 - - - - diff --git a/tests/bugs/moddata/buc60769 b/tests/bugs/moddata/buc60769 deleted file mode 100755 index 03e57bff6a..0000000000 --- a/tests/bugs/moddata/buc60769 +++ /dev/null @@ -1,11 +0,0 @@ - -puts "=============" -puts "BUC60769" -puts "=============" - -restore [locate_data_file buc60769a.brep] result -checkshape result - -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/buc60792 b/tests/bugs/moddata/buc60792 deleted file mode 100755 index e6b075093f..0000000000 --- a/tests/bugs/moddata/buc60792 +++ /dev/null @@ -1,10 +0,0 @@ -puts "========================" -puts "BUC60792" -puts "========================" - -pload QAcommands - -vinit -BUC60792 - -set 2dviewer 0 diff --git a/tests/bugs/moddata/buc60815 b/tests/bugs/moddata/buc60815 deleted file mode 100755 index 82bc868ecf..0000000000 --- a/tests/bugs/moddata/buc60815 +++ /dev/null @@ -1,22 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty BUC60815: NO EXCEPTION." -puts "==========" -puts "BUC60815" -puts "==========" - -plane p1 1 0 0 -plane p2 0 0 0 1 0 0 -trim p1 p1 -50 50 -50 50 -trim p2 p2 -75 75 -75 75 -intersect r2 p1 p2 -extsurf e1 r2 10 10 10 -extsurf e3 r2 10 10 10 - -if [catch { intersect result e1 e3 } catch_result] { - puts "Faulty BUC60815: NO EXCEPTION." - puts "INTERSECTION BETWEEN TWO SURFACES LYING ON THE SAME PLANE UNDEFINED" -} else { - puts "BUC60815 OK: suitable except" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/buc60825 b/tests/bugs/moddata/buc60825 deleted file mode 100755 index 5bcf9f023c..0000000000 --- a/tests/bugs/moddata/buc60825 +++ /dev/null @@ -1,20 +0,0 @@ -puts "========================" -puts "BUC60825" -puts "========================" - -pload QAcommands - -line aLine 0 0 0 0 0 1 -mkedge aEdge1 aLine -restore [locate_data_file buc60825.brep] aEdge2 -checkshape aEdge2 - -distmini d aEdge1 aEdge2 -regexp {NB RESULTS +: +([-0-9.+eE]+)} [BUC60825 aEdge1 aEdge2] full ext -if { $ext != 0 } { - puts "Error : The extrema has not been calculated." -} - - - - diff --git a/tests/bugs/moddata/buc60828 b/tests/bugs/moddata/buc60828 deleted file mode 100755 index c7e74d203b..0000000000 --- a/tests/bugs/moddata/buc60828 +++ /dev/null @@ -1,11 +0,0 @@ - -puts "========" -puts "BUC60828" -puts "========" -puts "" - -catch {BUC60828} - - - - diff --git a/tests/bugs/moddata/buc60842 b/tests/bugs/moddata/buc60842 deleted file mode 100755 index d8abb20b53..0000000000 --- a/tests/bugs/moddata/buc60842 +++ /dev/null @@ -1,16 +0,0 @@ - -puts "========" -puts "BUC60842" -puts "========" - -pload QAcommands -vinit - -if [catch {BUC60842} catch_result] { - puts "Faulty BUC60842" -} else { - puts "BUC60842 OK" -} - -set 3dviewer 1 - diff --git a/tests/bugs/moddata/buc60843_1 b/tests/bugs/moddata/buc60843_1 deleted file mode 100755 index 9f1ec84c6a..0000000000 --- a/tests/bugs/moddata/buc60843_1 +++ /dev/null @@ -1,24 +0,0 @@ -puts "========" -puts "BUC60843" -puts "========" -puts "" -#################################################################### -## code throws an exception as: .. The exception is:0x5feff388 : StdFail_NotDone: 2d lin = lintan. -## ThisSolution(); is not right.( the line is not tangent to circle and ellipse ) -#################################################################### - -pload QAcommands - -set len_ch 4.0000000000000001e+100 - -circle test_circle 0 0 50 -ellipse test_ellipse 460 0 150 100 - -BUC60843 result test_circle test_ellipse 0.1 - -set info [length $result] -regexp {The length result is +([-0-9.+eE]+)} $info full len - -if { ${len} != ${len_ch} } { - puts "Error : length is invalid" -} diff --git a/tests/bugs/moddata/buc60843_2 b/tests/bugs/moddata/buc60843_2 deleted file mode 100755 index 87b2cc3347..0000000000 --- a/tests/bugs/moddata/buc60843_2 +++ /dev/null @@ -1,25 +0,0 @@ -puts "========" -puts "BUC60843" -puts "========" -puts "" -#################################################################### -## code throws an exception as: .. The exception is:0x5feff388 : StdFail_NotDone: 2d lin = lintan. -## ThisSolution(); is not right.( the line is not tangent to circle and ellipse ) -#################################################################### - -pload QAcommands - -set len_ch 4.0000000000000001e+100 - -ellipse test_ellipse_1 0 0 50 50 -ellipse test_ellipse_2 460 0 150 100 - -BUC60843 result test_ellipse_1 test_ellipse_2 1.0 1.0 - -set info [length $result] -regexp {The length result is +([-0-9.+eE]+)} $info full len - -if { ${len} != ${len_ch} } { - puts "Error : length is invalid" -} - diff --git a/tests/bugs/moddata/buc60848 b/tests/bugs/moddata/buc60848 deleted file mode 100755 index da0499f401..0000000000 --- a/tests/bugs/moddata/buc60848 +++ /dev/null @@ -1,45 +0,0 @@ - -puts "============" -puts "BUC60848" -puts "============" -puts "" - -pload QAcommands - -restore [locate_data_file BUC60848.brep] a -checkshape a - -tcopy a res - -set Flag 0 - -set Res [ catch { BUC60848 a } ] -if { $Res != 0 } { - invert a - set Flag 1 - puts "" -} - -if { $Flag == 1 } { - set Res [ catch { BUC60848 a } ] - if { $Res != 0 } { - set Flag 2 - } - puts "" -} - -if { $Flag == 2 } { - puts "TEST FINISHED. RESULT IS BAD. Faulty" - puts "" -} - -if { $Flag == 1 } { - puts "TEST FINISHED. RESULT IS OK. SHAPE HAS BEEN INVERTED." - puts "" -} - -if { $Flag == 0 } { - puts "TEST FINISHED. RESULT IS OK." - puts "" -} - diff --git a/tests/bugs/moddata/buc60852 b/tests/bugs/moddata/buc60852 deleted file mode 100755 index c51594f7ef..0000000000 --- a/tests/bugs/moddata/buc60852 +++ /dev/null @@ -1,68 +0,0 @@ - -puts "========" -puts "BUC60852" -puts "BUC60923" -puts "========" - -pload QAcommands - -set bndbox_X1 0 -set bndbox_Y1 0 -set bndbox_Z1 0 -set bndbox_X2 30 -set bndbox_Y2 10 -set bndbox_Z2 20 - -set point_1_1_X -20 -set point_1_1_Y -5 -set point_1_1_Z 10 -set point_1_2_X 50 -set point_1_2_Y 15 -set point_1_2_Z 10 - -vertex vertex_1_1 $point_1_1_X $point_1_1_Y $point_1_1_Z -vertex vertex_1_2 $point_1_2_X $point_1_2_Y $point_1_2_Z - -edge edge_1 vertex_1_1 vertex_1_2 - -puts "" - -set point_2_1_X -20 -set point_2_1_Y -10 -set point_2_1_Z 10 -set point_2_2_X 50 -set point_2_2_Y -10 -set point_2_2_Z 10 - -vertex vertex_2_1 $point_2_1_X $point_2_1_Y $point_2_1_Z -vertex vertex_2_2 $point_2_2_X $point_2_2_Y $point_2_2_Z - -edge edge_2 vertex_2_1 vertex_2_2 - -puts "" - -box bndbox $bndbox_X1 $bndbox_Y1 $bndbox_Z1 $bndbox_X2 $bndbox_Y2 $bndbox_Z2 - - -line line_1 $point_1_1_X $point_1_1_Y $point_1_1_Z [ expr { $point_1_1_X - $point_1_2_X } ] [ expr { $point_1_1_Y - $point_1_2_Y } ] [ expr { $point_1_1_Z - $point_1_2_Z } ] - -line line_2 $point_2_1_X $point_2_1_Y $point_2_1_Z [ expr { $point_2_1_X - $point_2_2_X } ] [ expr { $point_2_1_Y - $point_2_2_Y } ] [ expr { $point_2_1_Z - $point_2_2_Z } ] - -puts "" - -set result1 [BUC60852 edge_1 $bndbox_X1 $bndbox_Y1 $bndbox_Z1 $bndbox_X2 $bndbox_Y2 $bndbox_Z2] -if {${result1} != "Line that lies on edge intersects the box\n"} { - puts "BUC60852: Error; (case 1)" -} else { - puts "BUC60852: OK; (case 1)" -} - -puts "" - -set result2 [BUC60852 edge_2 $bndbox_X1 $bndbox_Y1 $bndbox_Z1 $bndbox_X2 $bndbox_Y2 $bndbox_Z2] -if {${result2} != "Line that lies on edge does not intersect the box\n"} { - puts "BUC60852: Error; (case 2)" -} else { - puts "BUC60852: OK; (case 2)" -} - diff --git a/tests/bugs/moddata/buc60854 b/tests/bugs/moddata/buc60854 deleted file mode 100755 index 8a3cf412c0..0000000000 --- a/tests/bugs/moddata/buc60854 +++ /dev/null @@ -1,43 +0,0 @@ -puts "TODO OCC12345 ALL: BUC60854: Error" - -puts "========" -puts "BUC60854" -puts "========" - -pload QAcommands - -plane test_plane -mkface test_face test_plane 0 1 0 1 - -vertex test_vertex_1 0 0.5 0 -vertex test_vertex_2 1 0.5 0 -edge test_edge test_vertex_1 test_vertex_2 - -splitshape test_shape test_face test_face test_edge - -explode test_shape f - -renamevar test_shape_1 test_face - -vertex test_vertex_3 0.2 0.5 0 -vertex test_vertex_4 0.8 0.5 0 -edge test_edge_1 test_vertex_3 test_vertex_4 - -vertex test_vertex_5 0 1 0 -edge test_edge_2 test_vertex_5 test_vertex_3 - -vertex test_vertex_6 1 1 0 -edge test_edge_3 test_vertex_4 test_vertex_6 - -BUC60854 result test_shape test_face test_edge_2 test_edge_3 @ test_edge test_edge_1 - -erase test_plane - -regexp {FACE +: +([-0-9.+eE]+)} [numshapes result] full FACE_num - -if {${FACE_num} != 3} { - puts "BUC60854: Error" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/buc60868 b/tests/bugs/moddata/buc60868 deleted file mode 100755 index ca71b33fe0..0000000000 --- a/tests/bugs/moddata/buc60868 +++ /dev/null @@ -1,21 +0,0 @@ - -puts "========" -puts "BUC60868" -puts "========" -puts "" - -pload QAcommands - -restore [locate_data_file buc60868.brep] sh -checkshape sh - -BUC60868 result sh -checkshape result - -set len [llength [explode result w]] -if { $len != 3 } { - puts "Error : the number of curves is $len, but it should be 3." -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/buc60870 b/tests/bugs/moddata/buc60870 deleted file mode 100755 index 8bc322b9e0..0000000000 --- a/tests/bugs/moddata/buc60870 +++ /dev/null @@ -1,35 +0,0 @@ - -puts "========" -puts "BUC60870" -puts "========" - -pload QAcommands - -vertex vertex_1 0 0 0 -vertex vertex_2 0 1 0 -vertex vertex_3 0 0.3 1 - -edge edge_1 vertex_1 vertex_2 - -set result [BUC60870 test_result edge_1 vertex_3 2.0] - -if {[llength ${result}] < 4} { - puts "BUC60870: Error; must be 3 solutions" -} else { - set MinimumDistance [dval test_result_val] - set TheorMinimumDistance 1.0 - set percent_max 1.0 - set percent [expr abs(${MinimumDistance} - ${TheorMinimumDistance}) / ${TheorMinimumDistance} * 100.] - if {${percent} > ${percent_max}} { - puts "MinimumDistance=${MinimumDistance}" - puts "TheorMinimumDistance=${TheorMinimumDistance}" - puts "percent=${percent}" - puts "percent_max=${percent_max}" - puts "BUC60870: Error; bad value of minimum distance" - } else { - puts "BUC60870: OK" - } -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/buc60889 b/tests/bugs/moddata/buc60889 deleted file mode 100755 index e7ed39f00f..0000000000 --- a/tests/bugs/moddata/buc60889 +++ /dev/null @@ -1,93 +0,0 @@ - -puts "========" -puts "BUC60889" -puts "BUC60947" -puts "========" - -pload QAcommands - -set bndbox_X1 0 -set bndbox_Y1 0 -set bndbox_Z1 0 -set bndbox_X2 30 -set bndbox_Y2 10 -set bndbox_Z2 20 - -set point_1_1_X -30 -set point_1_1_Y -10 -set point_1_1_Z 5 -set point_1_2_X -30 -set point_1_2_Y -10 -set point_1_2_Z 15 - -set point_1_3_X -15 -set point_1_3_Y -5 -set point_1_3_Z 5 - -set dx_1 [ expr { $point_1_3_X - $point_1_1_X } ] -set dy_1 [ expr { $point_1_3_Y - $point_1_1_Y } ] -set dz_1 [ expr { $point_1_3_Z - $point_1_1_Z } ] - -point point_1_1 $point_1_1_X $point_1_1_Y $point_1_1_Z -point point_1_2 $point_1_2_X $point_1_2_Y $point_1_2_Z -polyline p_line_1 $point_1_1_X $point_1_1_Y $point_1_1_Z $point_1_2_X $point_1_2_Y $point_1_2_Z -vertex vertex_1_1 $point_1_1_X $point_1_1_Y $point_1_1_Z -vertex vertex_1_2 $point_1_3_X $point_1_3_Y $point_1_3_Z -edge edge_1 vertex_1_1 vertex_1_2 - -puts "" - -set point_2_1_X 30 -set point_2_1_Y 10 -set point_2_1_Z -5 -set point_2_2_X 30 -set point_2_2_Y 10 -set point_2_2_Z -15 - -set point_2_3_X 0 -set point_2_3_Y 10 -set point_2_3_Z -5 - -set dx_2 [ expr { $point_2_3_X - $point_2_1_X } ] -set dy_2 [ expr { $point_2_3_Y - $point_2_1_Y } ] -set dz_2 [ expr { $point_2_3_Z - $point_2_1_Z } ] - -point point_2_1 $point_2_1_X $point_2_1_Y $point_2_1_Z -point point_2_2 $point_2_2_X $point_2_2_Y $point_2_2_Z -polyline p_line_2 $point_2_1_X $point_2_1_Y $point_2_1_Z $point_2_2_X $point_2_2_Y $point_2_2_Z -vertex vertex_2_1 $point_2_1_X $point_2_1_Y $point_2_1_Z -vertex vertex_2_2 $point_2_3_X $point_2_3_Y $point_2_3_Z -edge edge_2 vertex_2_1 vertex_2_2 - -puts "" - -box bndbox $bndbox_X1 $bndbox_Y1 $bndbox_Z1 $bndbox_X2 $bndbox_Y2 $bndbox_Z2 - - -line line_1_1 $point_1_1_X $point_1_1_Y $point_1_1_Z $dx_1 $dy_1 $dz_1 -line line_1_2 $point_1_2_X $point_1_2_Y $point_1_2_Z $dx_1 $dy_1 $dz_1 - -line line_2_1 $point_2_1_X $point_2_1_Y $point_2_1_Z $dx_2 $dy_2 $dz_2 -line line_2_2 $point_2_2_X $point_2_2_Y $point_2_2_Z $dx_2 $dy_2 $dz_2 - -puts "" - -set result1 [BUC60889 point_1_1 point_1_2 edge_1 $bndbox_X1 $bndbox_Y1 $bndbox_Z1 $bndbox_X2 $bndbox_Y2 $bndbox_Z2] - -if {${result1} != "The band intersects the box\n"} { - puts "BUC60889: Error; (case 1)" -} else { - puts "BUC60889: OK; (case 1)" -} - -puts "" - -set result2 [BUC60889 point_2_1 point_2_2 edge_2 $bndbox_X1 $bndbox_Y1 $bndbox_Z1 $bndbox_X2 $bndbox_Y2 $bndbox_Z2] - -if {${result2} != "The band lies out of the box\n"} { - puts "BUC60889: Error; (case 2)" -} else { - puts "BUC60889: OK; (case 2)" -} - - diff --git a/tests/bugs/moddata/buc60890 b/tests/bugs/moddata/buc60890 deleted file mode 100755 index ea2a5c8207..0000000000 --- a/tests/bugs/moddata/buc60890 +++ /dev/null @@ -1,22 +0,0 @@ -puts "========" -puts "BUC60890" -puts "========" -puts "" -##################################################### -## The Extrema raises when the number of C2 intervals is greater that 16. -##################################################### - -set poles { { 0 0 1 } { 1 0 1 } { 1.3 1 1 } { 2 1 1 } { 2 0 1 } { 3 0 1} { 3.5 1 1 } { 4 1 1 } { 4 0 1 } { 5 0 1 } { 5 1 1 } { 6 1 1 } { 6 0 1 } { 7 0 1 } { 7 1 1 } { 8 1 1 } { 8 0 1 } { 9 0 1 } } -set knots { { 0 2 } { 1 1 } { 2 1 } { 3 1 } { 4 1 } { 5 1 } { 6 1 } { 7 1 } { 8 1 } { 9 1 } { 10 1 } { 11 1 } { 12 1 } { 13 1 } { 14 1 } { 15 1 } { 16 1 } {17 2 } } - -eval 2dbsplinecurve curve_1 1 [ llength $knots] [ join $knots ] [ join $poles ] - -circle curve_2 5.3 -0.5 2 - -set err [llength [2dextrema curve_1 curve_2]] - -if {$err == 16} { - puts "BUC60890 OK: Function 2dextrema works properly." -} else { - puts "Faulty BUC60890 : Function 2dextrema works wrongly." -} diff --git a/tests/bugs/moddata/buc60895 b/tests/bugs/moddata/buc60895 deleted file mode 100755 index 6d9355207b..0000000000 --- a/tests/bugs/moddata/buc60895 +++ /dev/null @@ -1,17 +0,0 @@ - -puts "============" -puts "BUC60895" -puts "============" -puts "" -############################################################## -##If give command "sameparameter edge" on attached edge in the DRAW this command hang. -############################################################## - -restore [locate_data_file BUC60895.brep] result - -fsameparameter result -checkshape result - -set length 12.6012 -set 2dviewer 0 - diff --git a/tests/bugs/moddata/buc60897 b/tests/bugs/moddata/buc60897 deleted file mode 100755 index e26a4ec292..0000000000 --- a/tests/bugs/moddata/buc60897 +++ /dev/null @@ -1,72 +0,0 @@ -puts "========" -puts "BUC60897" -puts "========" - -pload QAcommands - -if [catch { set result [BUC60897] } ] { - puts "BUC60897: Error; (case 1)" -} else { - set len [llength ${result}] - if {${len} < 21} { - puts "length = ${len}" - puts "BUC60897: Error; (case 2)" - } else { - set circle_X [lindex ${result} 3] - set circle_Y [lindex ${result} 5] - set circle_R [lindex ${result} 7] - set tangency1_X [lindex ${result} 11] - set tangency1_Y [lindex ${result} 13] - set tangency2_X [lindex ${result} 17] - set tangency2_Y [lindex ${result} 19] - - set x1 [expr abs(${tangency1_X} - ${circle_X})] - set y1 [expr abs(${tangency1_Y} - ${circle_Y})] - set R1 [expr sqrt(${x1} * ${x1} + ${y1} * ${y1})] - - set x2 [expr abs(${tangency2_X} - ${circle_X})] - set y2 [expr abs(${tangency2_Y} - ${circle_Y})] - set R2 [expr sqrt(${x2} * ${x2} + ${y2} * ${y2})] - - set maxdelta 1.0 - set delta_R1 [expr abs(${R1} - ${circle_R}) / ${circle_R} * 100.] - set delta_R2 [expr abs(${R2} - ${circle_R}) / ${circle_R} * 100.] - - if {${delta_R1} > ${maxdelta}} { - puts "circle_X = ${circle_X}" - puts "circle_Y = ${circle_Y}" - puts "circle_R = ${circle_R}" - puts "tangency1_X = ${tangency1_X}" - puts "tangency1_Y = ${tangency1_Y}" - puts "x1 = ${x1}" - puts "y1 = ${y1}" - puts "R1 = ${R1}" - puts "delta_R1 = ${delta_R1}" - puts "maxdelta = ${maxdelta}" - puts "BUC60897: Error; (case 3)" - } else { - puts "BUC60897: OK; (case 1)" - } - - if {${delta_R2} > ${maxdelta}} { - puts "circle_X = ${circle_X}" - puts "circle_Y = ${circle_Y}" - puts "circle_R = ${circle_R}" - puts "tangency2_X = ${tangency2_X}" - puts "tangency2_Y = ${tangency2_Y}" - puts "x2 = ${x2}" - puts "y2 = ${y2}" - puts "R2 = ${R2}" - puts "delta_R2 = ${delta_R2}" - puts "maxdelta = ${maxdelta}" - puts "BUC60897: Error; (case 4)" - } else { - puts "BUC60897: OK; (case 2)" - } - - } -} - -set 3dviewer 0 - - diff --git a/tests/bugs/moddata/buc60902 b/tests/bugs/moddata/buc60902 deleted file mode 100755 index 9ff97594ce..0000000000 --- a/tests/bugs/moddata/buc60902 +++ /dev/null @@ -1,14 +0,0 @@ -puts "========" -puts "BUC60902" -puts "========" - -pload QAcommands - -set info [BUC60902] - -if { [regexp "First tangent is OK" $info] != 1 && [regexp "Last tangent is OK" $info] != 1 } { - puts "Error : Result is invalid" -} - - - diff --git a/tests/bugs/moddata/buc60911 b/tests/bugs/moddata/buc60911 deleted file mode 100755 index 08e27800bc..0000000000 --- a/tests/bugs/moddata/buc60911 +++ /dev/null @@ -1,14 +0,0 @@ - -puts "============" -puts "BUC60911" -puts "============" - -##################################################### -## Bad value of the volume of the shape. -##################################################### - -restore [locate_data_file BUC60911.brep] result -invert result - -set square 16353.8 -set 2dviewer 0 diff --git a/tests/bugs/moddata/buc60924 b/tests/bugs/moddata/buc60924 deleted file mode 100755 index f32c5841de..0000000000 --- a/tests/bugs/moddata/buc60924 +++ /dev/null @@ -1,24 +0,0 @@ - -puts "========" -puts "BUC60924" -puts "========" -puts "" - -################################################## -## ShapeAnalysisStd_Curve::IsPlanar works incorrectly with a conic curve. -################################################## - -pload QAcommands - -ellipse el 0 0 1 20 10 - -set result1 [BUC60924 el 0 0 1] - -if {${result1} != "The curve is planar !\n"} { - puts "BUC60924: Error" -} else { - puts "BUC60924: OK" -} - -set 3dviewer 1 - diff --git a/tests/bugs/moddata/buc60941 b/tests/bugs/moddata/buc60941 deleted file mode 100755 index 2129b5cdd5..0000000000 --- a/tests/bugs/moddata/buc60941 +++ /dev/null @@ -1,20 +0,0 @@ -puts "========" -puts "BUC60941" -puts "========" -puts "" -############################################################ -## When try to use Geom2dGcc_Circ2d2TanRad with two curves it rise exception. -############################################################ - -circle curve_1 1.79356127430613 -11.9148900515605 12.0491272292007 - -set poles { { 0 0 1 } { -2.14533906935467 4.92056269221697 1 } { -0.537398638327716 10.0937503357781 1 } { 10.3564232507092 8.73929826869582 1 } { 16.6366922939454 3.11858911810943 1 } { 16.39 -0.262 1 } } -set knots { { 0 4 } { 8.6971225126475 1 } { 16.903955884905 1 } { 28.0087167558108 4 } } - -eval 2dbsplinecurve curve_2 3 [ llength $knots ] [ join $knots ] [ join $poles ] - -if [catch {cirtang result curve_1 curve_2 2} catch_result] { - puts "Faulty BUC60941: function cirtang works wrongly" -} else { - puts "BUC60941 OK: function cirtang works properly" -} diff --git a/tests/bugs/moddata/buc60955 b/tests/bugs/moddata/buc60955 deleted file mode 100755 index 6fa8f790c1..0000000000 --- a/tests/bugs/moddata/buc60955 +++ /dev/null @@ -1,14 +0,0 @@ - -puts "===========" -puts " BUC60955" -puts "===========" - -puts "Restoring face from file" -restore [locate_data_file buc60955.brep] result -checkshape result - -build3d result - -set square 8464.65 -set 2dviewer 0 - diff --git a/tests/bugs/moddata/buc60960 b/tests/bugs/moddata/buc60960 deleted file mode 100755 index 77b6cfe389..0000000000 --- a/tests/bugs/moddata/buc60960 +++ /dev/null @@ -1,30 +0,0 @@ - -puts "===========" -puts " BUC60960" -puts "===========" - -proc do_offsets {i} { - global c c1 c2 c3 c4 c5 - - set poles {{0 0 1} {0 1 1} {1 1 1} {1 0 1} {2 0 1} {2 -1 1} {1 -1 1} \ - {1 -2 1} {0 -2 1} {0 -1 1} {-1 -1 1} {-1 0 1}} - set knots {{0 1} {1 1} {2 1} {3 1} {4 1} {5 1} {6 1} {7 1} {8 1} {9 1} \ - {10 1} {11 1} {12 1}} - eval 2dpbsplinecurve c 3 [llength $knots] [join $knots] [join $poles] - - - if [catch {offset c1 c 0.1}] {puts "while creating c1 at step $i"} - if [catch {offset c2 c 0.2}] {puts "while creating c2 at step $i"} - if [catch {offset c3 c 0.3}] {puts "while creating c3 at step $i"} - if [catch {offset c4 c 0.4}] {puts "while creating c4 at step $i"} - if [catch {offset c5 c 0.5}] {puts "while creating c5 at step $i"} - if [catch {offset c6 c 0.6}] {puts "while creating c6 at step $i"} - if [catch {offset c7 c 0.7}] {puts "while creating c7 at step $i"} - if [catch {offset c8 c 0.8}] {puts "while creating c8 at step $i"} -} - -for {set i 0} {$i < 10} {incr i} { - do_offsets $i -} - - diff --git a/tests/bugs/moddata/buc60965 b/tests/bugs/moddata/buc60965 deleted file mode 100755 index 5c3093bb33..0000000000 --- a/tests/bugs/moddata/buc60965 +++ /dev/null @@ -1,24 +0,0 @@ - -puts "========================" -puts "BUC60965" -puts "========================" - -restore [locate_data_file buc60965-c.draw] c -restore [locate_data_file buc60965-s.draw] s - -project result c s - -regexp {The+ length+ result+ is +([-0-9.+eE]+)} [length result] full len -set y [expr 3.e5+int(1.e5*($len-round($len)))] - -if { $y != 314196.0 } { - puts "Results is incorrect" -} - -set 2dviewer 0 - - - - - - diff --git a/tests/bugs/moddata/buc60967 b/tests/bugs/moddata/buc60967 deleted file mode 100755 index 29f5991caf..0000000000 --- a/tests/bugs/moddata/buc60967 +++ /dev/null @@ -1,14 +0,0 @@ - -puts "========" -puts "BUC60967" -puts "========" -puts "" - -restore [locate_data_file buc60967.draw] bs2 - -to3d result bs2 - -set 3dviewer 0 - - - diff --git a/tests/bugs/moddata/buc60968 b/tests/bugs/moddata/buc60968 deleted file mode 100755 index ec1596856a..0000000000 --- a/tests/bugs/moddata/buc60968 +++ /dev/null @@ -1,16 +0,0 @@ - -puts "========================" -puts "BUC60968" -puts "========================" - -restore [locate_data_file buc60968-c.draw] c -restore [locate_data_file buc60968-s1.draw] s1 - -set che [extrema c s1] -set err [llength $che] -if { $err == 0} { - puts "Error : command extrema does NOT work properly" -} - - - diff --git a/tests/bugs/moddata/buc61006 b/tests/bugs/moddata/buc61006 deleted file mode 100755 index f54d8a2a72..0000000000 --- a/tests/bugs/moddata/buc61006 +++ /dev/null @@ -1,20 +0,0 @@ - -puts "=========" -puts "BUC61006" -puts "=========" -puts "" -######################################################### -## Checkshape says that face is valid but it inludes selfintersecting wire. -######################################################### - -restore [locate_data_file buc61006.brep] result -decho off -set ch [checkshape result] -decho on - -if {![string compare $ch "This shape seems to be valid"]} { - puts "Error : the checkshape command returns incorrect result." -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug103 b/tests/bugs/moddata/bug103 deleted file mode 100755 index 1e6574279f..0000000000 --- a/tests/bugs/moddata/bug103 +++ /dev/null @@ -1,17 +0,0 @@ -puts "TODO OCC12345 ALL: An exception was caught" -puts "TODO OCC12345 ALL: \\*\\* Exception \\*\\*.*" - -puts "================" -puts "BUC60961" -puts "OCC103" -puts "================" -puts "" - -circle c 0 0 10 -to3d c1 c - -offset o c -2 -catch {to3d result o} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug1048 b/tests/bugs/moddata/bug1048 deleted file mode 100755 index 868086680d..0000000000 --- a/tests/bugs/moddata/bug1048 +++ /dev/null @@ -1,23 +0,0 @@ -puts "================" -puts "OCC1048" -puts "================" -puts "" - -pload QAcommands - -restore [locate_data_file OCC1048.brep] result - -set list [OCC1048 result] - -set NBTRIANGLES 0 -regexp {Info: +Number +of +triangles += +([-0-9.+eE]+)} $list full NBTRIANGLES - -if { ${NBTRIANGLES} > 0 } { - puts "OCC1048: OK" -} else { - puts "OCC1048: Error" -} - -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug105 b/tests/bugs/moddata/bug105 deleted file mode 100755 index 9a4e25b059..0000000000 --- a/tests/bugs/moddata/bug105 +++ /dev/null @@ -1,20 +0,0 @@ - -puts "================" -puts "BUC61026" -puts "OCC105" -puts "================" -puts "" - -pload QAcommands - -restore [locate_data_file OCC105.brep] result -checkshape result - -if [catch { OCC105 result} ] { - puts "Error : BUC61032" -} else { - puts "BUC61032: OK" -} - -set 3dviewer 0 - diff --git a/tests/bugs/moddata/bug106 b/tests/bugs/moddata/bug106 deleted file mode 100755 index 031266e76d..0000000000 --- a/tests/bugs/moddata/bug106 +++ /dev/null @@ -1,78 +0,0 @@ - -puts "================" -puts "BUC61032" -puts "OCC106" -puts "================" -puts "" - -restore [locate_data_file OCC106-1.draw] sh1 -#### checkshape sh1 # - not a topological shape -restore [locate_data_file OCC106-2.draw] sh2 -#### checkshape sh2 # - not a topological shape - -trimv s1 sh1 -1000 1000 -trimv s2 sh2 -1000 1000 - -if [catch {intersect res s1 s2} result] { -set mistake 1 -} else { -set mistake 0 -} - -if { $mistake == 0 } { - puts "" - set nom 0 - set j 1 - repeat 10 { - set che [whatis res_$j] - set che1 [whatis res_$j] - set err [lindex $che [expr [llength $che] - 1]] - set err1 [lindex $che1 [expr [llength $che1] - 2]] - - if { $err != "curve" && $err1 != "3d"} { - break - } else { - set nom [expr $nom + 1] - } - incr j} - if { $nom == 0} { - puts "1) Faulty OCC106: Intersection was made WRONGLY" -} else { - puts [format "1) OCC106 OK : Intersection command works properly: %s curves" $nom] - puts "" -} -} else { - puts "1) Faulty OCC106: Intersection was made WRONGLY" -} - -if [catch {intersect rrs sh1 sh2} result] { -set mistake 1 -} else { -set mistake 0 -} - -if { $mistake == 0 } { - puts "" - set nom 0 - set j 1 - repeat 10 { - set che [whatis rrs_$j] - set che1 [whatis rrs_$j] - set err [lindex $che [expr [llength $che] - 1]] - set err1 [lindex $che1 [expr [llength $che1] - 2]] - - if { $err != "curve" && $err1 != "3d"} { - break - } else { - set nom [expr $nom + 1] - } - incr j} - if { $nom == 0} { - puts "2) Faulty OCC106: Intersection was made WRONGLY" -} else { - puts [format "2) OCC106 OK : Intersection command works properly: %s curves" $nom] -} -} else { - puts "2) Faulty OCC106: Intersection was made WRONGLY" -} - diff --git a/tests/bugs/moddata/bug10604_1 b/tests/bugs/moddata/bug10604_1 deleted file mode 100644 index a0a16e2d62..0000000000 --- a/tests/bugs/moddata/bug10604_1 +++ /dev/null @@ -1,37 +0,0 @@ -puts "============" -puts "OCC10604" -puts "============" -puts "" -####################################################################### -# Fuse Fails -####################################################################### - -set BugNumber OCC10604 - -puts "Load first shape ..." -restore [locate_data_file OCC10604-1.brep] b1 -puts "Load second shape ..." -restore [locate_data_file OCC10604-2.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopcommon result -checkshape result -puts "Finish boolean operation ..." - -set square 585.072 - -# Analysis of "nbshapes res" -set nb_v_good 6 -set nb_e_good 12 -set nb_w_good 5 -set nb_f_good 5 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 31 - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug10604_2 b/tests/bugs/moddata/bug10604_2 deleted file mode 100644 index ee66d39432..0000000000 --- a/tests/bugs/moddata/bug10604_2 +++ /dev/null @@ -1,38 +0,0 @@ -puts "============" -puts "OCC10604" -puts "============" -puts "" -####################################################################### -# Fuse Fails -####################################################################### - -set BugNumber OCC10604 - -puts "Load first shape ..." -restore [locate_data_file OCC10604-1.brep] b1 -puts "Load second shape ..." -restore [locate_data_file OCC10604-2.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopfuse result -checkshape result -puts "Finish boolean operation ..." - -set square 808.713 - -# Analysis of "nbshapes res" -set nb_v_good 8 -set nb_e_good 15 -set nb_w_good 8 -set nb_f_good 7 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 41 - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug10604_3 b/tests/bugs/moddata/bug10604_3 deleted file mode 100644 index 6db8c36620..0000000000 --- a/tests/bugs/moddata/bug10604_3 +++ /dev/null @@ -1,37 +0,0 @@ -puts "============" -puts "OCC10604" -puts "============" -puts "" -####################################################################### -# Fuse Fails -####################################################################### - -set BugNumber OCC10604 - -puts "Load first shape ..." -restore [locate_data_file OCC10604-1.brep] b1 -puts "Load second shape ..." -restore [locate_data_file OCC10604-2.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopcut result -checkshape result -puts "Finish boolean operation ..." - -set square 893.394 - -# Analysis of "nbshapes res" -set nb_v_good 7 -set nb_e_good 15 -set nb_w_good 6 -set nb_f_good 5 -set nb_sh_good 1 -set nb_sol_good 1 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 36 - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug10604_4 b/tests/bugs/moddata/bug10604_4 deleted file mode 100644 index 8b9571f924..0000000000 --- a/tests/bugs/moddata/bug10604_4 +++ /dev/null @@ -1,38 +0,0 @@ -puts "============" -puts "OCC10604" -puts "============" -puts "" -####################################################################### -# Fuse Fails -####################################################################### - -set BugNumber OCC10604 - -puts "Load first shape ..." -restore [locate_data_file OCC10604-1.brep] b1 -puts "Load second shape ..." -restore [locate_data_file OCC10604-2.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -boptuc result -checkshape result -puts "Finish boolean operation ..." - -set square 500.39 - -# Analysis of "nbshapes res" -set nb_v_good 7 -set nb_e_good 12 -set nb_w_good 7 -set nb_f_good 7 -set nb_sh_good 2 -set nb_sol_good 2 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 38 - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug10604_5 b/tests/bugs/moddata/bug10604_5 deleted file mode 100644 index 08b5926ca6..0000000000 --- a/tests/bugs/moddata/bug10604_5 +++ /dev/null @@ -1,38 +0,0 @@ -puts "============" -puts "OCC10604" -puts "============" -puts "" -####################################################################### -# Fuse Fails -####################################################################### - -set BugNumber OCC10604 - -puts "Load first shape ..." -restore [locate_data_file OCC10604-1.brep] b1 -puts "Load second shape ..." -restore [locate_data_file OCC10604-2.brep] b2 - -puts "Prepare boolean operation ..." -bop b1 b2 - -puts "Start boolean operation ..." -bopsection result b1 b2 -checkshape result -puts "Finish boolean operation ..." - -set length 88.9912 - -# Analysis of "nbshapes res" -set nb_v_good 6 -set nb_e_good 6 -set nb_w_good 0 -set nb_f_good 0 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 13 - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug107 b/tests/bugs/moddata/bug107 deleted file mode 100755 index 00b8f43a38..0000000000 --- a/tests/bugs/moddata/bug107 +++ /dev/null @@ -1,31 +0,0 @@ - -puts "================" -puts "BUC61035" -puts "OCC107" -puts "================" -puts "" - -restore [locate_data_file OCC107-1.brep] ee -checkshape ee -restore [locate_data_file OCC107-2.brep] ff -checkshape ff - -distmini dd1 ee ff - -mkcurve cc ee -cvalue cc 0 x y z -vertex vv x y z - -distmini dd2 vv ff - -set d1 [dset t dd1_val] -set d2 [dset t dd2_val] - -if { [expr abs([expr $d1 - $d2])] > 0.1} then { - puts "Faulty :WRONG computation of distances." -} else { - puts "All is OK" -} - - - diff --git a/tests/bugs/moddata/bug11081_1 b/tests/bugs/moddata/bug11081_1 deleted file mode 100755 index 961bdb33dd..0000000000 --- a/tests/bugs/moddata/bug11081_1 +++ /dev/null @@ -1,28 +0,0 @@ -puts "========================" -puts "OCC11081" -puts "========================" -puts "" -####################################################################### -# BRepExtrema_DistShapeShape misses one of two solutions -####################################################################### - -set BugNumber OCC11081 - -# infinite line is used - -line ll 6834.93 -4100 500 0 0 1 -mkedge ee ll -restore [locate_data_file OCC11081.brep] section4100 -distmini dd ee section4100 -set res_list [distmini dd ee section4100] -set res_length [llength ${res_list}] -puts "res_length = ${res_length}" - -# Resume -puts "" -if { ${res_length} != 3 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - diff --git a/tests/bugs/moddata/bug11081_2 b/tests/bugs/moddata/bug11081_2 deleted file mode 100755 index 5e3fbad2d4..0000000000 --- a/tests/bugs/moddata/bug11081_2 +++ /dev/null @@ -1,27 +0,0 @@ -puts "========================" -puts "OCC11081" -puts "========================" -puts "" -####################################################################### -# BRepExtrema_DistShapeShape misses one of two solutions -####################################################################### - -set BugNumber OCC11081 - -# finite line is used - -line ll 6834.93 -4100 500 0 0 1 -trim trll ll -1000 -500 -mkedge tree trll -restore [locate_data_file OCC11081.brep] section4100 -set res_list [distmini dd tree section4100] -set res_length [llength ${res_list}] -puts "res_length = ${res_length}" - -# Resume -puts "" -if { ${res_length} != 3 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} diff --git a/tests/bugs/moddata/bug119 b/tests/bugs/moddata/bug119 deleted file mode 100755 index 21c60c84f7..0000000000 --- a/tests/bugs/moddata/bug119 +++ /dev/null @@ -1,46 +0,0 @@ -puts "================" -puts "OCC119" -puts "================" -puts "" - -box a 100 100 100 -explode a e - -set mistake 0 -if [catch {blend result_1 a 50 a_10 50 a_5 50 a_12 50 a_3 } catch_result] { - set mistake 1 -} else { - set mistake 0 -} - -if { ${mistake} == 1} { - puts " 1) OCC119 OK: BLEND was NOT created and suitable except was given." -} else { - puts "1) OCC119 OK: function BLEND works without suitable except" - checkshape result_1 - explode result_1 e - - if { [catch {blend result_2 result_1 50 result_1_20 50 result_1_22 50 result_1_10} catch_result] } { - puts "2) Faulty OCC119: BLEND was NOT created" - } else { - puts "2) BLEND OCC199 OK: BLEND was created" - checkshape result_2 - } - - set che [checkshape result_2 r] - if { [regexp {OK} $che] != 1 } { - puts "Faulty : mistakes are found in shape by checkshape command after BLEND command" - puts " Body of the scripts was not executed !" - } else { - puts "Checking by checkshape - OK" - - vinit - vdisplay result_2 - vsetdispmode result_2 1 - vfit - - explode result_2 e - blend result result_2 50 result_2_20 50 result_2_22 50 result_2_10 - set only_screen 1 - } -} diff --git a/tests/bugs/moddata/bug12 b/tests/bugs/moddata/bug12 deleted file mode 100755 index 612f458c6f..0000000000 --- a/tests/bugs/moddata/bug12 +++ /dev/null @@ -1,23 +0,0 @@ - -puts "================" -puts "OCC12" -puts "================" -puts "" - -restore [locate_data_file OCC12.brep] f -checkshape f - -mksurface su f -clpoles su -emptycopy f1 f -vertex v 0 -170.63226587036002 82.2373635024 -don su v -distmini d1 v f1 -if [expr [dval d1_val] > 0.01] { - set res "failed" - puts "Error : Result is incorrect" -} else { - set res "OK" -} -puts "Info: test $res, distance=[dval d1_val]" - diff --git a/tests/bugs/moddata/bug12522 b/tests/bugs/moddata/bug12522 deleted file mode 100755 index 70bfcb579f..0000000000 --- a/tests/bugs/moddata/bug12522 +++ /dev/null @@ -1,45 +0,0 @@ -puts "TODO ?OCC12345 ALL: OCC12522: Faulty" - -puts "========" -puts "OCC12522" -puts "========" -puts "" -########################################################### -# Extrema problems. Case: one of the Extrema arguments is an infinite face or an infinite edge. -########################################################### - -proc GetPercent {Value GoodValue} { - set Percent 0. - if {${GoodValue} != 0.} { - set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] - } elseif {${Value} != 0.} { - set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] - } else { - set Percent 0. - } - return ${Percent} -} - -set BugNumber OCC12522 - -restore [locate_data_file OCC12522.brep] arc1 -explode arc1 e -mkcurve curve1 arc1_1 - -plane plane1 6400 -4000 -160 0 0 1 1 0 0 - -extrema curve1 plane1 - -set percent_max 0.1 -set good_length 8.3705138910905177 - -set ext_1_length [lindex [length ext_1] 4] - -set length_percent [GetPercent ${ext_1_length} ${good_length}] -puts "length_percent = ${length_percent}" - -if {${length_percent} > ${percent_max}} { - puts "${BugNumber}: Faulty" -} else { - puts "${BugNumber}: OK" -} diff --git a/tests/bugs/moddata/bug126 b/tests/bugs/moddata/bug126 deleted file mode 100755 index e40a6dbc59..0000000000 --- a/tests/bugs/moddata/bug126 +++ /dev/null @@ -1,16 +0,0 @@ - -puts "================" -puts "OCC126" -puts "================" -puts "" - -restore [locate_data_file OCC126-1.brep] sh1 -checkshape sh1 - -restore [locate_data_file OCC126-2.brep] sh2 -checkshape sh2 - -compound sh1 sh2 result - -set square 560.774 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug12635_1 b/tests/bugs/moddata/bug12635_1 deleted file mode 100755 index a5ecc0e366..0000000000 --- a/tests/bugs/moddata/bug12635_1 +++ /dev/null @@ -1,28 +0,0 @@ -puts "============" -puts "OCC12635" -puts "============" -puts "" -####################################################################### -# Bugs in projector algorithm -####################################################################### - -set BugNumber OCC12635 - -restore [locate_data_file OCC12635_s1.draw] s1 -restore [locate_data_file OCC12635_c1.draw] c1 - -set BugStatus 0 -if [catch { project result c1 s1 } ] { - set BugStatus 1 -} - -# Resume -puts "" -if { ${BugStatus} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug12635_2 b/tests/bugs/moddata/bug12635_2 deleted file mode 100755 index 161f0795ed..0000000000 --- a/tests/bugs/moddata/bug12635_2 +++ /dev/null @@ -1,28 +0,0 @@ -puts "============" -puts "OCC12635" -puts "============" -puts "" -####################################################################### -# Bugs in projector algorithm -####################################################################### - -set BugNumber OCC12635 - -restore [locate_data_file OCC12635_s6.draw] s6 -restore [locate_data_file OCC12635_c18.draw] c18 - -set BugStatus 0 -if [catch { project result c18 s6 } ] { - set BugStatus 1 -} - -# Resume -puts "" -if { ${BugStatus} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug12884 b/tests/bugs/moddata/bug12884 deleted file mode 100755 index 8f8aec2625..0000000000 --- a/tests/bugs/moddata/bug12884 +++ /dev/null @@ -1,28 +0,0 @@ -puts "============" -puts "OCC12884" -puts "============" -puts "" -####################################################################### -# Wrong result of projection curve on surface -####################################################################### - -set BugNumber OCC12884 - -restore [locate_data_file OCC12884_s2.draw] s2 -restore [locate_data_file OCC12884_c1.draw] c1 - -set BugStatus 0 -if [catch { project result c1 s2 } ] { - set BugStatus 1 -} - -# Resume -puts "" -if { ${BugStatus} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug12888 b/tests/bugs/moddata/bug12888 deleted file mode 100755 index e251f8ee64..0000000000 --- a/tests/bugs/moddata/bug12888 +++ /dev/null @@ -1,29 +0,0 @@ -puts "============" -puts "OCC12888" -puts "============" -puts "" -####################################################################### -# Wrong result of projection curve on surface -####################################################################### - -set BugNumber OCC12888 - -restore [locate_data_file OCC12888_s1.draw] s1 -restore [locate_data_file OCC12888_c2.draw] c2 - -set BugStatus 0 -if [catch { project result c2 s1 } ] { - set BugStatus 1 -} - -# Resume -puts "" -if { ${BugStatus} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug13 b/tests/bugs/moddata/bug13 deleted file mode 100755 index 74c7a7e9e8..0000000000 --- a/tests/bugs/moddata/bug13 +++ /dev/null @@ -1,37 +0,0 @@ - -puts "================" -puts "OCC13" -puts "================" -puts "" -################################################## -## It is impossible to intersect two surfaces -################################################## - -restore [locate_data_file OCC13-1.draw] su1 -############### checkshape su1 # is not a topological shape -restore [locate_data_file OCC13-2.draw] su2 -############### checkshape su2 # is not a topological shape - -#Try to intersect two surfaces with tolerance 0.1 -#note that distance between shapes is about 0.005942345501409 - -catch {intersect res su1 su2 0.1 } result -set nom 0 - set j 1 - repeat 10 { - set che [whatis res_$j] - set che1 [whatis res_$j] - set err [lindex $che [expr [llength $che] - 1]] - set err1 [lindex $che1 [expr [llength $che1] - 2]] - - if { $err != "curve" && $err1 != "3d"} { - break - } else { - set nom [expr $nom + 1] - } - incr j} -if { $nom == 0} { - puts "Error : Intersection was made WRONGLY" -} - - diff --git a/tests/bugs/moddata/bug130 b/tests/bugs/moddata/bug130 deleted file mode 100755 index 0fb7ed447b..0000000000 --- a/tests/bugs/moddata/bug130 +++ /dev/null @@ -1,48 +0,0 @@ - -puts "================" -puts "OCC130" -puts "================" -puts "" -###################################################### -## Draw Environment: No intersection found between a specific surface and a line -###################################################### - -restore [locate_data_file OCC130.brep] sh -checkshape sh - -line l -120 -100 400 0 0 1 -mksurface surf sh -############## checkshape surf # - not a topological shape - - -if [catch {intersect res l surf } result] { -set mistake 1 -} else { -set mistake 0 -} - -if { $mistake == 0} { - puts "OCC130 OK : intersection found between a specific surface and a line" - puts "" - set nom 0 - set j 1 - repeat 10 { - set che [whatis res_$j] - set err [lindex $che [expr [llength $che] - 1]] - - if { $err != "point"} { - break - } else { - set nom [expr $nom + 1] - } - incr j} - if { $nom != 2 && $nom != 0} { - puts [format "Faulty OCC130: Intersection was made WRONGLY: %s points" $nom] -} else { - puts [format "OCC130 OK : Intersection command works properly: %s points" $nom] -} - -} else { - puts "Faulty OCC130 : NO intersection found between a specific surface and a line" -} - diff --git a/tests/bugs/moddata/bug134_1 b/tests/bugs/moddata/bug134_1 deleted file mode 100755 index e7c19899b4..0000000000 --- a/tests/bugs/moddata/bug134_1 +++ /dev/null @@ -1,18 +0,0 @@ - -puts "================" -puts "SAM1225" -puts "OCC134" -puts "================" -puts "" -#################################### -## Faces from attached file are impossible to extrude. -#################################### - -restore [locate_data_file OCC134-1.brep] sh -checkshape sh - -prism result sh 100 100 100 -checkshape result - -set square 104057 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug134_2 b/tests/bugs/moddata/bug134_2 deleted file mode 100755 index 5a1622f31b..0000000000 --- a/tests/bugs/moddata/bug134_2 +++ /dev/null @@ -1,19 +0,0 @@ - -puts "================" -puts "SAM1225" -puts "OCC134" -puts "================" -puts "" -########################################################### -## Faces from attached file are impossible to extrude. -########################################################### - -restore [locate_data_file OCC134-2.brep] sh -checkshape sh - -prism result sh 100 100 100 -checkshape result - -set square 271859 -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug135 b/tests/bugs/moddata/bug135 deleted file mode 100755 index 85247a971c..0000000000 --- a/tests/bugs/moddata/bug135 +++ /dev/null @@ -1,17 +0,0 @@ - -puts "================" -puts "OCC135" -puts "================" -puts "" - -restore [locate_data_file OCC135.brep] sh -checkshape sh - -sewing result 1 sh -checkshape result - -set square 273837 -set 2dviewer 0 - - - diff --git a/tests/bugs/moddata/bug139 b/tests/bugs/moddata/bug139 deleted file mode 100755 index 0595134dc9..0000000000 --- a/tests/bugs/moddata/bug139 +++ /dev/null @@ -1,25 +0,0 @@ -puts "================" -puts "OCC139" -puts "================" -puts "" -####################################### -## The intersection must be closed . So the curve is wrong. -####################################### - -restore [locate_data_file OCC139-1.draw] sh1 -restore [locate_data_file OCC139-2.draw] sh2 - -if { ![catch {intersect result sh1 sh2} catch_result] } { - puts "OCC139 OK : intersection found" - regexp { nb alone Vertices : +([-0-9.+eE]+)} [checksection result] full num - if { $num != 0 } { - puts "Faulty OCC139: Intersection was made WRONGLY. The curve must be closed ." - } else { - puts "OCC139 OK : Intersection command works properly. The curve is closed" - } -} else { - puts "Faulty OCC139 : NO intersection found" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug13904 b/tests/bugs/moddata/bug13904 deleted file mode 100755 index 0438bc25a2..0000000000 --- a/tests/bugs/moddata/bug13904 +++ /dev/null @@ -1,33 +0,0 @@ -puts "===========" -puts "OCC13904" -puts "===========" -###################################################### -# Exception during "filling" operation -###################################################### - -set BugNumber OCC13904 - -circle c 0 100 100 0 1 1 50 -ellipse el 0 0 0 0 1 1 100 50 - -set mistake 0 -if [catch { appsurf result c el } res] { - set mistake 1 - puts "Faulty ${BugNumber}: filling problem" -} else { - puts "Filling ${BugNumber} OK" - set What [whatis result] - if { [regexp "surface" $What] != 1 } { - set mistake 1 - } else { - set mistake 0 - } -} - -# Resume -puts "" -if { ${mistake} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} diff --git a/tests/bugs/moddata/bug141 b/tests/bugs/moddata/bug141 deleted file mode 100755 index 6c44c83978..0000000000 --- a/tests/bugs/moddata/bug141 +++ /dev/null @@ -1,17 +0,0 @@ - -puts "================" -puts "OCC141" -puts "================" -puts "" -############################################### -## exception while do segment operation on BSpline curve. -############################################### - -restore [locate_data_file OCC141.draw] result -#### checkshape res # not a topological shape - -segment result -4.76283758432072e-05 1.06458532027221 - -#let's the segment is displaied only - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug1416 b/tests/bugs/moddata/bug1416 deleted file mode 100644 index 666fdf3093..0000000000 --- a/tests/bugs/moddata/bug1416 +++ /dev/null @@ -1,41 +0,0 @@ -puts "============" -puts "OCC1416" -puts "============" -puts "" -###################################################### -# Shading mode doesn't work on a face of the model -###################################################### - -restore [locate_data_file OCC1416.brep] result - -# Clean mesh -isos result 0 -tclean result - -#Creating mesh -incmesh result 0.01 - -#View the result of mesh -triangles result - -############################################## -if { [catch { set tri_info [trinfo result] } catch_result] } { -############################################## - puts "Faulty OCC1416" -} else { - set ll [ llength ${tri_info} ] - if {${ll} < 6} { - puts "Faulty OCC1416" - } else { - regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri - regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - if { $tri == 0 || $nod == 0 } { - puts "Faulty OCC1416" - } else { - puts "Warning: OCC1416 looks like OK, but visual checking is required !!!!" - } - } -} - -set square 863.938 -set 3dviewer 1 diff --git a/tests/bugs/moddata/bug143 b/tests/bugs/moddata/bug143 deleted file mode 100755 index a76fd4a84e..0000000000 --- a/tests/bugs/moddata/bug143 +++ /dev/null @@ -1,18 +0,0 @@ -puts "================" -puts "BUC60654" -puts "OCC143" -puts "================" -puts "" -###################################################################### -## Raises exception "Standard_NotImplemented3" in GCPnts_AbscissaPoint on a Geom2d_OffsetCurve -###################################################################### - -set len_expected 4.e100 -line line_2d 0 0 1 1 - -offset result line_2d 10 1 0 - -set info [length $result] -regexp {The length result is +([-0-9.+eE]+)} $info full len - -checkreal "Length" $len $len_expected 0. 1e-10 diff --git a/tests/bugs/moddata/bug14376 b/tests/bugs/moddata/bug14376 deleted file mode 100755 index 539d7a477e..0000000000 --- a/tests/bugs/moddata/bug14376 +++ /dev/null @@ -1,13 +0,0 @@ -puts "============" -puts "OCC14376" -puts "============" -puts "" -####################################################################### -# Shading triangulation of face is not computed -####################################################################### - -pload QAcommands - -restore [locate_data_file OCC14376.brep] Face_8 -OCC14376 Face_8 - diff --git a/tests/bugs/moddata/bug145 b/tests/bugs/moddata/bug145 deleted file mode 100644 index 6992d661d9..0000000000 --- a/tests/bugs/moddata/bug145 +++ /dev/null @@ -1,18 +0,0 @@ -puts "========" -puts "OCC145" -puts "========" - -pload QAcommands - -OCC145 [locate_data_file OCC145.brep] 1 - -set listmem {} -set i_max 10000 -OCC145 [locate_data_file OCC145.brep] ${i_max} - -lappend listmem [expr [meminfo w] / 1024] -if { [checktrend $listmem 0 1 "Memory leak detected"] } { - puts "No memory leak, $i iterations" - break -} - diff --git a/tests/bugs/moddata/bug14782 b/tests/bugs/moddata/bug14782 deleted file mode 100755 index c10128bb08..0000000000 --- a/tests/bugs/moddata/bug14782 +++ /dev/null @@ -1,76 +0,0 @@ -puts "========================" -puts "OCC14782" -puts "========================" -puts "" -####################################################################### -# Method segment works wrongly for periodical BSpline curve -####################################################################### - -set BugNumber OCC14782 - -proc GetPercent {Value GoodValue} { - set Percent 0. - if {${GoodValue} != 0.} { - set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] - } elseif {${Value} != 0.} { - set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] - } else { - set Percent 0. - } - return ${Percent} -} - - -restore [locate_data_file OCC14782.draw] res - -bounds res t1 t2 -set bounds_list [dump res] - -puts "" -if { [llength ${bounds_list}] < 7 } { - puts "Bad bounds_list" - puts "Faulty ${BugNumber}" -} else { - set periodic_type [lindex ${bounds_list} 6] - puts "periodic_type=${periodic_type}" - if { ${periodic_type} != "periodic" } { - puts "1. Faulty ${BugNumber}" - } else { - puts "1. OK ${BugNumber}" - } -} - -set ll1 [lindex [length res] end] -puts "length1=${ll1}" - -segment res t3 t4 -set segment_list [dump res] - -puts "" -if { [llength ${segment_list}] < 7 } { - puts "Bad segment_list" - puts "Faulty ${BugNumber}" -} else { - set periodic_type [lindex ${segment_list} 6] - puts "periodic_type=${periodic_type}" - if { ${periodic_type} != "periodic" } { - puts "2. OK ${BugNumber}" - } else { - puts "2. Faulty ${BugNumber}" - } -} - -set ll2 [lindex [length res] end] -puts "length2=${ll2}" - -set percent_max 0.1 -set length_percent [GetPercent ${ll1} ${ll2}] -puts "length_percent = ${length_percent}" - -puts "" -if { ${length_percent} > ${percent_max} } { - puts "3. Faulty ${BugNumber}" -} else { - puts "3. OK ${BugNumber}" -} - diff --git a/tests/bugs/moddata/bug15 b/tests/bugs/moddata/bug15 deleted file mode 100755 index 044e6e6ac1..0000000000 --- a/tests/bugs/moddata/bug15 +++ /dev/null @@ -1,27 +0,0 @@ - -puts "================" -puts "OCC15" -puts "================" -puts "" - -restore [locate_data_file OCC15.brep] result - -checkshape result - -vinit -tclean result -vdisplay result -vsetdispmode result 1 -vfit - -set info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $info full tri -regexp { +([-0-9.+eE]+) +nodes} $info full nod - -#($tri != 5370,$nod != 2783)($tri != 5356,$nod != 2774)($tri != 5354,$nod != 2773),aki251103 -if { ($tri != 5643 || $nod != 2915) } { - puts "Shady OCC15 : shading problem may be, nb tri & nod were changed" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug150_1 b/tests/bugs/moddata/bug150_1 deleted file mode 100755 index 9174f95521..0000000000 --- a/tests/bugs/moddata/bug150_1 +++ /dev/null @@ -1,35 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" - -puts "================" -puts "OCC150" -puts "SAM1048" -puts "OCC53" -puts "================" -puts "" -################################################################ -## SAM1048. Crash with all memory exhausted at attempt to fuse two solids in the file attached. -################################################################ -## Segmentation violation detected during Fuse operation -################################################################ - -puts "" -puts "Bug's advancement" -puts "#################" -puts "" -puts "Customer version Development version" -puts "Status : CLOSED Status : CLOSED" -puts "Resolution : LIMITATION Resolution : LIMITATION" -puts "Leave as CLOSED LIMITATION Leave as CLOSED LIMITATION" -puts "" - -restore [locate_data_file OCC150_compsolid_nofuse.brep] sh -explode sh - -checkshape sh_1 -checkshape sh_2 - -bfuse result sh_1 sh_2 -checkshape result - -set square 700 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug150_2 b/tests/bugs/moddata/bug150_2 deleted file mode 100755 index eac73fe079..0000000000 --- a/tests/bugs/moddata/bug150_2 +++ /dev/null @@ -1,34 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" - -puts "================" -puts "OCC150" -puts "SAM1048" -puts "OCC53" -puts "================" -puts "" -################################################################ -## SAM1048. Crash with all memory exhausted at attempt to fuse two solids in the file attached. -################################################################ -## Segmentation violation detected during Fuse operation -################################################################ -puts "" -puts "Bug's advancement" -puts "#################" -puts "" -puts "Customer version Development version" -puts "Status : CLOSED Status : CLOSED" -puts "Resolution : LIMITATION Resolution : LIMITATION" -puts "Leave as CLOSED LIMITATION Leave as CLOSED LIMITATION" -puts "" - -restore [locate_data_file OCC150_compsolid_nofuse.brep] sh -explode sh - -checkshape sh_1 -checkshape sh_2 - -bfuse result sh_2 sh_1 -checkshape result - -set square 700 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug151_1 b/tests/bugs/moddata/bug151_1 deleted file mode 100755 index c13709c34f..0000000000 --- a/tests/bugs/moddata/bug151_1 +++ /dev/null @@ -1,19 +0,0 @@ - -puts "================" -puts "OCC151" -puts "SAM1141" -puts "================" -puts "" - -restore [locate_data_file OCC3-1.brep] sh1 -restore [locate_data_file OCC3-2.brep] sh2 - -checkshape sh1 -checkshape sh2 - -bfuse result sh1 sh2 -checkshape result - -set square 11400 -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug151_2 b/tests/bugs/moddata/bug151_2 deleted file mode 100755 index 12f3b5c2af..0000000000 --- a/tests/bugs/moddata/bug151_2 +++ /dev/null @@ -1,19 +0,0 @@ - -puts "================" -puts "OCC151" -puts "SAM1141" -puts "================" -puts "" - -restore [locate_data_file OCC3-1.brep] sh1 -restore [locate_data_file OCC3-2.brep] sh2 - -checkshape sh1 -checkshape sh2 - -bfuse result sh2 sh1 -checkshape result - -set square 11400 -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug152_1 b/tests/bugs/moddata/bug152_1 deleted file mode 100755 index 365abd7b91..0000000000 --- a/tests/bugs/moddata/bug152_1 +++ /dev/null @@ -1,27 +0,0 @@ -# by apn master-master 03.12.2012 -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" -#puts "TODO OCC12345 ALL: An exception was caught" -#puts "TODO OCC12345 ALL: \\*\\* Exception \\*\\*.*" -#puts "TODO OCC12345 ALL: TEST INCOMPLETE" - -puts "================" -puts "OCC152" -puts "SAM1178" -puts "================" -puts "" -################################################################# -## SAM1178(#1871): Bad escaped result after a cut operation on the shape. -################################################################# - -restore [locate_data_file OCC152.brep] sh -explode sh - -checkshape sh_1 -checkshape sh_2 - -bcut result sh_1 sh_2 -checkshape result - -set square 276424 -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug152_2 b/tests/bugs/moddata/bug152_2 deleted file mode 100755 index 3bfef20c89..0000000000 --- a/tests/bugs/moddata/bug152_2 +++ /dev/null @@ -1,26 +0,0 @@ -# by apn master-master 03.12.2012 -#puts "TODO OCC12345 ALL: An exception was caught" -#puts "TODO OCC12345 ALL: \\*\\* Exception \\*\\*.*" -#puts "TODO OCC12345 ALL: TEST INCOMPLETE" - -puts "================" -puts "OCC152" -puts "SAM1178" -puts "================" -puts "" -################################################################# -## SAM1178(#1871): Bad escaped result after a cut operation on the shape. -################################################################# - -restore [locate_data_file OCC152.brep] sh -explode sh - -checkshape sh_1 -checkshape sh_2 - -bcut result sh_2 sh_1 -checkshape result - -set square 34894.3 -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug15519 b/tests/bugs/moddata/bug15519 deleted file mode 100755 index b705004d3c..0000000000 --- a/tests/bugs/moddata/bug15519 +++ /dev/null @@ -1,86 +0,0 @@ -puts "TODO OCC12345 ALL: triangle: Faulty OCC15519" -puts "TODO OCC12345 ALL: node: Faulty OCC15519" -puts "TODO OCC12345 ALL: deflection: Faulty OCC15519" -puts "TODO OCC12345 ALL: Faulty OCC15519" -puts "============" -puts "OCC15519" -puts "============" -puts "" -####################################################################### -# Exception while meshing shape -####################################################################### - -set BugNumber OCC15519 - -proc GetPercent {Value GoodValue} { - set Percent 0. - if {${GoodValue} != 0.} { - set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] - } elseif {${Value} != 0.} { - set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] - } else { - set Percent 0. - } - return ${Percent} -} - -restore [locate_data_file OCC15519.brep] result -tclean result - -set Deflection 1. -catch {incmesh result ${Deflection} } - -set InfoList [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $InfoList full tri -regexp { +([-0-9.+eE]+) +nodes} $InfoList full nod -regexp {Maximal deflection +([-0-9.+eE]+)} $InfoList full defl - -if { [string compare $tcl_platform(platform) "windows"] == 0 } { - set good_tri 96265 - set good_nod 71339 - set good_defl 27.956052399907215 -} else { - set good_tri 95582 - set good_nod 70796 - set good_defl 0.99827404224216676 -} - -set percent_max 0.1 -set status 0 - -set triangle_percent [GetPercent ${tri} ${good_tri}] -puts "triangle_percent = ${triangle_percent}" -if { ${triangle_percent} > ${percent_max} } { - puts "triangle: Faulty ${BugNumber}" - set status 1 -} else { - puts "triangle: OK ${BugNumber}" -} - -set node_percent [GetPercent ${nod} ${good_nod}] -puts "node_percent = ${node_percent}" -if { ${node_percent} > ${percent_max} } { - puts "node: Faulty ${BugNumber}" - set status 1 -} else { - puts "node: OK ${BugNumber}" -} - -set deflection_percent [GetPercent ${defl} ${good_defl}] -puts "deflection_percent = ${deflection_percent}" -if { ${deflection_percent} > ${percent_max} } { - puts "deflection: Faulty ${BugNumber}" - set status 1 -} else { - puts "deflection: OK ${BugNumber}" -} - -# Resume -puts "" -if { ${status} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug15570 b/tests/bugs/moddata/bug15570 deleted file mode 100755 index 808fe6eafa..0000000000 --- a/tests/bugs/moddata/bug15570 +++ /dev/null @@ -1,108 +0,0 @@ -puts "===========" -puts "OCC15570" -puts "===========" - -set BugNumber OCC15570 - -###################################################### -# Incorrect handling of Unicode strings -###################################################### - -pload XDE - -proc GetPercent {Value GoodValue} { - set Percent 0. - if {${GoodValue} != 0.} { - set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] - } elseif {${Value} != 0.} { - set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] - } else { - set Percent 0. - } - return ${Percent} -} - -igesbrep [locate_data_file OCC15570.igs] a * -tpcompound result - -set BoundList [boundingstr result] -set xmin [lindex ${BoundList} 0] -set ymin [lindex ${BoundList} 1] -set zmin [lindex ${BoundList} 2] -set xmax [lindex ${BoundList} 3] -set ymax [lindex ${BoundList} 4] -set zmax [lindex ${BoundList} 5] - -set percent_max 0.1 -set good_xmin -22.500000100000001 -set good_ymin -88.366946209482094 -set good_zmin -1.0000002775557561e-07 -set good_xmax 22.500000100000001 -set good_ymax 22.776076069021901 -set good_zmax 86.12676222997429 -set status 0 - -set xmin_percent [GetPercent ${xmin} ${good_xmin}] -puts "xmin_percent = ${xmin_percent}" -if { ${xmin_percent} > ${percent_max} } { - puts "xmin: Faulty ${BugNumber}" - set status 1 -} else { - puts "xmin: OK ${BugNumber}" -} - -set ymin_percent [GetPercent ${ymin} ${good_ymin}] -puts "ymin_percent = ${ymin_percent}" -if { ${ymin_percent} > ${percent_max} } { - puts "ymin: Faulty ${BugNumber}" - set status 1 -} else { - puts "ymin: OK ${BugNumber}" -} - -set zmin_percent [GetPercent ${zmin} ${good_zmin}] -puts "zmin_percent = ${zmin_percent}" -if { ${zmin_percent} > ${percent_max} } { - puts "zmin: Faulty ${BugNumber}" - set status 1 -} else { - puts "zmin: OK ${BugNumber}" -} - -set xmax_percent [GetPercent ${xmax} ${good_xmax}] -puts "xmax_percent = ${xmax_percent}" -if { ${xmax_percent} > ${percent_max} } { - puts "xmax: Faulty ${BugNumber}" - set status 1 -} else { - puts "xmax: OK ${BugNumber}" -} - -set ymax_percent [GetPercent ${ymax} ${good_ymax}] -puts "ymax_percent = ${ymax_percent}" -if { ${ymax_percent} > ${percent_max} } { - puts "ymax: Faulty ${BugNumber}" - set status 1 -} else { - puts "ymax: OK ${BugNumber}" -} - -set zmax_percent [GetPercent ${zmax} ${good_zmax}] -puts "zmax_percent = ${zmax_percent}" -if { ${zmax_percent} > ${percent_max} } { - puts "zmax: Faulty ${BugNumber}" - set status 1 -} else { - puts "zmax: OK ${BugNumber}" -} - -# Resume -puts "" -if { ${status} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug157 b/tests/bugs/moddata/bug157 deleted file mode 100644 index d7bdf91ebb..0000000000 --- a/tests/bugs/moddata/bug157 +++ /dev/null @@ -1,27 +0,0 @@ -pload QAcommands - -puts "================" -puts "OCC157" -puts "================" -puts "" - -restore [locate_data_file OCC157.brep] wire -checkshape wire - -set Tolerance 100. -set info_result [OCC157 result wire ${Tolerance}] - -set ll [llength ${info_result}] -if {${ll} < 2} { - puts "length = ${ll}" - puts "OCC157: Error" -} else { - if { [regexp {OK} $info_result] } { - puts "OCC157: OK" - } else { - puts "OCC157: Error" - } -} -set square 2.11095e+06 -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug16 b/tests/bugs/moddata/bug16 deleted file mode 100755 index e44aaed6fa..0000000000 --- a/tests/bugs/moddata/bug16 +++ /dev/null @@ -1,24 +0,0 @@ - -puts "================" -puts "OCC16" -puts "================" -puts "" - -torus a 10 10 -mkface result a -vinit -vdisplay result -vsetdispmode result 1 - -set info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $info full tri -regexp { +([-0-9.+eE]+) +nodes} $info full nod - -if { $tri != 2592 || $nod != 1369 } { - puts "Faulty OCC16: here can be shading problem" -} - -puts "If here is bug - face is displaied in wireframe mode" - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug160_1 b/tests/bugs/moddata/bug160_1 deleted file mode 100755 index 6a0c7b6909..0000000000 --- a/tests/bugs/moddata/bug160_1 +++ /dev/null @@ -1,24 +0,0 @@ - -puts "========================" -puts "BUC60775" -puts "OCC160" -puts "(COMMON: A and B)" -puts "========================" - -restore [locate_data_file buc60775a.brep] a -checkshape a -restore [locate_data_file buc60775b.brep] b -checkshape b - -bcommon result a b -checkshape result - -set nf [llength [explode result f]] -if {$nf < 6} { - puts "Error : the resulting shape is unclosed!!!" -} - -set square 94067.7 -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug160_2 b/tests/bugs/moddata/bug160_2 deleted file mode 100755 index 4aa1d8da3b..0000000000 --- a/tests/bugs/moddata/bug160_2 +++ /dev/null @@ -1,23 +0,0 @@ - -puts "========================" -puts "BUC60775" -puts "OCC160" -puts "(COMMON: B and A)" -puts "========================" - -restore [locate_data_file buc60775a.brep] a -checkshape a -restore [locate_data_file buc60775b.brep] b -checkshape b - -bcommon result b a -checkshape result - -set nf [llength [explode result f]] -if {$nf < 6} { - puts "Error : the resulting shape is unclosed!!!" -} - -set square 94067.7 -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug160_3 b/tests/bugs/moddata/bug160_3 deleted file mode 100755 index 08ee7f42c5..0000000000 --- a/tests/bugs/moddata/bug160_3 +++ /dev/null @@ -1,25 +0,0 @@ - -puts "========================" -puts "BUC60775" -puts "OCC160" -puts "(FUSE: A and B)" -puts "========================" - -restore [locate_data_file buc60775a.brep] a -checkshape a -restore [locate_data_file buc60775b.brep] b -checkshape b - -bfuse result a b -checkshape result - -set nf [llength [explode result f]] - -if {$nf < 6} { - puts "Error : the resulting shape is unclosed!!!" -} - -set square 328116 -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug160_4 b/tests/bugs/moddata/bug160_4 deleted file mode 100755 index 1b9364dcf2..0000000000 --- a/tests/bugs/moddata/bug160_4 +++ /dev/null @@ -1,24 +0,0 @@ - -puts "========================" -puts "BUC60775" -puts "OCC160" -puts "(FUSE: B and A)" -puts "========================" - -restore [locate_data_file buc60775a.brep] a -checkshape a -restore [locate_data_file buc60775b.brep] b -checkshape b - -bfuse result b a -checkshape result - -set nf [llength [explode result f]] -if {$nf < 6} { - puts "Error : the resulting shape is unclosed!!!" -} - -set square 328116 -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug160_5 b/tests/bugs/moddata/bug160_5 deleted file mode 100755 index fd618a95c5..0000000000 --- a/tests/bugs/moddata/bug160_5 +++ /dev/null @@ -1,24 +0,0 @@ - -puts "========================" -puts "BUC60775" -puts "OCC160" -puts "(CUT: A and B)" -puts "========================" - -restore [locate_data_file buc60775a.brep] a -checkshape a -restore [locate_data_file buc60775b.brep] b -checkshape b - -bcut result a b -checkshape result - -set nf [llength [explode result f]] -if {$nf < 6} { - puts "Error : the resulting shape is unclosed!!!" -} - -set square 48129.6 -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug160_6 b/tests/bugs/moddata/bug160_6 deleted file mode 100755 index ff37689e68..0000000000 --- a/tests/bugs/moddata/bug160_6 +++ /dev/null @@ -1,25 +0,0 @@ -puts "TODO OCC12345 ALL: Error : the resulting shape is unclosed!!!" - -puts "========================" -puts "BUC60775" -puts "OCC160" -puts "(CUT: B and A)" -puts "========================" - -restore [locate_data_file buc60775a.brep] a -checkshape a -restore [locate_data_file buc60775b.brep] b -checkshape b - -bcut result b a -checkshape result - -set nf [llength [explode result f]] -if {$nf < 6} { - puts "Error : the resulting shape is unclosed!!!" -} - -set square 247636 -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug161 b/tests/bugs/moddata/bug161 deleted file mode 100755 index 5de4f8cee1..0000000000 --- a/tests/bugs/moddata/bug161 +++ /dev/null @@ -1,24 +0,0 @@ - -puts "========" -puts "OCC161" -puts "========" -puts "" -########################################################### -## The face provided in attachment has single wire that is misoriented, i.e has -## internal part outside. The checkshape command in DRAW should report that error -## situation, while it does not. -########################################################### - -restore [locate_data_file OCC161.brep] result - -decho off -set che [checkshape result] -decho on - -if { [regexp {Faulty} $che] != 1 } { - puts "Faulty OCC161 : Checkshape command works wrongly" -} else { - puts "OCC161 OK : Checkshape command works properly" -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug16119 b/tests/bugs/moddata/bug16119 deleted file mode 100755 index a72a779a9e..0000000000 --- a/tests/bugs/moddata/bug16119 +++ /dev/null @@ -1,61 +0,0 @@ -puts "TODO ?OCC12345 ALL: OCC16119: Faulty" -puts "============" -puts "OCC16119" -puts "============" -puts "" -####################################################################### -# Bug in GeomFill_Coons algorithm -####################################################################### - -set BugNumber OCC16119 - -proc GetPercent {Value GoodValue} { - set Percent 0. - if {${GoodValue} != 0.} { - set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] - } elseif {${Value} != 0.} { - set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] - } else { - set Percent 0. - } - return ${Percent} -} - -restore [locate_data_file OCC16119-c1.draw] c1 -restore [locate_data_file OCC16119-c2.draw] c2 -restore [locate_data_file OCC16119-c31.draw] c31 -restore [locate_data_file OCC16119-c32.draw] c32 -restore [locate_data_file OCC16119-c41.draw] c41 -restore [locate_data_file OCC16119-c42.draw] c42 -restore [locate_data_file OCC16119-cv.draw] cv - -fillcurves s11 c1 c41 cv c31 -fillcurves s12 cv c42 c2 c32 - -svalue s11 .5 .5 x1 y1 z1 dux1 duy1 duz1 dvx1 dvy1 dvz1 -svalue s12 .5 .5 x2 y2 z2 dux2 duy2 duz2 dvx2 dvy2 dvz2 - -set deltaX [dval dvx1-dvx2] -set deltaY [dval dvy1-dvy2] -set deltaZ [dval dvz1-dvz2] - -set percent_max 0.1 -set good_deltaX 4.4408920985006262e-015 -set good_deltaY -4.6629367034256575e-015 -set good_deltaZ -2.6645352591003757e-015 - -set deltaX_percent [GetPercent ${deltaX} ${good_deltaX}] -puts "deltaX_percent = ${deltaX_percent}" - -set deltaY_percent [GetPercent ${deltaY} ${good_deltaY}] -puts "deltaY_percent = ${deltaY_percent}" - -set deltaZ_percent [GetPercent ${deltaZ} ${good_deltaZ}] -puts "deltaZ_percent = ${deltaZ_percent}" - -if {${deltaX_percent} > ${percent_max} || ${deltaY_percent} > ${percent_max} || ${deltaZ_percent} > ${percent_max} } { - puts "${BugNumber}: Faulty" -} else { - puts "${BugNumber}: OK" -} - diff --git a/tests/bugs/moddata/bug163 b/tests/bugs/moddata/bug163 deleted file mode 100755 index 393a13b0d1..0000000000 --- a/tests/bugs/moddata/bug163 +++ /dev/null @@ -1,30 +0,0 @@ - -puts "========" -puts "OCC163" -puts "========" -puts "" -########################################################### -## The result of extrema command is not correct. -## We have only two "max" extrema, but we should have "min" and "max". -########################################################### - -restore [locate_data_file OCC130.brep] res - -checkshape res - -line l -120 -100 400 0 0 1 -mksurface s res - -set che [extrema l s] -set err [llength $che] -if { $err < 2} { - puts "Error OCC163 (amount): command extrema does NOT work properly" -} - -set dum1 [dump [lindex $che 0]] -set dum2 [dump [lindex $che 1]] - -if { $dum1 == $dum2} { - puts "Error OCC163 (dump): command extrema does NOT work properly" -} - diff --git a/tests/bugs/moddata/bug164_1 b/tests/bugs/moddata/bug164_1 deleted file mode 100755 index 40162c2431..0000000000 --- a/tests/bugs/moddata/bug164_1 +++ /dev/null @@ -1,19 +0,0 @@ - -puts "================" -puts "OCC164" -puts "SAM1478" -puts "================" -puts "" - -restore [locate_data_file OCC164-1.brep] sh1 -restore [locate_data_file OCC164-2.brep] sh2 -checkshape sh1 -checkshape sh2 - -bfuse result sh1 sh2 -checkshape result - -set square 344595 -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug164_2 b/tests/bugs/moddata/bug164_2 deleted file mode 100755 index f9fa341174..0000000000 --- a/tests/bugs/moddata/bug164_2 +++ /dev/null @@ -1,19 +0,0 @@ - -puts "================" -puts "OCC164" -puts "SAM1478" -puts "================" -puts "" - -restore [locate_data_file OCC164-1.brep] sh1 -restore [locate_data_file OCC164-2.brep] sh2 -checkshape sh1 -checkshape sh2 - -bfuse result sh2 sh1 -checkshape result - -set square 344595 -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug1651 b/tests/bugs/moddata/bug1651 deleted file mode 100644 index a3cba8df8b..0000000000 --- a/tests/bugs/moddata/bug1651 +++ /dev/null @@ -1,64 +0,0 @@ -puts "TODO OCC11111 ALL: Faulty OCC1651" - -pload QAcommands - -puts "============" -puts "OCC1651" -puts "============" -puts "" -###################################################### -# No intersection found using BRepClass3d_Intersector3d -###################################################### - -restore [locate_data_file OCC1651.brep] face - -checkshape face - -set PntX 164.6207 -set PntY -105.2869 -set PntZ 557.8805 -set DirX 0.5774 -set DirY -0.5774 -set DirZ 0.5774 - -if { [catch { set PointList [OCC1651 face ${PntX} ${PntY} ${PntZ} ${DirX} ${DirY} ${DirZ}] } catch_result] } { - puts "Faulty OCC1651" -} else { - set ll [ llength ${PointList} ] - if {${ll} != 3} { - puts "Faulty OCC1651" - } else { - set IntersectionPointX [lindex ${PointList} 0] - set IntersectionPointY [lindex ${PointList} 1] - set IntersectionPointZ [lindex ${PointList} 2] - - set good_IntersectionPointX 42.6199 - set good_IntersectionPointY 16.7139 - set good_IntersectionPointZ 435.88 - - set X_percent [expr abs(${IntersectionPointX} - ${good_IntersectionPointX}) / double(${good_IntersectionPointX}) * 100.] - set Y_percent [expr abs(${IntersectionPointY} - ${good_IntersectionPointY}) / double(${good_IntersectionPointY}) * 100.] - set Z_percent [expr abs(${IntersectionPointZ} - ${good_IntersectionPointZ}) / double(${good_IntersectionPointZ}) * 100.] - - set percent_max 0.1 - - set IsGood 1 - if {${X_percent} > ${percent_max}} { - puts "OCC1651 Faulty" - set IsGood 0 - } - if {${Y_percent} > ${percent_max}} { - puts "OCC1651 Faulty" - set IsGood 0 - } - if {${Z_percent} > ${percent_max}} { - puts "OCC1651 Faulty" - set IsGood 0 - } - if {${IsGood} == 1} { - puts "OCC1651 OK" - } - } -} - - diff --git a/tests/bugs/moddata/bug165_1 b/tests/bugs/moddata/bug165_1 deleted file mode 100755 index 762d8a3de5..0000000000 --- a/tests/bugs/moddata/bug165_1 +++ /dev/null @@ -1,75 +0,0 @@ -puts "========" -puts "OCC165" -puts "Bug regression in BRepOffsetAPI_MakeOffset class (offsetting in OY direction)" -puts "========" - -restore [locate_data_file offset_wire_019.brep] a -checkshape a - -mkplane f a -checkshape f - -set IsGood 1 -if [catch {mkoffset res1 f 1 1 } result] { - puts "Faulty OCC165 (case 1) : function MKOFFSET works wrongly" - set IsGood 0 -} else { - puts "OCC165 OK (case 1): function MKOFFSET works properly" - checkshape res1_1 - mkplane pl1 res1_1 - checkshape pl1 -} - -if [catch {mkoffset res2 f 1 -1 } result] { - puts "Faulty OCC165 (case 2) : function MKOFFSET works wrongly" - set IsGood 0 -} else { - puts "OCC165 OK (case 2): function MKOFFSET works properly" - checkshape res2_1 - mkplane pl2 res2_1 - checkshape pl2 -} - -if {$IsGood == 1} { - compound a res1_1 res2_1 res - - regexp {Mass +: +([-0-9.+eE]+)} [lprops res1_1] full len - - set good_len 1088.43 - set percent_max 0.1 - set percent [expr abs(${len} - ${good_len}) / double(${good_len}) * 100.] - - puts "good_len = ${good_len}" - puts "length = ${len}" - puts "percent = ${percent}" - - if {${percent} > ${percent_max}} { - puts "Faulty OCC165 (case 3) : function MKOFFSET works wrongly" - set IsGood 0 - } - - regexp {Mass +: +([-0-9.+eE]+)} [lprops res2_1] full len - - set good_len 1075.87 - set percent_max 0.1 - set percent [expr abs(${len} - ${good_len}) / double(${good_len}) * 100.] - - puts "good_len = ${good_len}" - puts "length = ${len}" - puts "percent = ${percent}" - - if {${percent} > ${percent_max}} { - puts "Faulty OCC165 (case 4) : function MKOFFSET works wrongly" - set IsGood 0 - } - - if {$IsGood == 1} { - puts "OCC165 OK" - } else { - puts "OCC165 FAULTY" - } - -} else { - puts "OCC165 FAULTY" -} - diff --git a/tests/bugs/moddata/bug165_2 b/tests/bugs/moddata/bug165_2 deleted file mode 100755 index 624eb3d75c..0000000000 --- a/tests/bugs/moddata/bug165_2 +++ /dev/null @@ -1,79 +0,0 @@ -if { [array get env os_type] != "" } { - set os $env(os_type) -} -if { [string compare $os "windows"] != 0 } { - puts "TODO OCC12345 ALL: An exception was caught" - puts "TODO OCC12345 ALL: \\*\\* Exception \\*\\*.*" - puts "TODO OCC12345 ALL: OCC165 Faulty" -} - -puts "========" -puts "OCC165" -puts "Bug regression in BRepOffsetAPI_MakeOffset class (offsetting in OY direction)" -puts "========" - -restore [locate_data_file offset_wire_019.brep] a -checkshape a - -mkplane f a -checkshape f - -set IsGood 1 -if [catch {mkoffset res1 f 1 4.8 } result] { - set IsGood 0 -} else { - puts "OCC165 OK (case 1): function MKOFFSET works properly" - checkshape res1_1 - mkplane pl1 res1_1 - checkshape pl1 -} - -if [catch {mkoffset res2 f 1 -2.9 } result] { - set IsGood 0 -} else { - puts "OCC165 OK (case 2): function MKOFFSET works properly" - checkshape res2_1 - mkplane pl2 res2_1 - checkshape pl2 -} - -if {$IsGood == 1} { - compound a res1_1 res2_1 res - - regexp {Mass +: +([-0-9.+eE]+)} [lprops res1_1] full len - - set good_len 1112.29 - set percent_max 0.1 - set percent [expr abs(${len} - ${good_len}) / double(${good_len}) * 100.] - - puts "good_len = ${good_len}" - puts "length = ${len}" - puts "percent = ${percent}" - - if {${percent} > ${percent_max}} { - set IsGood 0 - } - - regexp {Mass +: +([-0-9.+eE]+)} [lprops res2_1] full len - - set good_len 1063.91 - set percent_max 0.1 - set percent [expr abs(${len} - ${good_len}) / double(${good_len}) * 100.] - - puts "good_len = ${good_len}" - puts "length = ${len}" - puts "percent = ${percent}" - - if {${percent} > ${percent_max}} { - set IsGood 0 - } - - if {$IsGood == 1} { - puts "OCC165 OK" - } else { - puts "OCC165 Faulty" - } - -} else { - puts "OCC165 Faulty" -} diff --git a/tests/bugs/moddata/bug165_3 b/tests/bugs/moddata/bug165_3 deleted file mode 100755 index 32551f84c7..0000000000 --- a/tests/bugs/moddata/bug165_3 +++ /dev/null @@ -1,137 +0,0 @@ - -puts "========" -puts "OCC165" -puts "========" - -restore [locate_data_file OCC165-2.brep] f -checkshape f - -set IsGood 1 -if [catch {mkoffset res1 f 3 10 } result] { - puts "Faulty OCC165 (case 1) : function MKOFFSET works wrongly" - set IsGood 0 -} else { - #puts "OCC165 OK (case 1): function MKOFFSET works properly" - mkplane pl1_1 res1_1 - checkshape pl1_1 - mkplane pl1_2 res1_2 - checkshape pl1_2 - mkplane pl1_3 res1_3 - checkshape pl1_3 -} - -if [catch {mkoffset res2 f 3 -10 } result] { - puts "Faulty OCC165 (case 2) : function MKOFFSET works wrongly" - set IsGood 0 -} else { - #puts "OCC165 OK (case 2): function MKOFFSET works properly" - mkplane pl2_1 res2_1 - checkshape pl2_1 - mkplane pl2_2 res2_2 - checkshape pl2_2 - mkplane pl2_3 res2_3 - checkshape pl2_3 -} - -if {$IsGood == 1} { - compound f res1_1 res1_2 res1_3 res2_1 res2_2 res2_3 res - - regexp {Mass +: +([-0-9.+eE]+)} [lprops res1_1] full len - - set good_len 462.832 - set percent_max 0.1 - set percent [expr abs(${len} - ${good_len}) / double(${good_len}) * 100.] - - puts "good_len = ${good_len}" - puts "length = ${len}" - puts "percent = ${percent}" - - if {${percent} > ${percent_max}} { - puts "Faulty OCC165 (case 3) : function MKOFFSET works wrongly" - set IsGood 0 - } - - regexp {Mass +: +([-0-9.+eE]+)} [lprops res1_2] full len - - set good_len 525.664 - set percent_max 0.1 - set percent [expr abs(${len} - ${good_len}) / double(${good_len}) * 100.] - - puts "good_len = ${good_len}" - puts "length = ${len}" - puts "percent = ${percent}" - - if {${percent} > ${percent_max}} { - puts "Faulty OCC165 (case 4) : function MKOFFSET works wrongly" - set IsGood 0 - } - - regexp {Mass +: +([-0-9.+eE]+)} [lprops res1_3] full len - - set good_len 588.496 - set percent_max 0.1 - set percent [expr abs(${len} - ${good_len}) / double(${good_len}) * 100.] - - puts "good_len = ${good_len}" - puts "length = ${len}" - puts "percent = ${percent}" - - if {${percent} > ${percent_max}} { - puts "Faulty OCC165 (case 5) : function MKOFFSET works wrongly" - set IsGood 0 - } - - regexp {Mass +: +([-0-9.+eE]+)} [lprops res2_1] full len - - set good_len 320 - set percent_max 0.1 - set percent [expr abs(${len} - ${good_len}) / double(${good_len}) * 100.] - - puts "good_len = ${good_len}" - puts "length = ${len}" - puts "percent = ${percent}" - - if {${percent} > ${percent_max}} { - puts "Faulty OCC165 (case 6) : function MKOFFSET works wrongly" - set IsGood 0 - } - - regexp {Mass +: +([-0-9.+eE]+)} [lprops res2_2] full len - - set good_len 240 - set percent_max 0.1 - set percent [expr abs(${len} - ${good_len}) / double(${good_len}) * 100.] - - puts "good_len = ${good_len}" - puts "length = ${len}" - puts "percent = ${percent}" - - if {${percent} > ${percent_max}} { - puts "Faulty OCC165 (case 7) : function MKOFFSET works wrongly" - set IsGood 0 - } - - regexp {Mass +: +([-0-9.+eE]+)} [lprops res2_3] full len - - set good_len 160 - set percent_max 0.1 - set percent [expr abs(${len} - ${good_len}) / double(${good_len}) * 100.] - - puts "good_len = ${good_len}" - puts "length = ${len}" - puts "percent = ${percent}" - - if {${percent} > ${percent_max}} { - puts "Faulty OCC165 (case 8) : function MKOFFSET works wrongly" - set IsGood 0 - } - - if {$IsGood == 1} { - puts "OCC165 OK" - } else { - puts "OCC165 FAULTY" - } - -} else { - puts "OCC165 FAULTY" -} diff --git a/tests/bugs/moddata/bug16833 b/tests/bugs/moddata/bug16833 deleted file mode 100755 index d3e0046cf1..0000000000 --- a/tests/bugs/moddata/bug16833 +++ /dev/null @@ -1,37 +0,0 @@ -puts "============" -puts "OCC16833" -puts "============" -puts "" -####################################################################### -# Error in Coons algorithm -####################################################################### - -set BugNumber OCC16833 - -restore [locate_data_file OCC16833-c1.draw] c1 -restore [locate_data_file OCC16833-c2.draw] c2 -restore [locate_data_file OCC16833-c3.draw] c3 -restore [locate_data_file OCC16833-c4.draw] c4 - -set mistake 0 -if [catch { fillcurves result c1 c2 c3 c4 } res] { - set mistake 1 - puts "Faulty ${BugNumber}: filling problem" -} else { - puts "Filling ${BugNumber} OK" - set What [whatis result] - if { [regexp "surface" $What] != 1 } { - set mistake 1 - } else { - set mistake 0 - } -} - -# Resume -puts "" -if { ${mistake} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - diff --git a/tests/bugs/moddata/bug17 b/tests/bugs/moddata/bug17 deleted file mode 100755 index 85ae54b4df..0000000000 --- a/tests/bugs/moddata/bug17 +++ /dev/null @@ -1,34 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty OCC17: here can be shading problem" - -puts "================" -puts "OCC17" -puts "================" -puts "" - -##################################################### -puts " Solid_14 will be the face which is unvisible during displaying entire solid." -##################################################### - -restore [locate_data_file OCC17.brep] sh - -checkshape sh - -explode sh f -renamevar sh_14 result -tclean result -vinit -vdisplay result -vsetdispmode result 1 -vfit - -set info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $info full tri -regexp { +([-0-9.+eE]+) +nodes} $info full nod - -if { $tri != 100 && $nod != 94 } { - puts "Faulty OCC17: here can be shading problem" -} - -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug17046 b/tests/bugs/moddata/bug17046 deleted file mode 100755 index 09c419e18f..0000000000 --- a/tests/bugs/moddata/bug17046 +++ /dev/null @@ -1,36 +0,0 @@ -puts "============" -puts "OCC17046" -puts "============" -puts "" -####################################################################### -# Exception in Extrema_ExtPS on Mandriva2006 32-bits -####################################################################### - -set BugNumber OCC17046 - -# Create ellipsoidal surface -ellipse ell 0 0 300 1 0 0 150 100 -mkedge ell_e ell -wire ell_w ell_e -mkplane ell_f ell_w 1 - -box ell_t -10 -110 140 20 110 460 -cut ell_d ell_f ell_t - -revol ell_z ell_d 0 0 0 0 0 1 360 -explode ell_z F -mksurface su1 ell_z_1 - -# Perform projection -set BugStatus 0 -if [catch { proj su1 0 100 300 } ] { - set BugStatus 1 -} - -# Resume -puts "" -if { ${BugStatus} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} diff --git a/tests/bugs/moddata/bug17424 b/tests/bugs/moddata/bug17424 deleted file mode 100755 index 7fd3b47b5c..0000000000 --- a/tests/bugs/moddata/bug17424 +++ /dev/null @@ -1,33 +0,0 @@ -pload QAcommands - -puts "============" -puts "OCC17424" -puts "============" -puts "" -###################################################### -# IntCurvesFace_ShapeIntersector does not find intersection point -###################################################### - -set BugNumber OCC17424 - -restore [locate_data_file OCC17424.brep] a - -set X_Pnt 86.960439048069262 -set Y_Pnt 1028.2863798310484 -set Z_Pnt -266.58526583558000 - -set X_Dir 0.25881904510252074 -set Y_Dir 0 -set Z_Dir -0.96592582628906831 - -set PInf 0. - -set aStatusList [OCC17424 a ${X_Pnt} ${Y_Pnt} ${Z_Pnt} ${X_Dir} ${Y_Dir} ${Z_Dir} ${PInf}] -regexp {OCC17424 status = +([-0-9.+eE]+)} ${aStatusList} full aStatus - -if { ${aStatus} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - diff --git a/tests/bugs/moddata/bug175 b/tests/bugs/moddata/bug175 deleted file mode 100755 index 5297a495ea..0000000000 --- a/tests/bugs/moddata/bug175 +++ /dev/null @@ -1,23 +0,0 @@ - -puts "========" -puts "OCC175" -puts "========" -puts "" -########################################### -## ABug of a symmetry on this specific attached BREP shape. -########################################### - -restore [locate_data_file OCC175.brep] result -checkshape result - -regexp {SHAPE +: +([-0-9.+eE]+)} [nbshapes result] full col1 - -tmirror result 0 0 0 0 1 0 - -regexp {SHAPE +: +([-0-9.+eE]+)} [nbshapes result] full col2 -if { $col1 != $col2} { - puts "Error : Command mirror does NOT work properly. " -} - -set square 13091.3 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug183_1 b/tests/bugs/moddata/bug183_1 deleted file mode 100755 index 1adf74fd34..0000000000 --- a/tests/bugs/moddata/bug183_1 +++ /dev/null @@ -1,19 +0,0 @@ - -puts "========================" -puts " OCC183 " -puts "(case 1)" -puts "========================" -puts "" - -restore [locate_data_file f1] b1 -checkshape b1 - -restore [locate_data_file f4] b2 -checkshape b2 - -bcommon result b1 b2 -checkshape result - -set square 315.159 -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug183_2 b/tests/bugs/moddata/bug183_2 deleted file mode 100755 index babea15396..0000000000 --- a/tests/bugs/moddata/bug183_2 +++ /dev/null @@ -1,18 +0,0 @@ - -puts "========================" -puts " OCC183 " -puts "(case 2)" -puts "========================" -puts "" - -restore [locate_data_file so1] b1 -checkshape b1 - -restore [locate_data_file so4] b2 -checkshape b2 - -bfuse result b1 b2 -checkshape result - -set square 942.478 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug183_3 b/tests/bugs/moddata/bug183_3 deleted file mode 100755 index e2e4342e1d..0000000000 --- a/tests/bugs/moddata/bug183_3 +++ /dev/null @@ -1,19 +0,0 @@ - -puts "========================" -puts " OCC183 " -puts "(case 3)" -puts "========================" -puts "" - -restore [locate_data_file so1] b1 -checkshape b1 - -restore [locate_data_file so4] b2 -checkshape b2 - -bcut result b1 b2 -checkshape result - -set square 863.938 -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug183_4 b/tests/bugs/moddata/bug183_4 deleted file mode 100755 index 985cf6bec2..0000000000 --- a/tests/bugs/moddata/bug183_4 +++ /dev/null @@ -1,19 +0,0 @@ - -puts "========================" -puts " OCC183 " -puts "(case 4)" -puts "========================" -puts "" - -restore [locate_data_file so1] b1 -checkshape b1 - -restore [locate_data_file so2] b2 -checkshape b2 - -bcommon result b1 b2 -checkshape result - -set square 392.699 -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug183_5 b/tests/bugs/moddata/bug183_5 deleted file mode 100755 index b170dada13..0000000000 --- a/tests/bugs/moddata/bug183_5 +++ /dev/null @@ -1,19 +0,0 @@ - -puts "========================" -puts " OCC183 " -puts "(case 5)" -puts "========================" -puts "" - -restore [locate_data_file so4] b1 -checkshape b1 - -restore [locate_data_file so2] b2 -checkshape b2 - -bcommon result b1 b2 -checkshape result - -set square 198.863 -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug183_6 b/tests/bugs/moddata/bug183_6 deleted file mode 100755 index 674c216e21..0000000000 --- a/tests/bugs/moddata/bug183_6 +++ /dev/null @@ -1,21 +0,0 @@ - -puts "========================" -puts " OCC183 " -puts " CTS16184" -puts "(case 6)" -puts "========================" -puts "" - -restore [locate_data_file CTO900_cts16184a.rle] a -checkshape a -restore [locate_data_file cts16184b.brep] b -checkshape b - -bop a b -bopfuse result a b -checkshape -top result - -set square 0.0892544 -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug18541_1 b/tests/bugs/moddata/bug18541_1 deleted file mode 100755 index df6d7a818f..0000000000 --- a/tests/bugs/moddata/bug18541_1 +++ /dev/null @@ -1,30 +0,0 @@ -puts "============" -puts "OCC18541" -puts "============" -puts "" -####################################################################### -# Problem with GCPnts_UniformAbscissa class -####################################################################### - -set BugNumber OCC18541 - -restore [locate_data_file OCC18541.brep] b-curve - -set NbPoints 10 - -mkcurve res b-curve - -set ResList [uniformAbscissa res ${NbPoints}] - -if {[llength ${ResList}] > 15} { - set CasCurve_NbPoints [lindex ${ResList} 15] - puts "NbPoints = ${NbPoints} CasCurve_NbPoints = ${CasCurve_NbPoints}" - if { ${CasCurve_NbPoints} != ${NbPoints} } { - puts "Faulty ${BugNumber}" - } else { - puts "OK ${BugNumber}" - } -} else { - puts "Faulty ${BugNumber} : Bad draw command" -} - diff --git a/tests/bugs/moddata/bug18541_2 b/tests/bugs/moddata/bug18541_2 deleted file mode 100755 index 5213f97d88..0000000000 --- a/tests/bugs/moddata/bug18541_2 +++ /dev/null @@ -1,27 +0,0 @@ -puts "============" -puts "OCC18541" -puts "============" -puts "" -####################################################################### -# Problem with GCPnts_UniformAbscissa class -####################################################################### - -set BugNumber OCC18541 - -set maxR 100 -set minR 50 -set NbPoints 10 - -set ResList [uniformAbscissaEl ${maxR} ${minR} ${NbPoints}] - -if {[llength ${ResList}] > 15} { - set CasCurve_NbPoints [lindex ${ResList} 15] - puts "NbPoints = ${NbPoints} CasCurve_NbPoints = ${CasCurve_NbPoints}" - if { ${CasCurve_NbPoints} != ${NbPoints} } { - puts "Faulty ${BugNumber}" - } else { - puts "OK ${BugNumber}" - } -} else { - puts "Faulty ${BugNumber} : Bad draw command" -} diff --git a/tests/bugs/moddata/bug187 b/tests/bugs/moddata/bug187 deleted file mode 100755 index dc34ccfd3d..0000000000 --- a/tests/bugs/moddata/bug187 +++ /dev/null @@ -1,16 +0,0 @@ - -puts "================" -puts "OCC187" -puts "SAM1230" -puts "================" -puts "" - -################################################################# -## In time document with "1-exhaust.brep" imported shape saving exception "Access Violation" -## raises because of wrong PColgp_HArray1 allocation. -## StandardCSFDB_Allocate badly allocates memory blocks: bad address value retuned. -################################################################# - -restore [locate_data_file OCC187_from_bug_description.brep] result - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug188 b/tests/bugs/moddata/bug188 deleted file mode 100755 index 6b840d4f0a..0000000000 --- a/tests/bugs/moddata/bug188 +++ /dev/null @@ -1,19 +0,0 @@ - -puts "============" -puts "BUC60929" -puts "OCC188" -puts "============" - -restore [locate_data_file BUC60929.brep] a - -explode a -checkshape a_1 -checkshape a_2 - -bcommon result a_1 a_2 -checkshape result - -set square 3739.26 -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug188_1 b/tests/bugs/moddata/bug188_1 deleted file mode 100755 index a7ff6d6824..0000000000 --- a/tests/bugs/moddata/bug188_1 +++ /dev/null @@ -1,17 +0,0 @@ - -puts "================" -puts "OCC188" -puts "================" -puts "" - -restore [locate_data_file BUC60929.brep] a -explode a -checkshape a_1 -checkshape a_2 - -bcut result a_1 a_2 -checkshape result - -set square 669659 -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug19777 b/tests/bugs/moddata/bug19777 deleted file mode 100755 index 5a05df0fa7..0000000000 --- a/tests/bugs/moddata/bug19777 +++ /dev/null @@ -1,27 +0,0 @@ -puts "========" -puts "OCC19777" -puts "========" -puts "" -###################################################### -# FIP:Integration of new version of read/write VRML2.0 files -###################################################### - -set BugNumber OCC19777 - -if [catch { restore [locate_data_file OCC19777.brep] result} catch_result] { - puts "Error ${BugNumber}: there is reading problem" -} else { - -set nb_v_good 0 -set nb_e_good 0 -set nb_w_good 0 -set nb_f_good 1 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 1 - -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug20 b/tests/bugs/moddata/bug20 deleted file mode 100755 index b9f4dc0911..0000000000 --- a/tests/bugs/moddata/bug20 +++ /dev/null @@ -1,35 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty OCC20: here is shading problem" - -puts "================" -puts "OCC20" -puts "================" -puts "" -############################### -## Face apearence in shading mode is wrong -############################### - -pload QAcommands -restore [locate_data_file OCC20.brep] result - -checkshape result - -tclean result -vinit -vdisplay result -vsetdispmode result 1 - -vviewparams 5.1346924 95.358439 -4.910448 0.23495967 -0.302 0.923899 -0.7304302 0.5722587 0.372815 9.550874 -7.55706 -28.83166 - -isos result 0 -triangles result - -set info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $info full tri -regexp { +([-0-9.+eE]+) +nodes} $info full nod - -if { $tri != 416 || $nod != 367 } { - puts "Faulty OCC20: here is shading problem" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug203 b/tests/bugs/moddata/bug203 deleted file mode 100644 index 6e9c8de18b..0000000000 --- a/tests/bugs/moddata/bug203 +++ /dev/null @@ -1,41 +0,0 @@ - -puts "========" -puts "OCC203" -puts "========" - -set dx 100 -set dy 100 -set dz 100 - -box b ${dx} ${dy} ${dz} - -renamevar b edge -explode edge e - -renamevar edge face -explode face f - -set radis 5 -set angle 45 - -chamf result1 face edge_1 face_3 A ${radis} ${angle} - -explode result1 e - -decho off -if { [catch {fillet result result1 ${radis} result1_1 ${radis} result1_7 } catch_result] } { - set mistake 1 -} else { - set mistake 0 -} -decho on - -if { $mistake != 0} { - puts "OK OCC203" - puts "Filet can not be created" -} else { - puts "Faulty OCC203: function FILLET works wrongly" - checkshape result -} - - diff --git a/tests/bugs/moddata/bug20391 b/tests/bugs/moddata/bug20391 deleted file mode 100755 index 1d1972da25..0000000000 --- a/tests/bugs/moddata/bug20391 +++ /dev/null @@ -1,20 +0,0 @@ -puts "============" -puts "OCC20391" -puts "============" -puts "" -####################################################################### -# Shape deforming via 3 scale factors raises error.Appendix for IPAL20387 -####################################################################### - -set BugNumber OCC20391 - -restore [locate_data_file bug19811_VanneMP_supports_tiges_V3.brep] a - -if [catch {deform result a 2 2 2}] { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -set square 2.71197e+07 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug20404 b/tests/bugs/moddata/bug20404 deleted file mode 100755 index b8b4ed7610..0000000000 --- a/tests/bugs/moddata/bug20404 +++ /dev/null @@ -1,30 +0,0 @@ -puts "========================" -puts "OCC20404" -puts "========================" -puts "" -####################################################################### -# Command distmini gives wrong result for given shapes -####################################################################### - -set BugNumber OCC20404 - -restore [locate_data_file OCC20404-line1.brep] e1 -restore [locate_data_file OCC20404-line2.brep] e2 - -distmini d e1 e2 -puts "Distance=[dval d_val]" - -if [expr [dval d_val] > 7.e-13] { - set status 1 -} else { - set status 0 -} - -# Resume -puts "" -if { ${status} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - diff --git a/tests/bugs/moddata/bug20524 b/tests/bugs/moddata/bug20524 deleted file mode 100755 index ae86c3c346..0000000000 --- a/tests/bugs/moddata/bug20524 +++ /dev/null @@ -1,22 +0,0 @@ -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" -} - diff --git a/tests/bugs/moddata/bug20616 b/tests/bugs/moddata/bug20616 deleted file mode 100755 index 257fed4b09..0000000000 --- a/tests/bugs/moddata/bug20616 +++ /dev/null @@ -1,34 +0,0 @@ -puts "========================" -puts "OCC20616" -puts "========================" -puts "" -####################################################################### -# Failed to save/restore [locate_data_file empty] face -####################################################################### - -set BugNumber OCC20616 - -set mistake 0 -foreach t {V E W F Sh So CS C} { - puts "shape type $t" - shape test $t - if [catch {save test $imagedir/${test_image}.brep}] { - puts "Faulty ${BugNumber} save $t" - set mistake 1 - } else { - puts "OK ${BugNumber} save $t" - } - if [catch {restore $imagedir/${test_image}.brep test}] { - puts "Faulty ${BugNumber} restore $t" - set mistake 1 - } else { - puts "OK ${BugNumber} restore $t" - } -} - -if {${mistake} !=0} { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - diff --git a/tests/bugs/moddata/bug20627 b/tests/bugs/moddata/bug20627 deleted file mode 100755 index a4fdba0ec9..0000000000 --- a/tests/bugs/moddata/bug20627 +++ /dev/null @@ -1,27 +0,0 @@ -pload QAcommands - -puts "========" -puts "OCC20627" -puts "========" -puts "" -####################################################################### -# Memory leaks in BRepMesh -####################################################################### - -set BugNumber OCC20627 - -OCC20627 1 - -set listmem {} -set i_max 10000 -OCC20627 ${i_max} - -lappend listmem [expr [meminfo w] / 1024] -if { [checktrend $listmem 0 1 "Memory leak detected"] } { - puts "No memory leak" - break -} - - - - diff --git a/tests/bugs/moddata/bug20683 b/tests/bugs/moddata/bug20683 deleted file mode 100755 index de23ef0c65..0000000000 --- a/tests/bugs/moddata/bug20683 +++ /dev/null @@ -1,31 +0,0 @@ -puts "========================" -puts "OCC20683" -puts "Customer : TATA" -puts "========================" -puts "" -####################################################################### -# BRepExtrema_ExtCC produces incomplete result. -####################################################################### - -set BugNumber OCC20683 - -# finite line is used -line ll 6834.93 -4100 500 0 0 1 -trim trll ll -1000 -500 -mkedge tree trll - -restore [locate_data_file OCC20683_circ1.brep] e1 -restore [locate_data_file OCC20683_circ2.brep] e2 - -set res_list [distmini d e1 e2] -set res_length [llength ${res_list}] -puts "res_length = ${res_length}" - -# Resume -puts "" -if { ${res_length} != 3 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - diff --git a/tests/bugs/moddata/bug20766 b/tests/bugs/moddata/bug20766 deleted file mode 100755 index 41cc7a5c4d..0000000000 --- a/tests/bugs/moddata/bug20766 +++ /dev/null @@ -1,34 +0,0 @@ -pload QAcommands - -puts "============" -puts "OCC20766" -puts "============" -puts "" -####################################################################### -# Intersection of cone with plane in apex point crashes -####################################################################### - -set BugNumber OCC20766 - -OCC20766 plane 1 0 0 3522.4299999999998 - -set x -3522.4299999999998 -set y 2540 -set z -1461.4300000000001 -set dx 5449.7857099692965 -set dy 0 -set dz 5537.6938973109054 -set PI180 0.017453292519943295 -set semi-angle [expr 0.46689346637921703 / ${PI180}] -set radius 0. - -cone c ${x} ${y} ${z} ${dx} ${dy} ${dz} ${semi-angle} ${radius} - -if [catch { intersect result plane c } ] { - puts "Faulty ${BugNumber} : intersect is wrong" -} else { - puts "OK ${BugNumber}" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug20823 b/tests/bugs/moddata/bug20823 deleted file mode 100755 index 32254fedac..0000000000 --- a/tests/bugs/moddata/bug20823 +++ /dev/null @@ -1,33 +0,0 @@ -puts "============" -puts "OCC20823" -puts "============" -puts "" -####################################################################### -# BRepFilletAPI_MakeFillet2d fails to build a chamfer -####################################################################### - -set BugNumber OCC20823 - -restore [locate_data_file OCC20823.brep] a -mkplane f a -explode f e - -if [catch { chfi2d result f f_1 f_2 CDD 10. 10. } ] { - puts "Faulty ${BugNumber} : chfi2d is wrong" -} else { -set length 267.795 - -set nb_v_good 4 -set nb_e_good 3 -set nb_w_good 1 -set nb_f_good 1 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 9 - -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug20904_1 b/tests/bugs/moddata/bug20904_1 deleted file mode 100755 index bfb1812a87..0000000000 --- a/tests/bugs/moddata/bug20904_1 +++ /dev/null @@ -1,49 +0,0 @@ -puts "============" -puts "OCC20904" -puts "============" -puts "" -####################################################################### -# BRepBuilderAPI_Sewing produces a shape with big tolerance -####################################################################### - -set BugNumber OCC20904 - -restore [locate_data_file bug20904_face_bas.brep] a - -set tolerance_in 1.e-6 -set tolerance_out ${tolerance_in} -sewing result ${tolerance_in} a - -set tolerance_list [maxtolerance result] - -regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance_list full MaxFaceTolerance -regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance_list full MaxEdgeTolerance -regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance_list full MaxVertexTolerance - -set status 0 - -if { ${MaxFaceTolerance} > ${tolerance_out} } { - set status 1 - puts "Max Face Tolerance is bad" -} - -if { ${MaxEdgeTolerance} > ${tolerance_out} } { - set status 1 - puts "Max Edge Tolerance is bad" -} - -if { ${MaxVertexTolerance} > ${tolerance_out} } { - set status 1 - puts "Max Vertex Tolerance is bad" -} - -# Resume -puts "" -if { ${status} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -set square 30078.9 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug20904_2 b/tests/bugs/moddata/bug20904_2 deleted file mode 100755 index 1952c95978..0000000000 --- a/tests/bugs/moddata/bug20904_2 +++ /dev/null @@ -1,48 +0,0 @@ -puts "============" -puts "OCC20904" -puts "============" -puts "" -####################################################################### -# BRepBuilderAPI_Sewing produces a shape with big tolerance -####################################################################### - -set BugNumber OCC20904 - -restore [locate_data_file bug20904_Shell_argument.brep] a - -set tolerance_in 1.e-6 -set tolerance_out ${tolerance_in} -sewing result ${tolerance_in} a - -set tolerance_list [maxtolerance result] -regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance_list full MaxFaceTolerance -regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance_list full MaxEdgeTolerance -regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance_list full MaxVertexTolerance - -set status 0 - -if { ${MaxFaceTolerance} > ${tolerance_out} } { - set status 1 - puts "Max Face Tolerance is bad" -} - -if { ${MaxEdgeTolerance} > ${tolerance_out} } { - set status 1 - puts "Max Edge Tolerance is bad" -} - -if { ${MaxVertexTolerance} > ${tolerance_out} } { - set status 1 - puts "Max Vertex Tolerance is bad" -} - -# Resume -puts "" -if { ${status} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -set square 1.33253e+06 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug20904_3 b/tests/bugs/moddata/bug20904_3 deleted file mode 100755 index 00672d6931..0000000000 --- a/tests/bugs/moddata/bug20904_3 +++ /dev/null @@ -1,49 +0,0 @@ -puts "============" -puts "OCC20904" -puts "============" -puts "" -####################################################################### -# BRepBuilderAPI_Sewing produces a shape with big tolerance -####################################################################### - -set BugNumber OCC20904 - -restore [locate_data_file bug20904_face_bas.brep] a -restore [locate_data_file bug20904_Shell_argument.brep] b - -set tolerance_in 1.e-6 -set tolerance_out 1.e-5 -sewing result ${tolerance_in} a b - -set tolerance_list [maxtolerance result] -regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance_list full MaxFaceTolerance -regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance_list full MaxEdgeTolerance -regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance_list full MaxVertexTolerance - -set status 0 - -if { ${MaxFaceTolerance} > ${tolerance_out} } { - set status 1 - puts "Max Face Tolerance is bad" -} - -if { ${MaxEdgeTolerance} > ${tolerance_out} } { - set status 1 - puts "Max Edge Tolerance is bad" -} - -if { ${MaxVertexTolerance} > ${tolerance_out} } { - set status 1 - puts "Max Vertex Tolerance is bad" -} - -# Resume -puts "" -if { ${status} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -set square 1.36261e+06 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug21121 b/tests/bugs/moddata/bug21121 deleted file mode 100755 index 6e51865404..0000000000 --- a/tests/bugs/moddata/bug21121 +++ /dev/null @@ -1,89 +0,0 @@ -puts "TODO OCC11111 ALL: Faulty OCC21121" -puts "TODO OCC11111 ALL: Error : The square of result shape is" - -puts "============" -puts "OCC21121" -puts "============" -puts "" -####################################################################### -# Triangulation on face is not built -####################################################################### - -set BugNumber OCC21121 - -restore [locate_data_file OCC21121.brep] result - -tclean result - -set Deflection 0.1 -catch {incmesh result ${Deflection} } - -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod -regexp {deflection +([-0-9.+eE]+)} $tri_info full defl - -if { [string compare $tcl_platform(platform) "windows"] == 0 } { - puts "OS = Windows NT" - set good_tri 1555 - set good_nod 1475 - set good_defl 3.5015692105840144e-06 -} else { - puts "OS = Linux" - set good_tri 1555 - set good_nod 1475 - set good_defl 3.5015692105840144e-06 -} - -proc GetPercent {Value GoodValue} { - set Percent 0. - if {${GoodValue} != 0.} { - set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] - } elseif {${Value} != 0.} { - set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] - } else { - set Percent 0. - } - return ${Percent} -} - -set percent_max 0.1 -set status 0 - -set triangle_percent [GetPercent ${tri} ${good_tri}] -puts "triangle_percent = ${triangle_percent}" -if { ${triangle_percent} > ${percent_max} } { - puts "triangle: Faulty ${BugNumber}" - set status 1 -} else { - puts "triangle: OK ${BugNumber}" -} - -set node_percent [GetPercent ${nod} ${good_nod}] -puts "node_percent = ${node_percent}" -if { ${node_percent} > ${percent_max} } { - puts "node: Faulty ${BugNumber}" - set status 1 -} else { - puts "node: OK ${BugNumber}" -} - -set deflection_percent [GetPercent ${defl} ${good_defl}] -puts "deflection_percent = ${deflection_percent}" -if { ${deflection_percent} > ${percent_max} } { - puts "deflection: Faulty ${BugNumber}" - set status 1 -} else { - puts "deflection: OK ${BugNumber}" -} - -# Resume -puts "" -if { ${status} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -set square 0 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug21122 b/tests/bugs/moddata/bug21122 deleted file mode 100755 index cece00a315..0000000000 --- a/tests/bugs/moddata/bug21122 +++ /dev/null @@ -1,104 +0,0 @@ -puts "TODO OCC11111 ALL: Faulty OCC21122" - -puts "============" -puts "OCC21122" -puts "============" -puts "" -####################################################################### -# Incremental mesh error -####################################################################### - -set BugNumber OCC21122 - -restore [locate_data_file OCC21122.brep] result - -tclean result - -set Deflection 0.1 -catch {incmesh result ${Deflection} } - -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod -regexp {Maximal deflection +([-0-9.+eE]+)} $tri_info full defl - - -if { [string compare $tcl_platform(platform) "windows"] == 0 } { - set good_tri 4322 - set good_nod 4324 - set good_defl 8.8817872205847652e-16 - puts "OS = Windows NT" -} else { - puts "OS = Linux" - set good_tri 4322 - set good_nod 4324 - set good_defl 8.8817872205847652e-16 -} - -proc GetPercent {Value GoodValue} { - set Percent 0. - if {${GoodValue} != 0.} { - set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] - } elseif {${Value} != 0.} { - set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] - } else { - set Percent 0. - } - return ${Percent} -} - -set percent_max 0.1 -set status 0 - -set triangle_percent [GetPercent ${tri} ${good_tri}] -puts "triangle_percent = ${triangle_percent}" -if { ${triangle_percent} > ${percent_max} } { - puts "triangle: Faulty ${BugNumber}" - set status 1 -} else { - puts "triangle: OK ${BugNumber}" -} - -set node_percent [GetPercent ${nod} ${good_nod}] -puts "node_percent = ${node_percent}" -if { ${node_percent} > ${percent_max} } { - puts "node: Faulty ${BugNumber}" - set status 1 -} else { - puts "node: OK ${BugNumber}" -} - -set deflection_percent [GetPercent ${defl} ${good_defl}] -puts "deflection_percent = ${deflection_percent}" -if { ${deflection_percent} > ${percent_max} } { - puts "deflection: Faulty ${BugNumber}" - set status 1 -} else { - puts "deflection: OK ${BugNumber}" -} - -set square 275.426 - -set nb_v_good 964 -set nb_e_good 964 -set nb_w_good 1 -set nb_f_good 1 -set nb_sh_good 1 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 1931 - -if { ${status} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -vinit -vdisplay result -vsetdispmode 1 -vfit - -set only_screen 1 - diff --git a/tests/bugs/moddata/bug211_1 b/tests/bugs/moddata/bug211_1 deleted file mode 100755 index 4223a4cd49..0000000000 --- a/tests/bugs/moddata/bug211_1 +++ /dev/null @@ -1,19 +0,0 @@ - -puts "========" -puts "OCC211" -puts "========" - -########################################## -##Error of fillet prolongation. -########################################## - -restore [locate_data_file OCC211.brep] a - -explode a e - -blend result a 10 a_24 -checkshape result - -set square 1.34399e+06 -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug211_2 b/tests/bugs/moddata/bug211_2 deleted file mode 100755 index 5857e5b5be..0000000000 --- a/tests/bugs/moddata/bug211_2 +++ /dev/null @@ -1,18 +0,0 @@ - -puts "========" -puts "OCC211" -puts "========" - -########################################## -##Error of fillet prolongation. -########################################## - -restore [locate_data_file OCC211.brep] a - -explode a e - -blend result a 10 a_4 -checkshape result - -set square 1.34399e+06 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug21292 b/tests/bugs/moddata/bug21292 deleted file mode 100755 index 8da1da51c1..0000000000 --- a/tests/bugs/moddata/bug21292 +++ /dev/null @@ -1,66 +0,0 @@ -puts "========" -puts "OCC21292" -puts "========" -puts "" -###################################################### -# Shading on large model too long -###################################################### - -set BugNumber OCC21292 - -# 1 munite -cpulimit 60 - -restore [locate_data_file OCC21292.brep] result - -vinit -vsetdispmode 1 - -chrono h reset; chrono h start -# -# DISPLAY OPERATION ----- START -# -vdisplay result -# -# DISPLAY OPERATION ----- FINISH -# -chrono h stop; set CPU_time_List [chrono h show] - -set CPU_user_time [lindex ${CPU_time_List} 11] -puts "CPU_user_time=${CPU_user_time}" - - -set square 1.40193e+07 -set nb_v_good 372 -set nb_e_good 369 -set nb_w_good 2 -set nb_f_good 1 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 745 - - -if {[string compare $tcl_platform(platform) "windows"] == 0} { - puts "windows" - set Good_CPU_user_time 0. -} else { - if {[string compare $tcl_platform(os) "SunOS"] == 0} { - puts "SunOS" - set Good_CPU_user_time 6. - } else { - puts "Linux" - set Good_CPU_user_time 6. - } -} - -# Check time boolean operation -if {${Good_CPU_user_time} > ${CPU_user_time}} { - puts "OK ${BugNumber} : CPU user time is good" -} else { - puts "Faulty ${BugNumber} : CPU user time is wrong" -} - - -set only_screen 0 diff --git a/tests/bugs/moddata/bug217 b/tests/bugs/moddata/bug217 deleted file mode 100755 index 301eceda1c..0000000000 --- a/tests/bugs/moddata/bug217 +++ /dev/null @@ -1,17 +0,0 @@ - -puts "========" -puts "OCC217" -puts "========" - -########################################## -##nurbsconvert problem -########################################## - -box b -5 -5 -5 10 10 10 -psphere s 6 - -bfuse result s b -checkshape result - -set square 618.85 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug21858 b/tests/bugs/moddata/bug21858 deleted file mode 100755 index e9a8b9e0aa..0000000000 --- a/tests/bugs/moddata/bug21858 +++ /dev/null @@ -1,50 +0,0 @@ -puts "============" -puts "OCC21858" -puts "============" -puts "" -#################################### -# Visualization hangs on this face ( OCC21858.brep ) -#################################### - -set BugNumber OCC21858 -cpulimit 40 -restore [locate_data_file OCC21858.brep] result - -set length 6.48642 - -set nb_v_good 9 -set nb_e_good 10 -set nb_w_good 1 -set nb_f_good 1 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 21 - -set only_screen 0 - -vinit -vsetdispmode 1 -dchrono TestTimer reset -dchrono TestTimer start -vdisplay result -dchrono TestTimer stop -vfit -puts "" -set time_o 0.1 -set tim [ dchrono TestTimer show ] -regexp {Elapsed time: +([-0-9.+eE]+) Hours +([-0-9.+eE]+) Minutes +([-0-9.+eE]+) Seconds} $tim full hourVDisplay minuVDisplay secoVDisplay - -set timVDisplay [expr $hourVDisplay * 3600 + $minuVDisplay * 60 + $secoVDisplay ] - -if { ${tim} < ${time_o} } { - set chro "CHRONO : Faulty (${timVDisplay}%)" - set status 1 - puts ${chro} -} else { - puts "${BugNumber} OK" - set status 0 -} -puts "timVDisplay = ${timVDisplay}" - diff --git a/tests/bugs/moddata/bug22039 b/tests/bugs/moddata/bug22039 deleted file mode 100755 index 39fe570849..0000000000 --- a/tests/bugs/moddata/bug22039 +++ /dev/null @@ -1,46 +0,0 @@ -pload QAcommands - -puts "================" -puts "OCC22039" -puts "================" -puts "" -####################################################################################### -# Incorrect interactive detection (highlights) of elements -###################################################################################### - -set BugNumber OCC22039 - -restore [locate_data_file OCC12121-CrankArm.brep] result - -vinit -vsetdispmode 1 -vdisplay result -vfit - -set x1 101 -set y1 199 -set Color [QAGetPixelColor ${x1} ${y1}] - -vmoveto ${x1} ${y1} -set ColorMove [QAGetPixelColor ${x1} ${y1}] - -vselect ${x1} ${y1} -set ColorSelect [QAGetPixelColor ${x1} ${y1}] - -set Color_Status 0 -if { ${Color} != ${ColorMove} && ${Color} != ${ColorSelect} && ${ColorMove} != ${ColorSelect} } { - set Color_Status 0 -} else { - set Color_Status 1 -} - -# Resume -puts "" -if { ${Color_Status} != 0} { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -set square 24859.6 -set only_screen 1 diff --git a/tests/bugs/moddata/bug22043 b/tests/bugs/moddata/bug22043 deleted file mode 100755 index 67764cc1f2..0000000000 --- a/tests/bugs/moddata/bug22043 +++ /dev/null @@ -1,25 +0,0 @@ -puts "============" -puts "OCC22043" -puts "============" -puts "" -####################################################################### -# Checkshape command does not return faulty shapes for the face. CAS63-sp10-*. Appendix to SALOME bug 002019 -####################################################################### - -set BugNumber OCC22043 - -puts "Load shape ..." -restore [locate_data_file bug22043_f181.brep] result - -decho off -set che [checkshape result] -decho on - -if {[regexp {Faulty} $che]} { - puts "OK ${BugNumber} : The face f181 can not be valid because at least it contain self-intersected wire" -} else { - puts "Faulty ${BugNumber} : The face f181 can not be valid because at least it contain self-intersected wire" -} - - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug22080 b/tests/bugs/moddata/bug22080 deleted file mode 100755 index bdf9f890fe..0000000000 --- a/tests/bugs/moddata/bug22080 +++ /dev/null @@ -1,26 +0,0 @@ -puts "TODO OCC11111 ALL: Faulty OCC22080 : The face f contains degenerated edge that is far-fetched one" - -puts "============" -puts "OCC22080" -puts "============" -puts "" -####################################################################### -# Checkshape command does not return faulty shapes for the face. CAS63-sp10-*. Appendix to SALOME bug IPAL22072 -####################################################################### - -set BugNumber OCC22080 - -puts "Load shape ..." -restore [locate_data_file bug22080_fx.brep] result - -decho off -set che [checkshape result] -decho on - -if {[regexp {Faulty} $che]} { - puts "OK ${BugNumber} : The face f contains degenerated edge that is far-fetched one" -} else { - puts "Faulty ${BugNumber} : The face f contains degenerated edge that is far-fetched one" -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug22194 b/tests/bugs/moddata/bug22194 deleted file mode 100755 index d767394eab..0000000000 --- a/tests/bugs/moddata/bug22194 +++ /dev/null @@ -1,25 +0,0 @@ -puts "TODO ?OCC12345 ALL: An exception was caught" -puts "TODO ?OCC12345 ALL: \\*\\* Exception \\*\\*.*" -puts "TODO ?OCC12345 ALL: TEST INCOMPLETE" -puts "============" -puts "OCC22194" -puts "============" -puts "" -####################################################################### -# Exception in LocOpe_SplitShape algoritm -####################################################################### - -# TEMPORARY TEST! NO COMPLITED!!!!! - -set BugNumber OCC22194 - -restore [locate_data_file OCC22194-sh.brep] s -restore [locate_data_file OCC22194-pl.brep] pl -section r s pl -explode r -explode s F -splitshape result s s_1 r_1 s_5 r_2 s_13 r_3 s_22 r_4 s_31 r_5 s_39 r_6 s_46 r_7 s_51 r_8 s_68 r_9 s_90 r_10 s_112 r_11 s_133 r_12 s_143 r_13 s_146 r_14 s_151 r_15 s_161 r_16 s_176 r_17 s_183 r_18 s_201 r_19 s_213 r_20 s_213 r_21 s_235 r_22 s_257 r_23 s_270 r_24 s_285 r_25 s_300 r_26 s_314 r_27 -set square 24549.6 -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug22241 b/tests/bugs/moddata/bug22241 deleted file mode 100755 index 13cac44f32..0000000000 --- a/tests/bugs/moddata/bug22241 +++ /dev/null @@ -1,51 +0,0 @@ -puts "========" -puts "OCC22241" -puts "========" -puts "" -########################################################### -# The bug is appendix to the Salome Bug 0021148 -########################################################### - -set BugNumber OCC22241 - -restore [locate_data_file bug22241_c1.draw] c1 -restore [locate_data_file bug22241_c2.draw] c2 - -set extrema_res [extrema c1 c2] -set extrema_length [llength ${extrema_res} ] - -if {${extrema_length} < 8 } { - puts "${BugNumber}: Faulty" -} else { - regexp {Extrema 1 is point : +([-0-9.+eE]+) +([-0-9.+eE]+) +([-0-9.+eE]+)} $extrema_res full X Y Z - set good_X 1 - set good_Y 3.0891916307971289e-33 - set good_Z 0.059999999999999998 - - set percent_max 0.1 - -proc GetPercent {Value GoodValue} { - set Percent 0. - if {${GoodValue} != 0.} { - set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] - } elseif {${Value} != 0.} { - set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] - } else { - set Percent 0. - } - return ${Percent} -} - set X_percent [GetPercent ${X} ${good_X}] - set Y_percent [GetPercent ${Y} ${good_Y}] - set Z_percent [GetPercent ${Z} ${good_Z}] - - if {${X_percent} > ${percent_max} || ${Y_percent} > ${percent_max} || ${Z_percent} > ${percent_max}} { - puts "X = ${X} Y = ${Y} Z = ${Z}" - puts "X_percent = ${X_percent} Y_percent = ${Y_percent} Z_percent = ${Z_percent}" - puts "${BugNumber}: Faulty" - } else { - puts "${BugNumber}: OK" - } - -} - diff --git a/tests/bugs/moddata/bug22296 b/tests/bugs/moddata/bug22296 deleted file mode 100755 index 8a4cf3d154..0000000000 --- a/tests/bugs/moddata/bug22296 +++ /dev/null @@ -1,60 +0,0 @@ -puts "============" -puts "OCC22296" -puts "============" -puts "" -####################################################################### -# The algorithm BRepSweep_MakeRevol produce non-licit toroidal based face. -# Appendix to the SALOME bug: IPAL22181 -####################################################################### - -set BugNumber OCC22296 - -restore [locate_data_file bug22296_ring.brep] b1 -revol r b1 0.6 3 0 0 0 1 -90 - -set E_Length [explode r f] - -if { ${E_Length} < 6} { - puts "Bad format of explode draw-command" - puts "Faulty ${BugNumber}" -} else { - - copy r_2 f - - set good_umin 0 - set good_umax 6.28319 - set good_vmin 0 - set good_vmax 6.28319 - - set xlist [xbounds f] - set umin [lindex $xlist 0] - set umax [lindex $xlist 1] - set vmin [lindex $xlist 2] - set vmax [lindex $xlist 3] - - set bad_bound 0 - if {${umin} < ${good_umin}} { - puts "umin: ${umin} is wrong" - set bad_bound[expr ${bad_bound} + 1] - } - if {${umax} > ${good_umax}} { - puts "umax: ${umax} is wrong" - set bad_bound [expr ${bad_bound} + 10] - } - if {${vmin} < ${good_vmin}} { - puts "vmin: ${vmin} is wrong" - set bad_bound [expr ${bad_bound} + 100] - } - if {${vmax} > ${good_vmax}} { - puts "vmax: ${vmax} is wrong" - set bad_bound [expr ${bad_bound} + 1000] - } - - if {${bad_bound} > 0 } { - puts "${BugNumber}: Faulty" - } else { - puts "OK ${BugNumber}" - } - -} - diff --git a/tests/bugs/moddata/bug22303 b/tests/bugs/moddata/bug22303 deleted file mode 100755 index 49f865b87d..0000000000 --- a/tests/bugs/moddata/bug22303 +++ /dev/null @@ -1,31 +0,0 @@ -puts "========================" -puts "OCC22303" -puts "========================" -puts "" -####################################################################### -# The algorithm BRepExtrema_DistShapeShape crashes with exception if one of the shapes does non contain vertices -####################################################################### - -set BugNumber OCC22303 - -line ll 0 20 0 1 0 0 -mkedge ee ll -psphere ss 10 - -distmini dd ee ss -puts "Distance=[dval dd_val]" - -if [expr [dval dd_val] - 10. > 1.e-3 ] { - set status 1 -} else { - set status 0 -} - -# Resume -puts "" -if { ${status} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - diff --git a/tests/bugs/moddata/bug22459 b/tests/bugs/moddata/bug22459 deleted file mode 100755 index 7d4bb7d8d9..0000000000 --- a/tests/bugs/moddata/bug22459 +++ /dev/null @@ -1,32 +0,0 @@ -puts "============" -puts "OCC22459" -puts "============" -####################################################################### -# The ImportExport sample crash -####################################################################### - -catch { pload XDE } - -set BugNumber OCC22459 - -stepread [locate_data_file OCC22459-TEST2.stp] result * - -set exception_status 0 -set msg [ tpstat c ] -set index [ lsearch $msg Exeption ] - -if {$index > -1} { - set exception_status 1 -} - -if { ${exception_status} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -set 2dviewer 0 - - - - diff --git a/tests/bugs/moddata/bug22489_1 b/tests/bugs/moddata/bug22489_1 deleted file mode 100755 index e498532566..0000000000 --- a/tests/bugs/moddata/bug22489_1 +++ /dev/null @@ -1,27 +0,0 @@ -puts "================" -puts "OCC22489" -puts "================" -puts "" -####################################################################### -# BRepClass3d_SolidClassifier::PerformInfinitePoint() gives wrong result on the given solid -####################################################################### - -set BugNumber OCC22489 - -restore [locate_data_file bug22489_Solid_2.brep] b - -point p 1000 1000 1000 - -set res [split [bclassify b p] ] - -set ll [llength ${res}] -if {${ll} < 4} { - puts "Bad format of bclassify draw-command; Faulty ${BugNumber}" -} else { - if {[regexp {The point is OUT of shape} $res]} { - puts "OK ${BugNumber}" - } else { - puts "Faulty ${BugNumber}" - } -} - diff --git a/tests/bugs/moddata/bug22489_2 b/tests/bugs/moddata/bug22489_2 deleted file mode 100755 index bd36e8cb2a..0000000000 --- a/tests/bugs/moddata/bug22489_2 +++ /dev/null @@ -1,29 +0,0 @@ -puts "================" -puts "OCC22489" -puts "================" -puts "" -####################################################################### -# BRepClass3d_SolidClassifier::PerformInfinitePoint() gives wrong result on the given solid -####################################################################### - -set BugNumber OCC22489 - -restore [locate_data_file bug22489_sew1.brep] s - -mksol b s - -point p 1000 1000 1000 - -set res [split [bclassify b p] ] - -set ll [llength ${res}] -if {$ll < 4} { - puts "Bad format of bclassify draw-command; Faulty ${BugNumber}" -} else { - if {[regexp {The point is OUT of shape} $res]} { - puts "OK ${BugNumber}" - } else { - puts "Faulty ${BugNumber}" - } -} - diff --git a/tests/bugs/moddata/bug22494 b/tests/bugs/moddata/bug22494 deleted file mode 100755 index bd56b21381..0000000000 --- a/tests/bugs/moddata/bug22494 +++ /dev/null @@ -1,27 +0,0 @@ -puts "================" -puts "OCC22494" -puts "================" -puts "" -####################################################################### -# BRepClass_FaceClassifier bug (ref SALOME issue 21185) -####################################################################### - -set BugNumber OCC22494 - -restore [locate_data_file bug22494_Pb_belogToGeom_FACE.brep] Face - -point p -3.53254182396379145e-05 0.000877856930738714065 - -set res [split [b2dclassify Face p] ] - -set ll [llength ${res}] -if {${ll} < 4} { - puts "Bad format of bclassify draw-command; Faulty ${BugNumber}" -} else { - if {[regexp {The point is ON shape} $res]} { - puts "OK ${BugNumber}" - } else { - puts "Faulty ${BugNumber}" - } -} - diff --git a/tests/bugs/moddata/bug22529 b/tests/bugs/moddata/bug22529 deleted file mode 100755 index c465974526..0000000000 --- a/tests/bugs/moddata/bug22529 +++ /dev/null @@ -1,18 +0,0 @@ -puts "========" -puts "OCC22529" -puts "========" -puts "" -########################################################### -# FitALL works incorrectly for small flat shapes -########################################################### - -set BugNumber OCC22529 - -restore [locate_data_file OCC22529.brep] result - -vinit -vdisplay result -vfit - -set length 0.04 -set only_screen 1 diff --git a/tests/bugs/moddata/bug22554_1 b/tests/bugs/moddata/bug22554_1 deleted file mode 100755 index f2907cb080..0000000000 --- a/tests/bugs/moddata/bug22554_1 +++ /dev/null @@ -1,22 +0,0 @@ -puts "============" -puts "OCC22554" -puts "============" -puts "" -####################################################################### -# Application hangs on selection -####################################################################### - -set BugNumber OCC22554 - -vinit -vpoint p1 0 0 0 -vpoint p2 5 5 0 -vpoint p3 10 0 0 -vcircle result p1 p2 p3 0 -verase p1 p2 p3 -vfit - -puts "OK ${BugNumber}" - -set only_screen 1 - diff --git a/tests/bugs/moddata/bug22554_2 b/tests/bugs/moddata/bug22554_2 deleted file mode 100755 index e42bbf0926..0000000000 --- a/tests/bugs/moddata/bug22554_2 +++ /dev/null @@ -1,21 +0,0 @@ -puts "============" -puts "OCC22554" -puts "============" -puts "" -####################################################################### -# Application hangs on selection -####################################################################### - -set BugNumber OCC22554 - -vinit -vpoint p1 0 0 0 -vpoint p2 30 0 0 -vpoint p3 30 30 0 -vplane result p1 p2 p3 -verase p1 p2 p3 -vfit - -puts "OK ${BugNumber}" - -set only_screen 1 diff --git a/tests/bugs/moddata/bug22554_3 b/tests/bugs/moddata/bug22554_3 deleted file mode 100755 index a3e7825abc..0000000000 --- a/tests/bugs/moddata/bug22554_3 +++ /dev/null @@ -1,21 +0,0 @@ -puts "============" -puts "OCC22554" -puts "============" -puts "" -####################################################################### -# Application hangs on selection -####################################################################### - -set BugNumber OCC22554 - -vinit -vpoint p1 0 0 0 -vpoint p2 50 0 0 -vpoint p3 25 40 0 -vtriangle result p1 p2 p3 -verase p1 p2 p3 -vfit - -puts "OK ${BugNumber}" - -set only_screen 1 diff --git a/tests/bugs/moddata/bug22554_4 b/tests/bugs/moddata/bug22554_4 deleted file mode 100755 index 11427172fd..0000000000 --- a/tests/bugs/moddata/bug22554_4 +++ /dev/null @@ -1,20 +0,0 @@ -puts "============" -puts "OCC22554" -puts "============" -puts "" -####################################################################### -# Application hangs on selection -####################################################################### - -set BugNumber OCC22554 - -vinit -vpoint p1 0 0 0 -vpoint p2 50 0 0 -vsegment segment p1 p2 -verase p1 p2 -vfit - -puts "OK ${BugNumber}" - -set only_screen 1 diff --git a/tests/bugs/moddata/bug22623 b/tests/bugs/moddata/bug22623 deleted file mode 100755 index a2a9aae71c..0000000000 --- a/tests/bugs/moddata/bug22623 +++ /dev/null @@ -1,44 +0,0 @@ -puts "============" -puts "OCC22623" -puts "============" -puts "" -puts "ATTENTION! TEST IN DEBUG MODE!" -puts "" -####################################################################### -# Use of uninitializaed variables in HLRBRep_Curve::UpdateMinMax in debug mode -####################################################################### - -catch { pload XDE } - -set BugNumber OCC22623 - -stepread [locate_data_file OCC22623-fg5test.step] a * - -# Axes for a_3 only -hprj p1 -166.887936587259 -524.121423723229 -3.52089319794717 0. 0. 1. 1. 0. 0. - -# Axes for complete assembly -compound a_1 a_2 a_3 a_4 a_5 a -houtl o1 a_3 -hfill o1 p1 0 -hload o1 -hsetprj p1 -hupdate - -set exception_status 0 -set r [hhide] -set index [lsearch $r exception] -if {$index > -1} { - set exception_status 1 -} - -hres2d - -# Resume -puts "" -if { ${exception_status} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - diff --git a/tests/bugs/moddata/bug22694 b/tests/bugs/moddata/bug22694 deleted file mode 100755 index deae6f1742..0000000000 --- a/tests/bugs/moddata/bug22694 +++ /dev/null @@ -1,48 +0,0 @@ -puts "===========" -puts "OCC22694" -puts "===========" -###################################################### -# Wrong result obntained after GeomLib::ExtendSurfByLength -###################################################### - -set BugNumber OCC22694 - -catch {pload DCAF} -catch {pload XDE} - -# Create a new document and set UndoLimit -NewDocument D -UndoLimit D 100 - -# Open a transaction -NewCommand D - -ReadStep D [locate_data_file OCC22694-rationalSurface.stp] - -XGetShape sh D 0:1:1:1 - -explode sh F -mksurface ss sh_1 -extendsurf ss 10 2 U -mkface result ss - -vdisplay sh_1 -vdisplay result - -vsetdispmode 1 -vfit - -set square 76338.8 - -set nb_v_good 4 -set nb_e_good 4 -set nb_w_good 1 -set nb_f_good 1 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 0 -set nb_shape_good 10 - -set 2dviewer 1 - diff --git a/tests/bugs/moddata/bug22703 b/tests/bugs/moddata/bug22703 deleted file mode 100755 index c954d507d9..0000000000 --- a/tests/bugs/moddata/bug22703 +++ /dev/null @@ -1,26 +0,0 @@ -puts "===========" -puts "OCC22703" -puts "===========" -puts "" -####################################################################### -# Exception in bop command for the specified shapes -####################################################################### - -set BugNumber OCC22703 - -puts "Load first shape ..." -restore [locate_data_file OCC22703-faceAC.brep] b1 - -puts "Load second shape ..." -restore [locate_data_file OCC22703-pln.brep] b2 - -puts "Prepare boolean operation ..." - -if [catch { bop b1 b2 } catch_result] { - puts "Faulty ${BugNumber}" -} else { - puts "${BugNumber} OK" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug22720 b/tests/bugs/moddata/bug22720 deleted file mode 100755 index 919f4aef4e..0000000000 --- a/tests/bugs/moddata/bug22720 +++ /dev/null @@ -1,20 +0,0 @@ -puts "============" -puts "OCC22720" -puts "============" -puts "" -####################################################################### -# Wrong intersection point for the case of intersection between sphere and plane -####################################################################### - -set BugNumber OCC22720 - -restore [locate_data_file OCC22720-f1.brep] f1 -restore [locate_data_file OCC22720-f2.brep] f2 - -mksurface s1 f1 -mksurface s2 f2 - -trim s1t s1 0 2 0 2 -intersect result s1t s2 - -set 3dviewer 0 diff --git a/tests/bugs/moddata/bug22723 b/tests/bugs/moddata/bug22723 deleted file mode 100755 index cc02453aba..0000000000 --- a/tests/bugs/moddata/bug22723 +++ /dev/null @@ -1,32 +0,0 @@ -puts "============" -puts "OCC22723" -puts "============" -puts "" -####################################################################### -# Wrong intersection curve for the case of intersection between cylinder and plane -####################################################################### - -set BugNumber OCC22723 - -restore [locate_data_file bug22723_fz44.brep] b1 -restore [locate_data_file bug22723_fz7.brep] b2 -mksurface s1 b1 -mksurface s2 b2 -intersect i s1 s2 - -regexp {Parameters : ([-0-9.+eE]+) ([-0-9.+eE]+)} [dump i] full a1 a2 -set status 0 - -if { ${a1}>=0 } { - if { ${a2}<6.29 } { - set status 1 - } -} - -if { ${status}==1 } { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} - -set 3dviewer 0 diff --git a/tests/bugs/moddata/bug22726 b/tests/bugs/moddata/bug22726 deleted file mode 100755 index af1463101a..0000000000 --- a/tests/bugs/moddata/bug22726 +++ /dev/null @@ -1,21 +0,0 @@ -puts "============" -puts "OCC22726" -puts "============" -puts "" -####################################################################### -# Exception on restoring shape -####################################################################### - -set BugNumber OCC22726 - -restore [locate_data_file OCC22726-b211.brep] result - -whatis result - -vinit -vdisplay result -vfit - -set square 812.984 -set 3dviewer 1 - diff --git a/tests/bugs/moddata/bug22733 b/tests/bugs/moddata/bug22733 deleted file mode 100755 index 916645b137..0000000000 --- a/tests/bugs/moddata/bug22733 +++ /dev/null @@ -1,27 +0,0 @@ -puts "========" -puts "OCC22733" -puts "========" -puts "" -########################################################### -# Empty result for the extrema between a circle and a line -########################################################### - -set BugNumber OCC22733 - -restore [locate_data_file bug22733_ez4.brep] ez4 -restore [locate_data_file bug22733_ez17.brep] ez17 - -mkcurve c4 ez4 -mkcurve c17 ez17 - -set extrema_res [extrema c4 c17] -set extrema_length [llength ${extrema_res} ] - -if {${extrema_length} != 1 } { - puts "${BugNumber}: Faulty" -} else { - puts "${BugNumber}: OK" -} - -set 3dviewer 0 - diff --git a/tests/bugs/moddata/bug22736 b/tests/bugs/moddata/bug22736 deleted file mode 100755 index f710e45c31..0000000000 --- a/tests/bugs/moddata/bug22736 +++ /dev/null @@ -1,31 +0,0 @@ -pload QAcommands - -puts "========" -puts "OCC22736" -puts "========" -puts "" -########################################################### -# Incorrect Transformation -########################################################### - -set BugNumber OCC22736 - -set X_mirrorFirstPoint 2.0 -set Y_mirrorFirstPoint 1.0 -set X_mirrorSecondPoint 3.0 -set Y_mirrorSecondPoint 1.0 -set X_p1 1.0 -set Y_p1 0.0 -set X_p2 1.0 -set Y_p2 2.0 -set result_info [OCC22736 ${X_mirrorFirstPoint} ${Y_mirrorFirstPoint} ${X_mirrorSecondPoint} ${Y_mirrorSecondPoint} ${X_p1} {$Y_p1} ${X_p2} ${Y_p2}] -regexp {Status = ([-0-9.+eE]+)} $result_info full status - -# Resume -puts "" -if { ${status} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - diff --git a/tests/bugs/moddata/bug22757 b/tests/bugs/moddata/bug22757 deleted file mode 100755 index 48fed27774..0000000000 --- a/tests/bugs/moddata/bug22757 +++ /dev/null @@ -1,23 +0,0 @@ -puts "================" -puts "OCC22757" -puts "================" -puts "" -####################################################################################### -# Exception in ShapeHealing -###################################################################################### - -set BugNumber OCC22757 - -catch {pload XDE} - -set status 0 -restore [locate_data_file BUC60887.brep] res -set TestVar [ catch {fixshape result res 0.01} ] - -if { ${TestVar} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -set 3dviewer 0 diff --git a/tests/bugs/moddata/bug22759 b/tests/bugs/moddata/bug22759 deleted file mode 100755 index abce98ab17..0000000000 --- a/tests/bugs/moddata/bug22759 +++ /dev/null @@ -1,104 +0,0 @@ -puts "TODO OCC11111 ALL: TEST INCOMPLETE" - -cpulimit 30 - -puts "============" -puts "OCC22759" -puts "============" -puts "" -####################################################################### -# Crash during shape visualization -####################################################################### - -set BugNumber OCC22759 - -catch { pload XDE } - -restore [locate_data_file OCC22759-weldt6.brep] result -checkshape result -tclean result - -set Deflection 0.001 -incmesh result ${Deflection} - -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -regexp {deflection +([-0-9.+eE]+)} $tri_info full defl - -set os "ALL" -if {[array get env os_type] != ""} { - set os $env(os_type) -} - -if { [regexp {Windows} $os ] } { - puts "OS = Windows NT" - set good_tri 248672 - set good_nod 127078 - set good_defl 0.0028424483708953232 -} else { - puts "OS = Linux" - set good_tri 248724 - set good_nod 127104 - set good_defl 0.0028424483709341111 -} - -proc GetPercent {Value GoodValue} { - set Percent 0. - if {${GoodValue} != 0.} { - set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] - } elseif {${Value} != 0.} { - set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] - } else { - set Percent 0. - } - return ${Percent} -} - -set percent_max 0.1 -set status 0 - -set triangle_percent [GetPercent ${tri} ${good_tri}] -puts "triangle_percent = ${triangle_percent}" -if { ${triangle_percent} > ${percent_max} } { - puts "triangle: Faulty ${BugNumber}" - set status 1 -} else { - puts "triangle: OK ${BugNumber}" -} - -set node_percent [GetPercent ${nod} ${good_nod}] -puts "node_percent = ${node_percent}" -if { ${node_percent} > ${percent_max} } { - puts "node: Faulty ${BugNumber}" - set status 1 -} else { - puts "node: OK ${BugNumber}" -} - -set deflection_percent [GetPercent ${defl} ${good_defl}] -puts "deflection_percent = ${deflection_percent}" -if { ${deflection_percent} > ${percent_max} } { - puts "deflection: Faulty ${BugNumber}" - set status 1 -} else { - puts "deflection: OK ${BugNumber}" -} - -# Resume -puts "" -if { ${status} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -vinit -vdisplay result -vfit - -vsetdispmode 1 - -set only_screen 1 -set square 0 diff --git a/tests/bugs/moddata/bug22761 b/tests/bugs/moddata/bug22761 deleted file mode 100755 index 3476f7aec1..0000000000 --- a/tests/bugs/moddata/bug22761 +++ /dev/null @@ -1,27 +0,0 @@ -puts "================" -puts "OCC22761" -puts "================" -puts "" -puts "ATTENTION! TEST IN DEBUG MODE!" -puts "" -####################################################################################### -# Exception in ModelingData in debug mode -####################################################################################### - -set BugNumber OCC22761 - -restore [locate_data_file OCC22761-TransmissionTestModel5-notfixed.brep] result - -set nb_v_good 2171 -set nb_e_good 1210 -set nb_w_good 226 -set nb_f_good 213 -set nb_sh_good 0 -set nb_sol_good 0 -set nb_compsol_good 0 -set nb_compound_good 1 -set nb_shape_good 3821 - -set length 217577 -set 3dviewer 0 - diff --git a/tests/bugs/moddata/bug22789 b/tests/bugs/moddata/bug22789 deleted file mode 100755 index 0f6bf7e0f8..0000000000 --- a/tests/bugs/moddata/bug22789 +++ /dev/null @@ -1,24 +0,0 @@ -puts "===========" -puts "OCC22789" -puts "===========" -puts "" -####################################################################### -# Exception in Encode regularity if edge has no pcurve -####################################################################### - -set BugNumber OCC22789 - -restore [locate_data_file OCC22789-cErr.brep] result - -if [catch { encoderegularity result } catch_result] { - puts "Faulty ${BugNumber}" -} else { - puts "${BugNumber} OK" -} - -vinit -vdisplay result -vfit - -set 3dviewer 1 - diff --git a/tests/bugs/moddata/bug227_1 b/tests/bugs/moddata/bug227_1 deleted file mode 100755 index fa5ae7e57a..0000000000 --- a/tests/bugs/moddata/bug227_1 +++ /dev/null @@ -1,25 +0,0 @@ - -puts "========" -puts "OCC227" -puts "(case 1)" -puts "========" - -############################################################## -##Incorrect result with missing faces after a fuse operation beetween the box and the wedge. -############################################################### - -restore [locate_data_file OCC227a.brep] a -fsameparameter a -updatetolerance a -checkshape a - -restore [locate_data_file OCC227b.brep] b -fsameparameter b -updatetolerance b -checkshape b - -bfuse result a b -checkshape result - -set square 1583.92 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug227_2 b/tests/bugs/moddata/bug227_2 deleted file mode 100755 index 0f7bfb19b0..0000000000 --- a/tests/bugs/moddata/bug227_2 +++ /dev/null @@ -1,25 +0,0 @@ - -puts "========" -puts "OCC227" -puts "(case 2)" -puts "========" - -############################################################## -##Incorrect result with missing faces after a fuse operation beetween the box and the wedge. -############################################################### - -restore [locate_data_file OCC227a.brep] a -fsameparameter a -updatetolerance a -checkshape a - -restore [locate_data_file OCC227b.brep] b -fsameparameter b -updatetolerance b -checkshape b - -bfuse result b a -checkshape result - -set square 1583.92 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug228 b/tests/bugs/moddata/bug228 deleted file mode 100755 index ea1a863db9..0000000000 --- a/tests/bugs/moddata/bug228 +++ /dev/null @@ -1,20 +0,0 @@ - -puts "================" -puts "OCC228" -puts "================" -puts "" -################################################ -## It's impossible to make common of the two shapes in the file attached. -################################################ - -cpulimit 4000 - -restore [locate_data_file OCC228.brep] a -explode a -checkshape a_1 -checkshape a_2 - -bcommon result a_1 a_2 - -set square 66231.3 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug22802 b/tests/bugs/moddata/bug22802 deleted file mode 100755 index bf4b864fc1..0000000000 --- a/tests/bugs/moddata/bug22802 +++ /dev/null @@ -1,71 +0,0 @@ -pload QAcommands - -puts "===========" -puts "OCC22802" -puts "===========" -puts "" -####################################################################### -# The memory alloccated with an excess is not released -####################################################################### - -set BugNumber OCC22802 - -set log [bcarray] - -# -#state before release the unused memory -#Length: 10 -#FactLength: 100000 -#BlockLength: 100000 -# -#state after release the unused memory -#Length: 10 -#FactLength: 10 -#BlockLength: 100000 -# - -set linelist [split $log "\n"] - -set il 0 -set ifl 0 -set ibl 0 - -set xl_0 0 -set xl_1 0 -set xfl_0 0 -set xfl_1 0 -set xbl_0 0 -set xbl_1 0 - -foreach line $linelist { - if { [regexp {^Length: ([-0-9.+eE]+)} $line full xl_$il] } { incr il } - if { [regexp {FactLength: ([-0-9.+eE]+)} $line full xfl_$ifl] } { incr ifl } - if { [regexp {BlockLength: ([-0-9.+eE]+)} $line full xbl_$ibl] } { incr ibl } -} - -set status 0 -if { ${xl_0} != 10} { - incr status -} -if { ${xfl_0} != 100000} { - incr status -} -if { ${xbl_0} != 100000} { - incr status -} -if { ${xl_1} != 10} { - incr status -} -if { ${xfl_1} != 10} { - incr status -} -if { ${xbl_1} != 100000} { - incr status -} - -if { ${status} != 0} { - puts "Faulty ${BugNumber}" -} else { - puts "${BugNumber} OK" -} - diff --git a/tests/bugs/moddata/bug22809_1 b/tests/bugs/moddata/bug22809_1 deleted file mode 100755 index cb1405e257..0000000000 --- a/tests/bugs/moddata/bug22809_1 +++ /dev/null @@ -1,165 +0,0 @@ -puts "============" -puts "OCC22809" -puts "============" -puts "" -############################################################################################################ -# BRepIntCS does not find intersections of an ellipsoid and a line passing through it's apex -########################################################################################################### -# -# Test was corrected. See: -# -# http://tracker.dev.opencascade.org/view.php?id=23248 -# pkv (developer) -# 2012-07-12 09:33 -# The checking can not provide stable result because there is no guarantee that coordinates -# for brics_1 will always be {x1, y1, z1} but not {x2, y2, z2} and -# for brics_42 will always be {x2, y2, z2} but not {x1, y1, z1}. -# The coordinates of brics_1 can be both {x1, y1, z1} and {x2, y2, z2} -# The coordinates of brics_42 can be both {x1, y1, z1} and {x2, y2, z2} -# -########################################################################################################### - -set BugNumber OCC22809 - -# -proc GetPercent {Value GoodValue} { - set Percent 0. - if {${GoodValue} != 0.} { - set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] - } elseif {${Value} != 0.} { - set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] - } else { - set Percent 0. - } - return ${Percent} -} -set percent_max 0.1 -# - -psphere a 100 -nurbsconvert r1 a -line l 0 0 -100 0 0 1 -BRepIntCS l r1 - -regexp {.* is a ([A-Za-z0-9]*)} [ whatis brics_1 ] full info1 - -# N.B. multiple result points are to be processed by other algorithms -# Now there are 241 result points -regexp {.* is a ([A-Za-z0-9]*)} [ whatis brics_2 ] full info2 -regexp {.* is a ([A-Za-z0-9]*)} [ whatis brics_41 ] full info2 - -set word1 [string compare $info1 "point"] -set word2 [string compare $info2 "point"] - -set status_point 0 - -puts "ski $word1" -puts "ski $word2" -if { ${word1} == 0 && ${word2} == 0 } { - set status_point 0 -} else { - set status_point 1 -} - -regexp {.* is a ([A-Za-z0-9]*)} [ whatis brics_3 ] full info3 -set word3 [string compare $info3 "a"] - -set status_nb 0 -if { ${word3} == 0 } { - set status_nb 0 -} else { - set status_nb 1 - # N.B. multiple result points are to be processed by other algorithms - set status_nb 0 -} - -set good_x1 0.000000000000000e+00 -set good_y1 0.000000000000000e+00 -set good_z1 -1.000000000000000e+02 - -set good_x2 0.000000000000000e+00 -set good_y2 0.000000000000000e+00 -set good_z2 1.000000000000000e+02 - -set dump1 [ dump brics_1 ] -regexp {Point : ([-0-9.+eE]+), ([-0-9.+eE]+), ([-0-9.+eE]+)} $dump1 full x1 y1 z1 - -set status_xyz1 0 -set x1_percent [GetPercent ${x1} ${good_x1}] -puts "x1_percent = ${x1_percent}" -if { ${x1_percent} > ${percent_max} } { - puts "x1: Faulty ${BugNumber}" - set status_xyz1 1 -} else { - puts "x1: OK ${BugNumber}" -} - -set y1_percent [GetPercent ${y1} ${good_y1}] -puts "y1_percent = ${y1_percent}" -if { ${y1_percent} > ${percent_max} } { - puts "y1: Faulty ${BugNumber}" - set status_xyz1 1 -} else { - puts "y1: OK ${BugNumber}" -} - -set z1_percent [GetPercent ${z1} ${good_z1}] -puts "z1_percent = ${z1_percent}" -if { ${z1_percent} > ${percent_max} } { - set z1_percent [GetPercent ${z1} ${good_z2}] - puts "z1_percent = ${z1_percent}" - if { ${z1_percent} > ${percent_max} } { - puts "z1: Faulty ${BugNumber}" - set status_xyz1 1 - } else { - puts "z1: OK ${BugNumber}" - } -} else { - puts "z1: OK ${BugNumber}" -} - -set dump2 [ dump brics_2 ] -# N.B. multiple result points are to be processed by other algorithms -set dump2 [ dump brics_41 ] -regexp {Point : ([-0-9.+eE]+), ([-0-9.+eE]+), ([-0-9.+eE]+)} $dump2 full x2 y2 z2 - -set status_xyz2 0 -set x2_percent [GetPercent ${x2} ${good_x2}] -puts "x2_percent = ${x2_percent}" -if { ${x2_percent} > ${percent_max} } { - puts "x2: Faulty ${BugNumber}" - set status_xyz2 1 -} else { - puts "x2: OK ${BugNumber}" -} - -set y2_percent [GetPercent ${y2} ${good_y2}] -puts "y2_percent = ${y2_percent}" -if { ${y2_percent} > ${percent_max} } { - puts "y2: Faulty ${BugNumber}" - set status_xyz2 1 -} else { - puts "y2: OK ${BugNumber}" -} - -set z2_percent [GetPercent ${z2} ${good_z2}] -puts "z2_percent = ${z2_percent}" -if { ${z2_percent} > ${percent_max} } { - set z2_percent [GetPercent ${z2} ${good_z1}] - puts "z2_percent = ${z2_percent}" - if { ${z2_percent} > ${percent_max} } { - puts "z2: Faulty ${BugNumber}" - set status_xyz2 1 - } else { - puts "z2: OK ${BugNumber}" - } -} else { - puts "z2: OK ${BugNumber}" -} - -if { ${status_point} == 0 && ${status_nb} == 0 && ${status_xyz1} == 0 && ${status_xyz2} == 0 } { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} - diff --git a/tests/bugs/moddata/bug22809_2 b/tests/bugs/moddata/bug22809_2 deleted file mode 100755 index 6cca8168d6..0000000000 --- a/tests/bugs/moddata/bug22809_2 +++ /dev/null @@ -1,164 +0,0 @@ -puts "============" -puts "OCC22809" -puts "============" -puts "" -############################################################################################################ -# BRepIntCS does not find intersections of an ellipsoid and a line passing through it's apex -########################################################################################################### -# -# Test was corrected. See: -# -# http://tracker.dev.opencascade.org/view.php?id=23248 -# pkv (developer) -# 2012-07-12 09:33 -# The checking can not provide stable result because there is no guarantee that coordinates -# for brics_1 will always be {x1, y1, z1} but not {x2, y2, z2} and -# for brics_42 will always be {x2, y2, z2} but not {x1, y1, z1}. -# The coordinates of brics_1 can be both {x1, y1, z1} and {x2, y2, z2} -# The coordinates of brics_42 can be both {x1, y1, z1} and {x2, y2, z2} -# -########################################################################################################### - -set BugNumber OCC22809 - -# -proc GetPercent {Value GoodValue} { - set Percent 0. - if {${GoodValue} != 0.} { - set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] - } elseif {${Value} != 0.} { - set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] - } else { - set Percent 0. - } - return ${Percent} -} -set percent_max 0.1 -# - -psphere a 100 -scalexyz r2 a 2 1 1 -line l 0 0 -100 0 0 1 -BRepIntCS l r2 - -regexp {.* is a ([A-Za-z0-9]*)} [ whatis brics_1 ] full info1 - -# N.B. multiple result points are to be processed by other algorithms -# Now there are 130 result points -regexp {.* is a ([A-Za-z0-9]*)} [ whatis brics_23 ] full info2 - -set word1 [string compare $info1 "point"] -set word2 [string compare $info2 "point"] - -set status_point 0 -if { ${word1} == 0 && ${word2} == 0 } { - set status_point 0 -} else { - set status_point 1 -} - -regexp {.* is a ([A-Za-z0-9]*)} [ whatis brics_3 ] full info3 -set word3 [string compare $info3 "a"] - -set status_nb 0 -if { ${word3} == 0 } { - set status_nb 0 -} else { - set status_nb 1 - # N.B. multiple result points are to be processed by other algorithms - set status_nb 0 -} - -set good_x1 0.000000000000000e+00 -set good_y1 0.000000000000000e+00 -set good_z1 -1.000000000000000e+02 - -set good_x2 0.000000000000000e+00 -set good_y2 0.000000000000000e+00 -set good_z2 1.000000000000000e+02 - -set dump1 [ dump brics_1 ] - -regexp {Point : ([-0-9.+eE]+), ([-0-9.+eE]+), ([-0-9.+eE]+)} $dump1 full x1 y1 z1 - -set status_xyz1 0 -set x1_percent [GetPercent ${x1} ${good_x1}] -puts "x1_percent = ${x1_percent}" -if { ${x1_percent} > ${percent_max} } { - puts "x1: Faulty ${BugNumber}" - set status_xyz1 1 -} else { - puts "x1: OK ${BugNumber}" -} - -set y1_percent [GetPercent ${y1} ${good_y1}] -puts "y1_percent = ${y1_percent}" -if { ${y1_percent} > ${percent_max} } { - puts "y1: Faulty ${BugNumber}" - set status_xyz1 1 -} else { - puts "y1: OK ${BugNumber}" -} - -set z1_percent [GetPercent ${z1} ${good_z1}] -puts "z1_percent = ${z1_percent}" -if { ${z1_percent} > ${percent_max} } { - set z1_percent [GetPercent ${z1} ${good_z2}] - puts "z1_percent = ${z1_percent}" - if { ${z1_percent} > ${percent_max} } { - puts "z1: Faulty ${BugNumber}" - set status_xyz1 1 - } else { - puts "z1: OK ${BugNumber}" - } -} else { - puts "z1: OK ${BugNumber}" -} - -set dump2 [ dump brics_2 ] -# N.B. multiple result points are to be processed by other algorithms -set dump2 [ dump brics_23 ] -regexp {Point : ([-0-9.+eE]+), ([-0-9.+eE]+), ([-0-9.+eE]+)} $dump2 full x2 y2 z2 - -set status_xyz2 0 -set x2_percent [GetPercent ${x2} ${good_x2}] -puts "x2_percent = ${x2_percent}" -if { ${x2_percent} > ${percent_max} } { - puts "x2: Faulty ${BugNumber}" - set status_xyz2 1 -} else { - puts "x2: OK ${BugNumber}" -} - -set y2_percent [GetPercent ${y2} ${good_y2}] -puts "y2_percent = ${y2_percent}" -if { ${y2_percent} > ${percent_max} } { - puts "y2: Faulty ${BugNumber}" - set status_xyz2 1 -} else { - puts "y2: OK ${BugNumber}" -} - -set z2_percent [GetPercent ${z2} ${good_z2}] -puts "z2_percent = ${z2_percent}" -if { ${z2_percent} > ${percent_max} } { - set z2_percent [GetPercent ${z2} ${good_z1}] - puts "z2_percent = ${z2_percent}" - if { ${z2_percent} > ${percent_max} } { - puts "z2: Faulty ${BugNumber}" - set status_xyz2 1 - } else { - puts "z2: OK ${BugNumber}" - } -} else { - puts "z2: OK ${BugNumber}" -} - -# Resume -puts "" -if { ${status_point} == 0 && ${status_nb} == 0 && ${status_xyz1} == 0 && ${status_xyz2} == 0 } { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} - diff --git a/tests/bugs/moddata/bug22809_3 b/tests/bugs/moddata/bug22809_3 deleted file mode 100755 index cb4698b3bc..0000000000 --- a/tests/bugs/moddata/bug22809_3 +++ /dev/null @@ -1,141 +0,0 @@ -puts "============" -puts "OCC22809" -puts "============" -puts "" -############################################################################################################ -# BRepIntCS does not find intersections of an ellipsoid and a line passing through it's apex -########################################################################################################### - -set BugNumber OCC22809 - -# -proc GetPercent {Value GoodValue} { - set Percent 0. - if {${GoodValue} != 0.} { - set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] - } elseif {${Value} != 0.} { - set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] - } else { - set Percent 0. - } - return ${Percent} -} - -set percent_max 0.1 -# - -psphere a 100 -nurbsconvert r1 a -line l -0.000001 0.0000000001 -100 0 0 1 -BRepIntCS l r1 - -regexp {.* is a ([A-Za-z0-9]*)} [ whatis brics_1] full info1 - -# N.B. multiple result points are to be processed by other algorithms -# Now there are 3 result points -regexp {.* is a ([A-Za-z0-9]*)} [ whatis brics_2 ] full info2 - -set word1 [string compare $info1 "point"] -set word2 [string compare $info2 "point"] - -set status_point 0 -if { ${word1} == 0 && ${word2} == 0 } { - set status_point 0 -} else { - set status_point 1 -} - -regexp {.* is a ([A-Za-z0-9]*)} [ whatis brics_3 ] full info3 -set word3 [string compare $info3 "a"] - -set status_nb 0 -if { ${word3} == 0 } { - set status_nb 0 -} else { - set status_nb 1 - # N.B. multiple result points are to be processed by other algorithms - set status_nb 0 -} - -set dump1 [ dump brics_1 ] - -regexp {Point : ([-0-9.+eE]+), ([-0-9.+eE]+), ([-0-9.+eE]+)} $dump1 full x1 y1 z1 - -set good_x1 -1.000000000000000e-06 -set good_y1 1.000000000000000e-10 -set good_z1 -1.000000000000000e+02 - -set status_xyz1 0 -set x1_percent [GetPercent ${x1} ${good_x1}] -puts "x1_percent = ${x1_percent}" -if { ${x1_percent} > ${percent_max} } { - puts "x1: Faulty ${BugNumber}" - set status_xyz1 1 -} else { - puts "x1: OK ${BugNumber}" -} - -set y1_percent [GetPercent ${y1} ${good_y1}] -puts "y1_percent = ${y1_percent}" -if { ${y1_percent} > ${percent_max} } { - puts "y1: Faulty ${BugNumber}" - set status_xyz1 1 -} else { - puts "y1: OK ${BugNumber}" -} - -set z1_percent [GetPercent ${z1} ${good_z1}] -puts "z1_percent = ${z1_percent}" -if { ${z1_percent} > ${percent_max} } { - puts "z1: Faulty ${BugNumber}" - set status_xyz1 1 -} else { - puts "z1: OK ${BugNumber}" -} - -set dump2 [ dump brics_2 ] -# N.B. multiple result points are to be processed by other algorithms -set dump2 [ dump brics_2 ] - -regexp {Point : ([-0-9.+eE]+), ([-0-9.+eE]+), ([-0-9.+eE]+)} $dump2 full x2 y2 z2 - -set good_x2 -1.000000000000000e-06 -set good_y2 1.000000000000000e-10 -set good_z2 1.000000000000000e+02 - -set status_xyz2 0 -set x2_percent [GetPercent ${x2} ${good_x2}] -puts "x2_percent = ${x2_percent}" -if { ${x2_percent} > ${percent_max} } { - puts "x2: Faulty ${BugNumber}" - set status_xyz2 1 -} else { - puts "x2: OK ${BugNumber}" -} - -set y2_percent [GetPercent ${y2} ${good_y2}] -puts "y2_percent = ${y2_percent}" -if { ${y2_percent} > ${percent_max} } { - puts "y2: Faulty ${BugNumber}" - set status_xyz2 1 -} else { - puts "y2: OK ${BugNumber}" -} - -set z2_percent [GetPercent ${z2} ${good_z2}] -puts "z2_percent = ${z2_percent}" -if { ${z2_percent} > ${percent_max} } { - puts "z2: Faulty ${BugNumber}" - set status_xyz2 1 -} else { - puts "z2: OK ${BugNumber}" -} - -# Resume -puts "" -if { ${status_point} == 0 && ${status_nb} == 0 && ${status_xyz1} == 0 && ${status_xyz2} == 0 } { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} - diff --git a/tests/bugs/moddata/bug22809_4 b/tests/bugs/moddata/bug22809_4 deleted file mode 100755 index 42b87433da..0000000000 --- a/tests/bugs/moddata/bug22809_4 +++ /dev/null @@ -1,143 +0,0 @@ -puts "============" -puts "OCC22809" -puts "============" -puts "" -############################################################################################################ -# BRepIntCS does not find intersections of an ellipsoid and a line passing through it's apex -########################################################################################################### - -set BugNumber OCC22809 - -# -proc GetPercent {Value GoodValue} { - set Percent 0. - if {${GoodValue} != 0.} { - set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] - } elseif {${Value} != 0.} { - set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] - } else { - set Percent 0. - } - return ${Percent} -} -set percent_max 0.1 -# - -psphere a 100 -scalexyz r2 a 2 1 1 -line l -0.000001 0.0000000001 -100 0 0 1 -BRepIntCS l r2 - -regexp {.* is a ([A-Za-z0-9]*)} [ whatis brics_1 ] full info1 - -# N.B. multiple result points are to be processed by other algorithms -# Now there are 2 result points -set info2 [ whatis brics_2 ] -set info2 [ whatis brics_2 ] -regexp {.* is a ([A-Za-z0-9]*)} [ whatis brics_2 ] full info2 - - -set word1 [string compare $info1 "point"] -set word2 [string compare $info2 "point"] - -set status_point 0 -if { ${word1} == 0 && ${word2} == 0 } { - set status_point 0 -} else { - set status_point 1 -} - -regexp {.* is a ([A-Za-z0-9]*)} [ whatis brics_3 ] full info3 -set word3 [string compare $info3 "a"] - -set status_nb 0 -if { ${word3} == 0 } { - set status_nb 0 -} else { - set status_nb 1 - # N.B. multiple result points are to be processed by other algorithms - set status_nb 0 -} - -set dump1 [ dump brics_1 ] - -regexp {Point : ([-0-9.+eE]+), ([-0-9.+eE]+), ([-0-9.+eE]+)} $dump1 full x1 y1 z1 - -set good_x1 -1.000000000000000e-06 -set good_y1 1.000000000000000e-10 -set good_z1 -1.000000000000000e+02 - -set status_xyz1 0 -set x1_percent [GetPercent ${x1} ${good_x1}] -puts "x1_percent = ${x1_percent}" -if { ${x1_percent} > ${percent_max} } { - puts "x1: Faulty ${BugNumber}" - set status_xyz1 1 -} else { - puts "x1: OK ${BugNumber}" -} - -set y1_percent [GetPercent ${y1} ${good_y1}] -puts "y1_percent = ${y1_percent}" -if { ${y1_percent} > ${percent_max} } { - puts "y1: Faulty ${BugNumber}" - set status_xyz1 1 -} else { - puts "y1: OK ${BugNumber}" -} - -set z1_percent [GetPercent ${z1} ${good_z1}] -puts "z1_percent = ${z1_percent}" -if { ${z1_percent} > ${percent_max} } { - puts "z1: Faulty ${BugNumber}" - set status_xyz1 1 -} else { - puts "z1: OK ${BugNumber}" -} - -set dump2 [ dump brics_2 ] -# N.B. multiple result points are to be processed by other algorithms -set dump2 [ dump brics_2 ] - -regexp {Point : ([-0-9.+eE]+), ([-0-9.+eE]+), ([-0-9.+eE]+)} $dump2 full x2 y2 z2 - -set good_x2 -1.000000000000000e-06 -set good_y2 1.000000000000000e-10 -set good_z2 1.000000000000000e+02 - -set status_xyz2 0 -set x2_percent [GetPercent ${x2} ${good_x2}] -puts "x2_percent = ${x2_percent}" -if { ${x2_percent} > ${percent_max} } { - puts "x2: Faulty ${BugNumber}" - set status_xyz2 1 -} else { - puts "x2: OK ${BugNumber}" -} - -set y2_percent [GetPercent ${y2} ${good_y2}] -puts "y2_percent = ${y2_percent}" -if { ${y2_percent} > ${percent_max} } { - puts "y2: Faulty ${BugNumber}" - set status_xyz2 1 -} else { - puts "y2: OK ${BugNumber}" -} - -set z2_percent [GetPercent ${z2} ${good_z2}] -puts "z2_percent = ${z2_percent}" -if { ${z2_percent} > ${percent_max} } { - puts "z2: Faulty ${BugNumber}" - set status_xyz2 1 -} else { - puts "z2: OK ${BugNumber}" -} - -# Resume -puts "" -if { ${status_point} == 0 && ${status_nb} == 0 && ${status_xyz1} == 0 && ${status_xyz2} == 0 } { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} - diff --git a/tests/bugs/moddata/bug22851 b/tests/bugs/moddata/bug22851 deleted file mode 100755 index a02d0d1894..0000000000 --- a/tests/bugs/moddata/bug22851 +++ /dev/null @@ -1,29 +0,0 @@ -puts "============" -puts "OCC22851" -puts "============" -puts "" -####################################################################### -# No intersection curve between two surfaces -####################################################################### - -set BugNumber OCC22851 - -restore [locate_data_file bug22851_fz1.brep] b1 -restore [locate_data_file bug22851_fz8.brep] b2 -mksurface s1 b1 -mksurface s2 b2 -intersect i s1 s2 - -set dump_info [dump i] - -set lst [split ${dump_info}] -set dump_length [llength $lst] - -set find_BSCurve [regexp {BSplineCurve} $dump_info] -set find_Degree_Poles_Knots [regexp {Degree +[-0-9.+eE]+, +[-0-9.+eE]+ +Poles, +[-0-9.+eE]+ +Knots} $dump_info] - -if { $dump_length == 0 && !$find_BSCurve && !$find_Degree_Poles_Knots } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} \ No newline at end of file diff --git a/tests/bugs/moddata/bug22907 b/tests/bugs/moddata/bug22907 deleted file mode 100755 index 5358c4af86..0000000000 --- a/tests/bugs/moddata/bug22907 +++ /dev/null @@ -1,50 +0,0 @@ -puts "========================" -puts "OCC22907" -puts "========================" -puts "" -####################################################################### -# The function 'distmini' produces wrong result. -####################################################################### - -set BugNumber OCC22907 - -###rename to bug22907_e.brep -restore [locate_data_file bug22907_e.brep] b2 -vertex b1 -15.652187256227142 3.2012899919486513 9.9763479999999998 - -distmini d b1 b2 -puts "Distance=[dval d_val]" - -set Good_Distance 0 - -regexp {Vertex *: Min [-0-9.+eE]+ *Max *([-0-9.+eE]+)} [maxtolerance b1] full tol1 -regexp {Edge *: Min [-0-9.+eE]+ *Max *([-0-9.+eE]+)} [maxtolerance b2] full tol2 -regexp {Vertex *: Min [-0-9.+eE]+ *Max *([-0-9.+eE]+)} [maxtolerance b2] full tol3 - -set max_tolerance ${tol1} -if { ${tol2} > ${max_tolerance} } { - set max_tolerance ${tol2} -} -if { ${tol3} > ${max_tolerance} } { - set max_tolerance ${tol3} -} -puts "max_tolerance=${max_tolerance}" - -if [expr abs( [dval d_val] - ${Good_Distance}) > ${max_tolerance}] { - set status 1 -} else { - set status 0 -} - -# Resume -puts "" -if { ${status} == 1 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} -vinit -vdisplay b1 b2 -vfit - -set only_screen 0 diff --git a/tests/bugs/moddata/bug22910_1 b/tests/bugs/moddata/bug22910_1 deleted file mode 100755 index 0d4212e8e0..0000000000 --- a/tests/bugs/moddata/bug22910_1 +++ /dev/null @@ -1,27 +0,0 @@ -puts "TODO OCC11111 ALL: An exception was caught" -puts "TODO OCC11111 ALL: Exception" -puts "TODO OCC11111 ALL: Faulty OCC22910" - -puts "================" -puts "OCC22910" -puts "================" -puts "" -####################################################################################### -# Failure to compute iso-line for NURBS surface -###################################################################################### - -set BugNumber OCC22910 - -catch { pload MODELING } - -restore [locate_data_file s.rle] result -set exception_status [ catch { uiso u result 0.5 } ] - -if { ${exception_status} == 0 } { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} - -set sqaure 0 -set 3dviewer 0 diff --git a/tests/bugs/moddata/bug22910_2 b/tests/bugs/moddata/bug22910_2 deleted file mode 100755 index b95443b5b5..0000000000 --- a/tests/bugs/moddata/bug22910_2 +++ /dev/null @@ -1,22 +0,0 @@ -puts "================" -puts "OCC22910" -puts "================" -puts "" -####################################################################################### -# Failure to compute iso-line for NURBS surface -###################################################################################### - -set BugNumber OCC22910 - -restore [locate_data_file s.rle] s -mkface result s -set exception_status [ catch { incmesh result 0.0038476968063336017 } ] - -if { ${exception_status} == 0 } { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} - -set square 0.110535 -set 3dviewer 0 diff --git a/tests/bugs/moddata/bug22923 b/tests/bugs/moddata/bug22923 deleted file mode 100755 index 024e57118b..0000000000 --- a/tests/bugs/moddata/bug22923 +++ /dev/null @@ -1,28 +0,0 @@ -puts "============" -puts "OCC22923" -puts "============" -####################################################################### -# The command "intersect" throws an exception -####################################################################### - -set BugNumber OCC22923 - -restore [locate_data_file bug22923_Face-2_7.brep] b1 -restore [locate_data_file bug22923_Face-7_0.brep] b2 - -set exception_status 0 - -mksurface s1 b1 -mksurface s2 b2 - -set msg [ intersect i s1 s2 ] -set index [ lsearch $msg Exception ] - -if {$index > -1} { - set exception_status 1 } - -if { ${exception_status} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} diff --git a/tests/bugs/moddata/bug22989 b/tests/bugs/moddata/bug22989 deleted file mode 100755 index 1a97a44503..0000000000 --- a/tests/bugs/moddata/bug22989 +++ /dev/null @@ -1,16 +0,0 @@ -puts "================" -puts "OCC22989" -puts "================" -puts "" -####################################################################################### -# BSplCLib::Reparametrize() fails on near knots -###################################################################################### - -set BugNumber OCC22989 - -restore [locate_data_file OCC22989-edge-nosameparameter.brep] result - -sameparameter result - -set length 85.0797 -set 3dviewer 0 diff --git a/tests/bugs/moddata/bug22993 b/tests/bugs/moddata/bug22993 deleted file mode 100755 index 6ad60e9a94..0000000000 --- a/tests/bugs/moddata/bug22993 +++ /dev/null @@ -1,17 +0,0 @@ -puts "TODO OCC11111 ALL: StepFile Error" -puts "===========" -puts "OCC22993" -puts "===========" -###################################################### -# Crash during reading STEP file -###################################################### - -set BugNumber OCC22993 - -catch { pload XDE } - -stepread [locate_data_file OCC22993-23-9421-42601.stp] result * - -set 3viewer 0 - - diff --git a/tests/bugs/moddata/bug23092 b/tests/bugs/moddata/bug23092 deleted file mode 100755 index 74ac26e8b3..0000000000 --- a/tests/bugs/moddata/bug23092 +++ /dev/null @@ -1,28 +0,0 @@ -puts "================" -puts "OCC23092" -puts "================" -puts "" -################################################################################################### -# Error in BRepProj_Projection algorithm: some edges of resulting projected wire are duplicated -################################################################################################### - -set BugNumber OCC23092 - -restore [locate_data_file OCC23092-bal8h.brep] h -restore [locate_data_file OCC23092-bal8s.brep] s -set info1 [ prj r s h 0 0 1 ] -set word1 [string compare [lindex ${info1} end] "r_1"] -don r_1 r_2 -explode r_1 E -explode r_2 V -set info2 [ don r_1_10 r_2_1 r_2_2 ] -set word2 [string compare [lindex ${info2} end] "r_1_10"] - -# Resume -puts "" -if { ${word1} == 0 && ${word2} == 0 } { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} - diff --git a/tests/bugs/moddata/bug231 b/tests/bugs/moddata/bug231 deleted file mode 100755 index 4904822b5d..0000000000 --- a/tests/bugs/moddata/bug231 +++ /dev/null @@ -1,25 +0,0 @@ -puts "========" -puts "OCC231" -puts "========" -puts "" - -############################################# -##Uncorrect work DRAW command "proj" in version dev -## and receive such result: -## in dev : ext_1 ext_2 ext_3 -## in C40 : ext_1 ext_2 ext_3 ext_4 -############################################# - -restore [locate_data_file OCC231.draw] result - -set str [proj result 1751.38 614.152 -180.331] -set err [llength $str] - -if { $err < 4 } { - puts "Faulty OCC231: Projection was made wrongly" -} else { - puts "OCC231 OK: Projection was made properly" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug23139 b/tests/bugs/moddata/bug23139 deleted file mode 100755 index 72ddce67ef..0000000000 --- a/tests/bugs/moddata/bug23139 +++ /dev/null @@ -1,27 +0,0 @@ -puts "================" -puts "OCC23139" -puts "================" -puts "" -######################################################################################################## -# BRepFilletAPI_MakeFillet algorithm builds edges with wrong first and last parameters: out of pcurve -######################################################################################################## - -set BugNumber OCC23139 - -### rename to bug23139_aShape_for_fillet.brep -restore [locate_data_file bug23139_aShape_for_fillet.brep] b -explode b e -donly b b_6 -blend result b 20 b_6 -explode result f -#av2d -set exception_status [ catch { pcurve result_1 } ] - -if { ${exception_status} == 0 } { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} - -set 2dviewer 0 -set length 5558.88 diff --git a/tests/bugs/moddata/bug23152 b/tests/bugs/moddata/bug23152 deleted file mode 100755 index 8e36e8ebed..0000000000 --- a/tests/bugs/moddata/bug23152 +++ /dev/null @@ -1,53 +0,0 @@ -puts "===========" -puts "OCC23152" -puts "===========" -###################################################### -# Possibility to have echo of DRAW commands in log file -###################################################### - -set BugNumber OCC23152 - -dchrono t stop -dchrono t start -dchrono t stop - -dlog reset -dlog on -dchrono t show -set log_on [dlog get] - -dlog reset -dlog off -dchrono t show -set log_off [dlog get] - -puts "log_on = ${log_on}" -puts "log_off = ${log_off}" - -set llength_log_on [llength ${log_on}] -set llength_log_off [llength ${log_off}] - -puts "llength log_on= [llength ${log_on}]" -puts "llength log_off= [llength ${log_off}]" - -set status 0 -if { ${llength_log_on} > 0 } { - puts "dlog on work OK" -} else { - puts "dlog on work Faulty" - set status 1 -} -if { ${llength_log_off} == 0 } { - puts "dlog off work OK" -} else { - puts "dlog off work Faulty" - set status 1 -} - -# Resume -puts "" -if { ${status} == 0 } { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} diff --git a/tests/bugs/moddata/bug23165 b/tests/bugs/moddata/bug23165 deleted file mode 100755 index 831d7a319e..0000000000 --- a/tests/bugs/moddata/bug23165 +++ /dev/null @@ -1,156 +0,0 @@ -puts "================" -puts "OCC23165" -puts "================" -puts "" -################################################################################################################### -# BndLib_Add3dCurve::Add incorrectly segmented original B-Spline what resulting in wrong bounding box or exception. -################################################################################################################### - -catch { pload XDE } - -set BugNumber OCC23165 - -smallview - -# 1 step -set exception_status 0 -set e1_status 0 -set status 0 - -set percent_max 0.1 - -proc GetPercent {Value GoodValue} { - set Percent 0. - if {${GoodValue} != 0.} { - set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] - } elseif {${Value} != 0.} { - set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] - } else { - set Percent 0. - } - return ${Percent} -} - -restore [locate_data_file OCC23165-edge1.brep] e1 - -donly e1 -catch { bounding e1 } msg -fit - -set index [lsearch $msg exception] -if {$index > -1} { - set exception_status 1 -} else { - set e1_result [bounding e1] - - set e1_x1 [lindex ${e1_result} 0] - set e1_y1 [lindex ${e1_result} 1] - set e1_z1 [lindex ${e1_result} 2] - set e1_x2 [lindex ${e1_result} 3] - set e1_y2 [lindex ${e1_result} 4] - set e1_z2 [lindex ${e1_result} 5] - - set e1_good_x1 -17.610622244944413 - set e1_good_y1 -0.010622244944394899 - set e1_good_z1 -3.0106222449443973 - set e1_good_x2 -17.589377755055537 - set e1_good_y2 5.7106222251726582 - set e1_good_z2 -1.6146050638816589 - - set e1_x1_percent [GetPercent ${e1_x1} ${e1_good_x1}] - set e1_y1_percent [GetPercent ${e1_y1} ${e1_good_y1}] - set e1_z1_percent [GetPercent ${e1_z1} ${e1_good_z1}] - set e1_x2_percent [GetPercent ${e1_x2} ${e1_good_x2}] - set e1_y2_percent [GetPercent ${e1_y2} ${e1_good_y2}] - set e1_z2_percent [GetPercent ${e1_z2} ${e1_good_z2}] - - if {${e1_x1_percent} > ${percent_max}} { - puts "Faulty ${BugNumber} : x1 for e1 is wrong" - set e1_status 1 - } - if {${e1_y1_percent} > ${percent_max}} { - puts "Faulty ${BugNumber} : y1 for e1 is wrong" - set e1_status 1 - } - if {${e1_z1_percent} > ${percent_max}} { - puts "Faulty ${BugNumber} : z1 for e1 is wrong" - set e1_status 1 - } - if {${e1_x2_percent} > ${percent_max}} { - puts "Faulty ${BugNumber} : x2 for e1 is wrong" - set e1_status 1 - } - if {${e1_y2_percent} > ${percent_max}} { - puts "Faulty ${BugNumber} : y2 for e1 is wrong" - set e1_status 1 - } - if {${e1_z2_percent} > ${percent_max}} { - puts "Faulty ${BugNumber} : z2 for e1 is wrong" - set e1_status 1 - } - -} - -# 2 step -restore [locate_data_file OCC23165-curve.rle] c -mkedge result c 20 36 - -donly result -set result [bounding result] -fit - -set x1 [lindex ${result} 0] -set y1 [lindex ${result} 1] -set z1 [lindex ${result} 2] -set x2 [lindex ${result} 3] -set y2 [lindex ${result} 4] -set z2 [lindex ${result} 5] - -set good_x1 -17.6105835090592 -set good_y1 -4.7133570660117909 -set good_z1 -4.3679100133425806 -set good_x2 -17.589416490940806 -set good_y2 5.7105834892874094 -set good_z2 -1.6146437997669054 - -set x1_percent [GetPercent ${x1} ${good_x1}] -set y1_percent [GetPercent ${y1} ${good_y1}] -set z1_percent [GetPercent ${z1} ${good_z1}] -set x2_percent [GetPercent ${x2} ${good_x2}] -set y2_percent [GetPercent ${y2} ${good_y2}] -set z2_percent [GetPercent ${z2} ${good_z2}] - -if {${x1_percent} > ${percent_max}} { - puts "Faulty ${BugNumber} : x1 is wrong" - set status 1 -} -if {${y1_percent} > ${percent_max}} { - puts "Faulty ${BugNumber} : y1 is wrong" - set status 1 -} -if {${z1_percent} > ${percent_max}} { - puts "Faulty ${BugNumber} : z1 is wrong" - set status 1 -} -if {${x2_percent} > ${percent_max}} { - puts "Faulty ${BugNumber} : x2 is wrong" - set status 1 -} -if {${y2_percent} > ${percent_max}} { - puts "Faulty ${BugNumber} : y2 is wrong" - set status 1 -} -if {${z2_percent} > ${percent_max}} { - puts "Faulty ${BugNumber} : z2 is wrong" - set status 1 -} - -if { ${status} == 0 && ${exception_status} == 0&& ${e1_status} == 0 } { - puts "${BugNumber}: OK" -} else { - puts "${BugNumber}: Faulty" -} - -set 2dviewer 1 -set length 15.8888 - diff --git a/tests/bugs/moddata/bug23172 b/tests/bugs/moddata/bug23172 deleted file mode 100755 index e395cc356a..0000000000 --- a/tests/bugs/moddata/bug23172 +++ /dev/null @@ -1,32 +0,0 @@ -puts "================" -puts "OCC23172" -puts "================" -puts "" -###################################### -# vexport failed on some Intel GPUs -###################################### - -set BugNumber OCC23172 - -box b 1 2 3 -vinit -vdisplay b -vfit - -set aFile $imagedir/${test_image}.svg - -if { [file exists ${aFile}] } { - file delete ${aFile} -} - -vexport $aFile SVG - -if { [file exists ${aFile}] } { - puts "Export to SVG file was done" - puts "OK : Export to SVG file was done" -} else { - puts "Faulty : Export to SVG file was not done" -} - -set only_screen 1 - diff --git a/tests/bugs/moddata/bug23175 b/tests/bugs/moddata/bug23175 deleted file mode 100755 index 77789ea835..0000000000 --- a/tests/bugs/moddata/bug23175 +++ /dev/null @@ -1,29 +0,0 @@ -puts "============" -puts "OCC23175" -puts "============" -puts "" -#################################################################################### -# Failed to segment a periodic B-Spline when parameter coincides with existing knot -#################################################################################### - -set BugNumber OCC23175 - -restore [locate_data_file OCC23175-bspline-per-3_draw] result - -catch { segment result 1 2.5 } msg - -set exception_status 0 -set index [lsearch $msg exception] -if {$index > -1} { - set exception_status 1 -} - -if { ${exception_status} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug23201 b/tests/bugs/moddata/bug23201 deleted file mode 100755 index 1522cc32e8..0000000000 --- a/tests/bugs/moddata/bug23201 +++ /dev/null @@ -1,79 +0,0 @@ -puts "============" -puts "OCC23201" -puts "============" -puts "" -####################################################################### -# Projection algorithm produces wrong results. -####################################################################### - -set BugNumber OCC23201 - -proc GetPercent {Value GoodValue} { - set Percent 0. - if {${GoodValue} != 0.} { - set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] - } elseif {${Value} != 0.} { - set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] - } else { - set Percent 0. - } - return ${Percent} -} - -restore [locate_data_file bug23201_Tool_1.brep] b2 -restore [locate_data_file bug23201_Tool_2.brep] b3 - -explode b2 f -mksurface s2 b2_1 - -explode b3 f -mksurface s3 b3_1 - -explode b2 e -mkcurve c2 b2_2 - -explode b3 e -mkcurve c3 b3_2 - -set BugStatus 0 - -set percent_max 0.1 -set good_c23 3.1415926535897922 -set good_c32 3.1415926535897922 - -if [catch { project c23 c2 s3 } ] { - set BugStatus 1 -} else { - set c23_length [lindex [length c23] end] - set length_percent [GetPercent ${c23_length} ${good_c23}] - puts "length_percent = ${length_percent}" - if {${length_percent} > ${percent_max}} { - puts "c23: Faulty" - set BugStatus 1 - } else { - puts "c23: OK" - } -} - -if [catch { project c32 c3 s2 } ] { - set BugStatus 1 -} else { - set c32_length [lindex [length c32] end] - set length_percent [GetPercent ${c32_length} ${good_c32}] - puts "length_percent = ${length_percent}" - if {${length_percent} > ${percent_max}} { - puts "c32: Faulty" - set BugStatus 1 - } else { - puts "c32: OK" - } -} - -# Resume -puts "" -if { ${BugStatus} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - diff --git a/tests/bugs/moddata/bug23224 b/tests/bugs/moddata/bug23224 deleted file mode 100755 index 67979943b3..0000000000 --- a/tests/bugs/moddata/bug23224 +++ /dev/null @@ -1,24 +0,0 @@ -puts "============" -puts "OCC23224" -puts "============" -puts "" -####################################################################### -# Empty result done by intersection algorithm -####################################################################### - -set BugNumber OCC23224 - -restore [locate_data_file OCC23224-line.brep] l -restore [locate_data_file OCC23224-face.brep] f -mksurface s f -mkcurve c l -intersect result c s -set info1 [dump result] - -if { [regexp {Point +: ([-0-9.+eE]+)} $info1 full] == 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - - diff --git a/tests/bugs/moddata/bug23244 b/tests/bugs/moddata/bug23244 deleted file mode 100755 index 152ad72e60..0000000000 --- a/tests/bugs/moddata/bug23244 +++ /dev/null @@ -1,36 +0,0 @@ -puts "================" -puts "OCC23244" -puts "================" -puts "" -####################################################################### -# Bug of BRepClass_FaceClassifier: it does not take into account the tolerance -####################################################################### - -set BugNumber OCC23244 - -restore [locate_data_file OCC23244-comp.brep] a - -explode a -explode a_1 - -smallview -donly a_1_2 a_3 -fit - -mkpoint p3 a_3 -projponf a_1_2 p3 -point pp3 69.220445243320853 1216.6123701316949 - -set result [split [b2dclassify a_1_2 pp3 1.e-5] ] - -set ll [llength ${result}] -if {${ll} < 4} { - puts "Bad format of bclassify draw-command; Faulty ${BugNumber}" -} else { - if { [regexp "ON" $result] == 1 } { - puts "OK ${BugNumber}" - } else { - puts "Faulty ${BugNumber}" - } -} - diff --git a/tests/bugs/moddata/bug23248 b/tests/bugs/moddata/bug23248 deleted file mode 100755 index df9dccac31..0000000000 --- a/tests/bugs/moddata/bug23248 +++ /dev/null @@ -1,27 +0,0 @@ -puts "================" -puts "OCC23248" -puts "================" -puts "" -####################################################################### -# Wrong result done by solid classifier algorithm for infinite point -####################################################################### - -set BugNumber OCC23248 - -restore [locate_data_file bug23248_so] b - -set result [split [xclassify b 1e-7]] - -set ll [llength ${result}] -if {${ll} < 3} { - puts "Bad format of xclassify draw-command; Faulty ${BugNumber}" -} else { - set status [lindex ${result} 2] - if { [regexp "OUT" $result] == 1 } { - puts "OK ${BugNumber}" - } else { - puts "Faulty ${BugNumber}" - } -} - - diff --git a/tests/bugs/moddata/bug23464_1 b/tests/bugs/moddata/bug23464_1 deleted file mode 100755 index 4ff1539624..0000000000 --- a/tests/bugs/moddata/bug23464_1 +++ /dev/null @@ -1,35 +0,0 @@ -puts "============" -puts "CR23464" -puts "============" -puts "" -########################################################################################################## -# Projection algorithm produces wrong results -########################################################################################################## - -set int_check 3 -set fract_check 1415927 - -restore [locate_data_file bug23464_c41.draw] c41 -restore [locate_data_file bug23464_s46.draw] s46 - -project result c41 s46 -set info [length result] -regexp {is +([-0-9.+eE]+)} $info full num - -set int_part [expr round($num)] -set y [expr $num - round($num)] -set z [expr $y*10000000] -set fract_part [expr round($z)] - -if { ${int_check} != ${int_part} } { - puts "Error : Integer part of result is incorrect" -} - -if { ${fract_check} != ${fract_part} } { - puts "Error : Fractional part of result is incorrect" -} - - - - - diff --git a/tests/bugs/moddata/bug23464_2 b/tests/bugs/moddata/bug23464_2 deleted file mode 100755 index 2aac097032..0000000000 --- a/tests/bugs/moddata/bug23464_2 +++ /dev/null @@ -1,35 +0,0 @@ -puts "============" -puts "CR23464" -puts "============" -puts "" -########################################################################################################## -# Projection algorithm produces wrong results -########################################################################################################## - -set int_check 3 -set fract_check 1415927 - -restore [locate_data_file bug23464_c50.draw] c50 -restore [locate_data_file bug23464_s37.draw] s37 - -project result c50 s37 -set info [length result] -regexp {is +([-0-9.+eE]+)} $info full num - -set int_part [expr round($num)] -set y [expr $num - round($num)] -set z [expr $y*10000000] -set fract_part [expr round($z)] - -if { ${int_check} != ${int_part} } { - puts "Error : Integer part of result is incorrect" -} - -if { ${fract_check} != ${fract_part} } { - puts "Error : Fractional part of result is incorrect" -} - - - - - diff --git a/tests/bugs/moddata/bug23464_3 b/tests/bugs/moddata/bug23464_3 deleted file mode 100755 index 104b8c3173..0000000000 --- a/tests/bugs/moddata/bug23464_3 +++ /dev/null @@ -1,35 +0,0 @@ -puts "============" -puts "CR23464" -puts "============" -puts "" -########################################################################################################## -# Projection algorithm produces wrong results -########################################################################################################## - -set int_check 3 -set fract_check 1415927 - -restore [locate_data_file bug23464_c57.draw] c57 -restore [locate_data_file bug23464_s37.draw] s37 - -project result c57 s37 -set info [length result] -regexp {is +([-0-9.+eE]+)} $info full num - -set int_part [expr round($num)] -set y [expr $num - round($num)] -set z [expr $y*10000000] -set fract_part [expr round($z)] - -if { ${int_check} != ${int_part} } { - puts "Error : Integer part of result is incorrect" -} - -if { ${fract_check} != ${fract_part} } { - puts "Error : Fractional part of result is incorrect" -} - - - - - diff --git a/tests/bugs/moddata/bug23464_4 b/tests/bugs/moddata/bug23464_4 deleted file mode 100755 index 2065997277..0000000000 --- a/tests/bugs/moddata/bug23464_4 +++ /dev/null @@ -1,35 +0,0 @@ -puts "============" -puts "CR23464" -puts "============" -puts "" -########################################################################################################## -# Projection algorithm produces wrong results -########################################################################################################## - -set int_check 3 -set fract_check 1415927 - -restore [locate_data_file bug23464_c58.draw] c58 -restore [locate_data_file bug23464_s37.draw] s37 - -project result c58 s37 -set info [length result] -regexp {is +([-0-9.+eE]+)} $info full num - -set int_part [expr round($num)] -set y [expr $num - round($num)] -set z [expr $y*10000000] -set fract_part [expr round($z)] - -if { ${int_check} != ${int_part} } { - puts "Error : Integer part of result is incorrect" -} - -if { ${fract_check} != ${fract_part} } { - puts "Error : Fractional part of result is incorrect" -} - - - - - diff --git a/tests/bugs/moddata/bug23464_5 b/tests/bugs/moddata/bug23464_5 deleted file mode 100755 index 275d6d746f..0000000000 --- a/tests/bugs/moddata/bug23464_5 +++ /dev/null @@ -1,35 +0,0 @@ -puts "============" -puts "CR23464" -puts "============" -puts "" -########################################################################################################## -# Projection algorithm produces wrong results -########################################################################################################## - -set int_check 3 -set fract_check 1415927 - -restore [locate_data_file bug23464_c57.draw] c57 -restore [locate_data_file bug23464_s46.draw] s46 - -project result c57 s46 -set info [length result] -regexp {is +([-0-9.+eE]+)} $info full num - -set int_part [expr round($num)] -set y [expr $num - round($num)] -set z [expr $y*10000000] -set fract_part [expr round($z)] - -if { ${int_check} != ${int_part} } { - puts "Error : Integer part of result is incorrect" -} - -if { ${fract_check} != ${fract_part} } { - puts "Error : Fractional part of result is incorrect" -} - - - - - diff --git a/tests/bugs/moddata/bug23464_6 b/tests/bugs/moddata/bug23464_6 deleted file mode 100755 index 6e6990a84f..0000000000 --- a/tests/bugs/moddata/bug23464_6 +++ /dev/null @@ -1,35 +0,0 @@ -puts "============" -puts "CR23464" -puts "============" -puts "" -########################################################################################################## -# Projection algorithm produces wrong results -########################################################################################################## - -set int_check 3 -set fract_check 1415927 - -restore [locate_data_file bug23464_c58.draw] c58 -restore [locate_data_file bug23464_s46.draw] s46 - -project result c58 s46 -set info [length result] -regexp {is +([-0-9.+eE]+)} $info full num - -set int_part [expr round($num)] -set y [expr $num - round($num)] -set z [expr $y*10000000] -set fract_part [expr round($z)] - -if { ${int_check} != ${int_part} } { - puts "Error : Integer part of result is incorrect" -} - -if { ${fract_check} != ${fract_part} } { - puts "Error : Fractional part of result is incorrect" -} - - - - - diff --git a/tests/bugs/moddata/bug23475 b/tests/bugs/moddata/bug23475 deleted file mode 100755 index 7b306f3caf..0000000000 --- a/tests/bugs/moddata/bug23475 +++ /dev/null @@ -1,16 +0,0 @@ -puts "============" -puts "CR23475" -puts "===========" -puts "" -############################################################################### -# Wrong result of Geom_BSpline_Surface::IsVClosed() -############################################################################### - -restore [locate_data_file bug23475.draw] s1 -set info [dump s1] - -if { [regexp "BSplineSurface vclosed" $info] != 1} { - puts "Error : surface is not closed by V" -} - - diff --git a/tests/bugs/moddata/bug235 b/tests/bugs/moddata/bug235 deleted file mode 100755 index 02d4cd1f0c..0000000000 --- a/tests/bugs/moddata/bug235 +++ /dev/null @@ -1,41 +0,0 @@ -puts "================" -puts "OCC235" -puts "================" -puts "" -####################################################### -## Intersection algorithm finds two intersection curves. One curve is closed while -## second is not (the distance between first and last points is 2e-5). -####################################################### - -restore [locate_data_file OCC235a.rle] su1 -############### checkshape su1 # is not a topological shape -restore [locate_data_file OCC235b.rle] su2 -############### checkshape su2 # is not a topological shape - -intersect result su1 su2 - -set dir [directory] -set nb_result [regexp -all {result} $dir] -if { $nb_result != 2 } { - puts "Faulty OCC235 (first checking): Intersection was made WRONGLY" -} else { - puts "OCC235 OK (first checking) : Intersection command works properly" - - regexp {nb +alone +Vertices +: +([-0-9.+eE]+)} [checksection result_1] full num_1 - if { $num_1 != 0 } { - puts " Faulty OCC235 (second checking): Result result_1 is UNclosed !!! " - } else { - puts " OCC235 OK (second checking): Result result_1 is closed !!! " - } - - regexp {nb +alone +Vertices +: +([-0-9.+eE]+)} [checksection result_2] full num_2 - if { $num_2 != 0 } { - puts " Faulty OCC235 (second checking): Result result_2 is UNclosed !!! " - } else { - puts " OCC235 OK (second checking): Result result_2 is closed !!! " - } -} - -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug23576 b/tests/bugs/moddata/bug23576 deleted file mode 100755 index 09e98bd7c9..0000000000 --- a/tests/bugs/moddata/bug23576 +++ /dev/null @@ -1,33 +0,0 @@ -puts "============" -puts "OCC23576" -puts "============" -puts "" -####################################################################### -# Intersection algorithm produces trimmed circle with illegal parametric range. -####################################################################### - -restore [locate_data_file bug23576_ff_b1_4_z564.brep] b1 - -explode b1 -bopcurves b1_1 b1_2 -copy c_1 result - -set log [dump result] - -regexp {Parameters : +([-0-9.+eE]+) +([-0-9.+eE]+)} ${log} full rc1 rc2 -puts "rc1=${rc1}" -puts "rc2=${rc2}" -set 2_PI [expr 2. * 2. * asin(1.0)] -puts "2_PI=${2_PI}" -puts "" - -if {${rc1} < 0.} { - puts "Error: Bad value of parametric range rc1" -} else { - puts "Good value of parametric range rc1" -} -if {${rc2} > ${2_PI}} { - puts "Error: Bad value of parametric range rc2" -} else { - puts "Good value of parametric range rc2" -} diff --git a/tests/bugs/moddata/bug23587 b/tests/bugs/moddata/bug23587 deleted file mode 100755 index 2e083838eb..0000000000 --- a/tests/bugs/moddata/bug23587 +++ /dev/null @@ -1,36 +0,0 @@ -puts "============" -puts "CR23587" -puts "===========" -puts "" -############################################################################### -# Operation "2dintersect "in TestHarness can not find intersection point of two intersecting 2d curves. -############################################################################### - -restore [locate_data_file bug23587_IntEdges.brep] a - -explode a - -plane pl1 0 0 0 0 0 1 -trim trpl1 pl1 -1000 1000 -1000 1000 -mkface f1 trpl1 -pcurve c1 a_1 f1 -pcurve c2 a_2 f1 -pcurve c3 a_3 f1 -pcurve c4 a_4 f1 -set inter1 [2dintersect c1 c2 1.e-6] -set inter2 [2dintersect c3 c2 1.e-6] -set inter3 [2dintersect c1 c4 1.e-6] -set inter4 [2dintersect c3 c4 1.e-6] -set int1 [regexp {Intersection point 1} $inter1] -set int2 [regexp {Intersection point 1} $inter2] -set int3 [regexp {Intersection point 1} $inter3] -set int4 [regexp {Intersection point 1} $inter4] - -if { $int1 == 0 || $int2 == 0 || $int3 == 0 || $int4 ==0 } { - puts "Error : Intersection is not found" -} - -av2d -2dfit - -xwd ${imagedir}/${test_image}.png diff --git a/tests/bugs/moddata/bug236 b/tests/bugs/moddata/bug236 deleted file mode 100755 index 00f1339229..0000000000 --- a/tests/bugs/moddata/bug236 +++ /dev/null @@ -1,40 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty OCC236" - -puts "================" -puts "OCC236" -puts "================" -puts "" -####################################################### -##Result of intersection of two surfaces of linear extrusion is incorrect. -####################################################### - -restore [locate_data_file OCC236a.rle] su1 -############### checkshape su1 # is not a topological shape -restore [locate_data_file OCC236b.rle] su2 -############### checkshape su2 # is not a topological shape - -intersect result su1 su2 - -set che [directory] -set err [lindex $che [expr [llength $che] - 1]] -if { $err != "result_2"} { - puts "Faulty OCC236" -} else { - puts "OCC236 OK (first checking) : Intersection command works properly" - regexp {nb +alone +Vertices +: +([-0-9.+eE]+)} [checksection result_1] full num - if { $num != 0 } { - puts " Faulty OCC236 (second checking): Result result_1 is UNclosed !!! " - } else { - puts " OCC236 OK (second checking): Result result_1 is closed !!! " - puts "" - } - regexp {nb +alone +Vertices +: +([-0-9.+eE]+)} [checksection result_2] full num - if { $num != 0 } { - puts " Faulty OCC236 (second checking): Result result_2 is UNclosed !!! " - } else { - puts " OCC236 OK (second checking): Result result_2 is closed !!! " - } -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug23603 b/tests/bugs/moddata/bug23603 deleted file mode 100755 index c611fe9fc8..0000000000 --- a/tests/bugs/moddata/bug23603 +++ /dev/null @@ -1,14 +0,0 @@ -puts "============" -puts "CR23603" -puts "============" -puts "" -########################################################################################################## -# Boolean operation between two edges fails -########################################################################################################## - -restore [locate_data_file bug23603_ce.brep] b1 -explode b1 -copy b1_1 e1 -copy b1_2 e2 - -bop e1 e2 diff --git a/tests/bugs/moddata/bug23643 b/tests/bugs/moddata/bug23643 deleted file mode 100755 index 18d74e47e8..0000000000 --- a/tests/bugs/moddata/bug23643 +++ /dev/null @@ -1,29 +0,0 @@ -puts "========================" -puts "OCC23643" -puts "========================" -puts "" -####################################################################### -# Intersection algorithm produces B-Spline curve in case of coaxial cones -####################################################################### - -restore [locate_data_file bug23643_qf3.brep] b - -explode b -copy b_1 f1 -copy b_2 f2 - -mksurface s1 f1 -mksurface s2 f2 - -trim s1t s1 0 2*pi -18 10 -trim s2t s2 0 2*pi -18 10 - -intersect result s1t s2t - -set log [dump result] - -if {[regexp {Trimmed +curve} ${log}]} { - puts "Intersection algorithm work OK" -} else { - puts "Error: Intersection algorithm work bad" -} diff --git a/tests/bugs/moddata/bug23644 b/tests/bugs/moddata/bug23644 deleted file mode 100755 index b4fd0ca772..0000000000 --- a/tests/bugs/moddata/bug23644 +++ /dev/null @@ -1,20 +0,0 @@ -puts "========" -puts "CR23644" -puts "========" - -########################################## -## Intersection between coaxial cones produces exception -########################################## - -pcone cn1 10 0 20 -pcone cn2 20 0 20 -explode cn1 f -explode cn2 f -copy cn1_1 f1 -copy cn2_1 f2 - -if [catch {bopcurves f1 f2} BOPLog] { - if { [regexp "Tolerance Reached=0\n has no 3d curve" ${BOPLog}] != 1 } { - puts "CR23644: Error" - } -} diff --git a/tests/bugs/moddata/bug237 b/tests/bugs/moddata/bug237 deleted file mode 100755 index c75601a352..0000000000 --- a/tests/bugs/moddata/bug237 +++ /dev/null @@ -1,27 +0,0 @@ -puts "================" -puts "OCC237" -puts "================" -puts "" -####################################################### -## Hang-ups during the intersection of attached surfaces -####################################################### - -restore [locate_data_file OCC236b.rle] su1 -############### checkshape su1 # is not a topological shape -restore [locate_data_file OCC237b.rle] su2 -############### checkshape su2 # is not a topological shape - -if [catch {intersect result su1 su2 }] { - set mistake 1 -} else { - set mistake 0 -} - -if { $mistake != 0} { - puts "Faulty OCC237: Intersection was made WRONGLY" -} else { - puts "OCC237 OK : Intersection command works properly" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug2442 b/tests/bugs/moddata/bug2442 deleted file mode 100644 index e291a20e5f..0000000000 --- a/tests/bugs/moddata/bug2442 +++ /dev/null @@ -1,65 +0,0 @@ -puts "TODO OCC11111 ALL: OCC2442 Faulty" - -puts "============" -puts "OCC2442" -puts "============" -puts "" -###################################################### -# Error in BRepClass3d_SolidClassifier -###################################################### - -set IsGood 1 - -restore [locate_data_file OCC2442-1.brep] a -restore [locate_data_file OCC2442-2.brep] b - -distmini dm1 a b -set dm1_list [dump dm1_val] -set dm1_length [llength $dm1_list] -if {$dm1_length < 6} { - puts "Faulty OCC2442" - set IsGood 0 -} - -explode a -explode b -distmini dm2 a_1 b_1 -set dm2_list [dump dm2_val] -set dm2_length [llength $dm2_list] -if {$dm2_length < 6} { - puts "Faulty OCC2442" - set IsGood 0 -} - -if {$IsGood == 1} { - regexp {([-0-9.+eE]+)} $dm1_list full dist1 - regexp {([-0-9.+eE]+)} $dm2_list full dist2 - - set good_dist 18.4816355578064 - set dist1_percent [expr abs(${dist1} - ${good_dist}) / double(${good_dist}) * 100.] - - set dist2_percent [expr abs(${dist1} - ${dist2}) / double(${dist2}) * 100.] - - set percent_max 0.1 - - if {${dist1_percent} > ${percent_max}} { - puts "OCC2442 Faulty" - set IsGood 0 - } - if {${dist2_percent} > ${percent_max}} { - puts "OCC2442 Faulty" - set IsGood 0 - } - if {${IsGood} == 1} { - puts "OCC2442 OK" - } -} - -set boundbox [boundingstr a] -set x0 [lindex $boundbox 0] -set y0 [lindex $boundbox 1] -set z0 [lindex $boundbox 2] -ttranslate a [expr -1 * $x0] [expr -1 * $y0] [expr -1 * $z0] -ttranslate b [expr -1 * $x0] [expr -1 * $y0] [expr -1 * $z0] - -set 3dviewer 1 diff --git a/tests/bugs/moddata/bug247 b/tests/bugs/moddata/bug247 deleted file mode 100755 index a52c866be5..0000000000 --- a/tests/bugs/moddata/bug247 +++ /dev/null @@ -1,17 +0,0 @@ - -puts "========================" -puts " OCC247 " -puts "========================" - -################################################# -##Using of function "bop" with attached shapes calls exception. -################################################# -restore [locate_data_file OCC247a.brep] a -restore [locate_data_file case_8_wire3.brep] b - -bop a b - - - - - \ No newline at end of file diff --git a/tests/bugs/moddata/bug25 b/tests/bugs/moddata/bug25 deleted file mode 100755 index b949e02e00..0000000000 --- a/tests/bugs/moddata/bug25 +++ /dev/null @@ -1,35 +0,0 @@ -puts "================" -puts "OCC25" -puts "================" -puts "" - -restore [locate_data_file OCC25-1.brep] sh1 - -decho off -set che [checkshape sh1] -decho on - -if { [regexp {Faulty} $che ] == 1 } { - puts "Faulty OCC25 (case 1): Checkshape says that the wire on face has bad orientation, but it is not truth" -} else { - puts "OCC25 OK (case 1): Checkshape works properly" -} - -# ================================================ -restore [locate_data_file OCC25-2.brep] sh2 - -decho off -set che [checkshape sh2] -decho on - -if { [regexp {BRepCheck_BadOrientationOfSubshape} $che] && [regexp {BRepCheck_UnorientableShape} $che]} { - puts " OCC25 (case 2) OK: Checkshape works properly" -} else { - puts "Faulty OCC25 (case 2): Checkshape works wrongly" -} - -compound sh1 sh2 result - -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug252_1 b/tests/bugs/moddata/bug252_1 deleted file mode 100755 index 0e2c5a2fc5..0000000000 --- a/tests/bugs/moddata/bug252_1 +++ /dev/null @@ -1,23 +0,0 @@ - -puts "================" -puts "OCC252" -puts "================" -puts "" - -pload QAcommands - -restore [locate_data_file OCC252.brep] a - -checkshape a - -explode a w - -OCC252 result a_466 a 0 - -regexp {Mass +: +([-0-9.+eE]+)} [lprops result] full len - -if { ${len} <= 0 } { - puts "Error : OCC252" -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug252_2 b/tests/bugs/moddata/bug252_2 deleted file mode 100755 index 437d85f33c..0000000000 --- a/tests/bugs/moddata/bug252_2 +++ /dev/null @@ -1,22 +0,0 @@ - -puts "================" -puts "OCC252" -puts "================" -puts "" - -pload QAcommands - -restore [locate_data_file OCC252.brep] a -checkshape a - -explode a w - -OCC252 result a_466 a 1 - -regexp {Mass +: +([-0-9.+eE]+)} [lprops result] full len - -if { ${len} != 0 } { - puts "Error : OCC252" -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug252_3 b/tests/bugs/moddata/bug252_3 deleted file mode 100755 index 4cee576453..0000000000 --- a/tests/bugs/moddata/bug252_3 +++ /dev/null @@ -1,22 +0,0 @@ - -puts "================" -puts "OCC252" -puts "================" -puts "" - -pload QAcommands - -restore [locate_data_file OCC252.brep] a -checkshape a - -explode a w - -OCC252 result a_466 a 2 - -regexp {Mass +: +([-0-9.+eE]+)} [lprops result] full len - -if { ${len} <= 0 } { - puts "Error : OCC252" -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug253 b/tests/bugs/moddata/bug253 deleted file mode 100755 index 5bdafe4201..0000000000 --- a/tests/bugs/moddata/bug253 +++ /dev/null @@ -1,43 +0,0 @@ -puts "========" -puts "OCC253" -puts "========" - -###################################################### -## Exception while segment operation on periodic BSpline curve. -## More over it seems that command segment in Draw doesnot work. -###################################################### - -restore [locate_data_file OCC253.draw] result -############### checkshape c1 # is not a topological shape - -smallview -2D- - -#store dump of initial curve -set init_dump [dump result] - -set ufirst 0.500000000000006 -set ulast 1.00000000015925 -catch { segment result $ufirst $ulast } - -#compare dump of initial curve and dump of result one -set result_dump [dump result] -if { $init_dump == $result_dump} { - puts "Faulty OCC253: command segment does NOT do anything" -} - -#retrieve amount of knots of result curve from dump -regexp { +Degree +[-0-9.+eE]+, +[-0-9.+eE]+ +Poles, +([-0-9.+eE]+) +KnotsPoles +:} $result_dump full KnotsNumber -#create string to be found in result dump -set trueLastKnot "$KnotsNumber : 1.00000000015925 " - -#verify parametrization of result curve -if { [regexp "1 : 0.500000000000006 " $result_dump] && [regexp $trueLastKnot $result_dump]} { - puts " OCC253 is OK: command segment works properly" -} else { - puts "Faulty OCC253: parametrization of result curve is wrong" -} - -2dfit -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug254 b/tests/bugs/moddata/bug254 deleted file mode 100755 index aab2e06d87..0000000000 --- a/tests/bugs/moddata/bug254 +++ /dev/null @@ -1,17 +0,0 @@ - -puts "================" -puts "OCC254" -puts "================" -puts "" - -restore [locate_data_file OCC254-1.brep] shape1 -checkshape shape1 - -restore [locate_data_file OCC254-3.brep] shape3 -checkshape shape3 - -common result shape1 shape3 -checkshape result - -set length 1231.07 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug256 b/tests/bugs/moddata/bug256 deleted file mode 100755 index e75b7f01e3..0000000000 --- a/tests/bugs/moddata/bug256 +++ /dev/null @@ -1,23 +0,0 @@ - -puts "========" -puts "OCC256" -puts "========" - -restore [locate_data_file OCC256.brep] result -checkshape result - -tclean result -vinit -vdisplay result -vsetdispmode result 1 -vfit - -set info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $info full tri -regexp { +([-0-9.+eE]+) +nodes} $info full nod - -if { $tri != 66 && $nod != 66 } { - puts "Error : here is shading problem" -} - -set 3dviewer 0 diff --git a/tests/bugs/moddata/bug2569_1 b/tests/bugs/moddata/bug2569_1 deleted file mode 100644 index f7e2a4073a..0000000000 --- a/tests/bugs/moddata/bug2569_1 +++ /dev/null @@ -1,20 +0,0 @@ -pload QAcommands - -puts "============" -puts "OCC2569" -puts "============" -puts "" -###################################################### -# If it is not possible to create the bezier curve, -# it should throw an exception. -###################################################### -cpulimit 60 -vinit -set out [OCC2569 26 result] -if {[string compare $out "\n Degree = 25\n"] == 0} { - puts "OCC2569: OK" -} else { - puts "OCC2569: Faulty" -} - -set 3dviewer 0 diff --git a/tests/bugs/moddata/bug2569_2 b/tests/bugs/moddata/bug2569_2 deleted file mode 100644 index 079685cbec..0000000000 --- a/tests/bugs/moddata/bug2569_2 +++ /dev/null @@ -1,20 +0,0 @@ -puts "TODO OCC11111 ALL: Exception" -puts "TODO OCC11111 ALL: An exception was caught" -puts "TODO OCC11111 ALL: TEST INCOMPLETE" - -pload QAcommands - -puts "============" -puts "OCC2569" -puts "============" -puts "" -###################################################### -# If it is not possible to create the bezier curve, -# it should throw an exception. -###################################################### -cpulimit 60 -vinit - -OCC2569 29 result - -set 3dviewer 0 diff --git a/tests/bugs/moddata/bug257 b/tests/bugs/moddata/bug257 deleted file mode 100755 index c94021f76f..0000000000 --- a/tests/bugs/moddata/bug257 +++ /dev/null @@ -1,49 +0,0 @@ -puts "TODO OCC12345 ALL: OCC257 - Error : xdelta= 3.6651128509496784" -puts "TODO OCC12345 ALL: OCC257 - Error : ydelta= 5.840378793387278" -puts "TODO OCC12345 ALL: OCC257 - Error : zdelta= 1.4898469085120623" - -puts "================" -puts "OCC257" -puts "================" -puts "" - -restore [locate_data_file OCC257.brep] result -checkshape result - -set bb [bounding result] - -set list [split ${bb}] -set listLength [llength ${list}] -if { ${listLength} < 6 } { - puts "Error : listLength = ${listLength}" -} - -set x1 [lindex ${list} 0] -set y1 [lindex ${list} 1] -set z1 [lindex ${list} 2] -set x2 [lindex ${list} 3] -set y2 [lindex ${list} 4] -set z2 [lindex ${list} 5] - -set len [expr ${x2} - ${x1}] -set width [expr ${y2} - ${y1}] -set height [expr ${z2} - ${z1}] - -set R 180 - -set xdelta [expr abs(${len} - ${R}) / ${R} * 100] -set ydelta [expr abs(${width} - ${R}) / ${R} * 100] -set zdelta [expr abs(${height} - ${R}) / ${R} * 100] - -set maxdelta 0.1 - -if { ${xdelta} > ${maxdelta} } then {puts "OCC257 - Error : xdelta= ${xdelta}"} -if { ${ydelta} > ${maxdelta} } then {puts "OCC257 - Error : ydelta= ${ydelta}"} -if { ${zdelta} > ${maxdelta} } then {puts "OCC257 - Error : zdelta= ${zdelta}"} - -if { ${xdelta} <= ${maxdelta} && ${ydelta} <= ${maxdelta} && ${zdelta} <= ${maxdelta} } then { - puts "OCC257: OK" -} - -set 3dviewer 0 - diff --git a/tests/bugs/moddata/bug258_1 b/tests/bugs/moddata/bug258_1 deleted file mode 100755 index 5a5c898f2f..0000000000 --- a/tests/bugs/moddata/bug258_1 +++ /dev/null @@ -1,27 +0,0 @@ - -puts "========================" -puts " OCC258 " -puts "(case 1)" -puts "========================" - -restore [locate_data_file shading_143.brep] result -checkshape result - -tclean result -isos result 0 -vinit -vdisplay result -vsetdispmode result 1 -vfit -triangles result - -set info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $info full tri -regexp { +([-0-9.+eE]+) +nodes} $info full nod - -if { $tri < 71 || $nod < 73 } { - puts "Error (case 1) : here is shading problem" -} - -set 3dviewer 0 - diff --git a/tests/bugs/moddata/bug258_2 b/tests/bugs/moddata/bug258_2 deleted file mode 100755 index de68cd1703..0000000000 --- a/tests/bugs/moddata/bug258_2 +++ /dev/null @@ -1,28 +0,0 @@ - -puts "========================" -puts " OCC258 " -puts "(case 2)" -puts "========================" - -restore [locate_data_file shading_144.brep] result -checkshape result - -tclean result -isos result 0 -vinit -vdisplay result -vsetdispmode result 1 -vfit -triangles result - -set info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $info full tri -regexp { +([-0-9.+eE]+) +nodes} $info full nod - -if { $tri < 70 || $nod < 72 } { - puts "Error (case 2) : here is shading problem" -} - -set 3dviewer 0 - - diff --git a/tests/bugs/moddata/bug259 b/tests/bugs/moddata/bug259 deleted file mode 100755 index dc0026ffa3..0000000000 --- a/tests/bugs/moddata/bug259 +++ /dev/null @@ -1,20 +0,0 @@ - -puts "========================" -puts " OCC259 " -puts "========================" -puts "" -###################################################### -##Inequality behaviour of checkshape -top on SunOS and IRIX. -###################################################### - -pcylinder b1 1 2 - -dset r sqrt(2)/2 -box b2 -r -r 0 2*r 2*r 2 -trotate b2 0 0 0 0 0 1 135 - -bfuse result b2 b1 -checkshape -top result - -set square 18.8496 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug262 b/tests/bugs/moddata/bug262 deleted file mode 100644 index f74746bc9e..0000000000 --- a/tests/bugs/moddata/bug262 +++ /dev/null @@ -1,59 +0,0 @@ - -puts "========" -puts "OCC262" -puts "========" - -restore [locate_data_file OCC262.brep] a -# checkshape a - -set tolerance 1e-5 - -build3d a ${tolerance} - -fsameparameter a - -explode a E -# Verify only a_1 and a_2 eges becouse a_3 had 3d curve before call of build3d command - -set toler1 [maxtolerance a_1] -regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $toler1 full MaxEdgeTolerance1 - -if { [ expr $MaxEdgeTolerance1 > $tolerance ] } { - puts "OCC262 - FAULTY. Tolerance of a_1 is too big" -} else { - puts "TOLERANCE OF A_1 - OK" -} - -set toler2 [maxtolerance a_2] -regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $toler2 full MaxEdgeTolerance2 - -if { [ expr $MaxEdgeTolerance2 > $tolerance ] } { - puts "OCC262 - FAULTY. Tolerance of a_1 is too big" -} else { - puts "TOLERANCE OF A_2 - OK" -} - - -#set tolerancelist [maxtolerance a] - -#set list [split ${tolerancelist} "\n\t"] -#set listLength [llength ${list}] -#if { ${listLength} < 9 } then {puts "OCC262 - Error : listLength= ${listLength}"} - -#set EdgeList [lindex ${list} 5] -#set MaxEdgeTolerance [lindex [split ${EdgeList}] [expr [llength [split ${EdgeList}] ] - 2] ] - -#set delta [expr abs(${MaxEdgeTolerance} - ${tolerance}) / ${tolerance} * 100] - -#set maxdelta 1 - -#if { ${delta} > ${maxdelta} } then {puts "OCC262 - Error : delta = ${delta}"} else { -# puts "OCC262: OK" -#} - -#puts "MaxEdgeTolerance = ${MaxEdgeTolerance}" - -renamevar a result - -set square 449.437 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug265 b/tests/bugs/moddata/bug265 deleted file mode 100755 index bf396b067f..0000000000 --- a/tests/bugs/moddata/bug265 +++ /dev/null @@ -1,16 +0,0 @@ -puts "========" -puts "OCC265" -puts "========" -puts "" -############################################### -##Exception while projecting hyperbola on plane. -############################################### - -restore [locate_data_file OCC265-hyperbola.draw] hyperbola -restore [locate_data_file OCC265-plane.draw] plane - -projonplane result hyperbola plane - -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug266 b/tests/bugs/moddata/bug266 deleted file mode 100755 index a45b818019..0000000000 --- a/tests/bugs/moddata/bug266 +++ /dev/null @@ -1,21 +0,0 @@ - -puts "================" -puts "OCC266" -puts "================" -puts "" - -restore [locate_data_file OCC266.brep] a -checkshape a - -renamevar a edge -explode edge e - -renamevar edge face -explode face f - -chamf result face edge_10 face_3 A 1 45 edge_6 face_3 A 1 45 edge_11 face_3 A 1 45 edge_12 face_3 A 1 45 edge_13 face_3 A 1 45 edge_14 face_3 A 1 45 edge_8 face_3 A 1 45 edge_9 face_3 A 1 45 -checkshape result - -set square 48913 -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug268 b/tests/bugs/moddata/bug268 deleted file mode 100755 index 971a2d7fae..0000000000 --- a/tests/bugs/moddata/bug268 +++ /dev/null @@ -1,15 +0,0 @@ - -puts "========" -puts "OCC268" -puts "========" -puts "" -########################################################### -## Using of command "lprops" for shapes that contain degenerated edges call exception. -########################################################### - -restore [locate_data_file OCC268.brep] result -checkshape result - -set length 56.6039 -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug26_1 b/tests/bugs/moddata/bug26_1 deleted file mode 100755 index cccaa0bc7e..0000000000 --- a/tests/bugs/moddata/bug26_1 +++ /dev/null @@ -1,18 +0,0 @@ - -puts "================" -puts "OCC26" -puts "================" -puts "" - -restore [locate_data_file OCC26.brep] a -explode a -checkshape a_1 -checkshape a_2 - -bfuse result a_1 a_2 - -set square 44819.9 -set 2dviewer 0 - - - diff --git a/tests/bugs/moddata/bug26_2 b/tests/bugs/moddata/bug26_2 deleted file mode 100755 index 2585427aa0..0000000000 --- a/tests/bugs/moddata/bug26_2 +++ /dev/null @@ -1,15 +0,0 @@ - -puts "================" -puts "OCC26" -puts "================" -puts "" - -restore [locate_data_file OCC26.brep] a -explode a -checkshape a_1 -checkshape a_2 - -bfuse result a_2 a_1 - -set square 44819.8 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug271 b/tests/bugs/moddata/bug271 deleted file mode 100755 index dec89563b7..0000000000 --- a/tests/bugs/moddata/bug271 +++ /dev/null @@ -1,26 +0,0 @@ - -puts "========================" -puts " OCC271 " -puts "========================" -puts "" - -restore [locate_data_file OCC271a.rle] su1 -restore [locate_data_file OCC271b.rle] su2 - -set U1 2.315721254379057e-16 -set U2 0.01131870392278708 -set V1 226.9760100729095 -set V2 203.7283534809051 - -intersect result su1 su2 $U1 $V1 $U2 $V2 - -set che [whatis result] - -if { ![regexp {3d} $che] || ![regexp {curve} $che]} { - puts "Faulty OCC271: command INTERSECT works wrongly" -} else { - puts "OCC271 OK : command INTERSECT works properly" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug2755 b/tests/bugs/moddata/bug2755 deleted file mode 100644 index 856197fcbe..0000000000 --- a/tests/bugs/moddata/bug2755 +++ /dev/null @@ -1,139 +0,0 @@ -puts "============" -puts "OCC2755" -puts "============" -puts "" -###################################################### -# Boolean Bug in OCC5.0 with the shape having a ellipse curve -###################################################### - -restore [locate_data_file OCC2755.brep] a - -checkshape a - -explode a f -mksurface gs a_1 -set list [proj gs 0 10 50] -set ll 4 - -set good_Parameter1List [list 0 0 0 0] -set good_Parameter2List [list 40.4616826479819 211.944716681974 64.3186164305428 81.0582330575794] -set good_OriginXList [list 0 0 0 0] -set good_OriginYList [list 10 10 10 10] -set good_OriginZList [list 50 50 50 50] -set good_AxisXList [list -0.0300865818651084 -0.941236271764613 0.534306660761684 0.998573938898137] -set good_AxisYList [list 0.999547296325529 -0.337748842654791 -0.845290714645381 0.0533862206328518] -set good_AxisZList [list 0 0 0 0] - -proc CalculatePercent {value good_value} { - if {${good_value} == 0. && ${value} == 0.} { - set percent 0. - } else { - set percent [expr abs(${value} - ${good_value}) / double(${good_value}) * 100.] - } - return ${percent} -} - -if {[llength ${list}] != ${ll}} { - puts "Faulty OCC2755" -} else { - set percent_max 0.1 - set IsGood 1 - for {set i 0} {$i < ${ll}} {incr i} { - set dump_list [dump [lindex ${list} $i]] - regexp { *Parameters *: *([-0-9.+eE]+) *([-0-9.+eE]+)} $dump_list full Parameter1 Parameter2 - regexp { *Origin *:([-0-9.+eE]+), *([-0-9.+eE]+), *([-0-9.+eE]+)} $dump_list full OriginX OriginY OriginZ - regexp { *Axis *:([-0-9.+eE]+), *([-0-9.+eE]+), *([-0-9.+eE]+)} $dump_list full AxisX AxisY AxisZ - - set good_Parameter1 [lindex ${good_Parameter1List} $i] - set good_Parameter2 [lindex ${good_Parameter2List} $i] - set good_OriginX [lindex ${good_OriginXList} $i] - set good_OriginY [lindex ${good_OriginYList} $i] - set good_OriginZ [lindex ${good_OriginZList} $i] - set good_AxisX [lindex ${good_AxisXList} $i] - set good_AxisY [lindex ${good_AxisYList} $i] - set good_AxisZ [lindex ${good_AxisZList} $i] - - set Parameter1_percent [CalculatePercent ${Parameter1} ${good_Parameter1}] - set Parameter2_percent [CalculatePercent ${Parameter2} ${good_Parameter2}] - set OriginX_percent [CalculatePercent ${OriginX} ${good_OriginX}] - set OriginY_percent [CalculatePercent ${OriginY} ${good_OriginY}] - set OriginZ_percent [CalculatePercent ${OriginZ} ${good_OriginZ}] - set AxisX_percent [CalculatePercent ${AxisX} ${good_AxisX}] - set AxisY_percent [CalculatePercent ${AxisY} ${good_AxisY}] - set AxisZ_percent [CalculatePercent ${AxisZ} ${good_AxisZ}] - - puts "good_Parameter1 = ${good_Parameter1}" - puts "Parameter1 = ${Parameter1}" - puts "Parameter1_percent = ${Parameter1_percent}\n" - - puts "good_Parameter2 = ${good_Parameter2}" - puts "Parameter2 = ${Parameter2}" - puts "Parameter2_percent = ${Parameter2_percent}\n" - - puts "good_OriginX = ${good_OriginX}" - puts "OriginX = ${OriginX}" - puts "OriginX_percent = ${OriginX_percent}\n" - - puts "good_OriginY = ${good_OriginY}" - puts "OriginY = ${OriginY}" - puts "OriginY_percent = ${OriginY_percent}\n" - - puts "good_OriginZ = ${good_OriginZ}" - puts "OriginZ = ${OriginZ}" - puts "OriginZ_percent = ${OriginZ_percent}\n" - - puts "good_AxisX = ${good_AxisX}" - puts "AxisX = ${AxisX}" - puts "AxisX_percent = ${AxisX_percent}\n" - - puts "good_AxisY = ${good_AxisY}" - puts "AxisY = ${AxisY}" - puts "AxisY_percent = ${AxisY_percent}\n" - - puts "good_AxisZ = ${good_AxisZ}" - puts "AxisZ = ${AxisZ}" - puts "AxisZ_percent = ${AxisZ_percent}\n" - - if {${Parameter1_percent} > ${percent_max}} { - puts "OCC2755 Faulty (case 3 / $i)" - set IsGood 0 - } - if {${Parameter2_percent} > ${percent_max}} { - puts "OCC2755 Faulty (case 3 / $i)" - set IsGood 0 - } - if {${OriginX_percent} > ${percent_max}} { - puts "OCC2755 Faulty (case 3 / $i)" - set IsGood 0 - } - if {${OriginY_percent} > ${percent_max}} { - puts "OCC2755 Faulty (case 3 / $i)" - set IsGood 0 - } - if {${OriginZ_percent} > ${percent_max}} { - puts "OCC2755 Faulty (case 3 / $i)" - set IsGood 0 - } - if {${AxisX_percent} > ${percent_max}} { - puts "OCC2755 Faulty (case 3 / $i)" - set IsGood 0 - } - if {${AxisY_percent} > ${percent_max}} { - puts "OCC2755 Faulty (case 3 / $i)" - set IsGood 0 - } - if {${AxisZ_percent} > ${percent_max}} { - puts "OCC2755 Faulty (case 3 / $i)" - set IsGood 0 - } - - } - - if {${IsGood} == 1} { - puts "OCC2755 OK" - } - -} - -set 3dviewer 0 - diff --git a/tests/bugs/moddata/bug276 b/tests/bugs/moddata/bug276 deleted file mode 100755 index 95be721857..0000000000 --- a/tests/bugs/moddata/bug276 +++ /dev/null @@ -1,30 +0,0 @@ -puts "========" -puts "OCC276" -puts "========" -puts "" -######################################################### -##Bad performance of checkshape on faces with multiple wires -######################################################### - -restore [locate_data_file OCC276.brep] result - -dchrono h2 reset -dchrono h2 start - -checkshape result - -dchrono h2 stop -set q2 [ dchrono h2 show ] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $q2 full z2 -if { [expr $z2 > 43] } { - puts "Elapsed time is more then 43 seconds - Faulty" -} else { - puts "Elapsed time is less then 43 seconds - OK" -} - -set 2dviewer 0 - - - - - diff --git a/tests/bugs/moddata/bug277 b/tests/bugs/moddata/bug277 deleted file mode 100644 index 5a0aa435ba..0000000000 --- a/tests/bugs/moddata/bug277 +++ /dev/null @@ -1,20 +0,0 @@ -puts "========" -puts "OCC277" -puts "========" -puts "" - -pload QAcommands - -OCC277 - -set listmem {} -set i_max 10 -for {set i 1} {${i} <= ${i_max}} {incr i} { - OCC277 - - lappend listmem [expr [meminfo w] / 1024] - if { [checktrend $listmem 0 1 "Memory leak detected"] } { - puts "No memory leak, $i iterations" - break - } -} diff --git a/tests/bugs/moddata/bug2784_1 b/tests/bugs/moddata/bug2784_1 deleted file mode 100644 index c6a4ae78b8..0000000000 --- a/tests/bugs/moddata/bug2784_1 +++ /dev/null @@ -1,35 +0,0 @@ -puts "============" -puts "OCC2784" -puts "============" -puts "" -###################################################### -# Common and cut operations for two faces gives invalid result -###################################################### -# Common and cut operations for two faces gives invalid result if one of the faces -# has a hole and other face lay in this hole (fill this hole). -###################################################### -## (new topology) -## (bcut) -## (bcommon) -###################################################### - -############# data ############# -box b1 10 20 10 -box b2 1 1 1 -ttranslate b2 5 5 0 -explode b1 f -explode b2 f - -bcut rcut1 b1_5 b2_5 -checkshape rcut1 - -bcommon result rcut1 b2_5 - -regexp {Mass +: +([-0-9.+eE]+)} [sprops result] full m - -if { $m != 0 } { - puts "Error : square is not right" -} - -set 3dviewer 1 - diff --git a/tests/bugs/moddata/bug2784_2 b/tests/bugs/moddata/bug2784_2 deleted file mode 100644 index 69dc62992d..0000000000 --- a/tests/bugs/moddata/bug2784_2 +++ /dev/null @@ -1,35 +0,0 @@ -puts "============" -puts "OCC2784" -puts "============" -puts "" -###################################################### -# Common and cut operations for two faces gives invalid result -###################################################### -# Common and cut operations for two faces gives invalid result if one of the faces -# has a hole and other face lay in this hole (fill this hole). -###################################################### -## (old topology) -## (cut) -## (common) -###################################################### - -############# data ############# -box b1 10 20 10 -box b2 1 1 1 -ttranslate b2 5 5 0 -explode b1 f -explode b2 f - -bcut rcut1 b1_5 b2_5 -checkshape rcut1 - -bcommon result rcut1 b2_5 - -regexp {Mass +: +([-0-9.+eE]+)} [sprops result] full m - -if { $m != 0 } { - puts "Error : square is not right" -} - -set 3dviewer 1 - diff --git a/tests/bugs/moddata/bug278_1 b/tests/bugs/moddata/bug278_1 deleted file mode 100755 index c384545153..0000000000 --- a/tests/bugs/moddata/bug278_1 +++ /dev/null @@ -1,20 +0,0 @@ - -puts "========" -puts "OCC278" -puts " (case 1)" -puts "========" - -###################################################################### -##Command "checkshape" does not define self-crossing for some wires and assigns status "valid" for them. -## NOTE akm: there is no actual intersection - it was a bug in displaying complicated curves (my patch deals with it) -## NOTE akm: wire alone is only a curve in the space so it may intersect itself. -## NOTE akm: bug after putting it on plane checkshape found the pb. -####################################################################### - -restore [locate_data_file OCC278a.brep] a - -mkplane result a -checkshape result - -set square 2914.99 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug278_2 b/tests/bugs/moddata/bug278_2 deleted file mode 100755 index 51a833d31e..0000000000 --- a/tests/bugs/moddata/bug278_2 +++ /dev/null @@ -1,20 +0,0 @@ - -puts "========" -puts "OCC278" -puts " (case 2)" -puts "========" - -###################################################################### -##Command "checkshape" does not define self-crossing for some wires and assigns status "valid" for them. -## NOTE akm: there is no actual intersection - it was a bug in displaying complicated curves (my patch deals with it) -## NOTE akm: wire alone is only a curve in the space so it may intersect itself. -## NOTE akm: bug after putting it on plane checkshape found the pb. -####################################################################### - -restore [locate_data_file OCC278b.brep] a - -mkplane result a -checkshape result - -set square 22740 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug278_3 b/tests/bugs/moddata/bug278_3 deleted file mode 100755 index 47e7df88e2..0000000000 --- a/tests/bugs/moddata/bug278_3 +++ /dev/null @@ -1,26 +0,0 @@ - -puts "========" -puts "OCC278" -puts " (case 3)" -puts "========" - -###################################################################### -##Command "checkshape" does not define self-crossing for some wires and assigns status "valid" for them. -## NOTE akm: there is no actual intersection - it was a bug in displaying complicated curves (my patch deals with it) -## NOTE akm: wire alone is only a curve in the space so it may intersect itself. -## NOTE akm: bug after putting it on plane checkshape found the pb. -####################################################################### - -restore [locate_data_file OCC278c.brep] a - -mkplane result a -decho off -set che [checkshape result] -decho on - -if { [regexp "Faulty" $che] != 1 } { - puts "Error (case 3) : Checkshape command works wrongly" -} - -set square 43.3075 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug27_1 b/tests/bugs/moddata/bug27_1 deleted file mode 100755 index 2c079ccfbd..0000000000 --- a/tests/bugs/moddata/bug27_1 +++ /dev/null @@ -1,16 +0,0 @@ - -puts "================" -puts "OCC27" -puts "================" -puts "" - -restore [locate_data_file shading_128.brep] a -checkshape a - -explode a e -blend result a 1 a_5 1 a_6 1 a_7 1 a_8 -checkshape result - -set square 155.846 -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug27_2 b/tests/bugs/moddata/bug27_2 deleted file mode 100755 index 8a81f2a226..0000000000 --- a/tests/bugs/moddata/bug27_2 +++ /dev/null @@ -1,17 +0,0 @@ - -puts "================" -puts "OCC27" -puts "================" -puts "" - -restore [locate_data_file shading_128.brep] a -checkshape a - -explode a e -explode a f -chamf result a a_5 a_1 A 1 45 a_6 a_1 A 1 45 a_7 a_1 A 1 45 a_8 a_1 A 1 45 -checkshape result - -set square 154.145 -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug284 b/tests/bugs/moddata/bug284 deleted file mode 100755 index 37a6c9f636..0000000000 --- a/tests/bugs/moddata/bug284 +++ /dev/null @@ -1,26 +0,0 @@ -puts "========" -puts "OCC284" -puts "========" - -######################################################### -## Command "checkshape" "gives" exception during attempt to check attached shape. -######################################################### - -restore [locate_data_file OCC284.brep] result - -decho off -if [catch { checkshape result } catch_result] { - set mistake 1 -} else { - set mistake 0 -} -decho on - -if { $mistake != 0} { - puts "Faulty OCC284 : here is problem in checkshape function" -} else { - puts "OCC284 OK: function checkshape works properly" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug286 b/tests/bugs/moddata/bug286 deleted file mode 100755 index 2d133e7830..0000000000 --- a/tests/bugs/moddata/bug286 +++ /dev/null @@ -1,28 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty OCC286: Attempt to project the point on surface gives wrong result." -puts "========================" -puts " OCC286 " -puts "========================" -puts "" - -restore [locate_data_file OCC286a.draw] a -restore [locate_data_file OCC286b.draw] b - -intersect i a b -cvalue i 0.31 x y z -point p x y z -proj b x y z - -set err1 "" -set err2 "" -set err3 "" -regexp {Point +: +([-0-9.+eE]+, +[-0-9.+eE]+, +[-0-9.+eE]+)} [dump ext_1] full err1 -regexp {Point +: +([-0-9.+eE]+, +[-0-9.+eE]+, +[-0-9.+eE]+)} [dump ext_2] full err2 -regexp {Point +: +([-0-9.+eE]+, +[-0-9.+eE]+, +[-0-9.+eE]+)} [dump ext_3] full err3 - -if { $err1 == $err2 || $err1 == $err3 || $err2 == $err3 } { - puts "Faulty OCC286: Attempt to project the point on surface gives wrong result." -} else { - puts "OCC286 OK : Attempt to project the point on surface gives correct result" -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug28_1 b/tests/bugs/moddata/bug28_1 deleted file mode 100755 index 5ca2973635..0000000000 --- a/tests/bugs/moddata/bug28_1 +++ /dev/null @@ -1,20 +0,0 @@ - -puts "================" -puts "OCC28" -puts "================" -############################################### -puts "Bug is limitation on currently version of topology (07.06.2002)." -############################################### - -cpulimit 1200 -restore [locate_data_file OCC28.brep] a -explode a -checkshape a_1 -checkshape a_2 - -bfuse result a_1 a_2 -checkshape result - -set square 483935 -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug28_2 b/tests/bugs/moddata/bug28_2 deleted file mode 100755 index 0d8eec1bb8..0000000000 --- a/tests/bugs/moddata/bug28_2 +++ /dev/null @@ -1,21 +0,0 @@ - -puts "================" -puts "OCC28" -puts "================" -############################################### -puts "Bug is limitation on currently version of topology (07.06.2002)." -############################################### - -cpulimit 1200 -restore [locate_data_file OCC28.brep] a -explode a -checkshape a_1 -checkshape a_2 - -bfuse result a_2 a_1 -checkshape result - -set square 483935 -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug299 b/tests/bugs/moddata/bug299 deleted file mode 100644 index fca2b46e0b..0000000000 --- a/tests/bugs/moddata/bug299 +++ /dev/null @@ -1,26 +0,0 @@ -puts "TODO OCC11111 ALL: OCC299: Error 2" - -pload QAcommands - -puts "================" -puts "OCC299" -puts "================" -puts "" - -restore [locate_data_file OCC298.brep] pr -checkshape pr - -point p 0.86427836 -1 -1 - -set info_result [OCC299 pr p] -set ll [llength ${info_result}] -if { ${ll} < 4 } { - puts "OCC299: Error 1" -} else { - if { [regexp {IN} $info_result] } { - puts "OCC299: OK" - } else { - puts "OCC299: Error 2" - } -} - diff --git a/tests/bugs/moddata/bug303_1 b/tests/bugs/moddata/bug303_1 deleted file mode 100755 index e4a81b44d2..0000000000 --- a/tests/bugs/moddata/bug303_1 +++ /dev/null @@ -1,23 +0,0 @@ -puts "========================" -puts " OCC303 " -puts "(case 1)" -puts "========================" -puts "" -################################################################# -## Exception while segment operation. -################################################################# - -restore [locate_data_file OCC303a.brep] sh1 - -explode sh1 e - -mkcurve c5 sh1_5 -trim result c5 - -if [catch {segment result 22.07126804854423 23.6320483505636} catch_result] { - puts "Faulty OCC303 (case 1): function SEGMENT works wrongly" -} else { - puts "OCC303 OK (case 1): function SEGMENT works properly" -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug303_2 b/tests/bugs/moddata/bug303_2 deleted file mode 100755 index 72bc6f3f02..0000000000 --- a/tests/bugs/moddata/bug303_2 +++ /dev/null @@ -1,23 +0,0 @@ -puts "========================" -puts " OCC303 " -puts "(case 2)" -puts "========================" -puts "" -################################################################# -## Exception while segment operation. -################################################################# - -restore [locate_data_file OCC303b.brep] sh1 - -explode sh1 e - -mkcurve c1 sh1_1 -trim result c1 - -if [catch {segment result 23.09944997429109 23.6320483505636} catch_result] { - puts "Faulty OCC303 (case 2): function SEGMENT works wrongly" -} else { - puts "OCC303 OK (case 2): function SEGMENT works properly" -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug308 b/tests/bugs/moddata/bug308 deleted file mode 100755 index 9befbc3ca4..0000000000 --- a/tests/bugs/moddata/bug308 +++ /dev/null @@ -1,25 +0,0 @@ -puts "===========" -puts " OCC308 " -puts "===========" -puts "" -################################################################# -## Can not project 3D-curve on surface. -################################################################# - -restore [locate_data_file OCC308a.draw] a -restore [locate_data_file OCC308b.draw] b - -if [catch {project result a b} catch_result] { - set mistake 1 -} else { - set mistake 0 -} - -if { $mistake == 0} { - puts "Faulty OCC308 : function PROJECT works wrongly" -} else { - puts "OCC308 OK : function PROJECT works properly" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug31 b/tests/bugs/moddata/bug31 deleted file mode 100755 index a0b940df16..0000000000 --- a/tests/bugs/moddata/bug31 +++ /dev/null @@ -1,33 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" - -puts "================" -puts "OCC31" -puts "================" -puts "" - -restore [locate_data_file OCC31.brep] sh -checkshape sh - -explode sh f - -explode sh_2 e - -chamf res1 sh sh_2_1 sh_2 7 7 -checkshape res1 - -explode res1 f - -explode res1_5 e - -chamf res2 res1 res1_5_4 res1_5 7 7 -checkshape res2 - -explode res2 f - -explode res2_4 e - -chamf result res2 res2_4_1 res2_4 7 7 -checkshape result - -set square 107634 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug311_1 b/tests/bugs/moddata/bug311_1 deleted file mode 100755 index 4640258cb7..0000000000 --- a/tests/bugs/moddata/bug311_1 +++ /dev/null @@ -1,47 +0,0 @@ -puts "========" -puts "OCC311" -puts "========" - -restore [locate_data_file OCC311.draw] c -#### checkshape c # - not a topological shape - -set ufirst 1e-7 -set ulast 6.2831854071795901 - -segment c ${ufirst} ${ulast} - -set dumpc [dump c] - -set list [split ${dumpc} "\n\t"] -set listLength [llength ${list}] -if { ${listLength} < 25 } { - puts "OCC311 - Error : listLength= ${listLength}" -} - -regexp { +Degree +([-0-9.+eE]+), +([-0-9.+eE]+) +Poles, +([-0-9.+eE]+) +Knots} $dumpc full DegreeNumber PolesNumber KnotsNumber - -set Knots [regexp -all -inline { +([-0-9.+eE]+ +: +[-0-9.+eE]+ +[-0-9.+eE]+)} $dumpc] -regexp { *[-0-9.+eE]+ +: +([-0-9.+eE]+) +[-0-9.+eE]+} [lindex $Knots 1] full FirstKnot -regexp { *[-0-9.+eE]+ +: +([-0-9.+eE]+) +[-0-9.+eE]+} [lindex $Knots [llength $Knots]-1] full LastKnot - -set delta_first [expr abs(${FirstKnot} - ${ufirst}) / ${ufirst} * 100] -set delta_last [expr abs(${LastKnot} - ${ulast}) / ${ulast} * 100] - -set maxdelta 0.01 - -puts "FirstKnot = ${FirstKnot}" -puts "LastKnot = ${LastKnot}" - -if { ${delta_first} > ${maxdelta} } { - puts "OCC311 - Error : delta_first = ${delta_first}" -} -if { ${delta_last} > ${maxdelta} } { - puts "OCC311 - Error : delta_last = ${delta_last}" -} - -if { ${delta_first} <= ${maxdelta} && ${delta_last} <= ${maxdelta} } { - puts "OCC311: OK" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug311_2 b/tests/bugs/moddata/bug311_2 deleted file mode 100755 index 88740e7d80..0000000000 --- a/tests/bugs/moddata/bug311_2 +++ /dev/null @@ -1,47 +0,0 @@ -puts "========" -puts "OCC311" -puts "========" - -restore [locate_data_file OCC311.draw] c -#### checkshape c # - not a topological shape - -set ufirst 1e-7 -set ulast 6.2831854071795897 - -segment c ${ufirst} ${ulast} - -set dumpc [dump c] - -set list [split ${dumpc} "\n\t"] -set listLength [llength ${list}] -if { ${listLength} < 25 } { - puts "OCC311 - Error : listLength= ${listLength}" -} - -regexp { +Degree +([-0-9.+eE]+), +([-0-9.+eE]+) +Poles, +([-0-9.+eE]+) +Knots} $dumpc full DegreeNumber PolesNumber KnotsNumber - -set Knots [regexp -all -inline { +([-0-9.+eE]+ +: +[-0-9.+eE]+ +[-0-9.+eE]+)} $dumpc] -regexp { *[-0-9.+eE]+ +: +([-0-9.+eE]+) +[-0-9.+eE]+} [lindex $Knots 1] full FirstKnot -regexp { *[-0-9.+eE]+ +: +([-0-9.+eE]+) +[-0-9.+eE]+} [lindex $Knots [llength $Knots]-1] full LastKnot - -set delta_first [expr abs(${FirstKnot} - ${ufirst}) / ${ufirst} * 100] -set delta_last [expr abs(${LastKnot} - ${ulast}) / ${ulast} * 100] - -set maxdelta 0.01 - -puts "FirstKnot = ${FirstKnot}" -puts "LastKnot = ${LastKnot}" - -if { ${delta_first} > ${maxdelta} } { - puts "OCC311 - Error : delta_first = ${delta_first}" -} -if { ${delta_last} > ${maxdelta} } { - puts "OCC311 - Error : delta_last = ${delta_last}" -} - -if { ${delta_first} <= ${maxdelta} && ${delta_last} <= ${maxdelta} } { - puts "OCC311: OK" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug313 b/tests/bugs/moddata/bug313 deleted file mode 100755 index ff460637b7..0000000000 --- a/tests/bugs/moddata/bug313 +++ /dev/null @@ -1,13 +0,0 @@ - -puts "================" -puts "OCC313" -puts "================" -puts "" - -######################################################## -#### Exeption is raised in DRAW during command "restore" on attahed shape. -######################################################## - -restore [locate_data_file OCC313.brep] result - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug324 b/tests/bugs/moddata/bug324 deleted file mode 100755 index f7bfcc75d5..0000000000 --- a/tests/bugs/moddata/bug324 +++ /dev/null @@ -1,21 +0,0 @@ -puts "========================" -puts " OCC324 " -puts "========================" -puts "" -################################################################# -## The command "intersect" applied to the given arguments "s1" (plane) and "s2" (cylinder) leads -## to the program hang-up. -################################################################# - -restore [locate_data_file OCC324a.draw] s1 -restore [locate_data_file OCC324b.draw] s2 - -if [catch {intersect result s1 s2} catch_result] { - puts "Faulty OCC324: function INTERSECT works wrongly" -} else { - puts "OCC324 OK: function INTERSECT works properly" -} - -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug324_1 b/tests/bugs/moddata/bug324_1 deleted file mode 100755 index 170714785d..0000000000 --- a/tests/bugs/moddata/bug324_1 +++ /dev/null @@ -1,16 +0,0 @@ - -puts "========================" -puts "BUC60979" -puts " OCC324 " -puts "========================" -puts "" -################################################################# -## Extrema between trimmed line and circle lead to exception. -################################################################# - -restore [locate_data_file OCC359a.brep] el -restore [locate_data_file OCC359b.brep] ec - -distmini dd el ec - - diff --git a/tests/bugs/moddata/bug325 b/tests/bugs/moddata/bug325 deleted file mode 100755 index 943aba96e2..0000000000 --- a/tests/bugs/moddata/bug325 +++ /dev/null @@ -1,21 +0,0 @@ -puts "========================" -puts " OCC325 " -puts "========================" -puts "" -################################################## -## Checkshape does not recognize an error in a bad face -################################################## - -restore [locate_data_file OCC325.brep] result - -decho off -set che [checkshape result] -decho on - -if { [regexp {Faulty} $che ] != 1} { - puts "Faulty OCC325: Checkshape command works wrongly" -} else { - puts "OCC325 OK : Checkshape command works properly" -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug326 b/tests/bugs/moddata/bug326 deleted file mode 100755 index 5c491ae55e..0000000000 --- a/tests/bugs/moddata/bug326 +++ /dev/null @@ -1,18 +0,0 @@ -puts "================" -puts "OCC326" -puts "================" -puts "" -########################################################### -## Exception is raised in sewing on internal edges on attached shape -########################################################### - -restore [locate_data_file OCC326.brep] a - -if [catch { sewing result a } catch_result] { - puts "Faulty OCC326: here is sewing problem" -} else { - puts "OCC326 OK: Sewing is ok, there is no except" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug332 b/tests/bugs/moddata/bug332 deleted file mode 100755 index 82893296a6..0000000000 --- a/tests/bugs/moddata/bug332 +++ /dev/null @@ -1,104 +0,0 @@ -puts "================" -puts "OCC332" -puts "================" -puts "" - -pload QAcommands - -set wall_thickness 10 -set dia1 30 -set dia2 50 -set ll 100 -set major_radius 200 - -OCC332 ${wall_thickness} ${dia1} ${dia2} ${ll} ${major_radius} - -checkshape wallSolid_ -checkshape gasSolid_ - - -vinit -vdisplay wallSolid_ -vdisplay gasSolid_ -vzfit - - -explode wallSolid_ w - -vdisplay wallSolid__3 -vdisplay wallSolid__4 -vdisplay wallSolid__5 -vdisplay wallSolid__6 - -set props_3 [lprops wallSolid__3] -set props_4 [lprops wallSolid__4] -set props_5 [lprops wallSolid__5] -set props_6 [lprops wallSolid__6] - -#wire wallSolid__3 -set list [split ${props_3} "\n\t"] -set listLength [llength ${list}] -if { ${listLength} < 20 } { - puts "OCC332 - Error : listLength= ${listLength}" -} - -regexp {Mass +: +([-0-9.+eE]+)} $props_3 full CircleLength_3 - -#wire wallSolid__4 -set list [split ${props_4} "\n\t"] -set listLength [llength ${list}] -if { ${listLength} < 20 } { - puts "OCC332 - Error : listLength= ${listLength}" -} - -regexp {Mass +: +([-0-9.+eE]+)} $props_4 full CircleLength_4 - -#wire wallSolid__5 -set list [split ${props_5} "\n\t"] -set listLength [llength ${list}] -if { ${listLength} < 20 } { - puts "OCC332 - Error : listLength= ${listLength}" -} - -regexp {Mass +: +([-0-9.+eE]+)} $props_5 full CircleLength_5 - -#wire wallSolid__6 -set list [split ${props_6} "\n\t"] -set listLength [llength ${list}] -if { ${listLength} < 20 } { - puts "OCC332 - Error : listLength= ${listLength}" -} - -regexp {Mass +: +([-0-9.+eE]+)} $props_6 full CircleLength_6 - -# Calculation -set pi [expr 2. * asin(1.0)] -set TheoryCircleLength_4 [expr ${pi} * ${dia1}] -set TheoryCircleLength_3 [expr ${pi} * (${dia1} + 2 * ${wall_thickness}) ] -set TheoryCircleLength_6 [expr ${pi} * ${dia2}] -set TheoryCircleLength_5 [expr ${pi} * (${dia2} + 2 * ${wall_thickness}) ] - -set delta_3 [expr abs(${CircleLength_3} - ${TheoryCircleLength_3}) / ${TheoryCircleLength_3} * 100] -set delta_4 [expr abs(${CircleLength_4} - ${TheoryCircleLength_4}) / ${TheoryCircleLength_4} * 100] -set delta_5 [expr abs(${CircleLength_5} - ${TheoryCircleLength_5}) / ${TheoryCircleLength_5} * 100] -set delta_6 [expr abs(${CircleLength_6} - ${TheoryCircleLength_6}) / ${TheoryCircleLength_6} * 100] - -set maxdelta 0.1 - -if { ${delta_3} > ${maxdelta} } then {puts "OCC332 - Error : delta_3= ${delta_3}"} -if { ${delta_4} > ${maxdelta} } then {puts "OCC332 - Error : delta_4= ${delta_4}"} -if { ${delta_5} > ${maxdelta} } then {puts "OCC332 - Error : delta_5= ${delta_5}"} -if { ${delta_6} > ${maxdelta} } then {puts "OCC332 - Error : delta_6= ${delta_6}"} - -if { ${delta_3} <= ${maxdelta} && ${delta_4} <= ${maxdelta} && ${delta_5} <= ${maxdelta} && ${delta_6} <= ${maxdelta} } then { - puts "OCC332: OK" -} -puts "CircleLength_3 = ${CircleLength_3}" -puts "CircleLength_4 = ${CircleLength_4}" -puts "CircleLength_5 = ${CircleLength_5}" -puts "CircleLength_6 = ${CircleLength_6}" - -set only_screen 1 - - - diff --git a/tests/bugs/moddata/bug333 b/tests/bugs/moddata/bug333 deleted file mode 100755 index bafe6e77a6..0000000000 --- a/tests/bugs/moddata/bug333 +++ /dev/null @@ -1,37 +0,0 @@ -puts "================" -puts "OCC333" -puts "================" -puts "" -####################################################### -## Superimposed curves during intersection two surfaces -####################################################### - -pload QAcommands - -restore [locate_data_file OCC333a.draw] s12 -############### checkshape su12 # is not a topological shape -restore [locate_data_file OCC333b.draw] s11 -############### checkshape su11 # is not a topological shape -intersect result s12 s11 -explode result e -clknots result_3 -clknots result_13 - -mkedge e_1 result_3 -mkedge e_2 result_13 - -set status [OCC333 e_1 e_2] -if {[llength ${status}] < 1} { - puts "OCC333 ERROR" -} else { - regexp {([-0-9.+eE]+)} ${status} full code - if { ${code} == 3 || ${code} == 2} { - puts "OCC333 OK : Intersection command works properly" - } else { - puts "Faulty OCC333 : Intersection was made WRONGLY" - } -} - -donly i_3 i_13 - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug343 b/tests/bugs/moddata/bug343 deleted file mode 100755 index 3335b4a554..0000000000 --- a/tests/bugs/moddata/bug343 +++ /dev/null @@ -1,131 +0,0 @@ -puts "================" -puts "BUC61039" -puts "OCC343" -puts "================" -puts "" - -cpulimit 9000 -pload XDE -if [catch {igesbrep [locate_data_file lh3d_px1.igs] a *} catch_result] { - puts "Faulty OCC343: here is reading problem" -} else { - puts "Reading OCC343 OK" - tpcompound a - # - # First sewing - # - sewing result1 100. a - - set FaceList [explode result1 f] - set FaceListLength [llength ${FaceList}] - if { ${FaceListLength} < 1 } { - puts "OCC343 - Error : FaceListLength= ${FaceListLength}" - } - - set X_List1 [list] - set Y_List1 [list] - set Z_List1 [list] - for {set i 1} {${i} <= ${FaceListLength}} {incr i} { - set props [sprops result1_${i}] - set list [split ${props} "\n\t"] - set listLength [llength ${list}] - if { ${listLength} < 20 } { - puts "OCC343 - Error : listLength= ${listLength}" - } - set Center_Gravity_X [lindex ${list} 5] - set Center_Gravity_Y [lindex ${list} 6] - set Center_Gravity_Z [lindex ${list} 7] - - set Center_Gravity_X [lindex [split ${Center_Gravity_X}] [expr [llength [split ${Center_Gravity_X}] ] - 1] ] - set Center_Gravity_Y [lindex [split ${Center_Gravity_Y}] [expr [llength [split ${Center_Gravity_Y}] ] - 1] ] - set Center_Gravity_Z [lindex [split ${Center_Gravity_Z}] [expr [llength [split ${Center_Gravity_Z}] ] - 1] ] - - lappend X_List1 ${Center_Gravity_X} - lappend Y_List1 ${Center_Gravity_Y} - lappend Z_List1 ${Center_Gravity_Z} - } - - vinit - vdisplay result1 - vfit - - set CycleNumber 10 - for {set j 1} {${j} <= ${CycleNumber}} {incr j} { - veraseall - # - # Second sewing - # - - if [catch {igesbrep [locate_data_file lh3d_px1.igs] a *} catch_result] { - puts "Faulty OCC343: here is reading problem" - } else { - puts "Reading OCC343 OK" - } - - tpcompound a - sewing result2 100. a - - set FaceList [explode result2 f] - set FaceListLength [llength ${FaceList}] - if { ${FaceListLength} < 1 } then {puts "OCC343 - Error : FaceListLength= ${FaceListLength}"} - - set X_List2 [list] - set Y_List2 [list] - set Z_List2 [list] - for {set i 1} {${i} <= ${FaceListLength}} {incr i} { - set props [sprops result2_${i}] - set list [split ${props} "\n\t"] - set listLength [llength ${list}] - if { ${listLength} < 20 } { - puts "OCC343 - Error : listLength= ${listLength}" - } - - set Center_Gravity_X [lindex ${list} 5] - set Center_Gravity_Y [lindex ${list} 6] - set Center_Gravity_Z [lindex ${list} 7] - - set Center_Gravity_X [lindex [split ${Center_Gravity_X}] [expr [llength [split ${Center_Gravity_X}] ] - 1] ] - set Center_Gravity_Y [lindex [split ${Center_Gravity_Y}] [expr [llength [split ${Center_Gravity_Y}] ] - 1] ] - set Center_Gravity_Z [lindex [split ${Center_Gravity_Z}] [expr [llength [split ${Center_Gravity_Z}] ] - 1] ] - - lappend X_List2 ${Center_Gravity_X} - lappend Y_List2 ${Center_Gravity_Y} - lappend Z_List2 ${Center_Gravity_Z} - } - - set ListLength [llength ${X_List1}] - if { ${ListLength} != [llength ${Y_List1}] } then {puts "OCC343 - Error : ListLength= ${ListLength}"} - if { ${ListLength} != [llength ${Z_List1}] } then {puts "OCC343 - Error : ListLength= ${ListLength}"} - if { ${ListLength} != [llength ${X_List2}] } then {puts "OCC343 - Error : ListLength= ${ListLength}"} - if { ${ListLength} != [llength ${Y_List2}] } then {puts "OCC343 - Error : ListLength= ${ListLength}"} - if { ${ListLength} != [llength ${Z_List2}] } then {puts "OCC343 - Error : ListLength= ${ListLength}"} - - for {set i 0} {${i} < ${ListLength}} {incr i} { - set X1 [lindex ${X_List1} ${i}] - set X2 [lindex ${X_List2} ${i}] - if { ${X1} != ${X2} } { - puts "OCC343 - Error : X1= ${X1} X2= ${X2}" - } - set Y1 [lindex ${Y_List1} ${i}] - set Y2 [lindex ${Y_List2} ${i}] - if { ${Y1} != ${Y2} } { - puts "OCC343 - Error : Y1= ${Y1} Y2= ${Y2}" - } - set Z1 [lindex ${Z_List1} ${i}] - set Z2 [lindex ${Z_List2} ${i}] - if { ${Z1} != ${Z2} } { - puts "OCC343 - Error : Z1= ${Z1} Z2= ${Z2}" - } - } - - tclean result1 - vdisplay result1 - vfit - } -} - -set only_screen 1 - - - - diff --git a/tests/bugs/moddata/bug35 b/tests/bugs/moddata/bug35 deleted file mode 100755 index b2c088d48a..0000000000 --- a/tests/bugs/moddata/bug35 +++ /dev/null @@ -1,20 +0,0 @@ - -puts "================" -puts "OCC35" -puts "================" -puts "" - -restore [locate_data_file OCC35.brep] result -decho off -set info [checkshape result] -decho on - -if { [regexp "Faulty" $info] != 1 } { - puts "Command checkshape works wrongly (should be faulty)" -} - -set 2dviewer 0 - - - - diff --git a/tests/bugs/moddata/bug353 b/tests/bugs/moddata/bug353 deleted file mode 100644 index 52a2e79662..0000000000 --- a/tests/bugs/moddata/bug353 +++ /dev/null @@ -1,16 +0,0 @@ -pload QAcommands - -puts "================" -puts "OCC353" -puts "================" -puts "" -########################################################## -## Attached DRAW command "TATA_const" hangs in Geom2dGcc_Circ2d3Tan. -########################################################## - -if [catch { OCC353 }] { - puts "OCC353: Error" -} else { - puts "OCC353: OK" -} - diff --git a/tests/bugs/moddata/bug354_1 b/tests/bugs/moddata/bug354_1 deleted file mode 100755 index 34b9cbbe01..0000000000 --- a/tests/bugs/moddata/bug354_1 +++ /dev/null @@ -1,19 +0,0 @@ - -puts "========================" -puts " OCC354 " -puts "(case 1)" -puts "========================" -puts "" -################################################## -## neither chamfer nor blend is built in similar situation -################################################## - -restore [locate_data_file OCC354a.brep] a - -explode a e - -blend result a 2 a_18 -checkshape result - -set square 593.527 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug354_2 b/tests/bugs/moddata/bug354_2 deleted file mode 100755 index 100a457d91..0000000000 --- a/tests/bugs/moddata/bug354_2 +++ /dev/null @@ -1,22 +0,0 @@ - -puts "========================" -puts " OCC354 " -puts "(case 2)" -puts "========================" -puts "" -################################################## -## neither chamfer nor blend is built in similar situation -################################################## - -restore [locate_data_file OCC354b.brep] a -explode a f - -explode a_5 e - -donl a a_5_6 - -chamf result a a_5_6 a_5 A 2 45 -checkshape result - -set square 589.268 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug36 b/tests/bugs/moddata/bug36 deleted file mode 100755 index 7c61e6b4a9..0000000000 --- a/tests/bugs/moddata/bug36 +++ /dev/null @@ -1,29 +0,0 @@ -puts "========" -puts "OCC36" -puts "========" - -pload XDE - -if [catch { igesbrep [locate_data_file OCC36.igs] a * } res] { - puts "Warning OCC36: here is reading problem" -} else { - puts "Reading OCC36 OK" - - tpcompound r - dchrono h2 reset - dchrono h2 start - sewing result 1.e-7 r - dchrono h2 stop - set q2 [ dchrono h2 show ] - regexp {CPU user time: ([-0-9.+eE]+) seconds} $q2 full z2 - puts "$z2" - if { $z2 > 30 } { - puts "Elapsed time is more then 30 seconds - Faulty" - } else { - puts "Elapsed time is less then 30 seconds - OK" - } -} - -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug360 b/tests/bugs/moddata/bug360 deleted file mode 100755 index 5ff2cb238c..0000000000 --- a/tests/bugs/moddata/bug360 +++ /dev/null @@ -1,24 +0,0 @@ -puts "========================" -puts " BUC60980 " -puts " OCC360" -puts "========================" -puts "" -################################################################## -## Can not find a projection the circle on the sphere. -################################################################## - -restore [locate_data_file OCC360a.draw] c -restore [locate_data_file OCC360b.draw] cf - -set che [project result c cf] -puts $che - -if { [regexp {Projection} $che] && [regexp {Failed} $che] } { - puts "Faulty OCC360: command PROJECT works wrongly" -} else { - puts " OCC360 OK : command PROJECT works properly" -} - -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug366 b/tests/bugs/moddata/bug366 deleted file mode 100755 index 850e567f92..0000000000 --- a/tests/bugs/moddata/bug366 +++ /dev/null @@ -1,21 +0,0 @@ - -puts "========================" -puts " OCC366 " -puts "========================" -puts "" -################################################## -## Checkshape says that face is valid but it inludes selfintersecting wire -################################################## - -restore [locate_data_file buc61006.brep] result - -decho off -set che [checkshape result] -decho on - -if { [regexp "Faulty" $che] != 1 } { - puts "Error : Checkshape command works wrongly" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug367 b/tests/bugs/moddata/bug367 deleted file mode 100644 index 324a449d0e..0000000000 --- a/tests/bugs/moddata/bug367 +++ /dev/null @@ -1,24 +0,0 @@ -pload QAcommands - -puts "================" -puts "OCC367" -puts "BUC61013" -puts "================" -puts "" - -restore [locate_data_file OCC105.brep] result -checkshape result - -set step 0.5 -set goodX -307.47165394 -set goodY -340.18073533 -set goodZ 0 -set percent_tolerance 0.01 - -OCC367 result ${step} ${goodX} ${goodY} ${goodZ} ${percent_tolerance} - -set length 1760.13 -set 2dviewer 0 - - - diff --git a/tests/bugs/moddata/bug368 b/tests/bugs/moddata/bug368 deleted file mode 100755 index a3c733f480..0000000000 --- a/tests/bugs/moddata/bug368 +++ /dev/null @@ -1,33 +0,0 @@ - -puts "========================" -puts "BUC61027" -puts " OCC368 " -puts "========================" -puts "" -############################################## -## Visualization is too slow. -############################################## - -restore [locate_data_file OCC368.brep] result -checkshape result - -tclean result -isos result 0 -vinit -dchrono h2 reset -dchrono h2 start -vdisplay result -vsetdispmode result 1 -dchrono h2 stop - -regexp {CPU user time: +([-0-9.+eE]+)} [dchrono h2 show] full z2 - -if { $z2 > 30 } { - puts "Error : Elapsed time is more then 30 seconds" -} - -set 2dviewer 0 - - - - diff --git a/tests/bugs/moddata/bug370 b/tests/bugs/moddata/bug370 deleted file mode 100755 index dab5d91141..0000000000 --- a/tests/bugs/moddata/bug370 +++ /dev/null @@ -1,24 +0,0 @@ -puts "========================" -puts "BUC61033" -puts " OCC370 " -puts "========================" -puts "" -################################################################# -##Intersection between a sphere and trimmed plane, using IntPatch_Intersection, lead to infinite cycle. -################################################################# - -sphere gs1 1 -plane gs2 0 0 0 1 0 0 -trim trgs2 gs2 0 1.000001 -1 0.000001 - -intersect result gs1 trgs2 - -cpulimit 300 - -puts "OCC370 OK: function INTERSECT works properly" - -erase gs2 - -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug371 b/tests/bugs/moddata/bug371 deleted file mode 100755 index 5db7f14013..0000000000 --- a/tests/bugs/moddata/bug371 +++ /dev/null @@ -1,24 +0,0 @@ - -puts "========================" -puts "BUC61034" -puts " OCC371 " -puts "========================" -puts "" -################################################################# -##Intersection between two BSplineSurfaces, using IntPatch_Intersection, lead to infinite cycle. -################################################################# - -restore [locate_data_file OCC371a.brep] a -restore [locate_data_file OCC371b.brep] b - -mksurface gs1 a -mksurface gs2 b -trim trgs1 gs1 0.0 1.0 0.9698725179864 1.0 -trim trgs2 gs2 0.0 1.0 0.24333094700742 0.92374551772989 - -#cpulimit 300 -intersect result trgs1 trgs2 - -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug372 b/tests/bugs/moddata/bug372 deleted file mode 100755 index de1d75e470..0000000000 --- a/tests/bugs/moddata/bug372 +++ /dev/null @@ -1,31 +0,0 @@ -pload QAcommands - -puts "========================" -puts "OCC372" -puts "BUC61036" -puts "========================" -puts "" -############################################################### -##BRepClass3d_SolidClassifier classify point to solid as OUT, but the point is inside the solid. -############################################################### - -restore [locate_data_file OCC372.brep] b1 -checkshape b1 - -point p1 6311.4862583184 -2841.3092756034 16.461053497188 - -set result [OCC299 b1 p1] -set ll [llength ${result}] -if { ${ll} < 4 } then { - puts "OCC372: ERROR 1" -} else { - regexp {The point is (.*) shape} ${result} full status - if {[string compare ${status} "IN"] == 0} then { - puts "status = ${status}" - puts "OCC372: OK" - } else { - puts "status = ${status}" - puts "Faulty : OCC372" - } -} - diff --git a/tests/bugs/moddata/bug3721_1 b/tests/bugs/moddata/bug3721_1 deleted file mode 100644 index c2e74d4898..0000000000 --- a/tests/bugs/moddata/bug3721_1 +++ /dev/null @@ -1,28 +0,0 @@ -puts "TODO OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO OCC11111 ALL: Error : The square of result shape is" - -puts "============" -puts "OCC3721" -puts "============" -puts "" -###################################################### -# When using Boolean Operations exception is raised for some tolerance vals. -###################################################### -## (new topology) -## (bfuse) -###################################################### - -restore [locate_data_file OCC3721-1.brep] b1 -restore [locate_data_file OCC3721-2.brep] b2 - -checkshape b1 -checkshape b2 - -if { [catch {bfuse result b1 b2} catch_result] } { - puts "Faulty OCC3721" -} - -checkshape result - -set square 71185 -set 3dviewer 1 diff --git a/tests/bugs/moddata/bug3721_2 b/tests/bugs/moddata/bug3721_2 deleted file mode 100644 index 1d95c6ef74..0000000000 --- a/tests/bugs/moddata/bug3721_2 +++ /dev/null @@ -1,29 +0,0 @@ -puts "TODO OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO OCC11111 ALL: Error : The square of result shape is" - -puts "============" -puts "OCC3721" -puts "============" -puts "" -###################################################### -# When using Boolean Operations exception is raised for some tolerance vals. -###################################################### -## (new topology) -## (bfuse) -###################################################### - -restore [locate_data_file OCC3721-1.brep] b1 -restore [locate_data_file OCC3721-2.brep] b2 - -checkshape b1 -checkshape b2 - -if { [catch {bfuse result b2 b1} catch_result] } { - puts "Faulty OCC3721" -} - -checkshape result - -set square 71185 -set 3dviewer 1 - diff --git a/tests/bugs/moddata/bug3721_3 b/tests/bugs/moddata/bug3721_3 deleted file mode 100644 index e7203b5981..0000000000 --- a/tests/bugs/moddata/bug3721_3 +++ /dev/null @@ -1,28 +0,0 @@ -puts "TODO OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO OCC11111 ALL: Error : The square of result shape is" - -puts "============" -puts "OCC3721" -puts "============" -puts "" -###################################################### -# When using Boolean Operations exception is raised for some tolerance vals. -###################################################### -## (new topology) -## (bcommon) -###################################################### - -restore [locate_data_file OCC3721-1.brep] b1 -restore [locate_data_file OCC3721-2.brep] b2 - -checkshape b1 -checkshape b2 - -if { [catch {bcommon result b2 b1} catch_result] } { - puts "Faulty OCC3721" -} - -checkshape result - -set square 0. -set 3dviewer 1 \ No newline at end of file diff --git a/tests/bugs/moddata/bug3721_4 b/tests/bugs/moddata/bug3721_4 deleted file mode 100644 index 114a74c187..0000000000 --- a/tests/bugs/moddata/bug3721_4 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC3721" -puts "============" -puts "" -###################################################### -# When using Boolean Operations exception is raised for some tolerance vals. -###################################################### -## (new topology) -## (bcut) -###################################################### - -restore [locate_data_file OCC3721-1.brep] b1 -restore [locate_data_file OCC3721-2.brep] b2 - -checkshape b1 -checkshape b2 - -if { [catch {bcut result b1 b2} catch_result] } { - puts "Faulty OCC3721" -} - -checkshape result - -set square 71185 -set 3dviewer 1 - diff --git a/tests/bugs/moddata/bug3721_5 b/tests/bugs/moddata/bug3721_5 deleted file mode 100644 index fbcbeafd1c..0000000000 --- a/tests/bugs/moddata/bug3721_5 +++ /dev/null @@ -1,29 +0,0 @@ -puts "TODO OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO OCC11111 ALL: Error : The square of result shape is" - -puts "============" -puts "OCC3721" -puts "============" -puts "" -###################################################### -# When using Boolean Operations exception is raised for some tolerance vals. -###################################################### -## (new topology) -## (bcut) -###################################################### - -restore [locate_data_file OCC3721-1.brep] b1 -restore [locate_data_file OCC3721-2.brep] b2 - -checkshape b1 -checkshape b2 - -if { [catch {bcut result b2 b1} catch_result] } { - puts "Faulty OCC3721" -} - -checkshape result - -set square 71185 -set 3dviewer 1 - diff --git a/tests/bugs/moddata/bug3721_6 b/tests/bugs/moddata/bug3721_6 deleted file mode 100644 index 9f854db4d9..0000000000 --- a/tests/bugs/moddata/bug3721_6 +++ /dev/null @@ -1,30 +0,0 @@ -puts "TODO OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" -puts "TODO OCC11111 ALL: Error : The square of result shape is" - -puts "============" -puts "OCC3721" -puts "============" -puts "" -###################################################### -# When using Boolean Operations exception is raised for some tolerance vals. -###################################################### -## (new topology) -## (boptuc) -###################################################### - -restore [locate_data_file OCC3721-1.brep] b1 -restore [locate_data_file OCC3721-2.brep] b2 - -checkshape b1 -checkshape b2 - -bop b1 b2 -if { [catch {boptuc result} catch_result] } { - puts "Faulty OCC3721" -} - -checkshape result - -set square 71185 -set 3dviewer 1 - diff --git a/tests/bugs/moddata/bug3721_7 b/tests/bugs/moddata/bug3721_7 deleted file mode 100644 index 732e3f4660..0000000000 --- a/tests/bugs/moddata/bug3721_7 +++ /dev/null @@ -1,27 +0,0 @@ -puts "============" -puts "OCC3721" -puts "============" -puts "" -###################################################### -# When using Boolean Operations exception is raised for some tolerance vals. -###################################################### -## (new topology) -## (boptuc) -###################################################### - -restore [locate_data_file OCC3721-1.brep] b1 -restore [locate_data_file OCC3721-2.brep] b2 - -checkshape b1 -checkshape b2 - -bop b2 b1 -if { [catch {boptuc result} catch_result] } { - puts "Faulty OCC3721" -} - -checkshape result - -set square 71185 -set 3dviewer 1 - diff --git a/tests/bugs/moddata/bug374_1 b/tests/bugs/moddata/bug374_1 deleted file mode 100755 index e19b57ea85..0000000000 --- a/tests/bugs/moddata/bug374_1 +++ /dev/null @@ -1,17 +0,0 @@ - -puts "========================" -puts "BUC61040" -puts " OCC374 " -puts "========================" -puts "" -#################################### -##Offset surface from bspline surface is not correct -#################################### -restore [locate_data_file OCC374.draw] su - -offset su1 su 1 - -mkface result su1 - -set square 7960.45 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug374_2 b/tests/bugs/moddata/bug374_2 deleted file mode 100755 index aee0b215e5..0000000000 --- a/tests/bugs/moddata/bug374_2 +++ /dev/null @@ -1,17 +0,0 @@ - -puts "========================" -puts "BUC61040" -puts " OCC374 " -puts "========================" -puts "" -#################################### -##Offset surface from bspline surface is not correct -#################################### -restore [locate_data_file OCC374.draw] su - -offset su2 su -1 - -mkface result su2 - -set square 7181.83 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug376 b/tests/bugs/moddata/bug376 deleted file mode 100755 index 378a38112b..0000000000 --- a/tests/bugs/moddata/bug376 +++ /dev/null @@ -1,19 +0,0 @@ - -puts "========================" -puts "BUC61049" -puts " OCC376 " -puts "========================" -puts "" -#################################### -##. Offset can not be created on the attached surface -#################################### - -restore [locate_data_file OCC376.rle] s - -offset r s 1 - -mkface result s - -set square 1256.64 -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug377 b/tests/bugs/moddata/bug377 deleted file mode 100644 index aa2826ec62..0000000000 --- a/tests/bugs/moddata/bug377 +++ /dev/null @@ -1,22 +0,0 @@ -puts "TODO OCC11111 ALL: Error : OCC377" - -pload QAcommands - -puts "========" -puts "OCC377" -puts "BUC61056" -puts "========" -puts "" -################################################################### -##Incorrect behaviour of BRepTopAdapter_FClass2d. It cannot work with parametric representation -## of the first wire on the face. It says that point (1.9812, -0.9557948) is outside the contour for -## forward wire and inside for reversed one if tolerance is equal to 6.45 -################################################################### - -set result_info [ OCC377 [locate_data_file OCC377.brep] 1.9812 -0.9557948 6.45 ] -if { [ regexp {FAULTY} $result_info ]} { - puts "Error : OCC377" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug378 b/tests/bugs/moddata/bug378 deleted file mode 100755 index 4e065f12cf..0000000000 --- a/tests/bugs/moddata/bug378 +++ /dev/null @@ -1,23 +0,0 @@ -puts "========================" -puts "BUC61058" -puts " OCC378 " -puts "========================" -puts "" -######################################################################## -##Regression on KAS:dev:ros. Draw hangs after try to load 6381.brep shape to 3D Viewer. Case : cgg/004/S2 -######################################################################## - -restore [locate_data_file OCC378.brep] result - -tclean result -vinit - -if [catch {vdisplay result } catch_result] { - puts "Faulty OCC378: function VDISPLAY works wrongly" -} else { - puts " OCC378 OK : function VDISPLAY works properly" -} - -set 3dviewer 1 - - diff --git a/tests/bugs/moddata/bug37_1 b/tests/bugs/moddata/bug37_1 deleted file mode 100755 index 391810f0b0..0000000000 --- a/tests/bugs/moddata/bug37_1 +++ /dev/null @@ -1,20 +0,0 @@ - -puts "================" -puts "OCC37" -puts "================" -puts "" - -restore [locate_data_file OCC37.brep] sh -explode sh -checkshape sh_1 -checkshape sh_2 - -bfuse result sh_1 sh_2 -checkshape result - -set square 665013 -set 2dviewer 0 - - - - diff --git a/tests/bugs/moddata/bug37_2 b/tests/bugs/moddata/bug37_2 deleted file mode 100755 index 3811648b03..0000000000 --- a/tests/bugs/moddata/bug37_2 +++ /dev/null @@ -1,21 +0,0 @@ - -puts "================" -puts "OCC37" -puts "================" -puts "" - -restore [locate_data_file OCC37.brep] sh -explode sh -checkshape sh_1 -checkshape sh_2 - -bfuse result sh_2 sh_1 -checkshape result - -set square 665013 -set 2dviewer 0 - - - - - diff --git a/tests/bugs/moddata/bug380_1 b/tests/bugs/moddata/bug380_1 deleted file mode 100755 index c11b07dc42..0000000000 --- a/tests/bugs/moddata/bug380_1 +++ /dev/null @@ -1,17 +0,0 @@ - -puts "========================" -puts " OCC380 " -puts "========================" -puts "" -############################## -##Incorrect result of common operation -############################## - -restore [locate_data_file OCC380a.rle] a -restore [locate_data_file OCC380b.rle] b - -bcommon result a b - -set square 21.154 -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug380_2 b/tests/bugs/moddata/bug380_2 deleted file mode 100755 index f340025d38..0000000000 --- a/tests/bugs/moddata/bug380_2 +++ /dev/null @@ -1,16 +0,0 @@ - -puts "========================" -puts " OCC380 " -puts "========================" -puts "" -############################## -##Incorrect result of common operation -############################## - -restore [locate_data_file OCC380a.rle] a -restore [locate_data_file OCC380b.rle] b - -bcommon result b a - -set square 21.154 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug3896 b/tests/bugs/moddata/bug3896 deleted file mode 100644 index f9135bf24b..0000000000 --- a/tests/bugs/moddata/bug3896 +++ /dev/null @@ -1,48 +0,0 @@ -puts "TODO OCC11111 ALL: Faulty OCC3896" - -puts "============" -puts "OCC3896" -puts "============" -puts "" -###################################################### -# BRepCheck_Analyzer does not detect faulty faces in solid shape. -###################################################### - -# -# a_13 face is FORVARD (faulty), but checkshape command does not detect it -# - -set BugNumber OCC3896 - -restore [locate_data_file OCC3896-pipe.brep] a - -explode a f -compound a_1 a_13 result - -explode a_1 e -explode a_13 e - -smallview -donly result -fit -r - -normals result 200 - -puts "Normal of a_13 face is red (FORWARD)" - -for {set i 1} {$i <= 14} {incr i} { - whatis a_$i -} - -decho off -set info_result [checkshape result] -decho on - -if {[regexp {Faulty} $info_result] } { - puts "OK ${BugNumber} : checkshape detect faulty faces in solid shape" -} else { - puts "Faulty ${BugNumber} : checkshape does not detect faulty faces in solid shape" -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug3_1 b/tests/bugs/moddata/bug3_1 deleted file mode 100755 index bdc5055c50..0000000000 --- a/tests/bugs/moddata/bug3_1 +++ /dev/null @@ -1,16 +0,0 @@ - -puts "================" -puts "OCC3" -puts "================" -puts "" - -restore [locate_data_file OCC3-1.brep] a -restore [locate_data_file OCC3-2.brep] b -checkshape a -checkshape b - -bfuse result a b -checkshape result - -set square 11400 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug3_2 b/tests/bugs/moddata/bug3_2 deleted file mode 100755 index 507896eeab..0000000000 --- a/tests/bugs/moddata/bug3_2 +++ /dev/null @@ -1,17 +0,0 @@ - -puts "================" -puts "OCC3" -puts "================" -puts "" - -restore [locate_data_file OCC3-1.brep] a -restore [locate_data_file OCC3-2.brep] b -checkshape a -checkshape b - -bfuse result b a -checkshape result - -set square 11400 -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug4 b/tests/bugs/moddata/bug4 deleted file mode 100755 index dead6ca60c..0000000000 --- a/tests/bugs/moddata/bug4 +++ /dev/null @@ -1,18 +0,0 @@ - -puts "================" -puts "OCC4" -puts "================" -puts "" - -restore [locate_data_file OCC4.brep] sh -checkshape sh - -explode sh e - -fillet result sh 15 sh_14 -checkshape result - -set square 177328 -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug408 b/tests/bugs/moddata/bug408 deleted file mode 100755 index 2fcb2d5c6e..0000000000 --- a/tests/bugs/moddata/bug408 +++ /dev/null @@ -1,14 +0,0 @@ -puts "========================" -puts " OCC408 " -puts "========================" -puts "" - -box b1 0 0 0 1 1 1 -nurbsconvert b1 b1 -box b2 0 -0.5 0 1.5 0.5 0.5 - -bcommon result b1 b2 -checkshape -top result - - - diff --git a/tests/bugs/moddata/bug41 b/tests/bugs/moddata/bug41 deleted file mode 100755 index 10821dd36e..0000000000 --- a/tests/bugs/moddata/bug41 +++ /dev/null @@ -1,12 +0,0 @@ - -puts "================" -puts "OCC41" -puts "================" -puts "" - -puts "Isos lines may be drawn incorrectly" -psphere result 10 -90 - -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug42 b/tests/bugs/moddata/bug42 deleted file mode 100755 index e2cc3767fa..0000000000 --- a/tests/bugs/moddata/bug42 +++ /dev/null @@ -1,38 +0,0 @@ -puts "================" -puts "OCC42" -puts "================" -puts "" -############################################### -## BRepAlgo_Sewing does not sew attached shape with any tolerance. -############################################### - -pload XDE - -# 1. retriesve shape -restore [locate_data_file OCC42.brep] sh -checkshape sh - -# 2. perform sewing -set toler 80 -sewing result $toler sh - -# 3. Verify result of sewing -checkshape result - -# Retrieve free wires from result shape -catch { fbclose result $toler $toler } resOfCatch - -# Amount of free open wires must be equal 0 -set open_wires [explode result_o W] -if { [llength $open_wires] != 0} { - puts "Error : There are free open wires" -} - -# Amount of free closed wires must be equal 1 -set closed_wires [explode result_c W] -if { [llength $closed_wires] != 1} { - puts "Error : Amount of free closed wires is not equal 1" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug428 b/tests/bugs/moddata/bug428 deleted file mode 100755 index 0902facb6d..0000000000 --- a/tests/bugs/moddata/bug428 +++ /dev/null @@ -1,34 +0,0 @@ -puts "========" -puts "OCC428" -puts "SAM1414" -puts "========" - -################################################ -## Exception during vizualization on attached shape in application. -## Exception is raised in the package StdPrs. -################################################ - -restore [locate_data_file OCC428.brep] result - -tclean result -vinit -vdisplay result -vsetdispmode result 1 -vclear - -isos result 0 -triangles result -vfit - -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -if { $tri == 5496 && $nod == 5406 } { - puts "Warning OCC428: here is shading problem, but source shape is invalid" -} else { - puts "Warning OCC428: Shading of OCC428 was made, source shape is invalid" -} - -set 3dviewer 1 - diff --git a/tests/bugs/moddata/bug429 b/tests/bugs/moddata/bug429 deleted file mode 100755 index 5d47e9cf83..0000000000 --- a/tests/bugs/moddata/bug429 +++ /dev/null @@ -1,32 +0,0 @@ -puts "========================" -puts " OCC429 " -puts "========================" -puts "" -####################################### -## Projection for a point on a surface works wrong -####################################### - -restore [locate_data_file OCC429a.draw] a -restore [locate_data_file OCC429b.draw] b - -intersect i a b - -cvalue i_2 0.43213918 x y z -point p x y z -proj b x y z - -set err1 [string range [dump ext_1] 55 64] -set err2 [string range [dump ext_2] 55 64] -set err3 [string range [dump ext_3] 55 64] -set err4 [string range [dump ext_4] 55 64] -set err5 [string range [dump ext_5] 55 64] -set err6 [string range [dump ext_6] 55 64] - -if { $err1 != "Parameters" || $err2 != "Parameters" || $err3 != "Parameters" || $err4 != "Parameters" || $err5 != "Parameters" || $err6 != "Parameters" } { - puts " OCC286 OK : Projection for a point on a surface works properly" -} else { - puts "Faulty OCC429 : Attempt to project the point on surface gives incorrect result" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug430 b/tests/bugs/moddata/bug430 deleted file mode 100755 index 0474ae3583..0000000000 --- a/tests/bugs/moddata/bug430 +++ /dev/null @@ -1,19 +0,0 @@ -puts "========================" -puts " OCC430 " -puts "========================" -puts "" -################################################################ -## Exception when projecting a point on planar surface of linear extrusion oriented along Y axis -################################################################ - -restore [locate_data_file OCC430.rle] result - -if [catch {proj result 49.86391363636364 440.7894090909091 127.05 } catch_result] { - puts "Faulty OCC430: Projection was made wrongly." -} else { - puts "OK OCC348: function PROJECT works properly" -} - -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug431 b/tests/bugs/moddata/bug431 deleted file mode 100755 index 849b8a7036..0000000000 --- a/tests/bugs/moddata/bug431 +++ /dev/null @@ -1,23 +0,0 @@ -puts "========================" -puts " OCC431 " -puts "========================" -puts "" -##################################### -## Intersection of two surfaces is not compleate curve. -##################################### - -restore [locate_data_file OCC431a.draw] su1 -restore [locate_data_file OCC431b.draw] su2 - -intersect result su1 su2 - -set che [whatis result] - -if { ![regexp {curve} $che] || ![regexp {3d} $che]} { - puts "Faulty OCC431 : Command INTERSECT works WRONGLY" -} else { - puts "OCC431 OK : Command INTERSECT works properly" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug432 b/tests/bugs/moddata/bug432 deleted file mode 100755 index c48cb0d588..0000000000 --- a/tests/bugs/moddata/bug432 +++ /dev/null @@ -1,12 +0,0 @@ -puts "========================" -puts " OCC432 " -puts "========================" -puts "" -############################################ -## Regression in dev regarding C40: exception during checkshape -############################################ - -restore [locate_data_file OCC432.brep] result -checkshape result r - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug433 b/tests/bugs/moddata/bug433 deleted file mode 100755 index c87f9d7178..0000000000 --- a/tests/bugs/moddata/bug433 +++ /dev/null @@ -1,22 +0,0 @@ -puts "========================" -puts " OCC433 " -puts "========================" -puts "" -######################################################### -## The attached face gives no errors in checkshape command in dev. However, it looks bad -######################################################### - -restore [locate_data_file OCC433.brep] result - -decho off -set err [checkshape result r] -decho on - -if { [regexp {OK} $err] == 1} { - puts " Faulty OCC433: function CHECKSHAPE works wrongly" -} else { - puts " OCC433 OK: function CHECKSHAPE works properly" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug438_1 b/tests/bugs/moddata/bug438_1 deleted file mode 100755 index d6a4b21eb8..0000000000 --- a/tests/bugs/moddata/bug438_1 +++ /dev/null @@ -1,27 +0,0 @@ -puts "========" -puts "OCC438" -puts " (case 1)" -puts "========" - -#################################### -## Exception during checking of shape from OCC428 -#################################### - -restore [locate_data_file OCC428.brep] result - -decho off -if [catch { checkshape result } catch_result] { - set mistake 1 -} else { - set mistake 0 -} -decho on - -if { $mistake != 0} { - puts "Faulty OCC438 (case 1): here is checking problem" -} else { - puts "OCC438 (case 1) OK" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug441_1 b/tests/bugs/moddata/bug441_1 deleted file mode 100755 index 662ca47c9e..0000000000 --- a/tests/bugs/moddata/bug441_1 +++ /dev/null @@ -1,31 +0,0 @@ -puts "========================" -puts " OCC441 " -puts "(case 1)" -puts "========================" -puts "" -############################### -## Instability of BRepCheck check status. -############################### - -restore [locate_data_file OCC441a.brep] result - -decho off -set err [checkshape result r] -decho on - -set j 1 -repeat 25 { - restore [locate_data_file OCC441a.brep] result - decho off - set err1 [checkshape result r] - decho on - if { $err != $err1 } { - puts [format " Faulty OCC441: function CHECKSHAPE works wrongly on %s time" $j] - break - } else { - puts [format " OCC441 OK: function CHECKSHAPE works properly %s time" $j] - } - incr j -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug441_2 b/tests/bugs/moddata/bug441_2 deleted file mode 100755 index 56dfcc9015..0000000000 --- a/tests/bugs/moddata/bug441_2 +++ /dev/null @@ -1,31 +0,0 @@ -puts "========================" -puts " OCC441 " -puts "(case 2)" -puts "========================" -puts "" -############################### -## Instability of BRepCheck check status. -############################### - -restore [locate_data_file OCC441b.brep] result - -decho off -set err [checkshape result r] -decho on - -set j 1 -repeat 25 { - restore [locate_data_file OCC441b.brep] result - decho off - set err1 [checkshape result r] - decho on - if { $err != $err1 } { - puts [format " Faulty OCC441: function CHECKSHAPE works wrongly on %s time" $j] - break - } else { - puts [format " OCC441 OK: function CHECKSHAPE works properly %s time" $j] - } - incr j -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug441_3 b/tests/bugs/moddata/bug441_3 deleted file mode 100755 index 3689d15dd9..0000000000 --- a/tests/bugs/moddata/bug441_3 +++ /dev/null @@ -1,31 +0,0 @@ -puts "========================" -puts " OCC441 " -puts "(case 3)" -puts "========================" -puts "" -############################### -## Instability of BRepCheck check status. -############################### - -restore [locate_data_file OCC441c.brep] result - -decho off -set err [checkshape result r] -decho on - -set j 1 -repeat 25 { - restore [locate_data_file OCC441c.brep] result - decho off - set err1 [checkshape result r] - decho on - if { $err != $err1 } { - puts [format " Faulty OCC441: function CHECKSHAPE works wrongly on %s time" $j] - break - } else { - puts [format " OCC441 OK: function CHECKSHAPE works properly %s time" $j] - } - incr j -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug4426_1 b/tests/bugs/moddata/bug4426_1 deleted file mode 100644 index bea9a8aeee..0000000000 --- a/tests/bugs/moddata/bug4426_1 +++ /dev/null @@ -1,22 +0,0 @@ -puts "================" -puts "OCC4426" -puts "================" -puts "" -####################################################################################### -# Incorrect result of intersection in 2D between circle and line -####################################################################################### - -v2d2 -circle c1 2 2 1 -2dfit -2dzoom 120 -line l1 3 0 0 1 -2dintersect l1 c1 -erase l1 c1 -2dfit - -puts "ATTENTION! Check following:" -puts "There is only one intersection point (green X)" - -set 2dviewer 1 - diff --git a/tests/bugs/moddata/bug4426_2 b/tests/bugs/moddata/bug4426_2 deleted file mode 100644 index 66aa3ab334..0000000000 --- a/tests/bugs/moddata/bug4426_2 +++ /dev/null @@ -1,22 +0,0 @@ -puts "================" -puts "OCC4426" -puts "================" -puts "" -####################################################################################### -# Incorrect result of intersection in 2D between circle and line -####################################################################################### - -v2d2 -line ll1 0 0 0.3 0.7 -line ll2 0 0 0.37 0.63 -trim tll1 ll1 -0.00001 0.00001 -trim tll2 ll2 -0.00001 0.00001 -donly tll1 tll2 -2dintersect tll1 tll2 -2dfit - -puts "ATTENTION! Check following:" -puts "There is the intersection point (green X) on center of grid axis" - -set 2dviewer 1 - diff --git a/tests/bugs/moddata/bug444 b/tests/bugs/moddata/bug444 deleted file mode 100755 index 509af91b95..0000000000 --- a/tests/bugs/moddata/bug444 +++ /dev/null @@ -1,15 +0,0 @@ - -puts "========" -puts "OCC444" -puts "========" -puts "" -###################################### -## Exception in '2dextrema' command if distance = 0. -###################################### - -restore [locate_data_file OCC444a.draw] a -restore [locate_data_file OCC444a.draw] b - -extrema a b - - diff --git a/tests/bugs/moddata/bug453_3 b/tests/bugs/moddata/bug453_3 deleted file mode 100755 index 9b9b2f3bf9..0000000000 --- a/tests/bugs/moddata/bug453_3 +++ /dev/null @@ -1,35 +0,0 @@ -puts "========" -puts "OCC453" -puts "(case 3)" -puts "========" -puts "" - -dchrono h2 reset -dchrono h2 start - -set make_print_out 0 - -dset SCALE 1000. -dset SCALE1 5 -tolblend 0.01 1e-04 1e-05 1e-03 - -restore [locate_data_file shading_137.brep] s -tscale s 0 0 0 SCALE1 -explode s E - -blend result s 5.5*SCALE1 s_2 4*SCALE1 s_1 6*SCALE1 s_6 5*SCALE1 s_8 6*SCALE1 s_10 6.5*SCALE1 s_14 7*SCALE1 s_4 5.5*SCALE1 s_5 7*SCALE1 s_16 6*SCALE1 s_11 5*SCALE1 s_19 6.5*SCALE1 s_13 -explode result So -tcopy result_1 result - -dchrono h2 stop -set q2 [ dchrono h2 show ] -regexp {CPU user time: ([-0-9.+eE]+) seconds} $q2 full z2 -puts "$z2" -if { $z2 > 85 } { - puts "Elapsed time is more then 85 seconds - Faulty" -} else { - puts "Elapsed time is less then 85 seconds - OK" -} - -set 2dviewer 1 - diff --git a/tests/bugs/moddata/bug454 b/tests/bugs/moddata/bug454 deleted file mode 100644 index 412f66ea68..0000000000 --- a/tests/bugs/moddata/bug454 +++ /dev/null @@ -1,25 +0,0 @@ -pload QAcommands - -puts "================" -puts "OCC454" -puts "================" -puts "" - -restore [locate_data_file OCC454_b1.brep] b1 -checkshape b1 - -restore [locate_data_file OCC454_p1.draw] p1 - -set info_result [OCC299 b1 p1] -set ll [llength ${info_result}] -if { ${ll} < 4 } { - puts "OCC454: ERROR 1" -} else { - if { [regexp {IN} ${info_result}] } { - puts "OCC454: OK" - } else { - puts "OCC454: ERROR 2" - } -} - - diff --git a/tests/bugs/moddata/bug466 b/tests/bugs/moddata/bug466 deleted file mode 100755 index 2af6860574..0000000000 --- a/tests/bugs/moddata/bug466 +++ /dev/null @@ -1,13 +0,0 @@ - -puts "========================" -puts " OCC466 " -puts "========================" -puts "" - -restore [locate_data_file OCC466.brep] res -checkshape res - -nurbsconvert result res - -set square 693.577 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug469 b/tests/bugs/moddata/bug469 deleted file mode 100755 index 75472b6a97..0000000000 --- a/tests/bugs/moddata/bug469 +++ /dev/null @@ -1,30 +0,0 @@ -if { [array get env os_type] != "" } { - set os $env(os_type) -} -if { [string compare $os "windows"] == 0 } { - puts "TODO OCC12345 ALL: An exception was caught" - puts "TODO OCC12345 ALL: \\*\\* Exception \\*\\*.*" -} else { - puts "TODO OCC12345 ALL: Tcl Exception: result is not a topological shape!!!" -} -puts "TODO OCC12345 ALL: TEST INCOMPLETE" - -puts "========================" -puts " OCC469 " -puts "========================" -puts "" -###################################################### -## It's impossible to fuse the two shapes in the file attached. #2740, SAM1493 -###################################################### - -restore [locate_data_file OCC469.brep] a -explode a - -checkshape a_1 -checkshape a_2 - -bfuse result a_1 a_2 -checkshape result - -set square 10 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug486 b/tests/bugs/moddata/bug486 deleted file mode 100755 index 573eb611e5..0000000000 --- a/tests/bugs/moddata/bug486 +++ /dev/null @@ -1,33 +0,0 @@ -pload QAcommands - -puts "========" -puts "OCC486" -puts "========" -puts "" -############################# -## Extrema_ExtPS gives wrong solution. -############################# - -restore [locate_data_file OCC486.draw] s - -# Case 1. Verify whether surface is u-periodic and v-periodic -set result [isperiodic s] -puts $result -set uper "is u-periodic" -set vper "is v-periodic" -if {[regexp $uper $result] && [regexp $vper $result]} { - puts "OCC486 case 1 - Faulty" -} else { - puts "OCC486 case 1 - OK" -} - -# Case 2. Verify extremum distance between point and surface - -point p3d -420.1170080179139 926.8792206000001 229.5109675013802 -if { [ catch { OCC486 s -420.1170080179139 926.8792206000001 229.5109675013802 0 0.0000001 } ] } { - puts "OCC486 case 2 - Faulty" -} else { - puts "OCC486 case 2 - OK" -} - -set 2dviewer 1 diff --git a/tests/bugs/moddata/bug496 b/tests/bugs/moddata/bug496 deleted file mode 100755 index d2b2a15e97..0000000000 --- a/tests/bugs/moddata/bug496 +++ /dev/null @@ -1,18 +0,0 @@ -puts "=========" -puts " OCC496 " -puts "=========" -puts "" -############################## -## Exception occurs during fuse operation -############################## - -restore [locate_data_file OCC496a.brep] a_1 -checkshape a_1 - -restore [locate_data_file OCC496b.brep] a_2 -checkshape a_2 - -bfuse result a_1 a_2 - -set square 4949.79 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug498 b/tests/bugs/moddata/bug498 deleted file mode 100755 index b1be064b6e..0000000000 --- a/tests/bugs/moddata/bug498 +++ /dev/null @@ -1,48 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty OCC498: Wrong 3d point from offset surface by parameters" - -puts "=========" -puts " OCC498 " -puts "=========" -puts "" -###################################### -## Wrong 3d point from offset surface by parameters -###################################### - -restore [locate_data_file OCC498.draw] su - -set u1 4.71238898038469 -set u2 7.85398163397449 - -svalue su 0 $u1 x1 y1 z1 -vertex v1 x1 y1 z1 - -svalue su 0 $u2 x2 y2 z2 -vertex v2 x2 y2 z2 - -set newU1 [expr $u1 - 1e-11] -set newU2 [expr $u2 + 1e-11] - -svalue su 0 $newU1 x1 y1 z1 -vertex vv1 x1 y1 z1 - -svalue su 0 $newU2 x2 y2 z2 -vertex vv2 x2 y2 z2 - -distmini d v1 vv1 -regexp {([-0-9.+eE]+)} [dump d_val] full err1 - -distmini d v2 vv2 -regexp {([-0-9.+eE]+)} [dump d_val] full err2 - -if { $err1 > 1.e-7 || $err2 > 1.e-7} { - puts "Faulty OCC498: Wrong 3d point from offset surface by parameters " -} else { - puts "OCC498 OK: Correct 3d point from offset surface by parameters" -} - - - - - - - diff --git a/tests/bugs/moddata/bug49_1 b/tests/bugs/moddata/bug49_1 deleted file mode 100755 index 1913d98614..0000000000 --- a/tests/bugs/moddata/bug49_1 +++ /dev/null @@ -1,18 +0,0 @@ - -puts "========" -puts "OCC49" -puts "========" - -pload QAcommands - -pcylinder c 10 20 - -set result [OCC49 c] - -if {$result == 1} { - puts "OCC49: OK" -} else { - puts "Error : OCC49" -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug49_2 b/tests/bugs/moddata/bug49_2 deleted file mode 100755 index 06d9436776..0000000000 --- a/tests/bugs/moddata/bug49_2 +++ /dev/null @@ -1,21 +0,0 @@ - -puts "========" -puts "OCC49" -puts "========" - -pload QAcommands - -pcylinder c 10 20 -box b 10 10 10 -bcut b_c_cut b c -checkshape b_c_cut - -set result [OCC49 b_c_cut] - -if {$result == 1} { - puts "Error : OCC49" -} else { - puts "OCC49: OK" -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug50 b/tests/bugs/moddata/bug50 deleted file mode 100755 index 7db5f09b7c..0000000000 --- a/tests/bugs/moddata/bug50 +++ /dev/null @@ -1,20 +0,0 @@ - -puts "========" -puts "OCC50" -puts "========" -puts "" -################################################################### -## the algorithm which allows to calculate and build the fillet presents probably a bug: when -## blending on all edges, the applied algorithm is posting errors and failure during fillet computation. -################################################################### - -restore [locate_data_file OCC50.brep] a -checkshape a - -explode a e - -blend result a 1 a_17 1 a_5 1 a_1 1 a_2 1 a_16 1 a_20 1 a_3 1 a_11 1 a_10 1 a_4 -checkshape result - -set square 7677.49 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug503 b/tests/bugs/moddata/bug503 deleted file mode 100755 index 5195d81b50..0000000000 --- a/tests/bugs/moddata/bug503 +++ /dev/null @@ -1,26 +0,0 @@ -puts "=========" -puts " OCC503 " -puts "=========" -puts "" -############################### -## Draw hangs up during sprops operation -############################### - -#cpulimit 9000 - -restore [locate_data_file OCC503.brep] result - -if [catch {sprops result 0.001 } catch_result] { - set mistake 1 -} else { - set mistake 0 -} - -if { $mistake != 0} { - puts "Faulty OCC503 : Draw hangs up during sprops operation " -} else { - puts "OCC503 OK: function SPROPS works without hangs up " -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug504 b/tests/bugs/moddata/bug504 deleted file mode 100755 index 57f168ddd8..0000000000 --- a/tests/bugs/moddata/bug504 +++ /dev/null @@ -1,28 +0,0 @@ -puts "=========" -puts " OCC504 " -puts "=========" -puts "" -############################### -## AllocMemory while intersection command -############################### - -restore [locate_data_file OCC504a.draw] su1 -# checkshape su1 - -restore [locate_data_file OCC504b.draw] su2 -# checkshape su2 - -if [catch {intersect result su1 su2} catch_result] { - puts "Faulty OCC504 : A solution takes all memory and crach with AllocMemory" -} else { - puts "OCC504 OK: function intersection works ok" -} - -if { [regexp {curve} [whatis result_1]] && [regexp {curve} [whatis result_2]] } { - puts "OCC504 OK : Result shape is CORRECT !!! " -} else { - puts " Faulty OCC504: Result shape is INcorrect !!! " -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug505 b/tests/bugs/moddata/bug505 deleted file mode 100755 index 0ced41616f..0000000000 --- a/tests/bugs/moddata/bug505 +++ /dev/null @@ -1,18 +0,0 @@ - -puts "=========" -puts " OCC505 " -puts "=========" -puts "" -##################################### -## BRepExtrema_DistShapeShape throws an exception. -##################################### - -restore [locate_data_file OCC505a.brep] su1 -checkshape su1 - -restore [locate_data_file OCC505b.brep] su2 -checkshape su2 - -distmini d su1 su2 - - diff --git a/tests/bugs/moddata/bug513 b/tests/bugs/moddata/bug513 deleted file mode 100755 index 237a686212..0000000000 --- a/tests/bugs/moddata/bug513 +++ /dev/null @@ -1,23 +0,0 @@ -puts "========" -puts "OCC513" -puts "========" -puts "" - -###################################### -## Can not intersect plane and conical surfaces -## The ">intersect" command hangs up the computer. -###################################### - -# cpulimit 9000 - -restore [locate_data_file OCC513a.draw] sa23 -restore [locate_data_file OCC513b.draw] sb8 - -if { [catch {intersect result sa23 sb8} catch_result] } { - puts "Faulty OCC513: function INTERSECTION works wrongly" -} else { - puts "OCC513 OK: function INTERSECTION works properly" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug515 b/tests/bugs/moddata/bug515 deleted file mode 100755 index 2120f1b4af..0000000000 --- a/tests/bugs/moddata/bug515 +++ /dev/null @@ -1,27 +0,0 @@ -puts "========" -puts "OCC515" -puts "========" -puts "" -################################ -## Wrong projection of the Line on the Cone -################################ - -restore [locate_data_file OCC515a.draw] cx -restore [locate_data_file OCC515b.draw] s - -if { [catch {project c2d cx s -t 0.0015} ] } { - puts "OCC515 FAULTY" -} else { - # create dump of resulting curve - set dump [dump c2d] - # read dump of old curve - set olddump [read [open [locate_data_file OCC515_DUMP]]] - # if the the dumps is equal this bug is still exist - if { $dump == $olddump } { - puts "OCC515 FAULTY" - } else { - puts "OCC515 WARNING: Dumps of old and new curve are different, probably bug is still exist" - } -} - - diff --git a/tests/bugs/moddata/bug524 b/tests/bugs/moddata/bug524 deleted file mode 100644 index cb640524b2..0000000000 --- a/tests/bugs/moddata/bug524 +++ /dev/null @@ -1,60 +0,0 @@ -pload QAcommands - -puts "========" -puts "OCC524" -puts "========" -puts "" - - -set LowerVector 1 -set UpperVector 9 -set InitialValueVector 5 -set LowerRowMatrix 1 -set UpperRowMatrix 6 -set LowerColMatrix 1 -set UpperColMatrix 3 -set InitialValueMatrix 4 - -set info_result [OCC524 ${LowerVector} ${UpperVector} ${InitialValueVector} ${LowerRowMatrix} ${UpperRowMatrix} ${LowerColMatrix} ${UpperColMatrix} ${InitialValueMatrix}] - -set ll [llength ${info_result}] - -if {${ll} != 64} { - puts "OCC524: Error" -} else { - regexp {math_Vector of Length = ([-0-9.+eE]+)} ${info_result} full Vector1Length - if {${Vector1Length} != [expr ${UpperVector} - ${LowerVector} + 1]} { - puts "Vector1Length=${Vector1Length}" - puts "OCC524: Error" - } else { - regexp {math_Vector\(1\) = ([-0-9.+eE]+)} ${info_result} full Vector1_1 - regexp {math_Vector\(2\) = ([-0-9.+eE]+)} ${info_result} full Vector1_2 - regexp {math_Vector\(3\) = ([-0-9.+eE]+)} ${info_result} full Vector1_3 - regexp {math_Vector\(4\) = ([-0-9.+eE]+)} ${info_result} full Vector1_4 - regexp {math_Vector\(5\) = ([-0-9.+eE]+)} ${info_result} full Vector1_5 - regexp {math_Vector\(6\) = ([-0-9.+eE]+)} ${info_result} full Vector1_6 - regexp {math_Vector\(7\) = ([-0-9.+eE]+)} ${info_result} full Vector1_7 - regexp {math_Vector\(8\) = ([-0-9.+eE]+)} ${info_result} full Vector1_8 - regexp {math_Vector\(9\) = ([-0-9.+eE]+)} ${info_result} full Vector1_9 - - if {${Vector1_1}!=120. || ${Vector1_2}!=120. || ${Vector1_3}!=120. || ${Vector1_4}!=0. || ${Vector1_5}!=0. || ${Vector1_6}!=0. || ${Vector1_7}!=0. || ${Vector1_8}!= 0.|| ${Vector1_9}!=0.} { - puts "Error : OCC524" - } else { - regexp -all {math_Vector\(1\) = ([-0-9.+eE]+)} ${info_result} full Vector2_1 - regexp -all {math_Vector\(2\) = ([-0-9.+eE]+)} ${info_result} full Vector2_2 - regexp -all {math_Vector\(3\) = ([-0-9.+eE]+)} ${info_result} full Vector2_3 - regexp -all {math_Vector\(4\) = ([-0-9.+eE]+)} ${info_result} full Vector2_4 - regexp -all {math_Vector\(5\) = ([-0-9.+eE]+)} ${info_result} full Vector2_5 - regexp -all {math_Vector\(6\) = ([-0-9.+eE]+)} ${info_result} full Vector2_6 - regexp -all {math_Vector\(7\) = ([-0-9.+eE]+)} ${info_result} full Vector2_7 - regexp -all {math_Vector\(8\) = ([-0-9.+eE]+)} ${info_result} full Vector2_8 - regexp -all {math_Vector\(9\) = ([-0-9.+eE]+)} ${info_result} full Vector2_9 - if {${Vector2_1}!=60. || ${Vector2_2}!=60. || ${Vector2_3}!=60. || ${Vector2_4}!=60. || ${Vector2_5}!=60. || ${Vector2_6}!=60. || ${Vector2_7}!=0. || ${Vector2_8}!= 0.|| ${Vector2_9}!=0.} { - puts "OCC524: Error" - } else { - puts "OCC524: OK" - } - } - } -} - diff --git a/tests/bugs/moddata/bug525 b/tests/bugs/moddata/bug525 deleted file mode 100755 index 57a6051651..0000000000 --- a/tests/bugs/moddata/bug525 +++ /dev/null @@ -1,23 +0,0 @@ -pload QAcommands - -puts "========" -puts "OCC525" -puts "========" -puts "" -######################################### -## Bug in GeomPlate_BuildPlateSurface::ComputeSurfInit() -######################################### - -set mistake 0 - -decho off -if { [catch { OCC525 } ] } { - set mistake 1 -} -decho on - -if { $mistake == 1 } { - puts "Faulty : OCC525" -} - -set 2dviewer 1 diff --git a/tests/bugs/moddata/bug531 b/tests/bugs/moddata/bug531 deleted file mode 100755 index 0d8567bf6b..0000000000 --- a/tests/bugs/moddata/bug531 +++ /dev/null @@ -1,16 +0,0 @@ - -puts "=======" -puts "OCC531" -puts "=======" -puts "" -########################################################## -## Can not intersect plane and cone.The ">intersect" command hangs up the computer -########################################################## - -restore [locate_data_file OCC531_1.draw] a -restore [locate_data_file OCC531_2.draw] b - -intersect result a b - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug536_11 b/tests/bugs/moddata/bug536_11 deleted file mode 100644 index 065edf84b1..0000000000 --- a/tests/bugs/moddata/bug536_11 +++ /dev/null @@ -1,25 +0,0 @@ - -puts "========" -puts "OCC536" -puts "SAM1504" -puts "========" - -vinit - -restore [locate_data_file OCC536.brep] S -checkshape S - -explode S So -checkshape S_1 -checkshape S_2 - -if [catch {bfuse result S_1 S_2}] { - puts "Faulty OCC536" -} else { - puts "OCC536 : OK" - checkshape result -} - -set square 2.5068e+06 -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug536_12 b/tests/bugs/moddata/bug536_12 deleted file mode 100644 index 2d7aac8d08..0000000000 --- a/tests/bugs/moddata/bug536_12 +++ /dev/null @@ -1,25 +0,0 @@ - -puts "========" -puts "OCC536" -puts "SAM1504" -puts "========" - -vinit - -restore [locate_data_file OCC536.brep] S -checkshape S - -explode S So -checkshape S_1 -checkshape S_3 - -if [catch {bfuse result S_1 S_3}] { - puts "Faulty OCC536" -} else { - puts "OCC536 : OK" - checkshape result -} - -set square 2.56034e+06 -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug536_13 b/tests/bugs/moddata/bug536_13 deleted file mode 100644 index 5a455d5517..0000000000 --- a/tests/bugs/moddata/bug536_13 +++ /dev/null @@ -1,25 +0,0 @@ - -puts "========" -puts "OCC536" -puts "SAM1504" -puts "========" - -vinit - -restore [locate_data_file OCC536.brep] S -checkshape S - -explode S So -checkshape S_1 -checkshape S_4 - -if [catch {bfuse result S_1 S_4}] { - puts "Faulty OCC536" -} else { - puts "OCC536 : OK" - checkshape result -} - -set square 2.5405e+06 -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug536_14 b/tests/bugs/moddata/bug536_14 deleted file mode 100644 index 34ede3fede..0000000000 --- a/tests/bugs/moddata/bug536_14 +++ /dev/null @@ -1,25 +0,0 @@ - -puts "========" -puts "OCC536" -puts "SAM1504" -puts "========" - -vinit - -restore [locate_data_file OCC536.brep] S -checkshape S - -explode S So -checkshape S_1 -checkshape S_5 - -if [catch {bfuse result S_1 S_5}] { - puts "Faulty OCC536" -} else { - puts "OCC536 : OK" - checkshape result -} - -set square 2.45349e+06 -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug536_21 b/tests/bugs/moddata/bug536_21 deleted file mode 100644 index eb9666b3c4..0000000000 --- a/tests/bugs/moddata/bug536_21 +++ /dev/null @@ -1,24 +0,0 @@ - -puts "========" -puts "OCC536" -puts "SAM1504" -puts "========" - -vinit - -restore [locate_data_file OCC536.brep] S -checkshape S - -explode S So -checkshape S_2 -checkshape S_1 - -if [catch {bfuse result S_2 S_1}] { - puts "Faulty OCC536" -} else { - puts "OCC536 : OK" - checkshape result -} - -set square 2.5068e+06 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug536_22 b/tests/bugs/moddata/bug536_22 deleted file mode 100644 index e0703dbdd9..0000000000 --- a/tests/bugs/moddata/bug536_22 +++ /dev/null @@ -1,24 +0,0 @@ - -puts "========" -puts "OCC536" -puts "SAM1504" -puts "========" - -vinit - -restore [locate_data_file OCC536.brep] S -checkshape S - -explode S So -checkshape S_3 -checkshape S_1 - -if [catch {bfuse result S_3 S_1}] { - puts "Faulty OCC536" -} else { - puts "OCC536 : OK" - checkshape result -} - -set square 2.56034e+06 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug536_23 b/tests/bugs/moddata/bug536_23 deleted file mode 100644 index 789059a484..0000000000 --- a/tests/bugs/moddata/bug536_23 +++ /dev/null @@ -1,24 +0,0 @@ - -puts "========" -puts "OCC536" -puts "SAM1504" -puts "========" - -vinit - -restore [locate_data_file OCC536.brep] S -checkshape S - -explode S So -checkshape S_4 -checkshape S_1 - -if [catch {bfuse result S_4 S_1}] { - puts "Faulty OCC536" -} else { - puts "OCC536 : OK" - checkshape result -} - -set square 2.5405e+06 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug536_24 b/tests/bugs/moddata/bug536_24 deleted file mode 100644 index 32e2e26211..0000000000 --- a/tests/bugs/moddata/bug536_24 +++ /dev/null @@ -1,24 +0,0 @@ - -puts "========" -puts "OCC536" -puts "SAM1504" -puts "========" - -vinit - -restore [locate_data_file OCC536.brep] S -checkshape S - -explode S So -checkshape S_5 -checkshape S_1 - -if [catch {bfuse result S_5 S_1}] { - puts "Faulty OCC536" -} else { - puts "OCC536 : OK" - checkshape result -} - -set square 2.45349e+06 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug537 b/tests/bugs/moddata/bug537 deleted file mode 100755 index 21df4bcc87..0000000000 --- a/tests/bugs/moddata/bug537 +++ /dev/null @@ -1,27 +0,0 @@ -puts "TODO OCC12345 ALL: Error : OCC537" - -puts "=======" -puts "OCC537" -puts "=======" -puts "" -####################################################################### -##Application do something in intersection operation for long time and eat much memory (This may be the -## reason of BUS ERROR that happens in application). Intersection operation invokes for conical and plane -## surfaces. -####################################################################### - -restore [locate_data_file OCC537_CONE.draw] c -restore [locate_data_file OCC537_PLANE.draw] p - -intersect result c p - -set wt_is [whatis result] - -if { [regexp {WIRE} ${wt_is}] } { - puts " OCC537 OK" -} else { - puts "Error : OCC537" -} - -set 2dviewer 2 - diff --git a/tests/bugs/moddata/bug538 b/tests/bugs/moddata/bug538 deleted file mode 100644 index 126b5dd948..0000000000 --- a/tests/bugs/moddata/bug538 +++ /dev/null @@ -1,25 +0,0 @@ -puts "TODO OCC11111 ALL: Faulty OCC132" - -puts "================" -puts "OCC538" -puts "================" -puts "" - -restore [locate_data_file OCC538.brep] Face -checkshape Face - -point p 0.2453959532714904 -1.246869357124329 - -set res1 [b2dclassify Face p] -set info_result [split ${res1}] - -set ll [llength ${info_result}] -if {${ll} < 4} { - puts "Faulty OCC132" -} else { - if {[regexp {IN} $info_result]} { - puts "OCC132 : OK" - } else { - puts "Faulty OCC132" - } -} diff --git a/tests/bugs/moddata/bug54 b/tests/bugs/moddata/bug54 deleted file mode 100755 index b3c3bd9279..0000000000 --- a/tests/bugs/moddata/bug54 +++ /dev/null @@ -1,21 +0,0 @@ -if { [array get env os_type] != "" } { - set os $env(os_type) -} -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" -if { [string compare $os "windows"] != 0 } { - puts "TODO OCC12345 ALL: TEST INCOMPLETE" -} -puts "================" -puts "OCC54" -puts "================" -puts "" -#################################################### -## Exception is raised during command "small" in DRAW on attached shape. -#################################################### - -cpulimit 300 -restore [locate_data_file OCC54.brep] result - -checkshape result - -set 3dviewer 0 diff --git a/tests/bugs/moddata/bug541 b/tests/bugs/moddata/bug541 deleted file mode 100755 index b94710c869..0000000000 --- a/tests/bugs/moddata/bug541 +++ /dev/null @@ -1,20 +0,0 @@ -puts "========================" -puts " OCC541 " -puts "========================" -puts "" -############################################ -## Extrema works wrong for line and circle laying on one plane. -############################################ - -restore [locate_data_file OCC541a.draw] c1x -restore [locate_data_file OCC541b.draw] c2x - -set result [extrema c1x c2x] -set err [llength $result] -if { $err < 1} { - puts "Faulty OCC541 (amount of solution): command extrema does NOT work properly" -} else { - puts "OCC541 OK (amount of solution): : command extrema works properly" -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug542 b/tests/bugs/moddata/bug542 deleted file mode 100755 index 6e5fa1b901..0000000000 --- a/tests/bugs/moddata/bug542 +++ /dev/null @@ -1,28 +0,0 @@ - -puts "========" -puts "OCC542" -puts "========" -puts "" -################################ -## Wrong projection of the circle on the sphere -################################ - -restore [locate_data_file OCC542_C3D.draw] c3d -restore [locate_data_file OCC542_S.draw] s - -if { [catch {project result c3d s } catch_result] } { - puts "OCC542 Faulty" -} else { - # create dump of resulting curve - set dump [dump result] - # read dump of old curve - set olddump [read [open [locate_data_file OCC542_DUMP]]] - # if the the dumps is equal this bug is still exist - if { $dump == $olddump } { - puts "OCC542 Faulty" - } else { - puts "OCC542 WARNING: Dumps of old and new curve are different, probably bug is still exist" - } -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug565 b/tests/bugs/moddata/bug565 deleted file mode 100755 index ae63aaddbf..0000000000 --- a/tests/bugs/moddata/bug565 +++ /dev/null @@ -1,53 +0,0 @@ -puts "========| OCC565 |========" -################################## -## Can not intersect two trimmed conical surfaces -################################## - -restore [locate_data_file OCC565a.draw] s1 -restore [locate_data_file OCC565b.draw] s2 - -puts "Preliminary check: intersection work with infinite cones:" -if { [catch {intersect inf s1 s2 } catch_result] } { - puts "Faulty OCC565: function intersection works wrongly with infinite cones" -} else { - set j 1 - set er [lindex [whatis inf] 5] - repeat 4 { - set err [lindex [whatis inf_$j] 5] - if { $err != "curve" && $er != "curve"} { - puts " Faulty OCC565: function intersection works wrongly with infinite cones" - break - } else { - puts [format "curve inf_%s : exist " $j] - } - incr j - } - puts "Function intersection works correctly with infinite cones. Then check OCC565:" -} - -trim s1x s1 0 2*pi 0 2.8 -trim s2x s2 0 2*pi 0 2.8 - -if { [catch {intersect result s1x s2x } catch_result] } { - puts "Faulty OCC565 exception: function intersection works wrongly with trimmed cones" -} else { - set nom 0 - set j 1 - set er [lindex [whatis result] 5] - repeat 4 { - set err [lindex [whatis result_$j] 5] - if { $err != "curve" && $er != "curve"} { - break - } else { - set nom [expr $nom + 1] - } - incr j - } - if { $nom == 0} { - puts " Faulty OCC565: function intersection works wrongly with trimmed cones" - } else { - puts " OCC565 OK: function intersection works with trimmed cones" - } -} - - diff --git a/tests/bugs/moddata/bug566 b/tests/bugs/moddata/bug566 deleted file mode 100755 index 586f59c32b..0000000000 --- a/tests/bugs/moddata/bug566 +++ /dev/null @@ -1,43 +0,0 @@ -pload QAcommands - -puts "========" -puts "OCC566" -puts "========" -puts "" -############################################### -##BRepBndLib::AddClose builds box larger than BRepBndLib::Add -############################################### - -restore [locate_data_file OCC566.brep] a - -set err1 [bounding a] -set err2 [OCC566 a] - -regexp { *([-0-9.+eE]+) *([-0-9.+eE]+) *([-0-9.+eE]+) *([-0-9.+eE]+) *([-0-9.+eE]+) *([-0-9.+eE]+)} $err1 full v1_x v1_y v1_z v2_x v2_y v2_z -regexp { *([-0-9.+eE]+) *([-0-9.+eE]+) *([-0-9.+eE]+) *([-0-9.+eE]+) *([-0-9.+eE]+) *([-0-9.+eE]+)} $err2 full v3_x v3_y v3_z v4_x v4_y v4_z - -vertex v1 $v1_x $v1_y $v1_z -vertex v2 $v2_x $v2_y $v2_z - -vertex v3 $v3_x $v3_y $v3_z -vertex v4 $v4_x $v4_y $v4_z - -distmini d1 v1 v2 -distmini d2 v3 v4 - -regexp {([-0-9.+eE]+)$} [dump d1_val] full dis1 -puts $dis1 -regexp {([-0-9.+eE]+)$} [dump d2_val] full dis2 -puts $dis2 - -set err [expr 1.*abs((($dis1 - $dis2) / $dis2) * 100)] -puts "" -puts [format "Different is %s percents" $err] - -if {$err > 1.0} { - puts " Faulty OCC566: BRepBndLib::AddClose builds box larger than BRepBndLib::Add - this should not be so!" -} else { - puts " OCC566 OK" -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug567 b/tests/bugs/moddata/bug567 deleted file mode 100755 index dbfa54d72b..0000000000 --- a/tests/bugs/moddata/bug567 +++ /dev/null @@ -1,52 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty OCC565: function intersection works wrongly with trimmed Surfaces" - -puts "========" -puts "OCC567" -puts "========" -puts "" -####################################### -## Can not intersect two Rectangular Trimmed Surfaces . -####################################### - -restore [locate_data_file OCC567a.draw] s1 -restore [locate_data_file OCC567b.draw] s2 - -if { [catch {intersect i s1 s2 } catch_result] } { - puts "Faulty OCC565: function intersection works wrongly with infinite Surfaces" -} else { - set j 1 - repeat 11 { - set err [lindex [whatis i_$j] 5] - if { $err != "curve"} { - puts " Faulty OCC565: function intersection works wrongly with infinite Surfaces" - break - } else { - puts [format "%s ) OCC565 OK: function intersection works with infinite Surfaces" $j] - } - incr j} -} - -trim s1x s1 0 2*pi 0 2*pi/13 -trim s2x s2 0 2*pi 0 2*pi/13 - -if { [catch {intersect result s1x s2x } catch_result] } { - puts "Faulty OCC565 exception: function intersection works wrongly with trimmed Surfaces" -} else { - set nom 0 - set j 1 - repeat 11 { - set err [lindex [whatis result_$j] 5] - if { $err != "curve"} { - break - } else { - set nom [expr $nom + 1] - } - incr j - } - if { $nom == 0} { - puts "Faulty OCC565: function intersection works wrongly with trimmed Surfaces" - } else { - puts " OCC565 OK: function intersection works with trimmed Surfaces" - } -} - diff --git a/tests/bugs/moddata/bug569 b/tests/bugs/moddata/bug569 deleted file mode 100755 index 6035413da6..0000000000 --- a/tests/bugs/moddata/bug569 +++ /dev/null @@ -1,33 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty OCC569: function intersection works wrongly with trimmed plane and cone surfaces" - -puts "========" -puts "OCC569" -puts "========" -puts "" -################################## -## Can not intersect trimmed plane and cone surfaces -################################## - -restore [locate_data_file OCC569a.draw] s1 -restore [locate_data_file OCC569b.draw] s2 - -if { [catch {intersect result s1 s2 } catch_result] } { - puts "Faulty OCC569 exception: function intersection works wrongly with trimmed plane and cone surfaces " -} else { - set nom 0 - set j 1 - repeat 10 { - set err [lindex [whatis result_$j] 5] - if { $err != "curve"} { - break - } else { - set nom [expr $nom + 1] - } - incr j - } - if { $nom == 0} { - puts "Faulty OCC569: function intersection works wrongly with trimmed plane and cone surfaces" - } else { - puts "OCC569 OK: function intersection works with trimmed plane and cone surfaces" - } -} diff --git a/tests/bugs/moddata/bug5696 b/tests/bugs/moddata/bug5696 deleted file mode 100644 index a8abf8aaa9..0000000000 --- a/tests/bugs/moddata/bug5696 +++ /dev/null @@ -1,21 +0,0 @@ -pload QAcommands - -puts "================" -puts "OCC5696" -puts "================" -puts "" -####################################################################################### -# Exception in BRepAdaptor_CompCurve due to uninitialised variable CurIndex -####################################################################################### - -set BugNumber OCC5696 - -set info_result [OCC5696] -set index [string compare ${info_result} "par_edge = 1\n"] -if {$index != 0} { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - - diff --git a/tests/bugs/moddata/bug5698 b/tests/bugs/moddata/bug5698 deleted file mode 100644 index 56d1bde45c..0000000000 --- a/tests/bugs/moddata/bug5698 +++ /dev/null @@ -1,25 +0,0 @@ -puts "TODO OCC11111 ALL: Faulty OCC5698" - -pload QAcommands - -puts "============" -puts "OCC5698" -puts "============" -puts "" -###################################################### -# Incorrect result of intersection of a plane and an extrusion surface -###################################################### - -set BugNumber OCC5698 - -restore [locate_data_file OCC5698.brep] s1 - -set info_result [OCC5698 s1] - -set index [string compare ${info_result} "OK\n"] -if {$index != 0} { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - diff --git a/tests/bugs/moddata/bug592 b/tests/bugs/moddata/bug592 deleted file mode 100755 index dd05d32f68..0000000000 --- a/tests/bugs/moddata/bug592 +++ /dev/null @@ -1,43 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty OCC592 : Checkshape BRepCheck_Analyzer does not detect faulty shape" - -puts "========================" -puts " OCC592 " -puts "========================" -puts "" -################################### -##BRepCheck_Analyzer does not detect faulty shape -##################################### - -restore [locate_data_file OCC592.brep] ff114 - -explode ff114 e -mkcurve cc ff114_8 -cvalue cc 0.95 x y z -vertex vv x y z -mksurface gs ff114 -mkface ff gs -donl ff114 vv -trim trcc cc -set aa [distmini dd vv ff] - -puts "******* Result *******" -regexp {([-0-9.+eE]+)$} [dump dd_val] full dis1 -puts "distance between the point on curve and the surface is $dis1" - -set tolerance [maxtolerance ff114_8] -regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxEdgeTolerance -puts "the tolerance of the edge is $MaxEdgeTolerance" -puts "the tolerance is less than distance between point and surface" -puts "BUT" - -decho off -set che [checkshape ff114] -decho on - -if { [regexp {Faulty} $che] != 1 } { - puts "Faulty OCC592 : Checkshape BRepCheck_Analyzer does not detect faulty shape" -} else { - puts "OCC592 OK: Checkshape (BRepCheck_Analyzer) detects bad shape" -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug593 b/tests/bugs/moddata/bug593 deleted file mode 100755 index a275e0a82b..0000000000 --- a/tests/bugs/moddata/bug593 +++ /dev/null @@ -1,54 +0,0 @@ -puts "TODO OCC12345 ALL: Error : Projection of a 3D point on surface using GeomAPI_ProjectPointOnSurf works incorrect" - -puts "========================" -puts " OCC593 " -puts "========================" -puts "" -############################################################# -## Projection of a 3D point on surface using GeomAPI_ProjectPointOnSurf works incorrect -############################################################# - -restore [locate_data_file OCC593.brep] ff48 - -set tolerance [maxtolerance ff48] -regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxFaceTolerance - -vertex vv -19.561252535222 17.89876466186 71.408126285268 -distmini dd vv ff48 -regexp {([-0-9.+eE]+)$} [dump dd_val] full ddval - -mksurface gs ff48 - -proj gs -19.561252535222 17.89876466186 71.408126285268 - -set pp1 [lindex [dump ext_1] 9] -set pp2 [lindex [dump ext_1] 10] - -set err [expr abs ([expr $pp2 - $pp1])] -puts [format "MaxFaceTolerance = %s" $MaxFaceTolerance] -puts [format "MaxDistance = %s" $err] -if { $err < $MaxFaceTolerance } { - puts "OCC593 (case 1) : Projection of a 3D point on surface using GeomAPI_ProjectPointOnSurf works properly" -} else { - puts "Error : Projection of a 3D point on surface using GeomAPI_ProjectPointOnSurf works incorrect" -} -copy ext_1 oldext_1 - -puts "" -puts "***** Another example: *****" - -svalue gs 0.56 0.4 x y z -point p x y z -proj gs x y z - -set p1 [lindex [dump ext_1] 9] -set p2 [lindex [dump ext_1] 10] - -set err1 [expr abs ([expr $p2 - $p1])] -puts [format "MaxFaceTolerance = %s" $MaxFaceTolerance] -puts [format "MaxDistance = %s" $err1] -if { $err1 < $MaxFaceTolerance } { - puts "OCC593 (case 2) : Projection of a 3D point on surface using GeomAPI_ProjectPointOnSurf works properly" -} else { - puts "Error : Projection of a 3D point on surface using GeomAPI_ProjectPointOnSurf works incorrect" -} diff --git a/tests/bugs/moddata/bug601 b/tests/bugs/moddata/bug601 deleted file mode 100755 index f1cdc4f1f5..0000000000 --- a/tests/bugs/moddata/bug601 +++ /dev/null @@ -1,25 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty OCC601: function BLEND works wrongly" - -puts "========================" -puts " OCC601 " -puts "SAM1542" -puts "========================" -puts "" -############################################# -## No possibility to make a fillet 13 at the inner edge of the shape -############################################# - -restore [locate_data_file OCC601.brep] a -checkshape a - -explode a e - -if [catch {blend result a 13 a_41 } res] { - puts "Faulty OCC601: function BLEND works wrongly" -} else { - puts "OCC601 OK: function BLEND works without exception" - checkshape result - - set square 10 - set 2dviewer 0 -} diff --git a/tests/bugs/moddata/bug604 b/tests/bugs/moddata/bug604 deleted file mode 100755 index c460f07d16..0000000000 --- a/tests/bugs/moddata/bug604 +++ /dev/null @@ -1,35 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty OCC604: Result of intersection operation is INcorrect !!!" - -puts "========================" -puts " OCC604" -puts "========================" -puts "" -############################ -## Wrong intersection between two tores. -############################ - -restore [locate_data_file OCC604a.draw] a -restore [locate_data_file OCC604b.draw] b - -if { [catch { intersect result a b } catch_result] } { - puts "Faulty OCC604: function INTERSECTION works with exception" -} else { - set nom 0 - set j 1 - repeat 10 { - set err [lindex [whatis res_$j] 5] - if { $err != "curve"} { - break - } else { - set nom [expr $nom + 1] - } - incr j - } - if { $nom != 1 } { - puts "Faulty OCC604: Result of intersection operation is INcorrect !!!" - } else { - puts "OCC604 OK : Result of intersection operation is CORRECT !!! " - } -} - -set 3dviewer 1 diff --git a/tests/bugs/moddata/bug611_1 b/tests/bugs/moddata/bug611_1 deleted file mode 100755 index 98f29e83fd..0000000000 --- a/tests/bugs/moddata/bug611_1 +++ /dev/null @@ -1,20 +0,0 @@ -puts "========================" -puts "OCC611" -puts "SAM1564" -puts "(case 1)" -puts "========================" -puts "" -############################ -## No possibility to fuse the shapes. -############################ - -restore [locate_data_file OCC611.brep] a -explode a -checkshape a_1 -checkshape a_2 - -bfuse result a_1 a_2 -checkshape result - -set square 531.197 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug611_2 b/tests/bugs/moddata/bug611_2 deleted file mode 100755 index a9efdc484a..0000000000 --- a/tests/bugs/moddata/bug611_2 +++ /dev/null @@ -1,21 +0,0 @@ -puts "=================7=======" -puts "OCC611" -puts "SAM1564" -puts "(case 2)" -puts "========================" -puts "" -############################ -## No possibility to fuse the shapes. -############################ - -restore [locate_data_file OCC611.brep] a -explode a -checkshape a_1 -checkshape a_2 - -bop a_1 a_2 -bopfuse result -checkshape result - -set square 531.197 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug611_3 b/tests/bugs/moddata/bug611_3 deleted file mode 100755 index 3cdd5ce25b..0000000000 --- a/tests/bugs/moddata/bug611_3 +++ /dev/null @@ -1,20 +0,0 @@ -puts "========================" -puts "OCC611" -puts "SAM1564" -puts "(case 1)" -puts "========================" -puts "" -############################ -## No possibility to fuse the shapes. -############################ - -restore [locate_data_file OCC611.brep] a -explode a -checkshape a_1 -checkshape a_2 - -bfuse result a_2 a_1 -checkshape result - -set square 531.197 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug613_1 b/tests/bugs/moddata/bug613_1 deleted file mode 100755 index 071719b0bc..0000000000 --- a/tests/bugs/moddata/bug613_1 +++ /dev/null @@ -1,26 +0,0 @@ -puts "========================" -puts " OCC613" -puts "(case 1)" -puts "========================" -puts "" -############################################# -## Meshing algo cannot create mesh for faces with internal edges -############################################# - -restore [locate_data_file OCC613a.brep] result - -tclean result -isos result 0 -incmesh result .1 -triangles result - -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -if { $tri == 0 || $nod == 0 } { - puts "Error : Meshing algo cannot create mesh for faces with internal edges " -} - -set 3dviewer 1 - diff --git a/tests/bugs/moddata/bug613_2 b/tests/bugs/moddata/bug613_2 deleted file mode 100755 index 44a4b84083..0000000000 --- a/tests/bugs/moddata/bug613_2 +++ /dev/null @@ -1,26 +0,0 @@ -puts "========================" -puts " OCC613" -puts "(case 2)" -puts "========================" -puts "" -############################################# -## Meshing algo cannot create mesh for faces with internal edges -############################################# - -restore [locate_data_file OCC613b.brep] result - -tclean result -isos result 0 -incmesh result .1 -triangles result - -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod - -if { $tri == 0 || $nod == 0 } { - puts "Error : Meshing algo cannot create mesh for faces with internal edges " -} - -set 3dviewer 1 - diff --git a/tests/bugs/moddata/bug618 b/tests/bugs/moddata/bug618 deleted file mode 100755 index 688f9e02c6..0000000000 --- a/tests/bugs/moddata/bug618 +++ /dev/null @@ -1,21 +0,0 @@ - -puts "========================" -puts "OCC618" -puts "========================" -puts "" -############################ -## Exception during bop -############################ - -restore [locate_data_file OCC618a.brep] a -checkshape a -restore [locate_data_file OCC618b.brep] b -checkshape b - -if [catch {bop a b} catch_result] { - puts "Faulty OCC618 : BOP operation was made wrongly" -} else { - puts "OCC618 OK: BOP operation works OK" -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug6278 b/tests/bugs/moddata/bug6278 deleted file mode 100644 index 5a3919f79e..0000000000 --- a/tests/bugs/moddata/bug6278 +++ /dev/null @@ -1,61 +0,0 @@ -puts "============" -puts "OCC6278" -puts "============" -puts "" -###################################################### -# Fuse operation produces incorrect result -###################################################### - -set BugNumber OCC6278 - -restore [locate_data_file OCC6278-A.brep] a -restore [locate_data_file OCC6278-B.brep] b - -bfuse result a b -explode result v - -set nb_v_good 4 - -set DumpList [dump result_2] -if {[llength ${DumpList}] < 40} { - puts "Faulty ${BugNumber}: bad format of dump" -} else { - regexp { *- *Point *3D *: *([-0-9.+eE]+), +([-0-9.+eE]+), +([-0-9.+eE]+)} ${DumpList} full x y z - puts $x - puts $y - puts $z - - set percent_max 0.1 - - set x [lindex ${DumpList} 37] - set y [lindex ${DumpList} 38] - set z [lindex ${DumpList} 39] - - set x [string range ${x} 0 end-1] - set y [string range ${y} 0 end-1] - - set good_x -32.3042674857046 - set good_y 20.0000000000001 - set good_z 0. - - set Percent_x [expr abs(${x} - ${good_x}) / abs(${good_x}) * 100.] - set Percent_y [expr abs(${y} - ${good_y}) / abs(${good_y}) * 100.] - if {${z} == 0.} { - set Percent_z 0. - } else { - set Percent_z [expr abs(${good_z} - ${z}) / abs(${z}) * 100.] - } - - if {${Percent_x} > ${percent_max}} { - puts "Faulty ${BugNumber}: bad value of x = ${x}" - } - if {${Percent_y} > ${percent_max}} { - puts "Faulty ${BugNumber}: bad value of y = ${y}" - } - if {${Percent_z} > ${percent_max}} { - puts "Faulty ${BugNumber}: bad value of z = ${z}" - } -} - -set length 278.725 -set 3dviewer 2 diff --git a/tests/bugs/moddata/bug6412 b/tests/bugs/moddata/bug6412 deleted file mode 100644 index 2521030190..0000000000 --- a/tests/bugs/moddata/bug6412 +++ /dev/null @@ -1,33 +0,0 @@ -puts "========" -puts "OCC6412" -puts "========" -puts "" -#################################################### -## Regression in visualization -#################################################### - -set BugNumber OCC6412 - -restore [locate_data_file OCC6412.brep] result - -tclean result -vinit -vdisplay result -vsetdispmode result 1 - -isos result 0 -triangles result - -set tri 0 -set nod 0 -set tri_info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri -regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod -if { ${tri} == 0 && ${nod} == 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -set 3dviewer 0 - diff --git a/tests/bugs/moddata/bug6412_1 b/tests/bugs/moddata/bug6412_1 deleted file mode 100755 index 5189653dc0..0000000000 --- a/tests/bugs/moddata/bug6412_1 +++ /dev/null @@ -1,17 +0,0 @@ -puts "================" -puts "OCC6412" -puts "================" -puts "" -####################################################################################### -# Regression in vizualization -####################################################################################### - -set BugNumber OCC6412 - -restore [locate_data_file OCC6412.brep] result -vinit -vfit -vsetdispmode 1 - -set square 3480.05 -set 3dviewer 0 diff --git a/tests/bugs/moddata/bug6450_1 b/tests/bugs/moddata/bug6450_1 deleted file mode 100644 index 2fcb1e3568..0000000000 --- a/tests/bugs/moddata/bug6450_1 +++ /dev/null @@ -1,24 +0,0 @@ -puts "============" -puts "OCC6450" -puts "============" -puts "" -###################################################### -# Cannot get common part of two parallel halfspaces -###################################################### - -set BugNumber OCC6450 - -plane pl 100 0 0 1 0 0 -mkface f pl -halfspace so1 f 0 0 0 -ttranslate f -200 0 0 -halfspace so2 f 0 0 0 -bcommon result so1 so2 -if {[dtyp result] == ""} { - puts "Faulty ${BugNumber}: operation failed" -} else { - puts "OK ${BugNumber}" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug6450_2 b/tests/bugs/moddata/bug6450_2 deleted file mode 100644 index 6acfde9fae..0000000000 --- a/tests/bugs/moddata/bug6450_2 +++ /dev/null @@ -1,24 +0,0 @@ -puts "============" -puts "OCC6450" -puts "============" -puts "" -###################################################### -# Cannot get common part of two parallel halfspaces -###################################################### - -set BugNumber OCC6450 - -plane pl 100 0 0 1 0 0 -mkface f pl -halfspace so1 f 0 0 0 -ttranslate f -200 0 0 -trotate f 0 0 0 0 0 1 45 -halfspace so2 f 0 0 0 -bcommon result so1 so2 -if {[dtyp result] == ""} { - puts "Faulty ${BugNumber}: operation failed" -} else { - puts "OK ${BugNumber}" -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug6474 b/tests/bugs/moddata/bug6474 deleted file mode 100644 index 97c93c567a..0000000000 --- a/tests/bugs/moddata/bug6474 +++ /dev/null @@ -1,22 +0,0 @@ -puts "============" -puts "OCC6474" -puts "============" -puts "" -###################################################### -# Incorrect result of intersection of a plane and an extrusion surface -###################################################### - -set BugNumber OCC6474 - -restore [locate_data_file OCC6474-s1.draw] s1 -restore [locate_data_file OCC6474-s2.draw] s2 - -intersect result s1 s2 - -if {[llength [directory res*]] != 1} { - puts "Faulty ${BugNumber}: more than 1 intersection line is got" -} else { - puts "OK ${BugNumber}" -} - -set 3dviewer 1 diff --git a/tests/bugs/moddata/bug65 b/tests/bugs/moddata/bug65 deleted file mode 100755 index 91e614ef64..0000000000 --- a/tests/bugs/moddata/bug65 +++ /dev/null @@ -1,23 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" - -puts "================" -puts "BUC61023" -puts "OCC65" -puts "================" -puts "" -############################################### -## Possibility to make a revolution to have a solid with a volume=0 m3 -############################################### - -restore [locate_data_file OCC65.brep] sh -checkshape sh - -revol result sh 0 0 0 0 0 1 360 - -checkshape result - -set square 1.0134e+06 -set 2dviewer 0 - - - diff --git a/tests/bugs/moddata/bug6503 b/tests/bugs/moddata/bug6503 deleted file mode 100644 index 8c7c1cc372..0000000000 --- a/tests/bugs/moddata/bug6503 +++ /dev/null @@ -1,83 +0,0 @@ -puts "================" -puts "OCC6503" -puts "================" -puts "" -####################################################################################### -# Incorrect calculation of bounding box for infinite surfaces -####################################################################################### - -set BugNumber OCC6503 - -proc GetPercent {Value GoodValue} { - set Percent 0. - if {${GoodValue} != 0.} { - set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] - } elseif {${Value} != 0.} { - set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] - } else { - set Percent 0. - } - return ${Percent} -} - -plane pl 0 0 0 0 0 1 -mkface f pl -set info_result [bounding f] - -set x1 [lindex ${info_result} 0] -set y1 [lindex ${info_result} 1] -set z1 [lindex ${info_result} 2] -set x2 [lindex ${info_result} 3] -set y2 [lindex ${info_result} 4] -set z2 [lindex ${info_result} 5] - -set good_x1 -1e+100 -set good_y1 -1e+100 -set good_z1 -9.9999999999999995e-08 -set good_x2 1e+100 -set good_y2 1e+100 -set good_z2 9.9999999999999995e-08 - -set percent_max 0.1 -set status 0 - -set x1_percent [GetPercent ${x1} ${good_x1}] -set y1_percent [GetPercent ${y1} ${good_y1}] -set z1_percent [GetPercent ${z1} ${good_z1}] -set x2_percent [GetPercent ${x2} ${good_x2}] -set y2_percent [GetPercent ${y2} ${good_y2}] -set z2_percent [GetPercent ${z2} ${good_z2}] - -if {${x1_percent} > ${percent_max}} { - puts "Faulty ${BugNumber} : x1 is wrong" - set status 1 -} -if {${y1_percent} > ${percent_max}} { - puts "Faulty ${BugNumber} : y1 is wrong" - set status 1 -} -if {${z1_percent} > ${percent_max}} { - puts "Faulty ${BugNumber} : z1 is wrong" - set status 1 -} -if {${x2_percent} > ${percent_max}} { - puts "Faulty ${BugNumber} : x2 is wrong" - set status 1 -} -if {${y2_percent} > ${percent_max}} { - puts "Faulty ${BugNumber} : y2 is wrong" - set status 1 -} -if {${z2_percent} > ${percent_max}} { - puts "Faulty ${BugNumber} : z2 is wrong" - set status 1 -} - -if { ${status} == 0 } { - puts "${BugNumber}: OK" -} else { - puts "${BugNumber}: Faulty" -} - -set 3dviewer 0 - diff --git a/tests/bugs/moddata/bug6862_1 b/tests/bugs/moddata/bug6862_1 deleted file mode 100644 index c7c40679cc..0000000000 --- a/tests/bugs/moddata/bug6862_1 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC6862" -puts "============" -puts "" -####################################################################### -# Tool for checking arguments of Boolean Operations -####################################################################### - -set BugNumber OCC6862 - -# self-intersection test -restore [locate_data_file OCC497a.brep] a_1 -restore [locate_data_file OCC497b.brep] a_2 - -decho off -set resstr [bopargcheck a_2] -decho on - -if {$resstr=="Faulties, that can not be treated by BOP, are detected.\n"} { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug6862_2 b/tests/bugs/moddata/bug6862_2 deleted file mode 100644 index b390a3a97e..0000000000 --- a/tests/bugs/moddata/bug6862_2 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC6862" -puts "============" -puts "" -####################################################################### -# Tool for checking arguments of Boolean Operations -####################################################################### - -set BugNumber OCC6862 - -# self-intersection test -restore [locate_data_file OCC497e.brep] a_1 -restore [locate_data_file OCC497f.brep] a_2 - -decho off -set resstr [bopargcheck a_2] -decho on - -if {$resstr=="Faulties, that can not be treated by BOP, are detected.\n"} { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug6862_3 b/tests/bugs/moddata/bug6862_3 deleted file mode 100644 index 354c8a360f..0000000000 --- a/tests/bugs/moddata/bug6862_3 +++ /dev/null @@ -1,30 +0,0 @@ -puts "TODO OCC111111 ALL: Faulty OCC6862" - -puts "============" -puts "OCC6862" -puts "============" -puts "" -####################################################################### -# Tool for checking arguments of Boolean Operations -####################################################################### - -set BugNumber OCC6862 - -# test small edges -restore [locate_data_file OCC651a.brep] a -restore [locate_data_file OCC651b.brep] b - -puts "Checking shapes: bopargcheck a b /FTVEIP ..." -decho off -set resstr [bopargcheck a b /FTVEIP] -decho on - -if {$resstr=="Faulties, that can not be treated by BOP, are detected.\n"} { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} - -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug6862_4 b/tests/bugs/moddata/bug6862_4 deleted file mode 100644 index 6b0e1ea5ae..0000000000 --- a/tests/bugs/moddata/bug6862_4 +++ /dev/null @@ -1,28 +0,0 @@ -puts "TODO OCC111111 ALL: Faulty OCC6862" - -puts "============" -puts "OCC6862" -puts "============" -puts "" -####################################################################### -# Tool for checking arguments of Boolean Operations -####################################################################### - -set BugNumber OCC6862 - -# test small edges -restore [locate_data_file OCC651a.brep] a - -decho off -puts "Checking shapes: bopargcheck a b /FTVEIP ..." -set resstr [bopargcheck a /FTVEIP] -decho on - -if {$resstr=="Faulties, that can not be treated by BOP, are detected.\n"} { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug6862_5 b/tests/bugs/moddata/bug6862_5 deleted file mode 100644 index 738b2a7ce7..0000000000 --- a/tests/bugs/moddata/bug6862_5 +++ /dev/null @@ -1,26 +0,0 @@ -puts "============" -puts "OCC6862" -puts "============" -puts "" -####################################################################### -# Tool for checking arguments of Boolean Operations -####################################################################### - -set BugNumber OCC6862 - -# test types -box b1 10 20 10 -box b2 20 10 10 -explode b2 f - -decho off -set resstr [bopargcheck b1 b2_1 -C /RFTVEI] -decho on - -if {$resstr=="Faulties, that can not be treated by BOP, are detected.\n"} { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug6862_6 b/tests/bugs/moddata/bug6862_6 deleted file mode 100644 index 72b6a61273..0000000000 --- a/tests/bugs/moddata/bug6862_6 +++ /dev/null @@ -1,27 +0,0 @@ -puts "============" -puts "OCC6862" -puts "============" -puts "" -puts "TODO OCC111111 ALL: Faulty OCC6862" - -####################################################################### -# Tool for checking arguments of Boolean Operations -####################################################################### - -set BugNumber OCC6862 - -# test small edges -restore [locate_data_file OCC726.brep] a -explode a - -decho off -set resstr [bopargcheck a_1 a_2 -O /FTVEI] -decho on - -if {$resstr=="Faulties, that can not be treated by BOP, are detected.\n"} { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug6862_7 b/tests/bugs/moddata/bug6862_7 deleted file mode 100644 index 5ea0d6d597..0000000000 --- a/tests/bugs/moddata/bug6862_7 +++ /dev/null @@ -1,37 +0,0 @@ -puts "============" -puts "OCC6862" -puts "============" -puts "" -####################################################################### -# Tool for checking arguments of Boolean Operations -####################################################################### - -set BugNumber OCC6862 - -# face verification -box b1 10 20 10 -box b2 20 10 10 -explode b1 f -explode b2 f -bcut r1 b1_6 b2_6 -bcommon r2 b1_6 b2_6 -explode r1 w -explode r2 w -mksurface gs b1_6 -mkface ff gs -add r1_1 ff -add r2_1 ff - -decho off -set resstr [bopargcheck ff b2_6 -F /RTVEIP] -decho on - -if {$resstr=="Faulties, that can not be treated by BOP, are detected.\n"} { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} - -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug6862_8 b/tests/bugs/moddata/bug6862_8 deleted file mode 100644 index 80f386f041..0000000000 --- a/tests/bugs/moddata/bug6862_8 +++ /dev/null @@ -1,30 +0,0 @@ -puts "============" -puts "OCC6862" -puts "============" -puts "" -####################################################################### -# Tool for checking arguments of Boolean Operations -####################################################################### - -set BugNumber OCC6862 - -# test possibility to merge vertices -box b1 10 20 10 -box b2 20 10 10 -explode b1 e -explode b2 e -tcopy b2_10 ee2 -compound b2_10 ee2 comp -donl b1_10 comp - -decho off -set resstr [bopargcheck b1_10 comp -O /RFTEIP] -decho on - -if {$resstr=="Faulties, that can not be treated by BOP, are detected.\n"} { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug6862_9 b/tests/bugs/moddata/bug6862_9 deleted file mode 100644 index 4f790dcd86..0000000000 --- a/tests/bugs/moddata/bug6862_9 +++ /dev/null @@ -1,30 +0,0 @@ -puts "============" -puts "OCC6862" -puts "============" -puts "" -####################################################################### -# Tool for checking arguments of Boolean Operations -####################################################################### - -set BugNumber OCC6862 - -# test possibility to merge edges -box b1 10 20 10 -box b2 20 10 10 -explode b1 e -explode b2 e -tcopy b2_10 ee2 -wire ww b2_10 ee2 -donl b1_10 ww - -decho off -set resstr [bopargcheck b1_10 ww -O /RFTVIP] -decho on - -if { $resstr=="Faulties, that can not be treated by BOP, are detected.\n" } { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug7 b/tests/bugs/moddata/bug7 deleted file mode 100755 index b8bc89c712..0000000000 --- a/tests/bugs/moddata/bug7 +++ /dev/null @@ -1,24 +0,0 @@ - -puts "================" -puts "OCC7" -puts "================" -puts "" -######################################################### -## Extrema_ExtPElS throw the exception "gp_VectorWithNullMagnitude". -######################################################### - -ptorus tor 3 1 -explode tor f -vertex vv 0 3 0 - -distmini result vv tor_1 -set info [dump result] - -if { [regexp "TShape # 1 : EDGE" $info] != 1 - || [regexp "TShape # 2 : VERTEX" $info] != 1 - || [regexp "TShape # 3 : VERTEX" $info] != 1 } { - puts "Error : Result is incorrect" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug703 b/tests/bugs/moddata/bug703 deleted file mode 100755 index 5244823097..0000000000 --- a/tests/bugs/moddata/bug703 +++ /dev/null @@ -1,22 +0,0 @@ -puts "==========" -puts "OCC703 " -puts "==========" -puts "" -################################################## -## Wrong result of extrema -## Draw command extrema c1 ce gives no solutions, but must be 2 solutions -################################################## - -restore [locate_data_file OCC703_1.draw] c1 -restore [locate_data_file OCC703_2.draw] ce - -set result [extrema c1 ce] -set err [llength $result] -if { $err != 2} { - puts "Faulty OCC703 (amount of solution): command extrema does NOT work properly" -} else { - puts "OCC703 OK (amount of solution): command extrema works properly" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug705 b/tests/bugs/moddata/bug705 deleted file mode 100755 index a440a10d10..0000000000 --- a/tests/bugs/moddata/bug705 +++ /dev/null @@ -1,31 +0,0 @@ - -puts "==========" -puts "OCC705 " -puts "==========" -puts "" -########################################################### -## The matrix of inertia for sphere computed incorrectly. -## In the secod case the not diagonal elements of the inertia matrix are not close to zero. -########################################################### - -psphere result 10 10 10 -ttranslate result 10 10 10 -trotate result 0 0 0 0 1 1 34 - -set list [vprops result] -set inertia [regexp -all -inline { +[-0-9.+eE]+ +[-0-9.+eE]+ +[-0-9.+eE]+} $list] -set matrix [regexp -all -inline {[-0-9.+eE]+} $inertia] - -set matrix12 [lindex $matrix 1] -set matrix21 [lindex $matrix 3] -set matrix23 [lindex $matrix 5] -set matrix32 [lindex $matrix 7] - -if { ${matrix12} != 0. || ${matrix21} != 0. || ${matrix23} != 0. || ${matrix32} != 0. } { - puts "Faulty OCC705" -} else { - puts "OCC705 OK" -} - -set length 123.755 -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug712_2 b/tests/bugs/moddata/bug712_2 deleted file mode 100755 index 74870a8aba..0000000000 --- a/tests/bugs/moddata/bug712_2 +++ /dev/null @@ -1,22 +0,0 @@ -pload QAcommands - -puts "========" -puts "OCC712" -puts "========" -puts "" -############################################################ -## Exeption is raised in DRAW during building draft with help command "depouille" -## on face in the attached shape. -## The source code of application is also attached and should be checked. -############################################################ - -set draftAngle 15 -set slabThick 30 - -if [catch {OCC712 ${draftAngle} ${slabThick} } catch_result] { - puts "Faulty OCC712" -} else { - puts "OCC712 OK" -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug736 b/tests/bugs/moddata/bug736 deleted file mode 100755 index 5507ea2327..0000000000 --- a/tests/bugs/moddata/bug736 +++ /dev/null @@ -1,21 +0,0 @@ -puts "========" -puts "OCC736" -puts "========" -puts "" -##################################################### -## After restoring attached shape(face) it is obviously that there is -## selfintersecting wire. However BRepCheck gives reply that shape looks OK. -##################################################### - -restore [locate_data_file OCC736.brep] result -decho off -set che [checkshape result r] -decho on -if { [regexp {OK} $che ] == 1 } { - puts "Faulty OCC736: checkshape command works wrongly" -} else { - puts "OCC736 OK: checkshape command works PROPERLY" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug7372 b/tests/bugs/moddata/bug7372 deleted file mode 100644 index 5478ffbdf0..0000000000 --- a/tests/bugs/moddata/bug7372 +++ /dev/null @@ -1,37 +0,0 @@ -pload QAcommands - -puts "================" -puts "OCC7372" -puts "================" -puts "" -####################################################################################### -# Invalid conversion 2D periodic BSpline curve to Bezier segments -####################################################################################### - -set BugNumber OCC7372 - -OCC7372 - -set mistake 0 -set len [llength [directory segment*]] -if { ${len} != 5 } { - puts "Faulty ${BugNumber} : segment number is wrong" - set mistake 1 -} else { - set good_length 73.3203 - regexp {The length .* is ([-0-9.+eE]+)} [length segment_5] full current_length - if { [expr 1.*abs($good_length - $current_length)/$good_length * 100] > 0.1 } { - puts "Faulty ${BugNumber} : length is wrong for segment_5" - set mistake 1 - } - renamevar segment_5 result -} - -if { ${mistake} != 0 } { - puts "Faulty ${BugNumber}" -} else { - puts "OK ${BugNumber}" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug747 b/tests/bugs/moddata/bug747 deleted file mode 100755 index 859231ac7d..0000000000 --- a/tests/bugs/moddata/bug747 +++ /dev/null @@ -1,20 +0,0 @@ - -puts "========" -puts "OCC747" -puts "========" -puts "" -############################### -## Exception in DRAW-command "distmini" -############################### - -restore [locate_data_file OCC747_1.brep] s1 -checkshape s1 -restore [locate_data_file OCC747_2.brep] s2 -checkshape s2 - -if { [catch { distmini result s1 s2 } status] } { - puts "Faulty OCC747" -} else { - puts "OCC747 OK" -} - diff --git a/tests/bugs/moddata/bug75_1 b/tests/bugs/moddata/bug75_1 deleted file mode 100755 index 86035465e7..0000000000 --- a/tests/bugs/moddata/bug75_1 +++ /dev/null @@ -1,29 +0,0 @@ -puts "============" -puts "BUC60861" -puts "OCC75" -puts "============" -puts "" -puts "(case 1)" -############################### -## Incorrect work of section Shell-Shell. -############################### - -restore [locate_data_file BUC60861_gap.brep] ss -checkshape ss - -plane pl1 25680.2288 21428 9995 1 0 0 -mkface f1 pl1 -4000 8000 -5000 5000 -bsection result ss f1 -a - -set good_len 9265 -regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} [maxtolerance result] full tol -regexp {Mass +: +([-0-9.+eE]+)} [lprops result] full len -if { [expr 1.*abs(${good_len} - $len)] > $tol } { - puts "Error : Length is bad" -} - -set 2dviewer 0 - - - - diff --git a/tests/bugs/moddata/bug75_2 b/tests/bugs/moddata/bug75_2 deleted file mode 100755 index fdd47364a2..0000000000 --- a/tests/bugs/moddata/bug75_2 +++ /dev/null @@ -1,28 +0,0 @@ -puts "============" -puts "BUC60861" -puts "OCC75" -puts "============" -puts "" -puts "case 2" -############################### -## Incorrect work of section Shell-Shell. -############################### - -restore [locate_data_file BUC60861_gap1.brep] ss -checkshape ss - -plane pl1 25680.2288 21428 9995 1 0 0 -mkface f1 pl1 -1 11 -5 5 -bsection result ss f1 -a - -set good_len 10.0009 -regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} [maxtolerance result] full tol -regexp {Mass +: +([-0-9.+eE]+)} [lprops result] full len -if { [expr 1.*abs(${good_len} - $len)] > $tol } { - puts "Error : len is bad" -} - -set 2dviewer 0 - - - diff --git a/tests/bugs/moddata/bug76 b/tests/bugs/moddata/bug76 deleted file mode 100755 index 214185d658..0000000000 --- a/tests/bugs/moddata/bug76 +++ /dev/null @@ -1,27 +0,0 @@ -puts "TODO OCC12345 ALL: Error : Volume of OCC76-1.brep is calculated wrongly becuase 3020.94 value must be but 3050.41 is" -puts "TODO OCC12345 ALL: Error : Volume of OCC76-2.brep is calculated wrongly because 9871.39 value must be but 10153.6 is" - -puts "================" -puts "OCC76" -puts "================" -puts "" - -restore [locate_data_file shading_177.brep] sh1 -checkshape sh1 -regexp {Mass +: +([-0-9.+eE]+)} [vprops sh1] full l1 - -restore [locate_data_file OCC76-2.brep] sh2 -checkshape sh2 -regexp {Mass +: +([-0-9.+eE]+)} [vprops sh2] full l2 - -if { [expr abs([expr $l1 - 3020.94])] > 0.00999} { - puts "Error : Volume of OCC76-1.brep is calculated wrongly becuase 3020.94 value must be but $l1 is" -} else { - puts " Volume of OCC76-1.brep is right calculated" -} - -if { [expr abs([expr $l2 - 9871.39 ])] > 0.00999} { - puts "Error : Volume of OCC76-2.brep is calculated wrongly because 9871.39 value must be but $l2 is" -} else { - puts " Volume of OCC76-2.brep is right calculated" -} diff --git a/tests/bugs/moddata/bug766 b/tests/bugs/moddata/bug766 deleted file mode 100755 index 7be84277bc..0000000000 --- a/tests/bugs/moddata/bug766 +++ /dev/null @@ -1,21 +0,0 @@ -puts "========" -puts "OCC766" -puts "========" -puts "" -############################### -## Can not project the 3-D point on the ellipse -############################### - -restore [locate_data_file OCC766.draw] c - -set result [proj c 30 3.944304526105059e-31 20.0] - -set ll [llength $result] - -if {$ll > 0} { - puts "OCC770 OK" -} else { - puts "Faulty OCC770" -} - -set 2dviewer 1 diff --git a/tests/bugs/moddata/bug8 b/tests/bugs/moddata/bug8 deleted file mode 100755 index 75e16f53c6..0000000000 --- a/tests/bugs/moddata/bug8 +++ /dev/null @@ -1,22 +0,0 @@ -puts "================" -puts "OCC8" -puts "================" -puts "" -################################################### -## BRepTools_WireExplorere gives not all edges from a wire -################################################### - -pload XDE -restore [locate_data_file OCC8.brep] result - -checkshape result - -explode result w -set info [expwire result_1 sh] - -if { [regexp "BRepTools_WireExplorer donne 16 Edges" $info] != 1 } { - puts "Error : BRepTools_WireExplorer gives WRONG number of edges." -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug813 b/tests/bugs/moddata/bug813 deleted file mode 100755 index 0cde7ffdb8..0000000000 --- a/tests/bugs/moddata/bug813 +++ /dev/null @@ -1,24 +0,0 @@ -pload QAcommands - -puts "=========" -puts " OCC813 " -puts "=========" -puts "" -##################################### -## Geom2dGcc_Lin2d2Tan fails on point and ellipse -##################################### -set U 200 -set V 200 - -set result [OCC813 $U $V] - -set nb_sol 0 - -regexp {nb of solutions = ([-0-9.+eE]+)} $result full nb_sol - -if {$nb_sol > 0} { - puts "OCC813 OK" -} else { - puts "Faulty OCC813" -} - diff --git a/tests/bugs/moddata/bug814 b/tests/bugs/moddata/bug814 deleted file mode 100755 index 9772a63d72..0000000000 --- a/tests/bugs/moddata/bug814 +++ /dev/null @@ -1,23 +0,0 @@ -pload QAcommands - -puts "=========" -puts " OCC814 " -puts "=========" -puts "" -#################################### -## Geom2dGcc_Lin2d2Tan fails on circle and ellipse -#################################### - -set result [OCC814] - -set nb_sol 0 - -regexp {nb of solutions = ([-0-9.+eE]+)} $result full nb_sol - -if {$nb_sol > 0} { - puts "OCC814 OK" -} else { - puts "Faulty OCC814" -} - - diff --git a/tests/bugs/moddata/bug8169 b/tests/bugs/moddata/bug8169 deleted file mode 100644 index 193f62818e..0000000000 --- a/tests/bugs/moddata/bug8169 +++ /dev/null @@ -1,26 +0,0 @@ -pload QAcommands - -puts "============" -puts "OCC8169" -puts "============" -puts "" -####################################################################### -# Wrong Geom2dAPI_InterCurveCurve segment -####################################################################### - -set BugNumber OCC6768 - -restore [locate_data_file OCC8169_1.brep] e1 -restore [locate_data_file OCC8169_2.brep] e2 - -plane p 0 0 500 0 0 1 1 0 0 -dump p -mkface result p - -if { [regexp {Faulty} [OCC8169 e1 e2 result]] == 0 } { - puts "OK ${BugNumber}" -} else { - puts "Faulty ${BugNumber}" -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug862 b/tests/bugs/moddata/bug862 deleted file mode 100755 index a1a7fad1e8..0000000000 --- a/tests/bugs/moddata/bug862 +++ /dev/null @@ -1,21 +0,0 @@ - -puts "================" -puts "OCC862" -puts "================" -puts "" -######################################## -## The result is just one extremum - intersection is not found. -######################################## -restore [locate_data_file OCC862_1.draw] c1 -restore [locate_data_file OCC862_2.draw] c2 - -set result [extrema c1 c2] -set err [llength $result] -if { $err <= 1} { - puts "Faulty OCC862 (amount of solution): command extrema does NOT work properly" -} else { - puts "OCC862 OK (amount of solution): command extrema works properly" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug867 b/tests/bugs/moddata/bug867 deleted file mode 100755 index b2c780dc90..0000000000 --- a/tests/bugs/moddata/bug867 +++ /dev/null @@ -1,24 +0,0 @@ -pload QAcommands - -puts "========" -puts "OCC867" -puts "========" -puts "" -###################################################### -## When calling method Init() with surface and its boundary parameters are the -## arguments and then calling method Perform() it raises an exception. -###################################################### - -cylinder c 10 20 -trim c c 0 4 0 2 -point p 30 30 30 -set Umin 0 -set Usup 3 -set Vmin 0 -set Vsup 2 - -if { [ catch {OCC867 p c $Umin $Usup $Vmin $Vsup} catch_result ] } { - puts "Faulty OCC867" -} else { - puts "OCC867 OK" -} diff --git a/tests/bugs/moddata/bug88 b/tests/bugs/moddata/bug88 deleted file mode 100755 index dd5438ebe2..0000000000 --- a/tests/bugs/moddata/bug88 +++ /dev/null @@ -1,109 +0,0 @@ -puts "========" -puts "BUC60963" -puts "OCC88" -puts "========" -puts "" -###################################################### -# BUC60963. can not project vertex to face -###################################################### - -restore [locate_data_file OCC88.brep] sh - -set che [checkshape sh] - -explode sh f -checkshape sh_1 -checkshape sh_2 - -mksurface surf1 sh_1 -mksurface surf2 sh_2 -puts "Make line from pos(135; 11; 0) with dir (0;0;1) " -line l 135 11 0 0 0 1 - -intersect res1 l surf1 -intersect res2 l surf2 -#set first1 [whatis res1] -#set second1 [whatis res2] - -puts "Try to intersect with (135;10.9995;0) (0;0;1)" -line ll 135 10.9995 0 0 0 1 -intersect res_1 ll surf1 -intersect res_2 ll surf2 -#set first2 [whatis res_1] -#set second2 [whatis res_2] - -proc CalculatePercent {value good_value} { - if {${good_value} == 0. && ${value} == 0.} { - set percent 0. - } else { - set percent [expr abs(${value} - ${good_value}) / double(${good_value}) * 100.] - } - return ${percent} -} - -set IsGood 1 -set percent_max 0.1 -if {[info exists res1] == 0} { - puts "Faulty OCC88 (case 2)" - set IsGood 0 -} -if {[info exists res2] == 1} { - puts "Faulty OCC88 (case 3)" - set IsGood 0 -} - -if {[info exists res_1] == 0} { - puts "Faulty OCC88 (case 4)" - set IsGood 0 -} -if {[info exists res_2] == 1} { - puts "Faulty OCC88 (case 5)" - set IsGood 0 -} - -if {${IsGood} == 1} { - set dump_list1 [split [dump res1] " :,\n"] - set x1 [lindex ${dump_list1} 10] - set y1 [lindex ${dump_list1} 12] - set z1 [lindex ${dump_list1} 14] - - set dump_list2 [split [dump res_1] " :,\n"] - set x2 [lindex ${dump_list2} 10] - set y2 [lindex ${dump_list2} 12] - set z2 [lindex ${dump_list2} 14] - - set x_percent [CalculatePercent ${x1} ${x2}] - set y_percent [CalculatePercent ${y1} ${y2}] - set z_percent [CalculatePercent ${z1} ${z2}] - - puts "x1 = ${x1}" - puts "x2 = ${x2}" - puts "x_percent = ${x_percent}\n" - - puts "y1 = ${y1}" - puts "y2 = ${y2}" - puts "y_percent = ${y_percent}\n" - - puts "z1 = ${z1}" - puts "z2 = ${z2}" - puts "z_percent = ${z_percent}\n" - - if {${x_percent} > ${percent_max}} { - puts "OCC88 Faulty (case 6)" - set IsGood 0 - } - if {${y_percent} > ${percent_max}} { - puts "OCC88 Faulty (case 7)" - set IsGood 0 - } - if {${z_percent} > ${percent_max}} { - puts "OCC88 Faulty (case 8)" - set IsGood 0 - } -} - -if {${IsGood} == 1} { - puts "OCC88 OK" -} - - diff --git a/tests/bugs/moddata/bug889 b/tests/bugs/moddata/bug889 deleted file mode 100755 index 4be5dd3b33..0000000000 --- a/tests/bugs/moddata/bug889 +++ /dev/null @@ -1,22 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty OCC889 : Checkshape says that the shape has FAULTY, but it is not truth" - -puts "============" -puts "OCC889" -puts "============" -puts "" -############################################ -## Checkshape founds number of errors on new face. It is not true. -############################################ -restore [locate_data_file OCC889.rle] result - -decho off -set che [checkshape result] -decho on - -if { [ regexp {Faulty} $che ] == 1 } { - puts "Faulty OCC889 : Checkshape says that the shape has FAULTY, but it is not truth" -} else { - puts "OCC889 OK : Checkshape works properly" -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug909 b/tests/bugs/moddata/bug909 deleted file mode 100755 index 3573115919..0000000000 --- a/tests/bugs/moddata/bug909 +++ /dev/null @@ -1,27 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty OCC909" - -pload QAcommands - -puts "=======" -puts "OCC909" -puts "=======" -puts "" -####################################################### -## BRepTools_WireExplorer give different number of edges in dev and FIXOCC40 -####################################################### - -restore [locate_data_file OCC909_f.rle] f -restore [locate_data_file OCC909_w.rle] w - -if { [ catch { set result [OCC909 w f] } ] } { - puts "Faulty OCC909" -} else { - set count 0 - regexp {Count = ()} $result full count - if {$count != 2} { - puts "Faulty OCC909" - } else { - puts "OCC909 OK" - } -} - diff --git a/tests/bugs/moddata/bug921 b/tests/bugs/moddata/bug921 deleted file mode 100755 index 0ea374ac34..0000000000 --- a/tests/bugs/moddata/bug921 +++ /dev/null @@ -1,72 +0,0 @@ -pload QAcommands - -puts "=======" -puts "OCC921" -puts "=======" -puts "" -############################################################ -## I have found that regresiion on file a054a.sat depends on changes in -## BRepTools::AddUVBounds. The method BRepTools::UVBounds(F, u1, u2, v1, v2) -## returns different values in C40 and in dev. It is because there are different -## strings of code. BRepTools.cxx line 213 (in dev version) -############################################################ - -set good_u1 -0.157166 -set good_u2 4.88216 -set good_v1 -1.65583 -set good_v2 7.93778 - -set percent_max 0.1 - -restore [locate_data_file OCC921.rle] a - -set BoundsList [OCC921 a] - -set u1 0 -set u2 0 -set v1 0 -set v2 0 - -regexp {Bounds: *([-0-9.+eE]+) *([-0-9.+eE]+) *([-0-9.+eE]+) *([-0-9.+eE]+)} $BoundsList full u1 u2 v1 v2 - -set u1_percent [expr abs(${u1} - ${good_u1}) / double(${good_u1}) * 100.] -set u2_percent [expr abs(${u2} - ${good_u2}) / double(${good_u2}) * 100.] -set v1_percent [expr abs(${v1} - ${good_v1}) / double(${good_v1}) * 100.] -set v2_percent [expr abs(${v2} - ${good_v2}) / double(${good_v2}) * 100.] - -puts "u1 = ${u1}" -puts "u2 = ${u2}" -puts "v1 = ${v1}" -puts "v2 = ${v2}" - -puts "u1_percent = ${u1_percent}" -puts "u2_percent = ${u2_percent}" -puts "v1_percent = ${v1_percent}" -puts "v2_percent = ${v2_percent}" - -set status 0 - -if {${u1_percent} > ${percent_max}} { - puts "OCC921: Error (case 1)" - set status 1 -} - -if {${u2_percent} > ${percent_max}} { - puts "OCC921: Error (case 2)" - set status 1 -} - -if {${v1_percent} > ${percent_max}} { - puts "OCC921: Error (case 3)" - set status 1 -} - -if {${v2_percent} > ${percent_max}} { - puts "OCC921: Error (case 4)" - set status 1 -} - -if {${status} == 0} { - puts "OCC921: OK" -} - diff --git a/tests/bugs/moddata/bug9303 b/tests/bugs/moddata/bug9303 deleted file mode 100755 index 11d2950b12..0000000000 --- a/tests/bugs/moddata/bug9303 +++ /dev/null @@ -1,107 +0,0 @@ -puts "============" -puts "OCC9303" -puts "============" -puts "" -###################################################### -# Intersection curve surface doesn't take account of bounds of the surface -###################################################### - -set BugNumber OCC9303 - -proc GetPercent {Value GoodValue} { - set Percent 0. - if {${GoodValue} != 0.} { - set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] - } elseif {${Value} != 0.} { - set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] - } else { - set Percent 0. - } - return ${Percent} -} - -cone c 0 0 0 30 0 -trimv nc c 20 30 - -smallview +X+Z -donly nc -fit - -line ll 0 0 20 1 0 0 - -if [catch {intersect res ll nc} result] { - set mistake 1 -} else { - set mistake 0 -} - -if { $mistake == 0} { - puts "${BugNumber} OK : intersection was finished" - puts "" - set nom 0 - set j 1 - repeat 2 { - set che [whatis res_$j] - set err [lindex $che [expr [llength $che] - 1]] - if { $err != "point"} { - break - } else { - set nom [expr $nom + 1] - } - incr j - } - if { $nom != 2 } { - puts [format "Faulty ${BugNumber}: Intersection was made WRONGLY: %s points" $nom] - } else { - puts [format "${BugNumber} OK : Intersection command works properly: %s points" $nom] - - set dump1 [dump res_1] - set x1 [lindex ${dump1} 7] - set y1 [lindex ${dump1} 8] - set z1 [lindex ${dump1} 9] - set x1 [string range ${x1} 0 end-1] - set y1 [string range ${y1} 0 end-1] - - set dump2 [dump res_2] - set x2 [lindex ${dump2} 7] - set y2 [lindex ${dump2} 8] - set z2 [lindex ${dump2} 9] - set x2 [string range ${x2} 0 end-1] - set y2 [string range ${y2} 0 end-1] - - set percent_max 0.1 - set GoodX1 1.154700538379251e+01 - set GoodY1 0.000000000000000e+00 - set GoodZ1 2.000000000000000e+01 - set GoodX2 -1.154700538379251e+01 - set GoodY2 0.000000000000000e+00 - set GoodZ2 2.000000000000000e+01 - - set Percent_x1 [GetPercent ${x1} ${GoodX1}] - set Percent_y1 [GetPercent ${y1} ${GoodY1}] - set Percent_z1 [GetPercent ${z1} ${GoodZ1}] - - set Percent_x2 [GetPercent ${x2} ${GoodX2}] - set Percent_y2 [GetPercent ${y2} ${GoodY2}] - set Percent_z2 [GetPercent ${z2} ${GoodZ2}] - - if {${Percent_x1} > ${percent_max}} { - puts "Faulty ${BugNumber}: bad value of x1 = ${x1}" - } elseif {${Percent_y1} > ${percent_max}} { - puts "Faulty ${BugNumber}: bad value of y1 = ${y1}" - } elseif {${Percent_z1} > ${percent_max}} { - puts "Faulty ${BugNumber}: bad value of z1 = ${z1}" - } elseif {${Percent_x2} > ${percent_max}} { - puts "Faulty ${BugNumber}: bad value of x2 = ${x2}" - } elseif {${Percent_y2} > ${percent_max}} { - puts "Faulty ${BugNumber}: bad value of y2 = ${y2}" - } elseif {${Percent_z2} > ${percent_max}} { - puts "Faulty ${BugNumber}: bad value of z2 = ${z2}" - } else { - puts "${BugNumber}: OK" - } - - } -} else { - puts "Faulty ${BugNumber} : intersection does not finished" -} diff --git a/tests/bugs/moddata/bug9303_1 b/tests/bugs/moddata/bug9303_1 deleted file mode 100755 index f4de3efb08..0000000000 --- a/tests/bugs/moddata/bug9303_1 +++ /dev/null @@ -1,51 +0,0 @@ -puts "============" -puts "OCC9303" -puts "============" -puts "" -###################################################### -# Intersection curve surface doesn't take account of bounds of the surface -###################################################### - -set BugNumber OCC9303 - -cone c 0 0 0 30 0 -trimv nc c 20 30 - -smallview +X+Z -donly nc -fit - -line ll 0 0 10 1 0 0 - -decho off -if [catch {intersect res ll nc} result] { - set mistake 1 -} else { - set mistake 0 -} -decho on - -if { $mistake == 0} { - puts "${BugNumber} OK : intersection was finished" - puts "" - set nom 0 - set j 1 - repeat 2 { - set che [whatis res_$j] - set err [lindex $che [expr [llength $che] - 1]] - if { $err != "point"} { - break - } else { - set nom [expr $nom + 1] - } - incr j - } - if { $nom != 0 } { - puts [format "Faulty ${BugNumber}: Intersection was made WRONGLY: %s points" $nom] - } else { - puts [format "${BugNumber} OK : Intersection command works properly: %s points" $nom] - } -} else { - puts "Faulty ${BugNumber} : intersection does not finished" -} - diff --git a/tests/bugs/moddata/bug935_1 b/tests/bugs/moddata/bug935_1 deleted file mode 100755 index 07ddf00b74..0000000000 --- a/tests/bugs/moddata/bug935_1 +++ /dev/null @@ -1,33 +0,0 @@ - -puts "=========" -puts " OCC935 " -puts "(case 1)" -puts "=========" -puts "" -############################### -## instability in checkshape in KAS:dev version. -############################### - -restore [locate_data_file OCC935_1.brep] result - -decho off -set err [checkshape result] -decho on -set j 1 -repeat 25 { - restore [locate_data_file OCC935_1.brep] result - decho off - set err1 [checkshape result] - decho on - if { $err != $err1 } { - puts [format " Faulty OCC935 (case 1): function CHECKSHAPE works wrongly on %s time" $j] - break - } else { - puts [format " OCC935 (case 1) OK: function CHECKSHAPE works properly %s time" $j] - } - incr j -} - -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug935_2 b/tests/bugs/moddata/bug935_2 deleted file mode 100755 index 7f738a4c26..0000000000 --- a/tests/bugs/moddata/bug935_2 +++ /dev/null @@ -1,32 +0,0 @@ - -puts "=========" -puts " OCC935 " -puts "(case 2)" -puts "=========" -puts "" -############################### -## instability in checkshape in KAS:dev version. -############################### - -restore [locate_data_file OCC935_2.brep] result - -decho off -set err [checkshape result] -decho on - -set j 1 -repeat 25 { - restore [locate_data_file OCC935_2.brep] result - decho off - set err1 [checkshape result] - decho on - if { $err != $err1 } { - puts [format " Faulty OCC935 (case 2): function CHECKSHAPE works wrongly on %s time" $j] - break - } else { - puts [format " OCC935 (case 2) OK: function CHECKSHAPE works properly %s time" $j] - } - incr j -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug943_1 b/tests/bugs/moddata/bug943_1 deleted file mode 100755 index 4ee1a39ae1..0000000000 --- a/tests/bugs/moddata/bug943_1 +++ /dev/null @@ -1,36 +0,0 @@ - -puts "=========" -puts " OCC943 " -puts "(case 1)" -puts "=========" -puts "" -##################################################### -## The regression is intersecting pcurves of face, They are added by fixshape. -## (To see this you can try fixshape dF.rle from attachment. But please note, that -## checkshape on result of fixshape sometimes fails and sometimes not. It is -## instability!) -###################################################### - -restore [locate_data_file OCC943_1.brep] result - -decho off -set err [checkshape result] -decho on - -set j 1 -repeat 25 { - restore [locate_data_file OCC943_1.brep] result - decho off - set err1 [checkshape result] - decho on - if { $err != $err1 } { - puts [format " Faulty OCC943 (case 1): function CHECKSHAPE works wrongly on %s time" $j] - break - } else { - puts [format " OCC943 (case 1) OK: function CHECKSHAPE works properly %s time" $j] - } - incr j -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug943_2 b/tests/bugs/moddata/bug943_2 deleted file mode 100755 index 5e44ef832e..0000000000 --- a/tests/bugs/moddata/bug943_2 +++ /dev/null @@ -1,36 +0,0 @@ - -puts "=========" -puts " OCC943 " -puts "(case 2)" -puts "=========" -puts "" -######################################################### -## distinace between projection and initial point in dev version is larger then in C40. -######################################################### - -restore [locate_data_file OCC943_2.draw] su - -set X 5.759527537723098 -set Y 31.81368637070151 -set Z -0.2989616405627145 - -vertex v $X $Y $Z -proj su $X $Y $Z - -regexp {Parameters +: +[-0-9.+eE]+ +([-0-9.+eE]+)} [dump ext_1] full resV - -cvalue ext_1 $resV cx cy cz -vertex V cx cy cz -distmini d V v - -regexp {([-0-9.+eE]+)$} [dump d_val] full res - -set res_good 1.108e-05 - -if { $res > $res_good } { - puts "" - puts "Faulty OCC493 (case 2)" -} else { - puts "" - puts " OCC493 (case 2) OK" -} diff --git a/tests/bugs/moddata/bug956_1 b/tests/bugs/moddata/bug956_1 deleted file mode 100755 index 76fda06ebf..0000000000 --- a/tests/bugs/moddata/bug956_1 +++ /dev/null @@ -1,25 +0,0 @@ -puts "TODO ?OCC12345 ALL: Faulty OCC956" - -puts "=========" -puts " OCC956 " -puts "(case 1)" -puts "=========" -puts "" -############################################### -##possible regression in KAS:dev on checkshape. Fails on valid shape -############################################### - -restore [locate_data_file OCC956_1.brep] result - -decho off -set che [checkshape result] -decho on - -if { [regexp {Faulty} $che] } { - puts "Faulty OCC956 (case 1): Checkshape says that the shape is incorrect, but it is not truth" -} else { - puts "OCC956 OK (case 1): Checkshape works properly" -} - -set 2dviewer 0 - diff --git a/tests/bugs/moddata/bug956_2 b/tests/bugs/moddata/bug956_2 deleted file mode 100755 index 3e045b22cb..0000000000 --- a/tests/bugs/moddata/bug956_2 +++ /dev/null @@ -1,26 +0,0 @@ -puts "TODO ?OCC12345 ALL: Faulty OCC956" - -puts "=========" -puts " OCC956 " -puts "(case 2)" -puts "=========" -puts "" -############################################### -##possible regression in KAS:dev on checkshape. Fails on valid shape -############################################### - -restore [locate_data_file OCC956_2.brep] result - -decho off -set che [checkshape result] -decho on - -if { [regexp {Faulty} $che] } { - puts "Faulty OCC956 (case 2): Checkshape says that the shape is incorrect, but it is not truth" -} else { - puts "OCC956 OK (case 2): Checkshape works properly" -} - -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/bug9_1 b/tests/bugs/moddata/bug9_1 deleted file mode 100755 index 09ac838eeb..0000000000 --- a/tests/bugs/moddata/bug9_1 +++ /dev/null @@ -1,88 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty OCC9" - -puts "================" -puts "OCC9" -puts "================" -puts "" - -pload QAcommands -restore [locate_data_file OCC9-path.draw] d -############### checkshape d # is not a topological shape -restore [locate_data_file OCC9-cur1.draw] b -############### checkshape b # is not a topological shape -restore [locate_data_file OCC9-cur2.draw] c -############### checkshape c # is not a topological shape - -## compute radius -cvalue b 0 x y z -cvalue b 0 P0 -vertex V [dval x] [dval y] [dval z] - -mkedge E d -distmini dm V E - -## make pipe -OCC9 res d b c [dval dm_val] - -## check parametrization - -# puts "Path 0: [dval x] [dval y] [dval z]" - -# cvalue b 1 x y z -# cvalue b 1 P1 -# puts "Path 1: [dval x] [dval y] [dval z]" - -# svalue res 0 0 x y z -# svalue res 0 0 S0 -# puts "Surf 0 0: [dval x] [dval y] [dval z]" - -# svalue res 0 1 x y z -# svalue res 0 1 S1 -# puts "Surf 0 1: [dval x] [dval y] [dval z]" - -set n 1 -set sum 0 -for {set i -470} {$i < 240} {incr i 25} { -# cvalue d $i "P$n" -# svalue res 0 $i "S$n" -# puts "donly res P$n S$n" - incr n - # puts "n = $n i = $i" - - ####cvalue d $i x y z - cvalue b $i x y z - svalue res 0 $i xs ys zs - set dist [expr sqrt (\ - ( [dval x ] - [dval xs ] ) * ( [dval x ] - [dval xs ] )\ - + ( [dval y ] - [dval ys ] ) * ( [dval y ] - [dval ys ] )\ - + ( [dval z ] - [dval zs ] ) * ( [dval z ] - [dval zs ] )\ - ) ] - set sum [expr $sum + $dist ] - puts "1-st Dist at $i : $dist" - - ####cvalue d $i x y z - cvalue c $i x y z - ####svalue res 0 $i xs ys zs - svalue res 1 $i xs ys zs - set dist [expr sqrt (\ - ( [dval x ] - [dval xs ] ) * ( [dval x ] - [dval xs ] )\ - + ( [dval y ] - [dval ys ] ) * ( [dval y ] - [dval ys ] )\ - + ( [dval z ] - [dval zs ] ) * ( [dval z ] - [dval zs ] )\ - ) ] - set sum [expr $sum + $dist ] - puts "2-nd Dist at $i : $dist" - -} -####puts "\n Avg dist on $n intervals: [expr $sum / $n ]" -set Avg_dist [expr $sum / (2 * $n) ] -puts "\n Avg dist on $n intervals: ${Avg_dist}" - -set check_dist [dval dm_val] -puts "\n check_dist = ${check_dist}" -if { ${Avg_dist} > ${check_dist} } { - puts "\n Faulty OCC9" -} else { - puts "\n OCC9: OK" -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/bug9_2 b/tests/bugs/moddata/bug9_2 deleted file mode 100755 index 1a1c1cfa7c..0000000000 --- a/tests/bugs/moddata/bug9_2 +++ /dev/null @@ -1,89 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty OCC9" - -puts "================" -puts "OCC9" -puts "================" -puts "" - -pload QAcommands -restore [locate_data_file OCC9-path.draw] d -############### checkshape d # is not a topological shape -restore [locate_data_file OCC9-cur1.draw] b -############### checkshape b # is not a topological shape -restore [locate_data_file OCC9-cur2.draw] c -############### checkshape c # is not a topological shape - -## compute radius -cvalue b 0 x y z -cvalue b 0 P0 -vertex V [dval x] [dval y] [dval z] - -mkedge E d -distmini dm V E - -## make pipe -set tolerance 0.0001 -OCC9 res d b c [dval dm_val] ${tolerance} - -## check parametrization - -# puts "Path 0: [dval x] [dval y] [dval z]" - -# cvalue b 1 x y z -# cvalue b 1 P1 -# puts "Path 1: [dval x] [dval y] [dval z]" - -# svalue res 0 0 x y z -# svalue res 0 0 S0 -# puts "Surf 0 0: [dval x] [dval y] [dval z]" - -# svalue res 0 1 x y z -# svalue res 0 1 S1 -# puts "Surf 0 1: [dval x] [dval y] [dval z]" - -set n 1 -set sum 0 -for {set i -470} {$i < 240} {incr i 25} { -# cvalue d $i "P$n" -# svalue res 0 $i "S$n" -# puts "donly res P$n S$n" - incr n - # puts "n = $n i = $i" - - ####cvalue d $i x y z - cvalue b $i x y z - svalue res 0 $i xs ys zs - set dist [expr sqrt (\ - ( [dval x ] - [dval xs ] ) * ( [dval x ] - [dval xs ] )\ - + ( [dval y ] - [dval ys ] ) * ( [dval y ] - [dval ys ] )\ - + ( [dval z ] - [dval zs ] ) * ( [dval z ] - [dval zs ] )\ - ) ] - set sum [expr $sum + $dist ] - puts "1-st Dist at $i : $dist" - - ####cvalue d $i x y z - cvalue c $i x y z - ####svalue res 0 $i xs ys zs - svalue res 1 $i xs ys zs - set dist [expr sqrt (\ - ( [dval x ] - [dval xs ] ) * ( [dval x ] - [dval xs ] )\ - + ( [dval y ] - [dval ys ] ) * ( [dval y ] - [dval ys ] )\ - + ( [dval z ] - [dval zs ] ) * ( [dval z ] - [dval zs ] )\ - ) ] - set sum [expr $sum + $dist ] - puts "2-nd Dist at $i : $dist" - -} -####puts "\n Avg dist on $n intervals: [expr $sum / $n ]" -set Avg_dist [expr $sum / (2 * $n) ] -puts "\n Avg dist on $n intervals: ${Avg_dist}" - -set check_dist ${tolerance} -puts "\n check_dist = ${check_dist}" -if { ${Avg_dist} > ${check_dist} } { - puts "\n Faulty OCC9" -} else { - puts "\n OCC9: OK" -} - -set 2dviewer 0 diff --git a/tests/bugs/moddata/fra62476_1 b/tests/bugs/moddata/fra62476_1 deleted file mode 100755 index 9d62fef020..0000000000 --- a/tests/bugs/moddata/fra62476_1 +++ /dev/null @@ -1,29 +0,0 @@ -puts "TODO OCC12345 ALL: Error : here is shading problem" - -puts "============" -puts "FRA62476" -puts "" -puts "==================================" -puts "It takes visual check for this BUG" -puts "==================================" -puts "" - -restore [locate_data_file fra62476a.brep] result -checkshape result - -tclean result -incmesh result .1 -triangles result - -set info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $info full tri -regexp { +([-0-9.+eE]+) +nodes} $info full nod - -if { $tri != 93 && $nod != 56 } { - puts "Error : here is shading problem" -} - -set 3dviewer 0 - - - diff --git a/tests/bugs/moddata/fra62476_2 b/tests/bugs/moddata/fra62476_2 deleted file mode 100755 index 242acd6312..0000000000 --- a/tests/bugs/moddata/fra62476_2 +++ /dev/null @@ -1,28 +0,0 @@ - -puts "==========" -puts "FRA62476" -puts "" -puts "==================================" -puts "It takes visual check for this BUG" -puts "==================================" -puts "" - -restore [locate_data_file fra62476b.brep] result -checkshape result - -tclean result -incmesh result .1 -triangles result - -set info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $info full tri -regexp { +([-0-9.+eE]+) +nodes} $info full nod - -if { $tri !=239 && $nod != 145 } { - puts "Shady FRA62476: here may be shading problem, number tri & nod - are changed" -} - -set 3dviewer 0 - - diff --git a/tests/bugs/moddata/ger61235 b/tests/bugs/moddata/ger61235 deleted file mode 100755 index c61d04087d..0000000000 --- a/tests/bugs/moddata/ger61235 +++ /dev/null @@ -1,24 +0,0 @@ -puts "===========" -puts "GER61235" -puts "===========" - -restore [locate_data_file ger61235a.brep] tool -checkshape tool -restore [locate_data_file ger61235b.brep] object -checkshape object - -bsection result object tool - -puts "Result of section :" -checkshape result -#To check geometry part -mksurface s1 tool -mksurface s2 object - -puts "Result of intersect :" -intersect result s1 s2 -puts [checksection result] - -set 2dviewer 0 - - diff --git a/tests/bugs/moddata/pro19422_1 b/tests/bugs/moddata/pro19422_1 deleted file mode 100755 index 30a16449a1..0000000000 --- a/tests/bugs/moddata/pro19422_1 +++ /dev/null @@ -1,20 +0,0 @@ -puts "==========" -puts "PRO19422" -puts "GER60462" -puts "==========" -puts "" -############################################################# -## Errors when cutting, 2 cases in /dp_25/IBug/pro/19422 files o1 t1 and o2 t2, restore. -## cut c1 o1 t1 fails. cut c2 o2 t2 fails -############################################################# - -restore [locate_data_file pro19422a.brep] shape -checkshape shape -restore [locate_data_file pro19422b.brep] tool -checkshape tool - -bcut result shape tool - -set square 3166.93 -set 2dviewer 0 - diff --git a/tests/bugs/moddata/pro19422_2 b/tests/bugs/moddata/pro19422_2 deleted file mode 100755 index 01e6423b0a..0000000000 --- a/tests/bugs/moddata/pro19422_2 +++ /dev/null @@ -1,18 +0,0 @@ -puts "==========" -puts "PRO19422" -puts "==========" -puts "" -############################################################# -## Errors when cutting, 2 cases in /dp_25/IBug/pro/19422 files o1 t1 and o2 t2, restore. -## cut c1 o1 t1 fails. cut c2 o2 t2 fails -############################################################# - -restore [locate_data_file pro19422c.brep] shape -checkshape shape -restore [locate_data_file pro19422d.brep] tool -checkshape tool - -bcut result shape tool - -set square 2369.43 -set 2dviewer 0 diff --git a/tests/bugs/moddata/pro20333 b/tests/bugs/moddata/pro20333 deleted file mode 100755 index 0f67ccf038..0000000000 --- a/tests/bugs/moddata/pro20333 +++ /dev/null @@ -1,26 +0,0 @@ -puts "TODO OCC12345 ALL: Faulty PRO20333: here is shading problem" - -puts "============" -puts "PRO20333" -puts "" -puts "==================================" -puts "It takes visual check for this BUG" -puts "==================================" - -restore [locate_data_file pro20333a.brep] result -checkshape result - -tclean result -isos result 0 -incmesh result .1 -triangles result - -set info [trinfo result] -regexp { +([-0-9.+eE]+) +triangles} $info full tri -regexp { +([-0-9.+eE]+) +nodes} $info full nod - -if { $tri != 107 || $nod != 109 } { - puts "Faulty PRO20333: here is shading problem" -} - -set 3dviewer 0 diff --git a/tests/bugs/moddata_1/begin b/tests/bugs/moddata_1/begin new file mode 100755 index 0000000000..572d363e8b --- /dev/null +++ b/tests/bugs/moddata_1/begin @@ -0,0 +1,9 @@ +set subgroup moddata + + + + + + + + diff --git a/tests/bugs/moddata_1/buc60607_1 b/tests/bugs/moddata_1/buc60607_1 new file mode 100755 index 0000000000..4e5979db9f --- /dev/null +++ b/tests/bugs/moddata_1/buc60607_1 @@ -0,0 +1,21 @@ +puts "=======================" +puts "BUC60607" +puts "It takes visual check for this BUC" +puts "=======================" + +set len_ch 2513 + +point p 1600 300 +line l 0 500 2000 500 +cirtang c p l 400 + +set info1 [length $c_1] +set info2 [length $c_2] +regexp {The length c_1 is +([-0-9.+eE]+)} $info1 full len1 +regexp {The length c_2 is +([-0-9.+eE]+)} $info2 full len2 +set len_int1 [expr int($len1)] +set len_int2 [expr int($len2)] + +if { ${len_int1} != ${len_ch} || ${len_int2} != ${len_ch} } { + puts "Error : Length is invalid" +} diff --git a/tests/bugs/moddata_1/buc60607_2 b/tests/bugs/moddata_1/buc60607_2 new file mode 100755 index 0000000000..f602def4d5 --- /dev/null +++ b/tests/bugs/moddata_1/buc60607_2 @@ -0,0 +1,8 @@ +puts "=======================" +puts "BUC60607" +puts "It takes visual check for this BUC" +puts "=======================" + +point p 1600 300 +line l 0 500 2000 500 +cirtang c1 p l 200 diff --git a/tests/bugs/moddata_1/buc60607_3 b/tests/bugs/moddata_1/buc60607_3 new file mode 100755 index 0000000000..e4a5088de8 --- /dev/null +++ b/tests/bugs/moddata_1/buc60607_3 @@ -0,0 +1,8 @@ +puts "=======================" +puts "BUC60607" +puts "It takes visual check for this BUC" +puts "=======================" + +point p2 1400 1400 +line l2 3000 1700 1000 1550 +cirtang c3 p2 l2 300 diff --git a/tests/bugs/moddata_1/buc60607_4 b/tests/bugs/moddata_1/buc60607_4 new file mode 100755 index 0000000000..b461cb1307 --- /dev/null +++ b/tests/bugs/moddata_1/buc60607_4 @@ -0,0 +1,8 @@ +puts "=======================" +puts "BUC60607" +puts "It takes visual check for this BUC" +puts "=======================" + +point p2 1400 1400 +line l2 3000 1700 1000 1550 +cirtang result p2 l2 150 diff --git a/tests/bugs/moddata_1/buc60609 b/tests/bugs/moddata_1/buc60609 new file mode 100755 index 0000000000..c601a7411f --- /dev/null +++ b/tests/bugs/moddata_1/buc60609 @@ -0,0 +1,26 @@ +puts "================" +puts "BUC60609" +puts "================" + +pload QAcommands + +set INF [BUC60609 [locate_data_file buc60609a.brep] a] +set ll [llength $INF] +set first [lindex $INF [expr $ll - 5]] +set second [lindex $INF [expr $ll - 1]] + +if {$first != "INSIDE" && $first != "inside"} { + puts "Faulty BUC60609 first: $first is not right result. It should be INSIDE" +} else { + puts "BUC60609 first OK: It is INSIDE" +} + +if {$second != "INSIDE"} { + puts "Faulty BUC60609 second: $second is not right result. It should be INSIDE" +} else { + puts "BUC60609 second OK: It is INSIDE" +} + +renamevar a result +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/buc60618 b/tests/bugs/moddata_1/buc60618 new file mode 100755 index 0000000000..6d1ed6267d --- /dev/null +++ b/tests/bugs/moddata_1/buc60618 @@ -0,0 +1,59 @@ +puts "==================================" +puts "BUC60618" +puts "==================================" +puts "There was a problem filter of solutions. Several solutions were skipped." +puts "" +puts "It takes visual check for this BUG" +puts "==================================" +puts "" +set len_ch1 3568 +set len_ch2 9964 +set len_ch3 2082 +set len_ch4 32696 +set len_ch5 1681 +set len_ch6 3097 +set len_ch7 1545 +set len_ch8 772 + +circle c1 0 0 100 +circle c2 500 -400 300 +circle c3 300 200 200 +cirtang result c1 c2 c3 + +set info1 [length $result_1] +set info2 [length $result_2] +set info3 [length $result_3] +set info4 [length $result_4] +set info5 [length $result_5] +set info6 [length $result_6] +set info7 [length $result_7] +set info8 [length $result_8] + +regexp {The length result_1 is +([-0-9.+eE]+)} $info1 full len1 +regexp {The length result_2 is +([-0-9.+eE]+)} $info2 full len2 +regexp {The length result_3 is +([-0-9.+eE]+)} $info3 full len3 +regexp {The length result_4 is +([-0-9.+eE]+)} $info4 full len4 +regexp {The length result_5 is +([-0-9.+eE]+)} $info5 full len5 +regexp {The length result_6 is +([-0-9.+eE]+)} $info6 full len6 +regexp {The length result_7 is +([-0-9.+eE]+)} $info7 full len7 +regexp {The length result_8 is +([-0-9.+eE]+)} $info8 full len8 + +set len_int1 [expr int($len1)] +set len_int2 [expr int($len2)] +set len_int3 [expr int($len3)] +set len_int4 [expr int($len4)] +set len_int5 [expr int($len5)] +set len_int6 [expr int($len6)] +set len_int7 [expr int($len7)] +set len_int8 [expr int($len8)] + +if { ${len_int1} != ${len_ch1} + || ${len_int2} != ${len_ch2} + || ${len_int3} != ${len_ch3} + || ${len_int4} != ${len_ch4} + || ${len_int5} != ${len_ch5} + || ${len_int6} != ${len_ch6} + || ${len_int7} != ${len_ch7} + || ${len_int8} != ${len_ch8} } { + puts "Error : Length is invalid" +} diff --git a/tests/bugs/moddata_1/buc60622_1 b/tests/bugs/moddata_1/buc60622_1 new file mode 100755 index 0000000000..2bbee56643 --- /dev/null +++ b/tests/bugs/moddata_1/buc60622_1 @@ -0,0 +1,14 @@ +puts "==========" +puts "BUC60622" +puts "==========" +puts "" +puts "==================================" +puts "It takes visual check for this BUG" +puts "==================================" +puts "" + +circle c1 2900 800 500 +circle c2 2900 900 400 +circle c3 2900 1000 300 +catch {cirtang result c1 c2 c3} + diff --git a/tests/bugs/moddata_1/buc60622_2 b/tests/bugs/moddata_1/buc60622_2 new file mode 100755 index 0000000000..559ff29006 --- /dev/null +++ b/tests/bugs/moddata_1/buc60622_2 @@ -0,0 +1,33 @@ +puts "==================================" +puts "BUC60622" +puts "==================================" +puts "There was an infinity of solutions and also c1, c2 and c3 are solutions" +puts "" +puts "It takes visual check for this BUG" +puts "==================================" +puts "" + +set len_ch1 2513 +set len_ch2 837 +set len_ch3 279 + +circle c1 500 1800 500 +circle c2 500 1900 400 +circle c3 700 1900 200 +cirtang result c1 c2 c3 + +set info1 [length $result_1] +set info2 [length $result_2] +set info3 [length $result_3] +regexp {The length result_1 is +([-0-9.+eE]+)} $info1 full len1 +regexp {The length result_2 is +([-0-9.+eE]+)} $info2 full len2 +regexp {The length result_3 is +([-0-9.+eE]+)} $info3 full len3 +set len_int1 [expr int($len1)] +set len_int2 [expr int($len2)] +set len_int3 [expr int($len3)] + +if { ${len_int1} != ${len_ch1} + || ${len_int2} != ${len_ch2} + || ${len_int3} != ${len_ch3} } { + puts "Error : Length is invalid" +} diff --git a/tests/bugs/moddata_1/buc60622_3 b/tests/bugs/moddata_1/buc60622_3 new file mode 100755 index 0000000000..0ef8996c23 --- /dev/null +++ b/tests/bugs/moddata_1/buc60622_3 @@ -0,0 +1,46 @@ +puts "==================================" +puts "BUC60622" +puts "==================================" +puts "There was an infinity of solutions and also c1, c2 and c3 are solutions" +puts "" +puts "It takes visual check for this BUG" +puts "==================================" +puts "" + +set len_ch1 1570 +set len_ch2 785 +set len_ch3 785 +set len_ch4 523 +set len_ch5 523 + +circle c3 500 3000 250 +circle c2 375 3000 125 +circle c1 625 3000 125 +cirtang result c1 c2 c3 + +set info1 [length $result_1] +set info2 [length $result_2] +set info3 [length $result_3] +set info4 [length $result_4] +set info5 [length $result_5] + +regexp {The length result_1 is +([-0-9.+eE]+)} $info1 full len1 +regexp {The length result_2 is +([-0-9.+eE]+)} $info2 full len2 +regexp {The length result_3 is +([-0-9.+eE]+)} $info3 full len3 +regexp {The length result_4 is +([-0-9.+eE]+)} $info4 full len4 +regexp {The length result_5 is +([-0-9.+eE]+)} $info5 full len5 + +set len_int1 [expr int($len1)] +set len_int2 [expr int($len2)] +set len_int3 [expr int($len3)] +set len_int4 [expr int($len4)] +set len_int5 [expr int($len5)] + +if { ${len_int1} != ${len_ch1} + || ${len_int2} != ${len_ch2} + || ${len_int3} != ${len_ch3} + || ${len_int4} != ${len_ch4} + || ${len_int5} != ${len_ch5} } { + puts "Error : Length is invalid" +} + diff --git a/tests/bugs/moddata_1/buc60623_3 b/tests/bugs/moddata_1/buc60623_3 new file mode 100755 index 0000000000..6f847aa8c6 --- /dev/null +++ b/tests/bugs/moddata_1/buc60623_3 @@ -0,0 +1,30 @@ +puts "========================" +puts "BUC60623" +puts "========================" + +restore [locate_data_file buc60623a.brep] a +checkshape a +restore [locate_data_file buc60623b.brep] b +checkshape b + +mksurface S1 a +mksurface S2 b + +intersect I1 S1 S2 +regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection I1] full cs2 +if { $cs2 != 0 } { + puts " Faulty : Intersection is not correct" +} else { + puts "Intersection of S1 and S2 is correct" +} + +intersect I2 S2 S1 +regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection I2] full cs2 +if { $cs2 != 0 } { + puts " Faulty : Intersection is not correct" +} else { + puts "Intersection of S2 and S1 is correct" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/buc60637 b/tests/bugs/moddata_1/buc60637 new file mode 100755 index 0000000000..e7ac755bf1 --- /dev/null +++ b/tests/bugs/moddata_1/buc60637 @@ -0,0 +1,10 @@ + +puts "========================" +puts "BUC60637" +puts "========================" + +restore [locate_data_file buc60637a.brep] result +fsameparameter result + +set square 144.866 +set 2dviewer 0 diff --git a/tests/bugs/moddata_1/buc60652_1 b/tests/bugs/moddata_1/buc60652_1 new file mode 100755 index 0000000000..20d10721b9 --- /dev/null +++ b/tests/bugs/moddata_1/buc60652_1 @@ -0,0 +1,14 @@ + +puts "==========" +puts "BUC60652" +puts "Case 1" +puts "==========" + +pload QAcommands + +restore [locate_data_file buc60652a.brep] result +checkshape result +BUC60652 result + +set square 19614.8 +set 2dviewer 0 diff --git a/tests/bugs/moddata_1/buc60652_2 b/tests/bugs/moddata_1/buc60652_2 new file mode 100755 index 0000000000..fb8e4e54de --- /dev/null +++ b/tests/bugs/moddata_1/buc60652_2 @@ -0,0 +1,15 @@ + +puts "==========" +puts "BUC60652" +puts "Case 2" +puts "==========" + +pload QAcommands + +restore [locate_data_file buc60652b.brep] result +checkshape result +BUC60652 result + +set square 29961 +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/buc60652_3 b/tests/bugs/moddata_1/buc60652_3 new file mode 100755 index 0000000000..bde1f9333c --- /dev/null +++ b/tests/bugs/moddata_1/buc60652_3 @@ -0,0 +1,14 @@ + +puts "===========" +puts "BUC60652" +puts "Case 3" +puts "===========" + +pload QAcommands + +restore [locate_data_file buc60652c.brep] result +checkshape result +BUC60652 result + +set square 77815.1 +set 2dviewer 0 diff --git a/tests/bugs/moddata_1/buc60652_4 b/tests/bugs/moddata_1/buc60652_4 new file mode 100755 index 0000000000..04d72aa5c7 --- /dev/null +++ b/tests/bugs/moddata_1/buc60652_4 @@ -0,0 +1,14 @@ + +puts "==========" +puts "BUC60652" +puts "Case 4" +puts "==========" + +pload QAcommands + +restore [locate_data_file shading_104.brep] result +checkshape result +BUC60652 result + +set square 119134 +set 2dviewer 0 diff --git a/tests/bugs/moddata_1/buc60667 b/tests/bugs/moddata_1/buc60667 new file mode 100755 index 0000000000..1690c15927 --- /dev/null +++ b/tests/bugs/moddata_1/buc60667 @@ -0,0 +1,12 @@ + +puts "===================" +puts "BUC60667" +puts "===================" + +restore [locate_data_file buc60667a.brep] result +fsameparameter result +checkshape result + +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_1/buc60707 b/tests/bugs/moddata_1/buc60707 new file mode 100755 index 0000000000..dfe66d1b45 --- /dev/null +++ b/tests/bugs/moddata_1/buc60707 @@ -0,0 +1,25 @@ + +puts "===========" +puts "BUC60707" +puts "===========" +puts "" +################################################# +## Fillets created in CasCade version 3 do not display as shaded surfaces. +################################################# +restore [locate_data_file buc60707a.brep] result +checkshape result + +tclean result +incmesh result .1 +triangles result +set info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $info full Maxtriangl + +if { $Maxtriangl < 1 } { + puts "Error : inside mesh for shading wasn't build" +} + +set 3dviewer 0 + + + diff --git a/tests/bugs/moddata_1/buc60729 b/tests/bugs/moddata_1/buc60729 new file mode 100755 index 0000000000..19426926c4 --- /dev/null +++ b/tests/bugs/moddata_1/buc60729 @@ -0,0 +1,14 @@ + +puts "========================" +puts "BUC60729" +puts "========================" + +pload QAcommands + +if [catch {BUC60729} ] { + puts "BUC60729: Error" +} else { + puts "BUC60729: OK" +} + +set 3dviewer 1 diff --git a/tests/bugs/moddata_1/buc60755 b/tests/bugs/moddata_1/buc60755 new file mode 100755 index 0000000000..46c988e6f3 --- /dev/null +++ b/tests/bugs/moddata_1/buc60755 @@ -0,0 +1,22 @@ +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" + +puts "========================" +puts "BUC60755" +puts "========================" + +restore [locate_data_file buc60755a.brep] a +checkshape a + +######################################### +# "tcopy" command of a valid shape give a no-valid shape. +######################################### + +tcopy a result +checkshape result + +set square 623.832 +set 2dviewer 0 + + + + diff --git a/tests/bugs/moddata_1/buc60769 b/tests/bugs/moddata_1/buc60769 new file mode 100755 index 0000000000..03e57bff6a --- /dev/null +++ b/tests/bugs/moddata_1/buc60769 @@ -0,0 +1,11 @@ + +puts "=============" +puts "BUC60769" +puts "=============" + +restore [locate_data_file buc60769a.brep] result +checkshape result + +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_1/buc60792 b/tests/bugs/moddata_1/buc60792 new file mode 100755 index 0000000000..e6b075093f --- /dev/null +++ b/tests/bugs/moddata_1/buc60792 @@ -0,0 +1,10 @@ +puts "========================" +puts "BUC60792" +puts "========================" + +pload QAcommands + +vinit +BUC60792 + +set 2dviewer 0 diff --git a/tests/bugs/moddata_1/buc60815 b/tests/bugs/moddata_1/buc60815 new file mode 100755 index 0000000000..82bc868ecf --- /dev/null +++ b/tests/bugs/moddata_1/buc60815 @@ -0,0 +1,22 @@ +puts "TODO OCC12345 ALL: Faulty BUC60815: NO EXCEPTION." +puts "==========" +puts "BUC60815" +puts "==========" + +plane p1 1 0 0 +plane p2 0 0 0 1 0 0 +trim p1 p1 -50 50 -50 50 +trim p2 p2 -75 75 -75 75 +intersect r2 p1 p2 +extsurf e1 r2 10 10 10 +extsurf e3 r2 10 10 10 + +if [catch { intersect result e1 e3 } catch_result] { + puts "Faulty BUC60815: NO EXCEPTION." + puts "INTERSECTION BETWEEN TWO SURFACES LYING ON THE SAME PLANE UNDEFINED" +} else { + puts "BUC60815 OK: suitable except" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/buc60825 b/tests/bugs/moddata_1/buc60825 new file mode 100755 index 0000000000..5bcf9f023c --- /dev/null +++ b/tests/bugs/moddata_1/buc60825 @@ -0,0 +1,20 @@ +puts "========================" +puts "BUC60825" +puts "========================" + +pload QAcommands + +line aLine 0 0 0 0 0 1 +mkedge aEdge1 aLine +restore [locate_data_file buc60825.brep] aEdge2 +checkshape aEdge2 + +distmini d aEdge1 aEdge2 +regexp {NB RESULTS +: +([-0-9.+eE]+)} [BUC60825 aEdge1 aEdge2] full ext +if { $ext != 0 } { + puts "Error : The extrema has not been calculated." +} + + + + diff --git a/tests/bugs/moddata_1/buc60828 b/tests/bugs/moddata_1/buc60828 new file mode 100755 index 0000000000..c7e74d203b --- /dev/null +++ b/tests/bugs/moddata_1/buc60828 @@ -0,0 +1,11 @@ + +puts "========" +puts "BUC60828" +puts "========" +puts "" + +catch {BUC60828} + + + + diff --git a/tests/bugs/moddata_1/buc60842 b/tests/bugs/moddata_1/buc60842 new file mode 100755 index 0000000000..d8abb20b53 --- /dev/null +++ b/tests/bugs/moddata_1/buc60842 @@ -0,0 +1,16 @@ + +puts "========" +puts "BUC60842" +puts "========" + +pload QAcommands +vinit + +if [catch {BUC60842} catch_result] { + puts "Faulty BUC60842" +} else { + puts "BUC60842 OK" +} + +set 3dviewer 1 + diff --git a/tests/bugs/moddata_1/buc60843_1 b/tests/bugs/moddata_1/buc60843_1 new file mode 100755 index 0000000000..9f1ec84c6a --- /dev/null +++ b/tests/bugs/moddata_1/buc60843_1 @@ -0,0 +1,24 @@ +puts "========" +puts "BUC60843" +puts "========" +puts "" +#################################################################### +## code throws an exception as: .. The exception is:0x5feff388 : StdFail_NotDone: 2d lin = lintan. +## ThisSolution(); is not right.( the line is not tangent to circle and ellipse ) +#################################################################### + +pload QAcommands + +set len_ch 4.0000000000000001e+100 + +circle test_circle 0 0 50 +ellipse test_ellipse 460 0 150 100 + +BUC60843 result test_circle test_ellipse 0.1 + +set info [length $result] +regexp {The length result is +([-0-9.+eE]+)} $info full len + +if { ${len} != ${len_ch} } { + puts "Error : length is invalid" +} diff --git a/tests/bugs/moddata_1/buc60843_2 b/tests/bugs/moddata_1/buc60843_2 new file mode 100755 index 0000000000..87b2cc3347 --- /dev/null +++ b/tests/bugs/moddata_1/buc60843_2 @@ -0,0 +1,25 @@ +puts "========" +puts "BUC60843" +puts "========" +puts "" +#################################################################### +## code throws an exception as: .. The exception is:0x5feff388 : StdFail_NotDone: 2d lin = lintan. +## ThisSolution(); is not right.( the line is not tangent to circle and ellipse ) +#################################################################### + +pload QAcommands + +set len_ch 4.0000000000000001e+100 + +ellipse test_ellipse_1 0 0 50 50 +ellipse test_ellipse_2 460 0 150 100 + +BUC60843 result test_ellipse_1 test_ellipse_2 1.0 1.0 + +set info [length $result] +regexp {The length result is +([-0-9.+eE]+)} $info full len + +if { ${len} != ${len_ch} } { + puts "Error : length is invalid" +} + diff --git a/tests/bugs/moddata_1/buc60848 b/tests/bugs/moddata_1/buc60848 new file mode 100755 index 0000000000..da0499f401 --- /dev/null +++ b/tests/bugs/moddata_1/buc60848 @@ -0,0 +1,45 @@ + +puts "============" +puts "BUC60848" +puts "============" +puts "" + +pload QAcommands + +restore [locate_data_file BUC60848.brep] a +checkshape a + +tcopy a res + +set Flag 0 + +set Res [ catch { BUC60848 a } ] +if { $Res != 0 } { + invert a + set Flag 1 + puts "" +} + +if { $Flag == 1 } { + set Res [ catch { BUC60848 a } ] + if { $Res != 0 } { + set Flag 2 + } + puts "" +} + +if { $Flag == 2 } { + puts "TEST FINISHED. RESULT IS BAD. Faulty" + puts "" +} + +if { $Flag == 1 } { + puts "TEST FINISHED. RESULT IS OK. SHAPE HAS BEEN INVERTED." + puts "" +} + +if { $Flag == 0 } { + puts "TEST FINISHED. RESULT IS OK." + puts "" +} + diff --git a/tests/bugs/moddata_1/buc60852 b/tests/bugs/moddata_1/buc60852 new file mode 100755 index 0000000000..c51594f7ef --- /dev/null +++ b/tests/bugs/moddata_1/buc60852 @@ -0,0 +1,68 @@ + +puts "========" +puts "BUC60852" +puts "BUC60923" +puts "========" + +pload QAcommands + +set bndbox_X1 0 +set bndbox_Y1 0 +set bndbox_Z1 0 +set bndbox_X2 30 +set bndbox_Y2 10 +set bndbox_Z2 20 + +set point_1_1_X -20 +set point_1_1_Y -5 +set point_1_1_Z 10 +set point_1_2_X 50 +set point_1_2_Y 15 +set point_1_2_Z 10 + +vertex vertex_1_1 $point_1_1_X $point_1_1_Y $point_1_1_Z +vertex vertex_1_2 $point_1_2_X $point_1_2_Y $point_1_2_Z + +edge edge_1 vertex_1_1 vertex_1_2 + +puts "" + +set point_2_1_X -20 +set point_2_1_Y -10 +set point_2_1_Z 10 +set point_2_2_X 50 +set point_2_2_Y -10 +set point_2_2_Z 10 + +vertex vertex_2_1 $point_2_1_X $point_2_1_Y $point_2_1_Z +vertex vertex_2_2 $point_2_2_X $point_2_2_Y $point_2_2_Z + +edge edge_2 vertex_2_1 vertex_2_2 + +puts "" + +box bndbox $bndbox_X1 $bndbox_Y1 $bndbox_Z1 $bndbox_X2 $bndbox_Y2 $bndbox_Z2 + + +line line_1 $point_1_1_X $point_1_1_Y $point_1_1_Z [ expr { $point_1_1_X - $point_1_2_X } ] [ expr { $point_1_1_Y - $point_1_2_Y } ] [ expr { $point_1_1_Z - $point_1_2_Z } ] + +line line_2 $point_2_1_X $point_2_1_Y $point_2_1_Z [ expr { $point_2_1_X - $point_2_2_X } ] [ expr { $point_2_1_Y - $point_2_2_Y } ] [ expr { $point_2_1_Z - $point_2_2_Z } ] + +puts "" + +set result1 [BUC60852 edge_1 $bndbox_X1 $bndbox_Y1 $bndbox_Z1 $bndbox_X2 $bndbox_Y2 $bndbox_Z2] +if {${result1} != "Line that lies on edge intersects the box\n"} { + puts "BUC60852: Error; (case 1)" +} else { + puts "BUC60852: OK; (case 1)" +} + +puts "" + +set result2 [BUC60852 edge_2 $bndbox_X1 $bndbox_Y1 $bndbox_Z1 $bndbox_X2 $bndbox_Y2 $bndbox_Z2] +if {${result2} != "Line that lies on edge does not intersect the box\n"} { + puts "BUC60852: Error; (case 2)" +} else { + puts "BUC60852: OK; (case 2)" +} + diff --git a/tests/bugs/moddata_1/buc60854 b/tests/bugs/moddata_1/buc60854 new file mode 100755 index 0000000000..8a3cf412c0 --- /dev/null +++ b/tests/bugs/moddata_1/buc60854 @@ -0,0 +1,43 @@ +puts "TODO OCC12345 ALL: BUC60854: Error" + +puts "========" +puts "BUC60854" +puts "========" + +pload QAcommands + +plane test_plane +mkface test_face test_plane 0 1 0 1 + +vertex test_vertex_1 0 0.5 0 +vertex test_vertex_2 1 0.5 0 +edge test_edge test_vertex_1 test_vertex_2 + +splitshape test_shape test_face test_face test_edge + +explode test_shape f + +renamevar test_shape_1 test_face + +vertex test_vertex_3 0.2 0.5 0 +vertex test_vertex_4 0.8 0.5 0 +edge test_edge_1 test_vertex_3 test_vertex_4 + +vertex test_vertex_5 0 1 0 +edge test_edge_2 test_vertex_5 test_vertex_3 + +vertex test_vertex_6 1 1 0 +edge test_edge_3 test_vertex_4 test_vertex_6 + +BUC60854 result test_shape test_face test_edge_2 test_edge_3 @ test_edge test_edge_1 + +erase test_plane + +regexp {FACE +: +([-0-9.+eE]+)} [numshapes result] full FACE_num + +if {${FACE_num} != 3} { + puts "BUC60854: Error" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/buc60868 b/tests/bugs/moddata_1/buc60868 new file mode 100755 index 0000000000..ca71b33fe0 --- /dev/null +++ b/tests/bugs/moddata_1/buc60868 @@ -0,0 +1,21 @@ + +puts "========" +puts "BUC60868" +puts "========" +puts "" + +pload QAcommands + +restore [locate_data_file buc60868.brep] sh +checkshape sh + +BUC60868 result sh +checkshape result + +set len [llength [explode result w]] +if { $len != 3 } { + puts "Error : the number of curves is $len, but it should be 3." +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/buc60870 b/tests/bugs/moddata_1/buc60870 new file mode 100755 index 0000000000..8bc322b9e0 --- /dev/null +++ b/tests/bugs/moddata_1/buc60870 @@ -0,0 +1,35 @@ + +puts "========" +puts "BUC60870" +puts "========" + +pload QAcommands + +vertex vertex_1 0 0 0 +vertex vertex_2 0 1 0 +vertex vertex_3 0 0.3 1 + +edge edge_1 vertex_1 vertex_2 + +set result [BUC60870 test_result edge_1 vertex_3 2.0] + +if {[llength ${result}] < 4} { + puts "BUC60870: Error; must be 3 solutions" +} else { + set MinimumDistance [dval test_result_val] + set TheorMinimumDistance 1.0 + set percent_max 1.0 + set percent [expr abs(${MinimumDistance} - ${TheorMinimumDistance}) / ${TheorMinimumDistance} * 100.] + if {${percent} > ${percent_max}} { + puts "MinimumDistance=${MinimumDistance}" + puts "TheorMinimumDistance=${TheorMinimumDistance}" + puts "percent=${percent}" + puts "percent_max=${percent_max}" + puts "BUC60870: Error; bad value of minimum distance" + } else { + puts "BUC60870: OK" + } +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/buc60889 b/tests/bugs/moddata_1/buc60889 new file mode 100755 index 0000000000..e7ed39f00f --- /dev/null +++ b/tests/bugs/moddata_1/buc60889 @@ -0,0 +1,93 @@ + +puts "========" +puts "BUC60889" +puts "BUC60947" +puts "========" + +pload QAcommands + +set bndbox_X1 0 +set bndbox_Y1 0 +set bndbox_Z1 0 +set bndbox_X2 30 +set bndbox_Y2 10 +set bndbox_Z2 20 + +set point_1_1_X -30 +set point_1_1_Y -10 +set point_1_1_Z 5 +set point_1_2_X -30 +set point_1_2_Y -10 +set point_1_2_Z 15 + +set point_1_3_X -15 +set point_1_3_Y -5 +set point_1_3_Z 5 + +set dx_1 [ expr { $point_1_3_X - $point_1_1_X } ] +set dy_1 [ expr { $point_1_3_Y - $point_1_1_Y } ] +set dz_1 [ expr { $point_1_3_Z - $point_1_1_Z } ] + +point point_1_1 $point_1_1_X $point_1_1_Y $point_1_1_Z +point point_1_2 $point_1_2_X $point_1_2_Y $point_1_2_Z +polyline p_line_1 $point_1_1_X $point_1_1_Y $point_1_1_Z $point_1_2_X $point_1_2_Y $point_1_2_Z +vertex vertex_1_1 $point_1_1_X $point_1_1_Y $point_1_1_Z +vertex vertex_1_2 $point_1_3_X $point_1_3_Y $point_1_3_Z +edge edge_1 vertex_1_1 vertex_1_2 + +puts "" + +set point_2_1_X 30 +set point_2_1_Y 10 +set point_2_1_Z -5 +set point_2_2_X 30 +set point_2_2_Y 10 +set point_2_2_Z -15 + +set point_2_3_X 0 +set point_2_3_Y 10 +set point_2_3_Z -5 + +set dx_2 [ expr { $point_2_3_X - $point_2_1_X } ] +set dy_2 [ expr { $point_2_3_Y - $point_2_1_Y } ] +set dz_2 [ expr { $point_2_3_Z - $point_2_1_Z } ] + +point point_2_1 $point_2_1_X $point_2_1_Y $point_2_1_Z +point point_2_2 $point_2_2_X $point_2_2_Y $point_2_2_Z +polyline p_line_2 $point_2_1_X $point_2_1_Y $point_2_1_Z $point_2_2_X $point_2_2_Y $point_2_2_Z +vertex vertex_2_1 $point_2_1_X $point_2_1_Y $point_2_1_Z +vertex vertex_2_2 $point_2_3_X $point_2_3_Y $point_2_3_Z +edge edge_2 vertex_2_1 vertex_2_2 + +puts "" + +box bndbox $bndbox_X1 $bndbox_Y1 $bndbox_Z1 $bndbox_X2 $bndbox_Y2 $bndbox_Z2 + + +line line_1_1 $point_1_1_X $point_1_1_Y $point_1_1_Z $dx_1 $dy_1 $dz_1 +line line_1_2 $point_1_2_X $point_1_2_Y $point_1_2_Z $dx_1 $dy_1 $dz_1 + +line line_2_1 $point_2_1_X $point_2_1_Y $point_2_1_Z $dx_2 $dy_2 $dz_2 +line line_2_2 $point_2_2_X $point_2_2_Y $point_2_2_Z $dx_2 $dy_2 $dz_2 + +puts "" + +set result1 [BUC60889 point_1_1 point_1_2 edge_1 $bndbox_X1 $bndbox_Y1 $bndbox_Z1 $bndbox_X2 $bndbox_Y2 $bndbox_Z2] + +if {${result1} != "The band intersects the box\n"} { + puts "BUC60889: Error; (case 1)" +} else { + puts "BUC60889: OK; (case 1)" +} + +puts "" + +set result2 [BUC60889 point_2_1 point_2_2 edge_2 $bndbox_X1 $bndbox_Y1 $bndbox_Z1 $bndbox_X2 $bndbox_Y2 $bndbox_Z2] + +if {${result2} != "The band lies out of the box\n"} { + puts "BUC60889: Error; (case 2)" +} else { + puts "BUC60889: OK; (case 2)" +} + + diff --git a/tests/bugs/moddata_1/buc60890 b/tests/bugs/moddata_1/buc60890 new file mode 100755 index 0000000000..ea2a5c8207 --- /dev/null +++ b/tests/bugs/moddata_1/buc60890 @@ -0,0 +1,22 @@ +puts "========" +puts "BUC60890" +puts "========" +puts "" +##################################################### +## The Extrema raises when the number of C2 intervals is greater that 16. +##################################################### + +set poles { { 0 0 1 } { 1 0 1 } { 1.3 1 1 } { 2 1 1 } { 2 0 1 } { 3 0 1} { 3.5 1 1 } { 4 1 1 } { 4 0 1 } { 5 0 1 } { 5 1 1 } { 6 1 1 } { 6 0 1 } { 7 0 1 } { 7 1 1 } { 8 1 1 } { 8 0 1 } { 9 0 1 } } +set knots { { 0 2 } { 1 1 } { 2 1 } { 3 1 } { 4 1 } { 5 1 } { 6 1 } { 7 1 } { 8 1 } { 9 1 } { 10 1 } { 11 1 } { 12 1 } { 13 1 } { 14 1 } { 15 1 } { 16 1 } {17 2 } } + +eval 2dbsplinecurve curve_1 1 [ llength $knots] [ join $knots ] [ join $poles ] + +circle curve_2 5.3 -0.5 2 + +set err [llength [2dextrema curve_1 curve_2]] + +if {$err == 16} { + puts "BUC60890 OK: Function 2dextrema works properly." +} else { + puts "Faulty BUC60890 : Function 2dextrema works wrongly." +} diff --git a/tests/bugs/moddata_1/buc60895 b/tests/bugs/moddata_1/buc60895 new file mode 100755 index 0000000000..6d9355207b --- /dev/null +++ b/tests/bugs/moddata_1/buc60895 @@ -0,0 +1,17 @@ + +puts "============" +puts "BUC60895" +puts "============" +puts "" +############################################################## +##If give command "sameparameter edge" on attached edge in the DRAW this command hang. +############################################################## + +restore [locate_data_file BUC60895.brep] result + +fsameparameter result +checkshape result + +set length 12.6012 +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/buc60897 b/tests/bugs/moddata_1/buc60897 new file mode 100755 index 0000000000..e26a4ec292 --- /dev/null +++ b/tests/bugs/moddata_1/buc60897 @@ -0,0 +1,72 @@ +puts "========" +puts "BUC60897" +puts "========" + +pload QAcommands + +if [catch { set result [BUC60897] } ] { + puts "BUC60897: Error; (case 1)" +} else { + set len [llength ${result}] + if {${len} < 21} { + puts "length = ${len}" + puts "BUC60897: Error; (case 2)" + } else { + set circle_X [lindex ${result} 3] + set circle_Y [lindex ${result} 5] + set circle_R [lindex ${result} 7] + set tangency1_X [lindex ${result} 11] + set tangency1_Y [lindex ${result} 13] + set tangency2_X [lindex ${result} 17] + set tangency2_Y [lindex ${result} 19] + + set x1 [expr abs(${tangency1_X} - ${circle_X})] + set y1 [expr abs(${tangency1_Y} - ${circle_Y})] + set R1 [expr sqrt(${x1} * ${x1} + ${y1} * ${y1})] + + set x2 [expr abs(${tangency2_X} - ${circle_X})] + set y2 [expr abs(${tangency2_Y} - ${circle_Y})] + set R2 [expr sqrt(${x2} * ${x2} + ${y2} * ${y2})] + + set maxdelta 1.0 + set delta_R1 [expr abs(${R1} - ${circle_R}) / ${circle_R} * 100.] + set delta_R2 [expr abs(${R2} - ${circle_R}) / ${circle_R} * 100.] + + if {${delta_R1} > ${maxdelta}} { + puts "circle_X = ${circle_X}" + puts "circle_Y = ${circle_Y}" + puts "circle_R = ${circle_R}" + puts "tangency1_X = ${tangency1_X}" + puts "tangency1_Y = ${tangency1_Y}" + puts "x1 = ${x1}" + puts "y1 = ${y1}" + puts "R1 = ${R1}" + puts "delta_R1 = ${delta_R1}" + puts "maxdelta = ${maxdelta}" + puts "BUC60897: Error; (case 3)" + } else { + puts "BUC60897: OK; (case 1)" + } + + if {${delta_R2} > ${maxdelta}} { + puts "circle_X = ${circle_X}" + puts "circle_Y = ${circle_Y}" + puts "circle_R = ${circle_R}" + puts "tangency2_X = ${tangency2_X}" + puts "tangency2_Y = ${tangency2_Y}" + puts "x2 = ${x2}" + puts "y2 = ${y2}" + puts "R2 = ${R2}" + puts "delta_R2 = ${delta_R2}" + puts "maxdelta = ${maxdelta}" + puts "BUC60897: Error; (case 4)" + } else { + puts "BUC60897: OK; (case 2)" + } + + } +} + +set 3dviewer 0 + + diff --git a/tests/bugs/moddata_1/buc60902 b/tests/bugs/moddata_1/buc60902 new file mode 100755 index 0000000000..9ff97594ce --- /dev/null +++ b/tests/bugs/moddata_1/buc60902 @@ -0,0 +1,14 @@ +puts "========" +puts "BUC60902" +puts "========" + +pload QAcommands + +set info [BUC60902] + +if { [regexp "First tangent is OK" $info] != 1 && [regexp "Last tangent is OK" $info] != 1 } { + puts "Error : Result is invalid" +} + + + diff --git a/tests/bugs/moddata_1/buc60911 b/tests/bugs/moddata_1/buc60911 new file mode 100755 index 0000000000..08e27800bc --- /dev/null +++ b/tests/bugs/moddata_1/buc60911 @@ -0,0 +1,14 @@ + +puts "============" +puts "BUC60911" +puts "============" + +##################################################### +## Bad value of the volume of the shape. +##################################################### + +restore [locate_data_file BUC60911.brep] result +invert result + +set square 16353.8 +set 2dviewer 0 diff --git a/tests/bugs/moddata_1/buc60924 b/tests/bugs/moddata_1/buc60924 new file mode 100755 index 0000000000..f32c5841de --- /dev/null +++ b/tests/bugs/moddata_1/buc60924 @@ -0,0 +1,24 @@ + +puts "========" +puts "BUC60924" +puts "========" +puts "" + +################################################## +## ShapeAnalysisStd_Curve::IsPlanar works incorrectly with a conic curve. +################################################## + +pload QAcommands + +ellipse el 0 0 1 20 10 + +set result1 [BUC60924 el 0 0 1] + +if {${result1} != "The curve is planar !\n"} { + puts "BUC60924: Error" +} else { + puts "BUC60924: OK" +} + +set 3dviewer 1 + diff --git a/tests/bugs/moddata_1/buc60941 b/tests/bugs/moddata_1/buc60941 new file mode 100755 index 0000000000..2129b5cdd5 --- /dev/null +++ b/tests/bugs/moddata_1/buc60941 @@ -0,0 +1,20 @@ +puts "========" +puts "BUC60941" +puts "========" +puts "" +############################################################ +## When try to use Geom2dGcc_Circ2d2TanRad with two curves it rise exception. +############################################################ + +circle curve_1 1.79356127430613 -11.9148900515605 12.0491272292007 + +set poles { { 0 0 1 } { -2.14533906935467 4.92056269221697 1 } { -0.537398638327716 10.0937503357781 1 } { 10.3564232507092 8.73929826869582 1 } { 16.6366922939454 3.11858911810943 1 } { 16.39 -0.262 1 } } +set knots { { 0 4 } { 8.6971225126475 1 } { 16.903955884905 1 } { 28.0087167558108 4 } } + +eval 2dbsplinecurve curve_2 3 [ llength $knots ] [ join $knots ] [ join $poles ] + +if [catch {cirtang result curve_1 curve_2 2} catch_result] { + puts "Faulty BUC60941: function cirtang works wrongly" +} else { + puts "BUC60941 OK: function cirtang works properly" +} diff --git a/tests/bugs/moddata_1/buc60955 b/tests/bugs/moddata_1/buc60955 new file mode 100755 index 0000000000..6fa8f790c1 --- /dev/null +++ b/tests/bugs/moddata_1/buc60955 @@ -0,0 +1,14 @@ + +puts "===========" +puts " BUC60955" +puts "===========" + +puts "Restoring face from file" +restore [locate_data_file buc60955.brep] result +checkshape result + +build3d result + +set square 8464.65 +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/buc60960 b/tests/bugs/moddata_1/buc60960 new file mode 100755 index 0000000000..77b6cfe389 --- /dev/null +++ b/tests/bugs/moddata_1/buc60960 @@ -0,0 +1,30 @@ + +puts "===========" +puts " BUC60960" +puts "===========" + +proc do_offsets {i} { + global c c1 c2 c3 c4 c5 + + set poles {{0 0 1} {0 1 1} {1 1 1} {1 0 1} {2 0 1} {2 -1 1} {1 -1 1} \ + {1 -2 1} {0 -2 1} {0 -1 1} {-1 -1 1} {-1 0 1}} + set knots {{0 1} {1 1} {2 1} {3 1} {4 1} {5 1} {6 1} {7 1} {8 1} {9 1} \ + {10 1} {11 1} {12 1}} + eval 2dpbsplinecurve c 3 [llength $knots] [join $knots] [join $poles] + + + if [catch {offset c1 c 0.1}] {puts "while creating c1 at step $i"} + if [catch {offset c2 c 0.2}] {puts "while creating c2 at step $i"} + if [catch {offset c3 c 0.3}] {puts "while creating c3 at step $i"} + if [catch {offset c4 c 0.4}] {puts "while creating c4 at step $i"} + if [catch {offset c5 c 0.5}] {puts "while creating c5 at step $i"} + if [catch {offset c6 c 0.6}] {puts "while creating c6 at step $i"} + if [catch {offset c7 c 0.7}] {puts "while creating c7 at step $i"} + if [catch {offset c8 c 0.8}] {puts "while creating c8 at step $i"} +} + +for {set i 0} {$i < 10} {incr i} { + do_offsets $i +} + + diff --git a/tests/bugs/moddata_1/buc60965 b/tests/bugs/moddata_1/buc60965 new file mode 100755 index 0000000000..5c3093bb33 --- /dev/null +++ b/tests/bugs/moddata_1/buc60965 @@ -0,0 +1,24 @@ + +puts "========================" +puts "BUC60965" +puts "========================" + +restore [locate_data_file buc60965-c.draw] c +restore [locate_data_file buc60965-s.draw] s + +project result c s + +regexp {The+ length+ result+ is +([-0-9.+eE]+)} [length result] full len +set y [expr 3.e5+int(1.e5*($len-round($len)))] + +if { $y != 314196.0 } { + puts "Results is incorrect" +} + +set 2dviewer 0 + + + + + + diff --git a/tests/bugs/moddata_1/buc60967 b/tests/bugs/moddata_1/buc60967 new file mode 100755 index 0000000000..29f5991caf --- /dev/null +++ b/tests/bugs/moddata_1/buc60967 @@ -0,0 +1,14 @@ + +puts "========" +puts "BUC60967" +puts "========" +puts "" + +restore [locate_data_file buc60967.draw] bs2 + +to3d result bs2 + +set 3dviewer 0 + + + diff --git a/tests/bugs/moddata_1/buc60968 b/tests/bugs/moddata_1/buc60968 new file mode 100755 index 0000000000..ec1596856a --- /dev/null +++ b/tests/bugs/moddata_1/buc60968 @@ -0,0 +1,16 @@ + +puts "========================" +puts "BUC60968" +puts "========================" + +restore [locate_data_file buc60968-c.draw] c +restore [locate_data_file buc60968-s1.draw] s1 + +set che [extrema c s1] +set err [llength $che] +if { $err == 0} { + puts "Error : command extrema does NOT work properly" +} + + + diff --git a/tests/bugs/moddata_1/buc61006 b/tests/bugs/moddata_1/buc61006 new file mode 100755 index 0000000000..f54d8a2a72 --- /dev/null +++ b/tests/bugs/moddata_1/buc61006 @@ -0,0 +1,20 @@ + +puts "=========" +puts "BUC61006" +puts "=========" +puts "" +######################################################### +## Checkshape says that face is valid but it inludes selfintersecting wire. +######################################################### + +restore [locate_data_file buc61006.brep] result +decho off +set ch [checkshape result] +decho on + +if {![string compare $ch "This shape seems to be valid"]} { + puts "Error : the checkshape command returns incorrect result." +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/bug103 b/tests/bugs/moddata_1/bug103 new file mode 100755 index 0000000000..1e6574279f --- /dev/null +++ b/tests/bugs/moddata_1/bug103 @@ -0,0 +1,17 @@ +puts "TODO OCC12345 ALL: An exception was caught" +puts "TODO OCC12345 ALL: \\*\\* Exception \\*\\*.*" + +puts "================" +puts "BUC60961" +puts "OCC103" +puts "================" +puts "" + +circle c 0 0 10 +to3d c1 c + +offset o c -2 +catch {to3d result o} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/bug1048 b/tests/bugs/moddata_1/bug1048 new file mode 100755 index 0000000000..868086680d --- /dev/null +++ b/tests/bugs/moddata_1/bug1048 @@ -0,0 +1,23 @@ +puts "================" +puts "OCC1048" +puts "================" +puts "" + +pload QAcommands + +restore [locate_data_file OCC1048.brep] result + +set list [OCC1048 result] + +set NBTRIANGLES 0 +regexp {Info: +Number +of +triangles += +([-0-9.+eE]+)} $list full NBTRIANGLES + +if { ${NBTRIANGLES} > 0 } { + puts "OCC1048: OK" +} else { + puts "OCC1048: Error" +} + +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_1/bug105 b/tests/bugs/moddata_1/bug105 new file mode 100755 index 0000000000..9a4e25b059 --- /dev/null +++ b/tests/bugs/moddata_1/bug105 @@ -0,0 +1,20 @@ + +puts "================" +puts "BUC61026" +puts "OCC105" +puts "================" +puts "" + +pload QAcommands + +restore [locate_data_file OCC105.brep] result +checkshape result + +if [catch { OCC105 result} ] { + puts "Error : BUC61032" +} else { + puts "BUC61032: OK" +} + +set 3dviewer 0 + diff --git a/tests/bugs/moddata_1/bug106 b/tests/bugs/moddata_1/bug106 new file mode 100755 index 0000000000..031266e76d --- /dev/null +++ b/tests/bugs/moddata_1/bug106 @@ -0,0 +1,78 @@ + +puts "================" +puts "BUC61032" +puts "OCC106" +puts "================" +puts "" + +restore [locate_data_file OCC106-1.draw] sh1 +#### checkshape sh1 # - not a topological shape +restore [locate_data_file OCC106-2.draw] sh2 +#### checkshape sh2 # - not a topological shape + +trimv s1 sh1 -1000 1000 +trimv s2 sh2 -1000 1000 + +if [catch {intersect res s1 s2} result] { +set mistake 1 +} else { +set mistake 0 +} + +if { $mistake == 0 } { + puts "" + set nom 0 + set j 1 + repeat 10 { + set che [whatis res_$j] + set che1 [whatis res_$j] + set err [lindex $che [expr [llength $che] - 1]] + set err1 [lindex $che1 [expr [llength $che1] - 2]] + + if { $err != "curve" && $err1 != "3d"} { + break + } else { + set nom [expr $nom + 1] + } + incr j} + if { $nom == 0} { + puts "1) Faulty OCC106: Intersection was made WRONGLY" +} else { + puts [format "1) OCC106 OK : Intersection command works properly: %s curves" $nom] + puts "" +} +} else { + puts "1) Faulty OCC106: Intersection was made WRONGLY" +} + +if [catch {intersect rrs sh1 sh2} result] { +set mistake 1 +} else { +set mistake 0 +} + +if { $mistake == 0 } { + puts "" + set nom 0 + set j 1 + repeat 10 { + set che [whatis rrs_$j] + set che1 [whatis rrs_$j] + set err [lindex $che [expr [llength $che] - 1]] + set err1 [lindex $che1 [expr [llength $che1] - 2]] + + if { $err != "curve" && $err1 != "3d"} { + break + } else { + set nom [expr $nom + 1] + } + incr j} + if { $nom == 0} { + puts "2) Faulty OCC106: Intersection was made WRONGLY" +} else { + puts [format "2) OCC106 OK : Intersection command works properly: %s curves" $nom] +} +} else { + puts "2) Faulty OCC106: Intersection was made WRONGLY" +} + diff --git a/tests/bugs/moddata_1/bug10604_1 b/tests/bugs/moddata_1/bug10604_1 new file mode 100755 index 0000000000..a0a16e2d62 --- /dev/null +++ b/tests/bugs/moddata_1/bug10604_1 @@ -0,0 +1,37 @@ +puts "============" +puts "OCC10604" +puts "============" +puts "" +####################################################################### +# Fuse Fails +####################################################################### + +set BugNumber OCC10604 + +puts "Load first shape ..." +restore [locate_data_file OCC10604-1.brep] b1 +puts "Load second shape ..." +restore [locate_data_file OCC10604-2.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopcommon result +checkshape result +puts "Finish boolean operation ..." + +set square 585.072 + +# Analysis of "nbshapes res" +set nb_v_good 6 +set nb_e_good 12 +set nb_w_good 5 +set nb_f_good 5 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 31 + +set 2dviewer 0 diff --git a/tests/bugs/moddata_1/bug10604_2 b/tests/bugs/moddata_1/bug10604_2 new file mode 100755 index 0000000000..ee66d39432 --- /dev/null +++ b/tests/bugs/moddata_1/bug10604_2 @@ -0,0 +1,38 @@ +puts "============" +puts "OCC10604" +puts "============" +puts "" +####################################################################### +# Fuse Fails +####################################################################### + +set BugNumber OCC10604 + +puts "Load first shape ..." +restore [locate_data_file OCC10604-1.brep] b1 +puts "Load second shape ..." +restore [locate_data_file OCC10604-2.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopfuse result +checkshape result +puts "Finish boolean operation ..." + +set square 808.713 + +# Analysis of "nbshapes res" +set nb_v_good 8 +set nb_e_good 15 +set nb_w_good 8 +set nb_f_good 7 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 41 + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/bug10604_3 b/tests/bugs/moddata_1/bug10604_3 new file mode 100755 index 0000000000..6db8c36620 --- /dev/null +++ b/tests/bugs/moddata_1/bug10604_3 @@ -0,0 +1,37 @@ +puts "============" +puts "OCC10604" +puts "============" +puts "" +####################################################################### +# Fuse Fails +####################################################################### + +set BugNumber OCC10604 + +puts "Load first shape ..." +restore [locate_data_file OCC10604-1.brep] b1 +puts "Load second shape ..." +restore [locate_data_file OCC10604-2.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopcut result +checkshape result +puts "Finish boolean operation ..." + +set square 893.394 + +# Analysis of "nbshapes res" +set nb_v_good 7 +set nb_e_good 15 +set nb_w_good 6 +set nb_f_good 5 +set nb_sh_good 1 +set nb_sol_good 1 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 36 + +set 2dviewer 0 diff --git a/tests/bugs/moddata_1/bug10604_4 b/tests/bugs/moddata_1/bug10604_4 new file mode 100755 index 0000000000..8b9571f924 --- /dev/null +++ b/tests/bugs/moddata_1/bug10604_4 @@ -0,0 +1,38 @@ +puts "============" +puts "OCC10604" +puts "============" +puts "" +####################################################################### +# Fuse Fails +####################################################################### + +set BugNumber OCC10604 + +puts "Load first shape ..." +restore [locate_data_file OCC10604-1.brep] b1 +puts "Load second shape ..." +restore [locate_data_file OCC10604-2.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +boptuc result +checkshape result +puts "Finish boolean operation ..." + +set square 500.39 + +# Analysis of "nbshapes res" +set nb_v_good 7 +set nb_e_good 12 +set nb_w_good 7 +set nb_f_good 7 +set nb_sh_good 2 +set nb_sol_good 2 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 38 + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/bug10604_5 b/tests/bugs/moddata_1/bug10604_5 new file mode 100755 index 0000000000..08b5926ca6 --- /dev/null +++ b/tests/bugs/moddata_1/bug10604_5 @@ -0,0 +1,38 @@ +puts "============" +puts "OCC10604" +puts "============" +puts "" +####################################################################### +# Fuse Fails +####################################################################### + +set BugNumber OCC10604 + +puts "Load first shape ..." +restore [locate_data_file OCC10604-1.brep] b1 +puts "Load second shape ..." +restore [locate_data_file OCC10604-2.brep] b2 + +puts "Prepare boolean operation ..." +bop b1 b2 + +puts "Start boolean operation ..." +bopsection result b1 b2 +checkshape result +puts "Finish boolean operation ..." + +set length 88.9912 + +# Analysis of "nbshapes res" +set nb_v_good 6 +set nb_e_good 6 +set nb_w_good 0 +set nb_f_good 0 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 13 + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/bug107 b/tests/bugs/moddata_1/bug107 new file mode 100755 index 0000000000..00b8f43a38 --- /dev/null +++ b/tests/bugs/moddata_1/bug107 @@ -0,0 +1,31 @@ + +puts "================" +puts "BUC61035" +puts "OCC107" +puts "================" +puts "" + +restore [locate_data_file OCC107-1.brep] ee +checkshape ee +restore [locate_data_file OCC107-2.brep] ff +checkshape ff + +distmini dd1 ee ff + +mkcurve cc ee +cvalue cc 0 x y z +vertex vv x y z + +distmini dd2 vv ff + +set d1 [dset t dd1_val] +set d2 [dset t dd2_val] + +if { [expr abs([expr $d1 - $d2])] > 0.1} then { + puts "Faulty :WRONG computation of distances." +} else { + puts "All is OK" +} + + + diff --git a/tests/bugs/moddata_1/bug11081_1 b/tests/bugs/moddata_1/bug11081_1 new file mode 100755 index 0000000000..961bdb33dd --- /dev/null +++ b/tests/bugs/moddata_1/bug11081_1 @@ -0,0 +1,28 @@ +puts "========================" +puts "OCC11081" +puts "========================" +puts "" +####################################################################### +# BRepExtrema_DistShapeShape misses one of two solutions +####################################################################### + +set BugNumber OCC11081 + +# infinite line is used + +line ll 6834.93 -4100 500 0 0 1 +mkedge ee ll +restore [locate_data_file OCC11081.brep] section4100 +distmini dd ee section4100 +set res_list [distmini dd ee section4100] +set res_length [llength ${res_list}] +puts "res_length = ${res_length}" + +# Resume +puts "" +if { ${res_length} != 3 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + diff --git a/tests/bugs/moddata_1/bug11081_2 b/tests/bugs/moddata_1/bug11081_2 new file mode 100755 index 0000000000..5e3fbad2d4 --- /dev/null +++ b/tests/bugs/moddata_1/bug11081_2 @@ -0,0 +1,27 @@ +puts "========================" +puts "OCC11081" +puts "========================" +puts "" +####################################################################### +# BRepExtrema_DistShapeShape misses one of two solutions +####################################################################### + +set BugNumber OCC11081 + +# finite line is used + +line ll 6834.93 -4100 500 0 0 1 +trim trll ll -1000 -500 +mkedge tree trll +restore [locate_data_file OCC11081.brep] section4100 +set res_list [distmini dd tree section4100] +set res_length [llength ${res_list}] +puts "res_length = ${res_length}" + +# Resume +puts "" +if { ${res_length} != 3 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} diff --git a/tests/bugs/moddata_1/bug119 b/tests/bugs/moddata_1/bug119 new file mode 100755 index 0000000000..21c60c84f7 --- /dev/null +++ b/tests/bugs/moddata_1/bug119 @@ -0,0 +1,46 @@ +puts "================" +puts "OCC119" +puts "================" +puts "" + +box a 100 100 100 +explode a e + +set mistake 0 +if [catch {blend result_1 a 50 a_10 50 a_5 50 a_12 50 a_3 } catch_result] { + set mistake 1 +} else { + set mistake 0 +} + +if { ${mistake} == 1} { + puts " 1) OCC119 OK: BLEND was NOT created and suitable except was given." +} else { + puts "1) OCC119 OK: function BLEND works without suitable except" + checkshape result_1 + explode result_1 e + + if { [catch {blend result_2 result_1 50 result_1_20 50 result_1_22 50 result_1_10} catch_result] } { + puts "2) Faulty OCC119: BLEND was NOT created" + } else { + puts "2) BLEND OCC199 OK: BLEND was created" + checkshape result_2 + } + + set che [checkshape result_2 r] + if { [regexp {OK} $che] != 1 } { + puts "Faulty : mistakes are found in shape by checkshape command after BLEND command" + puts " Body of the scripts was not executed !" + } else { + puts "Checking by checkshape - OK" + + vinit + vdisplay result_2 + vsetdispmode result_2 1 + vfit + + explode result_2 e + blend result result_2 50 result_2_20 50 result_2_22 50 result_2_10 + set only_screen 1 + } +} diff --git a/tests/bugs/moddata_1/bug12 b/tests/bugs/moddata_1/bug12 new file mode 100755 index 0000000000..612f458c6f --- /dev/null +++ b/tests/bugs/moddata_1/bug12 @@ -0,0 +1,23 @@ + +puts "================" +puts "OCC12" +puts "================" +puts "" + +restore [locate_data_file OCC12.brep] f +checkshape f + +mksurface su f +clpoles su +emptycopy f1 f +vertex v 0 -170.63226587036002 82.2373635024 +don su v +distmini d1 v f1 +if [expr [dval d1_val] > 0.01] { + set res "failed" + puts "Error : Result is incorrect" +} else { + set res "OK" +} +puts "Info: test $res, distance=[dval d1_val]" + diff --git a/tests/bugs/moddata_1/bug12522 b/tests/bugs/moddata_1/bug12522 new file mode 100755 index 0000000000..70bfcb579f --- /dev/null +++ b/tests/bugs/moddata_1/bug12522 @@ -0,0 +1,45 @@ +puts "TODO ?OCC12345 ALL: OCC12522: Faulty" + +puts "========" +puts "OCC12522" +puts "========" +puts "" +########################################################### +# Extrema problems. Case: one of the Extrema arguments is an infinite face or an infinite edge. +########################################################### + +proc GetPercent {Value GoodValue} { + set Percent 0. + if {${GoodValue} != 0.} { + set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] + } elseif {${Value} != 0.} { + set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] + } else { + set Percent 0. + } + return ${Percent} +} + +set BugNumber OCC12522 + +restore [locate_data_file OCC12522.brep] arc1 +explode arc1 e +mkcurve curve1 arc1_1 + +plane plane1 6400 -4000 -160 0 0 1 1 0 0 + +extrema curve1 plane1 + +set percent_max 0.1 +set good_length 8.3705138910905177 + +set ext_1_length [lindex [length ext_1] 4] + +set length_percent [GetPercent ${ext_1_length} ${good_length}] +puts "length_percent = ${length_percent}" + +if {${length_percent} > ${percent_max}} { + puts "${BugNumber}: Faulty" +} else { + puts "${BugNumber}: OK" +} diff --git a/tests/bugs/moddata_1/bug126 b/tests/bugs/moddata_1/bug126 new file mode 100755 index 0000000000..e40a6dbc59 --- /dev/null +++ b/tests/bugs/moddata_1/bug126 @@ -0,0 +1,16 @@ + +puts "================" +puts "OCC126" +puts "================" +puts "" + +restore [locate_data_file OCC126-1.brep] sh1 +checkshape sh1 + +restore [locate_data_file OCC126-2.brep] sh2 +checkshape sh2 + +compound sh1 sh2 result + +set square 560.774 +set 2dviewer 0 diff --git a/tests/bugs/moddata_1/bug12635_1 b/tests/bugs/moddata_1/bug12635_1 new file mode 100755 index 0000000000..a5ecc0e366 --- /dev/null +++ b/tests/bugs/moddata_1/bug12635_1 @@ -0,0 +1,28 @@ +puts "============" +puts "OCC12635" +puts "============" +puts "" +####################################################################### +# Bugs in projector algorithm +####################################################################### + +set BugNumber OCC12635 + +restore [locate_data_file OCC12635_s1.draw] s1 +restore [locate_data_file OCC12635_c1.draw] c1 + +set BugStatus 0 +if [catch { project result c1 s1 } ] { + set BugStatus 1 +} + +# Resume +puts "" +if { ${BugStatus} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/bug12635_2 b/tests/bugs/moddata_1/bug12635_2 new file mode 100755 index 0000000000..161f0795ed --- /dev/null +++ b/tests/bugs/moddata_1/bug12635_2 @@ -0,0 +1,28 @@ +puts "============" +puts "OCC12635" +puts "============" +puts "" +####################################################################### +# Bugs in projector algorithm +####################################################################### + +set BugNumber OCC12635 + +restore [locate_data_file OCC12635_s6.draw] s6 +restore [locate_data_file OCC12635_c18.draw] c18 + +set BugStatus 0 +if [catch { project result c18 s6 } ] { + set BugStatus 1 +} + +# Resume +puts "" +if { ${BugStatus} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/bug12884 b/tests/bugs/moddata_1/bug12884 new file mode 100755 index 0000000000..8f8aec2625 --- /dev/null +++ b/tests/bugs/moddata_1/bug12884 @@ -0,0 +1,28 @@ +puts "============" +puts "OCC12884" +puts "============" +puts "" +####################################################################### +# Wrong result of projection curve on surface +####################################################################### + +set BugNumber OCC12884 + +restore [locate_data_file OCC12884_s2.draw] s2 +restore [locate_data_file OCC12884_c1.draw] c1 + +set BugStatus 0 +if [catch { project result c1 s2 } ] { + set BugStatus 1 +} + +# Resume +puts "" +if { ${BugStatus} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/bug12888 b/tests/bugs/moddata_1/bug12888 new file mode 100755 index 0000000000..e251f8ee64 --- /dev/null +++ b/tests/bugs/moddata_1/bug12888 @@ -0,0 +1,29 @@ +puts "============" +puts "OCC12888" +puts "============" +puts "" +####################################################################### +# Wrong result of projection curve on surface +####################################################################### + +set BugNumber OCC12888 + +restore [locate_data_file OCC12888_s1.draw] s1 +restore [locate_data_file OCC12888_c2.draw] c2 + +set BugStatus 0 +if [catch { project result c2 s1 } ] { + set BugStatus 1 +} + +# Resume +puts "" +if { ${BugStatus} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_1/bug13 b/tests/bugs/moddata_1/bug13 new file mode 100755 index 0000000000..74c7a7e9e8 --- /dev/null +++ b/tests/bugs/moddata_1/bug13 @@ -0,0 +1,37 @@ + +puts "================" +puts "OCC13" +puts "================" +puts "" +################################################## +## It is impossible to intersect two surfaces +################################################## + +restore [locate_data_file OCC13-1.draw] su1 +############### checkshape su1 # is not a topological shape +restore [locate_data_file OCC13-2.draw] su2 +############### checkshape su2 # is not a topological shape + +#Try to intersect two surfaces with tolerance 0.1 +#note that distance between shapes is about 0.005942345501409 + +catch {intersect res su1 su2 0.1 } result +set nom 0 + set j 1 + repeat 10 { + set che [whatis res_$j] + set che1 [whatis res_$j] + set err [lindex $che [expr [llength $che] - 1]] + set err1 [lindex $che1 [expr [llength $che1] - 2]] + + if { $err != "curve" && $err1 != "3d"} { + break + } else { + set nom [expr $nom + 1] + } + incr j} +if { $nom == 0} { + puts "Error : Intersection was made WRONGLY" +} + + diff --git a/tests/bugs/moddata_1/bug130 b/tests/bugs/moddata_1/bug130 new file mode 100755 index 0000000000..0fb7ed447b --- /dev/null +++ b/tests/bugs/moddata_1/bug130 @@ -0,0 +1,48 @@ + +puts "================" +puts "OCC130" +puts "================" +puts "" +###################################################### +## Draw Environment: No intersection found between a specific surface and a line +###################################################### + +restore [locate_data_file OCC130.brep] sh +checkshape sh + +line l -120 -100 400 0 0 1 +mksurface surf sh +############## checkshape surf # - not a topological shape + + +if [catch {intersect res l surf } result] { +set mistake 1 +} else { +set mistake 0 +} + +if { $mistake == 0} { + puts "OCC130 OK : intersection found between a specific surface and a line" + puts "" + set nom 0 + set j 1 + repeat 10 { + set che [whatis res_$j] + set err [lindex $che [expr [llength $che] - 1]] + + if { $err != "point"} { + break + } else { + set nom [expr $nom + 1] + } + incr j} + if { $nom != 2 && $nom != 0} { + puts [format "Faulty OCC130: Intersection was made WRONGLY: %s points" $nom] +} else { + puts [format "OCC130 OK : Intersection command works properly: %s points" $nom] +} + +} else { + puts "Faulty OCC130 : NO intersection found between a specific surface and a line" +} + diff --git a/tests/bugs/moddata_1/bug134_1 b/tests/bugs/moddata_1/bug134_1 new file mode 100755 index 0000000000..e7c19899b4 --- /dev/null +++ b/tests/bugs/moddata_1/bug134_1 @@ -0,0 +1,18 @@ + +puts "================" +puts "SAM1225" +puts "OCC134" +puts "================" +puts "" +#################################### +## Faces from attached file are impossible to extrude. +#################################### + +restore [locate_data_file OCC134-1.brep] sh +checkshape sh + +prism result sh 100 100 100 +checkshape result + +set square 104057 +set 2dviewer 0 diff --git a/tests/bugs/moddata_1/bug134_2 b/tests/bugs/moddata_1/bug134_2 new file mode 100755 index 0000000000..5a1622f31b --- /dev/null +++ b/tests/bugs/moddata_1/bug134_2 @@ -0,0 +1,19 @@ + +puts "================" +puts "SAM1225" +puts "OCC134" +puts "================" +puts "" +########################################################### +## Faces from attached file are impossible to extrude. +########################################################### + +restore [locate_data_file OCC134-2.brep] sh +checkshape sh + +prism result sh 100 100 100 +checkshape result + +set square 271859 +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/bug135 b/tests/bugs/moddata_1/bug135 new file mode 100755 index 0000000000..85247a971c --- /dev/null +++ b/tests/bugs/moddata_1/bug135 @@ -0,0 +1,17 @@ + +puts "================" +puts "OCC135" +puts "================" +puts "" + +restore [locate_data_file OCC135.brep] sh +checkshape sh + +sewing result 1 sh +checkshape result + +set square 273837 +set 2dviewer 0 + + + diff --git a/tests/bugs/moddata_1/bug139 b/tests/bugs/moddata_1/bug139 new file mode 100755 index 0000000000..0595134dc9 --- /dev/null +++ b/tests/bugs/moddata_1/bug139 @@ -0,0 +1,25 @@ +puts "================" +puts "OCC139" +puts "================" +puts "" +####################################### +## The intersection must be closed . So the curve is wrong. +####################################### + +restore [locate_data_file OCC139-1.draw] sh1 +restore [locate_data_file OCC139-2.draw] sh2 + +if { ![catch {intersect result sh1 sh2} catch_result] } { + puts "OCC139 OK : intersection found" + regexp { nb alone Vertices : +([-0-9.+eE]+)} [checksection result] full num + if { $num != 0 } { + puts "Faulty OCC139: Intersection was made WRONGLY. The curve must be closed ." + } else { + puts "OCC139 OK : Intersection command works properly. The curve is closed" + } +} else { + puts "Faulty OCC139 : NO intersection found" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/bug13904 b/tests/bugs/moddata_1/bug13904 new file mode 100755 index 0000000000..0438bc25a2 --- /dev/null +++ b/tests/bugs/moddata_1/bug13904 @@ -0,0 +1,33 @@ +puts "===========" +puts "OCC13904" +puts "===========" +###################################################### +# Exception during "filling" operation +###################################################### + +set BugNumber OCC13904 + +circle c 0 100 100 0 1 1 50 +ellipse el 0 0 0 0 1 1 100 50 + +set mistake 0 +if [catch { appsurf result c el } res] { + set mistake 1 + puts "Faulty ${BugNumber}: filling problem" +} else { + puts "Filling ${BugNumber} OK" + set What [whatis result] + if { [regexp "surface" $What] != 1 } { + set mistake 1 + } else { + set mistake 0 + } +} + +# Resume +puts "" +if { ${mistake} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} diff --git a/tests/bugs/moddata_1/bug141 b/tests/bugs/moddata_1/bug141 new file mode 100755 index 0000000000..6c44c83978 --- /dev/null +++ b/tests/bugs/moddata_1/bug141 @@ -0,0 +1,17 @@ + +puts "================" +puts "OCC141" +puts "================" +puts "" +############################################### +## exception while do segment operation on BSpline curve. +############################################### + +restore [locate_data_file OCC141.draw] result +#### checkshape res # not a topological shape + +segment result -4.76283758432072e-05 1.06458532027221 + +#let's the segment is displaied only + +set 2dviewer 0 diff --git a/tests/bugs/moddata_1/bug1416 b/tests/bugs/moddata_1/bug1416 new file mode 100755 index 0000000000..666fdf3093 --- /dev/null +++ b/tests/bugs/moddata_1/bug1416 @@ -0,0 +1,41 @@ +puts "============" +puts "OCC1416" +puts "============" +puts "" +###################################################### +# Shading mode doesn't work on a face of the model +###################################################### + +restore [locate_data_file OCC1416.brep] result + +# Clean mesh +isos result 0 +tclean result + +#Creating mesh +incmesh result 0.01 + +#View the result of mesh +triangles result + +############################################## +if { [catch { set tri_info [trinfo result] } catch_result] } { +############################################## + puts "Faulty OCC1416" +} else { + set ll [ llength ${tri_info} ] + if {${ll} < 6} { + puts "Faulty OCC1416" + } else { + regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri + regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + if { $tri == 0 || $nod == 0 } { + puts "Faulty OCC1416" + } else { + puts "Warning: OCC1416 looks like OK, but visual checking is required !!!!" + } + } +} + +set square 863.938 +set 3dviewer 1 diff --git a/tests/bugs/moddata_1/bug143 b/tests/bugs/moddata_1/bug143 new file mode 100755 index 0000000000..a76fd4a84e --- /dev/null +++ b/tests/bugs/moddata_1/bug143 @@ -0,0 +1,18 @@ +puts "================" +puts "BUC60654" +puts "OCC143" +puts "================" +puts "" +###################################################################### +## Raises exception "Standard_NotImplemented3" in GCPnts_AbscissaPoint on a Geom2d_OffsetCurve +###################################################################### + +set len_expected 4.e100 +line line_2d 0 0 1 1 + +offset result line_2d 10 1 0 + +set info [length $result] +regexp {The length result is +([-0-9.+eE]+)} $info full len + +checkreal "Length" $len $len_expected 0. 1e-10 diff --git a/tests/bugs/moddata_1/bug14376 b/tests/bugs/moddata_1/bug14376 new file mode 100755 index 0000000000..539d7a477e --- /dev/null +++ b/tests/bugs/moddata_1/bug14376 @@ -0,0 +1,13 @@ +puts "============" +puts "OCC14376" +puts "============" +puts "" +####################################################################### +# Shading triangulation of face is not computed +####################################################################### + +pload QAcommands + +restore [locate_data_file OCC14376.brep] Face_8 +OCC14376 Face_8 + diff --git a/tests/bugs/moddata_1/bug145 b/tests/bugs/moddata_1/bug145 new file mode 100755 index 0000000000..6992d661d9 --- /dev/null +++ b/tests/bugs/moddata_1/bug145 @@ -0,0 +1,18 @@ +puts "========" +puts "OCC145" +puts "========" + +pload QAcommands + +OCC145 [locate_data_file OCC145.brep] 1 + +set listmem {} +set i_max 10000 +OCC145 [locate_data_file OCC145.brep] ${i_max} + +lappend listmem [expr [meminfo w] / 1024] +if { [checktrend $listmem 0 1 "Memory leak detected"] } { + puts "No memory leak, $i iterations" + break +} + diff --git a/tests/bugs/moddata_1/bug14782 b/tests/bugs/moddata_1/bug14782 new file mode 100755 index 0000000000..c10128bb08 --- /dev/null +++ b/tests/bugs/moddata_1/bug14782 @@ -0,0 +1,76 @@ +puts "========================" +puts "OCC14782" +puts "========================" +puts "" +####################################################################### +# Method segment works wrongly for periodical BSpline curve +####################################################################### + +set BugNumber OCC14782 + +proc GetPercent {Value GoodValue} { + set Percent 0. + if {${GoodValue} != 0.} { + set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] + } elseif {${Value} != 0.} { + set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] + } else { + set Percent 0. + } + return ${Percent} +} + + +restore [locate_data_file OCC14782.draw] res + +bounds res t1 t2 +set bounds_list [dump res] + +puts "" +if { [llength ${bounds_list}] < 7 } { + puts "Bad bounds_list" + puts "Faulty ${BugNumber}" +} else { + set periodic_type [lindex ${bounds_list} 6] + puts "periodic_type=${periodic_type}" + if { ${periodic_type} != "periodic" } { + puts "1. Faulty ${BugNumber}" + } else { + puts "1. OK ${BugNumber}" + } +} + +set ll1 [lindex [length res] end] +puts "length1=${ll1}" + +segment res t3 t4 +set segment_list [dump res] + +puts "" +if { [llength ${segment_list}] < 7 } { + puts "Bad segment_list" + puts "Faulty ${BugNumber}" +} else { + set periodic_type [lindex ${segment_list} 6] + puts "periodic_type=${periodic_type}" + if { ${periodic_type} != "periodic" } { + puts "2. OK ${BugNumber}" + } else { + puts "2. Faulty ${BugNumber}" + } +} + +set ll2 [lindex [length res] end] +puts "length2=${ll2}" + +set percent_max 0.1 +set length_percent [GetPercent ${ll1} ${ll2}] +puts "length_percent = ${length_percent}" + +puts "" +if { ${length_percent} > ${percent_max} } { + puts "3. Faulty ${BugNumber}" +} else { + puts "3. OK ${BugNumber}" +} + diff --git a/tests/bugs/moddata_1/bug15 b/tests/bugs/moddata_1/bug15 new file mode 100755 index 0000000000..044e6e6ac1 --- /dev/null +++ b/tests/bugs/moddata_1/bug15 @@ -0,0 +1,27 @@ + +puts "================" +puts "OCC15" +puts "================" +puts "" + +restore [locate_data_file OCC15.brep] result + +checkshape result + +vinit +tclean result +vdisplay result +vsetdispmode result 1 +vfit + +set info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $info full tri +regexp { +([-0-9.+eE]+) +nodes} $info full nod + +#($tri != 5370,$nod != 2783)($tri != 5356,$nod != 2774)($tri != 5354,$nod != 2773),aki251103 +if { ($tri != 5643 || $nod != 2915) } { + puts "Shady OCC15 : shading problem may be, nb tri & nod were changed" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/bug150_1 b/tests/bugs/moddata_1/bug150_1 new file mode 100755 index 0000000000..9174f95521 --- /dev/null +++ b/tests/bugs/moddata_1/bug150_1 @@ -0,0 +1,35 @@ +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" + +puts "================" +puts "OCC150" +puts "SAM1048" +puts "OCC53" +puts "================" +puts "" +################################################################ +## SAM1048. Crash with all memory exhausted at attempt to fuse two solids in the file attached. +################################################################ +## Segmentation violation detected during Fuse operation +################################################################ + +puts "" +puts "Bug's advancement" +puts "#################" +puts "" +puts "Customer version Development version" +puts "Status : CLOSED Status : CLOSED" +puts "Resolution : LIMITATION Resolution : LIMITATION" +puts "Leave as CLOSED LIMITATION Leave as CLOSED LIMITATION" +puts "" + +restore [locate_data_file OCC150_compsolid_nofuse.brep] sh +explode sh + +checkshape sh_1 +checkshape sh_2 + +bfuse result sh_1 sh_2 +checkshape result + +set square 700 +set 2dviewer 0 diff --git a/tests/bugs/moddata_1/bug150_2 b/tests/bugs/moddata_1/bug150_2 new file mode 100755 index 0000000000..eac73fe079 --- /dev/null +++ b/tests/bugs/moddata_1/bug150_2 @@ -0,0 +1,34 @@ +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" + +puts "================" +puts "OCC150" +puts "SAM1048" +puts "OCC53" +puts "================" +puts "" +################################################################ +## SAM1048. Crash with all memory exhausted at attempt to fuse two solids in the file attached. +################################################################ +## Segmentation violation detected during Fuse operation +################################################################ +puts "" +puts "Bug's advancement" +puts "#################" +puts "" +puts "Customer version Development version" +puts "Status : CLOSED Status : CLOSED" +puts "Resolution : LIMITATION Resolution : LIMITATION" +puts "Leave as CLOSED LIMITATION Leave as CLOSED LIMITATION" +puts "" + +restore [locate_data_file OCC150_compsolid_nofuse.brep] sh +explode sh + +checkshape sh_1 +checkshape sh_2 + +bfuse result sh_2 sh_1 +checkshape result + +set square 700 +set 2dviewer 0 diff --git a/tests/bugs/moddata_1/bug151_1 b/tests/bugs/moddata_1/bug151_1 new file mode 100755 index 0000000000..c13709c34f --- /dev/null +++ b/tests/bugs/moddata_1/bug151_1 @@ -0,0 +1,19 @@ + +puts "================" +puts "OCC151" +puts "SAM1141" +puts "================" +puts "" + +restore [locate_data_file OCC3-1.brep] sh1 +restore [locate_data_file OCC3-2.brep] sh2 + +checkshape sh1 +checkshape sh2 + +bfuse result sh1 sh2 +checkshape result + +set square 11400 +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/bug151_2 b/tests/bugs/moddata_1/bug151_2 new file mode 100755 index 0000000000..12f3b5c2af --- /dev/null +++ b/tests/bugs/moddata_1/bug151_2 @@ -0,0 +1,19 @@ + +puts "================" +puts "OCC151" +puts "SAM1141" +puts "================" +puts "" + +restore [locate_data_file OCC3-1.brep] sh1 +restore [locate_data_file OCC3-2.brep] sh2 + +checkshape sh1 +checkshape sh2 + +bfuse result sh2 sh1 +checkshape result + +set square 11400 +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/bug152_1 b/tests/bugs/moddata_1/bug152_1 new file mode 100755 index 0000000000..365abd7b91 --- /dev/null +++ b/tests/bugs/moddata_1/bug152_1 @@ -0,0 +1,27 @@ +# by apn master-master 03.12.2012 +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" +#puts "TODO OCC12345 ALL: An exception was caught" +#puts "TODO OCC12345 ALL: \\*\\* Exception \\*\\*.*" +#puts "TODO OCC12345 ALL: TEST INCOMPLETE" + +puts "================" +puts "OCC152" +puts "SAM1178" +puts "================" +puts "" +################################################################# +## SAM1178(#1871): Bad escaped result after a cut operation on the shape. +################################################################# + +restore [locate_data_file OCC152.brep] sh +explode sh + +checkshape sh_1 +checkshape sh_2 + +bcut result sh_1 sh_2 +checkshape result + +set square 276424 +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/bug152_2 b/tests/bugs/moddata_1/bug152_2 new file mode 100755 index 0000000000..3bfef20c89 --- /dev/null +++ b/tests/bugs/moddata_1/bug152_2 @@ -0,0 +1,26 @@ +# by apn master-master 03.12.2012 +#puts "TODO OCC12345 ALL: An exception was caught" +#puts "TODO OCC12345 ALL: \\*\\* Exception \\*\\*.*" +#puts "TODO OCC12345 ALL: TEST INCOMPLETE" + +puts "================" +puts "OCC152" +puts "SAM1178" +puts "================" +puts "" +################################################################# +## SAM1178(#1871): Bad escaped result after a cut operation on the shape. +################################################################# + +restore [locate_data_file OCC152.brep] sh +explode sh + +checkshape sh_1 +checkshape sh_2 + +bcut result sh_2 sh_1 +checkshape result + +set square 34894.3 +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/bug15519 b/tests/bugs/moddata_1/bug15519 new file mode 100755 index 0000000000..b705004d3c --- /dev/null +++ b/tests/bugs/moddata_1/bug15519 @@ -0,0 +1,86 @@ +puts "TODO OCC12345 ALL: triangle: Faulty OCC15519" +puts "TODO OCC12345 ALL: node: Faulty OCC15519" +puts "TODO OCC12345 ALL: deflection: Faulty OCC15519" +puts "TODO OCC12345 ALL: Faulty OCC15519" +puts "============" +puts "OCC15519" +puts "============" +puts "" +####################################################################### +# Exception while meshing shape +####################################################################### + +set BugNumber OCC15519 + +proc GetPercent {Value GoodValue} { + set Percent 0. + if {${GoodValue} != 0.} { + set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] + } elseif {${Value} != 0.} { + set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] + } else { + set Percent 0. + } + return ${Percent} +} + +restore [locate_data_file OCC15519.brep] result +tclean result + +set Deflection 1. +catch {incmesh result ${Deflection} } + +set InfoList [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $InfoList full tri +regexp { +([-0-9.+eE]+) +nodes} $InfoList full nod +regexp {Maximal deflection +([-0-9.+eE]+)} $InfoList full defl + +if { [string compare $tcl_platform(platform) "windows"] == 0 } { + set good_tri 96265 + set good_nod 71339 + set good_defl 27.956052399907215 +} else { + set good_tri 95582 + set good_nod 70796 + set good_defl 0.99827404224216676 +} + +set percent_max 0.1 +set status 0 + +set triangle_percent [GetPercent ${tri} ${good_tri}] +puts "triangle_percent = ${triangle_percent}" +if { ${triangle_percent} > ${percent_max} } { + puts "triangle: Faulty ${BugNumber}" + set status 1 +} else { + puts "triangle: OK ${BugNumber}" +} + +set node_percent [GetPercent ${nod} ${good_nod}] +puts "node_percent = ${node_percent}" +if { ${node_percent} > ${percent_max} } { + puts "node: Faulty ${BugNumber}" + set status 1 +} else { + puts "node: OK ${BugNumber}" +} + +set deflection_percent [GetPercent ${defl} ${good_defl}] +puts "deflection_percent = ${deflection_percent}" +if { ${deflection_percent} > ${percent_max} } { + puts "deflection: Faulty ${BugNumber}" + set status 1 +} else { + puts "deflection: OK ${BugNumber}" +} + +# Resume +puts "" +if { ${status} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_1/bug15570 b/tests/bugs/moddata_1/bug15570 new file mode 100755 index 0000000000..808fe6eafa --- /dev/null +++ b/tests/bugs/moddata_1/bug15570 @@ -0,0 +1,108 @@ +puts "===========" +puts "OCC15570" +puts "===========" + +set BugNumber OCC15570 + +###################################################### +# Incorrect handling of Unicode strings +###################################################### + +pload XDE + +proc GetPercent {Value GoodValue} { + set Percent 0. + if {${GoodValue} != 0.} { + set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] + } elseif {${Value} != 0.} { + set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] + } else { + set Percent 0. + } + return ${Percent} +} + +igesbrep [locate_data_file OCC15570.igs] a * +tpcompound result + +set BoundList [boundingstr result] +set xmin [lindex ${BoundList} 0] +set ymin [lindex ${BoundList} 1] +set zmin [lindex ${BoundList} 2] +set xmax [lindex ${BoundList} 3] +set ymax [lindex ${BoundList} 4] +set zmax [lindex ${BoundList} 5] + +set percent_max 0.1 +set good_xmin -22.500000100000001 +set good_ymin -88.366946209482094 +set good_zmin -1.0000002775557561e-07 +set good_xmax 22.500000100000001 +set good_ymax 22.776076069021901 +set good_zmax 86.12676222997429 +set status 0 + +set xmin_percent [GetPercent ${xmin} ${good_xmin}] +puts "xmin_percent = ${xmin_percent}" +if { ${xmin_percent} > ${percent_max} } { + puts "xmin: Faulty ${BugNumber}" + set status 1 +} else { + puts "xmin: OK ${BugNumber}" +} + +set ymin_percent [GetPercent ${ymin} ${good_ymin}] +puts "ymin_percent = ${ymin_percent}" +if { ${ymin_percent} > ${percent_max} } { + puts "ymin: Faulty ${BugNumber}" + set status 1 +} else { + puts "ymin: OK ${BugNumber}" +} + +set zmin_percent [GetPercent ${zmin} ${good_zmin}] +puts "zmin_percent = ${zmin_percent}" +if { ${zmin_percent} > ${percent_max} } { + puts "zmin: Faulty ${BugNumber}" + set status 1 +} else { + puts "zmin: OK ${BugNumber}" +} + +set xmax_percent [GetPercent ${xmax} ${good_xmax}] +puts "xmax_percent = ${xmax_percent}" +if { ${xmax_percent} > ${percent_max} } { + puts "xmax: Faulty ${BugNumber}" + set status 1 +} else { + puts "xmax: OK ${BugNumber}" +} + +set ymax_percent [GetPercent ${ymax} ${good_ymax}] +puts "ymax_percent = ${ymax_percent}" +if { ${ymax_percent} > ${percent_max} } { + puts "ymax: Faulty ${BugNumber}" + set status 1 +} else { + puts "ymax: OK ${BugNumber}" +} + +set zmax_percent [GetPercent ${zmax} ${good_zmax}] +puts "zmax_percent = ${zmax_percent}" +if { ${zmax_percent} > ${percent_max} } { + puts "zmax: Faulty ${BugNumber}" + set status 1 +} else { + puts "zmax: OK ${BugNumber}" +} + +# Resume +puts "" +if { ${status} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/bug157 b/tests/bugs/moddata_1/bug157 new file mode 100755 index 0000000000..d7bdf91ebb --- /dev/null +++ b/tests/bugs/moddata_1/bug157 @@ -0,0 +1,27 @@ +pload QAcommands + +puts "================" +puts "OCC157" +puts "================" +puts "" + +restore [locate_data_file OCC157.brep] wire +checkshape wire + +set Tolerance 100. +set info_result [OCC157 result wire ${Tolerance}] + +set ll [llength ${info_result}] +if {${ll} < 2} { + puts "length = ${ll}" + puts "OCC157: Error" +} else { + if { [regexp {OK} $info_result] } { + puts "OCC157: OK" + } else { + puts "OCC157: Error" + } +} +set square 2.11095e+06 +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/bug16 b/tests/bugs/moddata_1/bug16 new file mode 100755 index 0000000000..e44aaed6fa --- /dev/null +++ b/tests/bugs/moddata_1/bug16 @@ -0,0 +1,24 @@ + +puts "================" +puts "OCC16" +puts "================" +puts "" + +torus a 10 10 +mkface result a +vinit +vdisplay result +vsetdispmode result 1 + +set info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $info full tri +regexp { +([-0-9.+eE]+) +nodes} $info full nod + +if { $tri != 2592 || $nod != 1369 } { + puts "Faulty OCC16: here can be shading problem" +} + +puts "If here is bug - face is displaied in wireframe mode" + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/bug160_1 b/tests/bugs/moddata_1/bug160_1 new file mode 100755 index 0000000000..6a0c7b6909 --- /dev/null +++ b/tests/bugs/moddata_1/bug160_1 @@ -0,0 +1,24 @@ + +puts "========================" +puts "BUC60775" +puts "OCC160" +puts "(COMMON: A and B)" +puts "========================" + +restore [locate_data_file buc60775a.brep] a +checkshape a +restore [locate_data_file buc60775b.brep] b +checkshape b + +bcommon result a b +checkshape result + +set nf [llength [explode result f]] +if {$nf < 6} { + puts "Error : the resulting shape is unclosed!!!" +} + +set square 94067.7 +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_1/bug160_2 b/tests/bugs/moddata_1/bug160_2 new file mode 100755 index 0000000000..4aa1d8da3b --- /dev/null +++ b/tests/bugs/moddata_1/bug160_2 @@ -0,0 +1,23 @@ + +puts "========================" +puts "BUC60775" +puts "OCC160" +puts "(COMMON: B and A)" +puts "========================" + +restore [locate_data_file buc60775a.brep] a +checkshape a +restore [locate_data_file buc60775b.brep] b +checkshape b + +bcommon result b a +checkshape result + +set nf [llength [explode result f]] +if {$nf < 6} { + puts "Error : the resulting shape is unclosed!!!" +} + +set square 94067.7 +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/bug160_3 b/tests/bugs/moddata_1/bug160_3 new file mode 100755 index 0000000000..08ee7f42c5 --- /dev/null +++ b/tests/bugs/moddata_1/bug160_3 @@ -0,0 +1,25 @@ + +puts "========================" +puts "BUC60775" +puts "OCC160" +puts "(FUSE: A and B)" +puts "========================" + +restore [locate_data_file buc60775a.brep] a +checkshape a +restore [locate_data_file buc60775b.brep] b +checkshape b + +bfuse result a b +checkshape result + +set nf [llength [explode result f]] + +if {$nf < 6} { + puts "Error : the resulting shape is unclosed!!!" +} + +set square 328116 +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_1/bug160_4 b/tests/bugs/moddata_1/bug160_4 new file mode 100755 index 0000000000..1b9364dcf2 --- /dev/null +++ b/tests/bugs/moddata_1/bug160_4 @@ -0,0 +1,24 @@ + +puts "========================" +puts "BUC60775" +puts "OCC160" +puts "(FUSE: B and A)" +puts "========================" + +restore [locate_data_file buc60775a.brep] a +checkshape a +restore [locate_data_file buc60775b.brep] b +checkshape b + +bfuse result b a +checkshape result + +set nf [llength [explode result f]] +if {$nf < 6} { + puts "Error : the resulting shape is unclosed!!!" +} + +set square 328116 +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_1/bug160_5 b/tests/bugs/moddata_1/bug160_5 new file mode 100755 index 0000000000..fd618a95c5 --- /dev/null +++ b/tests/bugs/moddata_1/bug160_5 @@ -0,0 +1,24 @@ + +puts "========================" +puts "BUC60775" +puts "OCC160" +puts "(CUT: A and B)" +puts "========================" + +restore [locate_data_file buc60775a.brep] a +checkshape a +restore [locate_data_file buc60775b.brep] b +checkshape b + +bcut result a b +checkshape result + +set nf [llength [explode result f]] +if {$nf < 6} { + puts "Error : the resulting shape is unclosed!!!" +} + +set square 48129.6 +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_1/bug160_6 b/tests/bugs/moddata_1/bug160_6 new file mode 100755 index 0000000000..ff37689e68 --- /dev/null +++ b/tests/bugs/moddata_1/bug160_6 @@ -0,0 +1,25 @@ +puts "TODO OCC12345 ALL: Error : the resulting shape is unclosed!!!" + +puts "========================" +puts "BUC60775" +puts "OCC160" +puts "(CUT: B and A)" +puts "========================" + +restore [locate_data_file buc60775a.brep] a +checkshape a +restore [locate_data_file buc60775b.brep] b +checkshape b + +bcut result b a +checkshape result + +set nf [llength [explode result f]] +if {$nf < 6} { + puts "Error : the resulting shape is unclosed!!!" +} + +set square 247636 +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_1/bug161 b/tests/bugs/moddata_1/bug161 new file mode 100755 index 0000000000..5de4f8cee1 --- /dev/null +++ b/tests/bugs/moddata_1/bug161 @@ -0,0 +1,24 @@ + +puts "========" +puts "OCC161" +puts "========" +puts "" +########################################################### +## The face provided in attachment has single wire that is misoriented, i.e has +## internal part outside. The checkshape command in DRAW should report that error +## situation, while it does not. +########################################################### + +restore [locate_data_file OCC161.brep] result + +decho off +set che [checkshape result] +decho on + +if { [regexp {Faulty} $che] != 1 } { + puts "Faulty OCC161 : Checkshape command works wrongly" +} else { + puts "OCC161 OK : Checkshape command works properly" +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_1/bug16119 b/tests/bugs/moddata_1/bug16119 new file mode 100755 index 0000000000..a72a779a9e --- /dev/null +++ b/tests/bugs/moddata_1/bug16119 @@ -0,0 +1,61 @@ +puts "TODO ?OCC12345 ALL: OCC16119: Faulty" +puts "============" +puts "OCC16119" +puts "============" +puts "" +####################################################################### +# Bug in GeomFill_Coons algorithm +####################################################################### + +set BugNumber OCC16119 + +proc GetPercent {Value GoodValue} { + set Percent 0. + if {${GoodValue} != 0.} { + set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] + } elseif {${Value} != 0.} { + set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] + } else { + set Percent 0. + } + return ${Percent} +} + +restore [locate_data_file OCC16119-c1.draw] c1 +restore [locate_data_file OCC16119-c2.draw] c2 +restore [locate_data_file OCC16119-c31.draw] c31 +restore [locate_data_file OCC16119-c32.draw] c32 +restore [locate_data_file OCC16119-c41.draw] c41 +restore [locate_data_file OCC16119-c42.draw] c42 +restore [locate_data_file OCC16119-cv.draw] cv + +fillcurves s11 c1 c41 cv c31 +fillcurves s12 cv c42 c2 c32 + +svalue s11 .5 .5 x1 y1 z1 dux1 duy1 duz1 dvx1 dvy1 dvz1 +svalue s12 .5 .5 x2 y2 z2 dux2 duy2 duz2 dvx2 dvy2 dvz2 + +set deltaX [dval dvx1-dvx2] +set deltaY [dval dvy1-dvy2] +set deltaZ [dval dvz1-dvz2] + +set percent_max 0.1 +set good_deltaX 4.4408920985006262e-015 +set good_deltaY -4.6629367034256575e-015 +set good_deltaZ -2.6645352591003757e-015 + +set deltaX_percent [GetPercent ${deltaX} ${good_deltaX}] +puts "deltaX_percent = ${deltaX_percent}" + +set deltaY_percent [GetPercent ${deltaY} ${good_deltaY}] +puts "deltaY_percent = ${deltaY_percent}" + +set deltaZ_percent [GetPercent ${deltaZ} ${good_deltaZ}] +puts "deltaZ_percent = ${deltaZ_percent}" + +if {${deltaX_percent} > ${percent_max} || ${deltaY_percent} > ${percent_max} || ${deltaZ_percent} > ${percent_max} } { + puts "${BugNumber}: Faulty" +} else { + puts "${BugNumber}: OK" +} + diff --git a/tests/bugs/moddata_1/bug163 b/tests/bugs/moddata_1/bug163 new file mode 100755 index 0000000000..393a13b0d1 --- /dev/null +++ b/tests/bugs/moddata_1/bug163 @@ -0,0 +1,30 @@ + +puts "========" +puts "OCC163" +puts "========" +puts "" +########################################################### +## The result of extrema command is not correct. +## We have only two "max" extrema, but we should have "min" and "max". +########################################################### + +restore [locate_data_file OCC130.brep] res + +checkshape res + +line l -120 -100 400 0 0 1 +mksurface s res + +set che [extrema l s] +set err [llength $che] +if { $err < 2} { + puts "Error OCC163 (amount): command extrema does NOT work properly" +} + +set dum1 [dump [lindex $che 0]] +set dum2 [dump [lindex $che 1]] + +if { $dum1 == $dum2} { + puts "Error OCC163 (dump): command extrema does NOT work properly" +} + diff --git a/tests/bugs/moddata_1/bug164_1 b/tests/bugs/moddata_1/bug164_1 new file mode 100755 index 0000000000..40162c2431 --- /dev/null +++ b/tests/bugs/moddata_1/bug164_1 @@ -0,0 +1,19 @@ + +puts "================" +puts "OCC164" +puts "SAM1478" +puts "================" +puts "" + +restore [locate_data_file OCC164-1.brep] sh1 +restore [locate_data_file OCC164-2.brep] sh2 +checkshape sh1 +checkshape sh2 + +bfuse result sh1 sh2 +checkshape result + +set square 344595 +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_1/bug164_2 b/tests/bugs/moddata_1/bug164_2 new file mode 100755 index 0000000000..f9fa341174 --- /dev/null +++ b/tests/bugs/moddata_1/bug164_2 @@ -0,0 +1,19 @@ + +puts "================" +puts "OCC164" +puts "SAM1478" +puts "================" +puts "" + +restore [locate_data_file OCC164-1.brep] sh1 +restore [locate_data_file OCC164-2.brep] sh2 +checkshape sh1 +checkshape sh2 + +bfuse result sh2 sh1 +checkshape result + +set square 344595 +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_1/bug1651 b/tests/bugs/moddata_1/bug1651 new file mode 100755 index 0000000000..a3cba8df8b --- /dev/null +++ b/tests/bugs/moddata_1/bug1651 @@ -0,0 +1,64 @@ +puts "TODO OCC11111 ALL: Faulty OCC1651" + +pload QAcommands + +puts "============" +puts "OCC1651" +puts "============" +puts "" +###################################################### +# No intersection found using BRepClass3d_Intersector3d +###################################################### + +restore [locate_data_file OCC1651.brep] face + +checkshape face + +set PntX 164.6207 +set PntY -105.2869 +set PntZ 557.8805 +set DirX 0.5774 +set DirY -0.5774 +set DirZ 0.5774 + +if { [catch { set PointList [OCC1651 face ${PntX} ${PntY} ${PntZ} ${DirX} ${DirY} ${DirZ}] } catch_result] } { + puts "Faulty OCC1651" +} else { + set ll [ llength ${PointList} ] + if {${ll} != 3} { + puts "Faulty OCC1651" + } else { + set IntersectionPointX [lindex ${PointList} 0] + set IntersectionPointY [lindex ${PointList} 1] + set IntersectionPointZ [lindex ${PointList} 2] + + set good_IntersectionPointX 42.6199 + set good_IntersectionPointY 16.7139 + set good_IntersectionPointZ 435.88 + + set X_percent [expr abs(${IntersectionPointX} - ${good_IntersectionPointX}) / double(${good_IntersectionPointX}) * 100.] + set Y_percent [expr abs(${IntersectionPointY} - ${good_IntersectionPointY}) / double(${good_IntersectionPointY}) * 100.] + set Z_percent [expr abs(${IntersectionPointZ} - ${good_IntersectionPointZ}) / double(${good_IntersectionPointZ}) * 100.] + + set percent_max 0.1 + + set IsGood 1 + if {${X_percent} > ${percent_max}} { + puts "OCC1651 Faulty" + set IsGood 0 + } + if {${Y_percent} > ${percent_max}} { + puts "OCC1651 Faulty" + set IsGood 0 + } + if {${Z_percent} > ${percent_max}} { + puts "OCC1651 Faulty" + set IsGood 0 + } + if {${IsGood} == 1} { + puts "OCC1651 OK" + } + } +} + + diff --git a/tests/bugs/moddata_1/bug165_1 b/tests/bugs/moddata_1/bug165_1 new file mode 100755 index 0000000000..762d8a3de5 --- /dev/null +++ b/tests/bugs/moddata_1/bug165_1 @@ -0,0 +1,75 @@ +puts "========" +puts "OCC165" +puts "Bug regression in BRepOffsetAPI_MakeOffset class (offsetting in OY direction)" +puts "========" + +restore [locate_data_file offset_wire_019.brep] a +checkshape a + +mkplane f a +checkshape f + +set IsGood 1 +if [catch {mkoffset res1 f 1 1 } result] { + puts "Faulty OCC165 (case 1) : function MKOFFSET works wrongly" + set IsGood 0 +} else { + puts "OCC165 OK (case 1): function MKOFFSET works properly" + checkshape res1_1 + mkplane pl1 res1_1 + checkshape pl1 +} + +if [catch {mkoffset res2 f 1 -1 } result] { + puts "Faulty OCC165 (case 2) : function MKOFFSET works wrongly" + set IsGood 0 +} else { + puts "OCC165 OK (case 2): function MKOFFSET works properly" + checkshape res2_1 + mkplane pl2 res2_1 + checkshape pl2 +} + +if {$IsGood == 1} { + compound a res1_1 res2_1 res + + regexp {Mass +: +([-0-9.+eE]+)} [lprops res1_1] full len + + set good_len 1088.43 + set percent_max 0.1 + set percent [expr abs(${len} - ${good_len}) / double(${good_len}) * 100.] + + puts "good_len = ${good_len}" + puts "length = ${len}" + puts "percent = ${percent}" + + if {${percent} > ${percent_max}} { + puts "Faulty OCC165 (case 3) : function MKOFFSET works wrongly" + set IsGood 0 + } + + regexp {Mass +: +([-0-9.+eE]+)} [lprops res2_1] full len + + set good_len 1075.87 + set percent_max 0.1 + set percent [expr abs(${len} - ${good_len}) / double(${good_len}) * 100.] + + puts "good_len = ${good_len}" + puts "length = ${len}" + puts "percent = ${percent}" + + if {${percent} > ${percent_max}} { + puts "Faulty OCC165 (case 4) : function MKOFFSET works wrongly" + set IsGood 0 + } + + if {$IsGood == 1} { + puts "OCC165 OK" + } else { + puts "OCC165 FAULTY" + } + +} else { + puts "OCC165 FAULTY" +} + diff --git a/tests/bugs/moddata_1/bug165_2 b/tests/bugs/moddata_1/bug165_2 new file mode 100755 index 0000000000..624eb3d75c --- /dev/null +++ b/tests/bugs/moddata_1/bug165_2 @@ -0,0 +1,79 @@ +if { [array get env os_type] != "" } { + set os $env(os_type) +} +if { [string compare $os "windows"] != 0 } { + puts "TODO OCC12345 ALL: An exception was caught" + puts "TODO OCC12345 ALL: \\*\\* Exception \\*\\*.*" + puts "TODO OCC12345 ALL: OCC165 Faulty" +} + +puts "========" +puts "OCC165" +puts "Bug regression in BRepOffsetAPI_MakeOffset class (offsetting in OY direction)" +puts "========" + +restore [locate_data_file offset_wire_019.brep] a +checkshape a + +mkplane f a +checkshape f + +set IsGood 1 +if [catch {mkoffset res1 f 1 4.8 } result] { + set IsGood 0 +} else { + puts "OCC165 OK (case 1): function MKOFFSET works properly" + checkshape res1_1 + mkplane pl1 res1_1 + checkshape pl1 +} + +if [catch {mkoffset res2 f 1 -2.9 } result] { + set IsGood 0 +} else { + puts "OCC165 OK (case 2): function MKOFFSET works properly" + checkshape res2_1 + mkplane pl2 res2_1 + checkshape pl2 +} + +if {$IsGood == 1} { + compound a res1_1 res2_1 res + + regexp {Mass +: +([-0-9.+eE]+)} [lprops res1_1] full len + + set good_len 1112.29 + set percent_max 0.1 + set percent [expr abs(${len} - ${good_len}) / double(${good_len}) * 100.] + + puts "good_len = ${good_len}" + puts "length = ${len}" + puts "percent = ${percent}" + + if {${percent} > ${percent_max}} { + set IsGood 0 + } + + regexp {Mass +: +([-0-9.+eE]+)} [lprops res2_1] full len + + set good_len 1063.91 + set percent_max 0.1 + set percent [expr abs(${len} - ${good_len}) / double(${good_len}) * 100.] + + puts "good_len = ${good_len}" + puts "length = ${len}" + puts "percent = ${percent}" + + if {${percent} > ${percent_max}} { + set IsGood 0 + } + + if {$IsGood == 1} { + puts "OCC165 OK" + } else { + puts "OCC165 Faulty" + } + +} else { + puts "OCC165 Faulty" +} diff --git a/tests/bugs/moddata_1/bug165_3 b/tests/bugs/moddata_1/bug165_3 new file mode 100755 index 0000000000..32551f84c7 --- /dev/null +++ b/tests/bugs/moddata_1/bug165_3 @@ -0,0 +1,137 @@ + +puts "========" +puts "OCC165" +puts "========" + +restore [locate_data_file OCC165-2.brep] f +checkshape f + +set IsGood 1 +if [catch {mkoffset res1 f 3 10 } result] { + puts "Faulty OCC165 (case 1) : function MKOFFSET works wrongly" + set IsGood 0 +} else { + #puts "OCC165 OK (case 1): function MKOFFSET works properly" + mkplane pl1_1 res1_1 + checkshape pl1_1 + mkplane pl1_2 res1_2 + checkshape pl1_2 + mkplane pl1_3 res1_3 + checkshape pl1_3 +} + +if [catch {mkoffset res2 f 3 -10 } result] { + puts "Faulty OCC165 (case 2) : function MKOFFSET works wrongly" + set IsGood 0 +} else { + #puts "OCC165 OK (case 2): function MKOFFSET works properly" + mkplane pl2_1 res2_1 + checkshape pl2_1 + mkplane pl2_2 res2_2 + checkshape pl2_2 + mkplane pl2_3 res2_3 + checkshape pl2_3 +} + +if {$IsGood == 1} { + compound f res1_1 res1_2 res1_3 res2_1 res2_2 res2_3 res + + regexp {Mass +: +([-0-9.+eE]+)} [lprops res1_1] full len + + set good_len 462.832 + set percent_max 0.1 + set percent [expr abs(${len} - ${good_len}) / double(${good_len}) * 100.] + + puts "good_len = ${good_len}" + puts "length = ${len}" + puts "percent = ${percent}" + + if {${percent} > ${percent_max}} { + puts "Faulty OCC165 (case 3) : function MKOFFSET works wrongly" + set IsGood 0 + } + + regexp {Mass +: +([-0-9.+eE]+)} [lprops res1_2] full len + + set good_len 525.664 + set percent_max 0.1 + set percent [expr abs(${len} - ${good_len}) / double(${good_len}) * 100.] + + puts "good_len = ${good_len}" + puts "length = ${len}" + puts "percent = ${percent}" + + if {${percent} > ${percent_max}} { + puts "Faulty OCC165 (case 4) : function MKOFFSET works wrongly" + set IsGood 0 + } + + regexp {Mass +: +([-0-9.+eE]+)} [lprops res1_3] full len + + set good_len 588.496 + set percent_max 0.1 + set percent [expr abs(${len} - ${good_len}) / double(${good_len}) * 100.] + + puts "good_len = ${good_len}" + puts "length = ${len}" + puts "percent = ${percent}" + + if {${percent} > ${percent_max}} { + puts "Faulty OCC165 (case 5) : function MKOFFSET works wrongly" + set IsGood 0 + } + + regexp {Mass +: +([-0-9.+eE]+)} [lprops res2_1] full len + + set good_len 320 + set percent_max 0.1 + set percent [expr abs(${len} - ${good_len}) / double(${good_len}) * 100.] + + puts "good_len = ${good_len}" + puts "length = ${len}" + puts "percent = ${percent}" + + if {${percent} > ${percent_max}} { + puts "Faulty OCC165 (case 6) : function MKOFFSET works wrongly" + set IsGood 0 + } + + regexp {Mass +: +([-0-9.+eE]+)} [lprops res2_2] full len + + set good_len 240 + set percent_max 0.1 + set percent [expr abs(${len} - ${good_len}) / double(${good_len}) * 100.] + + puts "good_len = ${good_len}" + puts "length = ${len}" + puts "percent = ${percent}" + + if {${percent} > ${percent_max}} { + puts "Faulty OCC165 (case 7) : function MKOFFSET works wrongly" + set IsGood 0 + } + + regexp {Mass +: +([-0-9.+eE]+)} [lprops res2_3] full len + + set good_len 160 + set percent_max 0.1 + set percent [expr abs(${len} - ${good_len}) / double(${good_len}) * 100.] + + puts "good_len = ${good_len}" + puts "length = ${len}" + puts "percent = ${percent}" + + if {${percent} > ${percent_max}} { + puts "Faulty OCC165 (case 8) : function MKOFFSET works wrongly" + set IsGood 0 + } + + if {$IsGood == 1} { + puts "OCC165 OK" + } else { + puts "OCC165 FAULTY" + } + +} else { + puts "OCC165 FAULTY" +} diff --git a/tests/bugs/moddata_1/bug16833 b/tests/bugs/moddata_1/bug16833 new file mode 100755 index 0000000000..d3e0046cf1 --- /dev/null +++ b/tests/bugs/moddata_1/bug16833 @@ -0,0 +1,37 @@ +puts "============" +puts "OCC16833" +puts "============" +puts "" +####################################################################### +# Error in Coons algorithm +####################################################################### + +set BugNumber OCC16833 + +restore [locate_data_file OCC16833-c1.draw] c1 +restore [locate_data_file OCC16833-c2.draw] c2 +restore [locate_data_file OCC16833-c3.draw] c3 +restore [locate_data_file OCC16833-c4.draw] c4 + +set mistake 0 +if [catch { fillcurves result c1 c2 c3 c4 } res] { + set mistake 1 + puts "Faulty ${BugNumber}: filling problem" +} else { + puts "Filling ${BugNumber} OK" + set What [whatis result] + if { [regexp "surface" $What] != 1 } { + set mistake 1 + } else { + set mistake 0 + } +} + +# Resume +puts "" +if { ${mistake} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + diff --git a/tests/bugs/moddata_1/bug17 b/tests/bugs/moddata_1/bug17 new file mode 100755 index 0000000000..85ae54b4df --- /dev/null +++ b/tests/bugs/moddata_1/bug17 @@ -0,0 +1,34 @@ +puts "TODO OCC12345 ALL: Faulty OCC17: here can be shading problem" + +puts "================" +puts "OCC17" +puts "================" +puts "" + +##################################################### +puts " Solid_14 will be the face which is unvisible during displaying entire solid." +##################################################### + +restore [locate_data_file OCC17.brep] sh + +checkshape sh + +explode sh f +renamevar sh_14 result +tclean result +vinit +vdisplay result +vsetdispmode result 1 +vfit + +set info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $info full tri +regexp { +([-0-9.+eE]+) +nodes} $info full nod + +if { $tri != 100 && $nod != 94 } { + puts "Faulty OCC17: here can be shading problem" +} + +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_1/bug17046 b/tests/bugs/moddata_1/bug17046 new file mode 100755 index 0000000000..09c419e18f --- /dev/null +++ b/tests/bugs/moddata_1/bug17046 @@ -0,0 +1,36 @@ +puts "============" +puts "OCC17046" +puts "============" +puts "" +####################################################################### +# Exception in Extrema_ExtPS on Mandriva2006 32-bits +####################################################################### + +set BugNumber OCC17046 + +# Create ellipsoidal surface +ellipse ell 0 0 300 1 0 0 150 100 +mkedge ell_e ell +wire ell_w ell_e +mkplane ell_f ell_w 1 + +box ell_t -10 -110 140 20 110 460 +cut ell_d ell_f ell_t + +revol ell_z ell_d 0 0 0 0 0 1 360 +explode ell_z F +mksurface su1 ell_z_1 + +# Perform projection +set BugStatus 0 +if [catch { proj su1 0 100 300 } ] { + set BugStatus 1 +} + +# Resume +puts "" +if { ${BugStatus} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} diff --git a/tests/bugs/moddata_1/bug17424 b/tests/bugs/moddata_1/bug17424 new file mode 100755 index 0000000000..7fd3b47b5c --- /dev/null +++ b/tests/bugs/moddata_1/bug17424 @@ -0,0 +1,33 @@ +pload QAcommands + +puts "============" +puts "OCC17424" +puts "============" +puts "" +###################################################### +# IntCurvesFace_ShapeIntersector does not find intersection point +###################################################### + +set BugNumber OCC17424 + +restore [locate_data_file OCC17424.brep] a + +set X_Pnt 86.960439048069262 +set Y_Pnt 1028.2863798310484 +set Z_Pnt -266.58526583558000 + +set X_Dir 0.25881904510252074 +set Y_Dir 0 +set Z_Dir -0.96592582628906831 + +set PInf 0. + +set aStatusList [OCC17424 a ${X_Pnt} ${Y_Pnt} ${Z_Pnt} ${X_Dir} ${Y_Dir} ${Z_Dir} ${PInf}] +regexp {OCC17424 status = +([-0-9.+eE]+)} ${aStatusList} full aStatus + +if { ${aStatus} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + diff --git a/tests/bugs/moddata_1/bug175 b/tests/bugs/moddata_1/bug175 new file mode 100755 index 0000000000..5297a495ea --- /dev/null +++ b/tests/bugs/moddata_1/bug175 @@ -0,0 +1,23 @@ + +puts "========" +puts "OCC175" +puts "========" +puts "" +########################################### +## ABug of a symmetry on this specific attached BREP shape. +########################################### + +restore [locate_data_file OCC175.brep] result +checkshape result + +regexp {SHAPE +: +([-0-9.+eE]+)} [nbshapes result] full col1 + +tmirror result 0 0 0 0 1 0 + +regexp {SHAPE +: +([-0-9.+eE]+)} [nbshapes result] full col2 +if { $col1 != $col2} { + puts "Error : Command mirror does NOT work properly. " +} + +set square 13091.3 +set 2dviewer 0 diff --git a/tests/bugs/moddata_1/bug183_1 b/tests/bugs/moddata_1/bug183_1 new file mode 100755 index 0000000000..1adf74fd34 --- /dev/null +++ b/tests/bugs/moddata_1/bug183_1 @@ -0,0 +1,19 @@ + +puts "========================" +puts " OCC183 " +puts "(case 1)" +puts "========================" +puts "" + +restore [locate_data_file f1] b1 +checkshape b1 + +restore [locate_data_file f4] b2 +checkshape b2 + +bcommon result b1 b2 +checkshape result + +set square 315.159 +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/bug183_2 b/tests/bugs/moddata_1/bug183_2 new file mode 100755 index 0000000000..babea15396 --- /dev/null +++ b/tests/bugs/moddata_1/bug183_2 @@ -0,0 +1,18 @@ + +puts "========================" +puts " OCC183 " +puts "(case 2)" +puts "========================" +puts "" + +restore [locate_data_file so1] b1 +checkshape b1 + +restore [locate_data_file so4] b2 +checkshape b2 + +bfuse result b1 b2 +checkshape result + +set square 942.478 +set 2dviewer 0 diff --git a/tests/bugs/moddata_1/bug183_3 b/tests/bugs/moddata_1/bug183_3 new file mode 100755 index 0000000000..e2e4342e1d --- /dev/null +++ b/tests/bugs/moddata_1/bug183_3 @@ -0,0 +1,19 @@ + +puts "========================" +puts " OCC183 " +puts "(case 3)" +puts "========================" +puts "" + +restore [locate_data_file so1] b1 +checkshape b1 + +restore [locate_data_file so4] b2 +checkshape b2 + +bcut result b1 b2 +checkshape result + +set square 863.938 +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/bug183_4 b/tests/bugs/moddata_1/bug183_4 new file mode 100755 index 0000000000..985cf6bec2 --- /dev/null +++ b/tests/bugs/moddata_1/bug183_4 @@ -0,0 +1,19 @@ + +puts "========================" +puts " OCC183 " +puts "(case 4)" +puts "========================" +puts "" + +restore [locate_data_file so1] b1 +checkshape b1 + +restore [locate_data_file so2] b2 +checkshape b2 + +bcommon result b1 b2 +checkshape result + +set square 392.699 +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/bug183_5 b/tests/bugs/moddata_1/bug183_5 new file mode 100755 index 0000000000..b170dada13 --- /dev/null +++ b/tests/bugs/moddata_1/bug183_5 @@ -0,0 +1,19 @@ + +puts "========================" +puts " OCC183 " +puts "(case 5)" +puts "========================" +puts "" + +restore [locate_data_file so4] b1 +checkshape b1 + +restore [locate_data_file so2] b2 +checkshape b2 + +bcommon result b1 b2 +checkshape result + +set square 198.863 +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/bug183_6 b/tests/bugs/moddata_1/bug183_6 new file mode 100755 index 0000000000..674c216e21 --- /dev/null +++ b/tests/bugs/moddata_1/bug183_6 @@ -0,0 +1,21 @@ + +puts "========================" +puts " OCC183 " +puts " CTS16184" +puts "(case 6)" +puts "========================" +puts "" + +restore [locate_data_file CTO900_cts16184a.rle] a +checkshape a +restore [locate_data_file cts16184b.brep] b +checkshape b + +bop a b +bopfuse result a b +checkshape -top result + +set square 0.0892544 +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_1/bug18541_1 b/tests/bugs/moddata_1/bug18541_1 new file mode 100755 index 0000000000..df6d7a818f --- /dev/null +++ b/tests/bugs/moddata_1/bug18541_1 @@ -0,0 +1,30 @@ +puts "============" +puts "OCC18541" +puts "============" +puts "" +####################################################################### +# Problem with GCPnts_UniformAbscissa class +####################################################################### + +set BugNumber OCC18541 + +restore [locate_data_file OCC18541.brep] b-curve + +set NbPoints 10 + +mkcurve res b-curve + +set ResList [uniformAbscissa res ${NbPoints}] + +if {[llength ${ResList}] > 15} { + set CasCurve_NbPoints [lindex ${ResList} 15] + puts "NbPoints = ${NbPoints} CasCurve_NbPoints = ${CasCurve_NbPoints}" + if { ${CasCurve_NbPoints} != ${NbPoints} } { + puts "Faulty ${BugNumber}" + } else { + puts "OK ${BugNumber}" + } +} else { + puts "Faulty ${BugNumber} : Bad draw command" +} + diff --git a/tests/bugs/moddata_1/bug18541_2 b/tests/bugs/moddata_1/bug18541_2 new file mode 100755 index 0000000000..5213f97d88 --- /dev/null +++ b/tests/bugs/moddata_1/bug18541_2 @@ -0,0 +1,27 @@ +puts "============" +puts "OCC18541" +puts "============" +puts "" +####################################################################### +# Problem with GCPnts_UniformAbscissa class +####################################################################### + +set BugNumber OCC18541 + +set maxR 100 +set minR 50 +set NbPoints 10 + +set ResList [uniformAbscissaEl ${maxR} ${minR} ${NbPoints}] + +if {[llength ${ResList}] > 15} { + set CasCurve_NbPoints [lindex ${ResList} 15] + puts "NbPoints = ${NbPoints} CasCurve_NbPoints = ${CasCurve_NbPoints}" + if { ${CasCurve_NbPoints} != ${NbPoints} } { + puts "Faulty ${BugNumber}" + } else { + puts "OK ${BugNumber}" + } +} else { + puts "Faulty ${BugNumber} : Bad draw command" +} diff --git a/tests/bugs/moddata_1/bug187 b/tests/bugs/moddata_1/bug187 new file mode 100755 index 0000000000..dc34ccfd3d --- /dev/null +++ b/tests/bugs/moddata_1/bug187 @@ -0,0 +1,16 @@ + +puts "================" +puts "OCC187" +puts "SAM1230" +puts "================" +puts "" + +################################################################# +## In time document with "1-exhaust.brep" imported shape saving exception "Access Violation" +## raises because of wrong PColgp_HArray1 allocation. +## StandardCSFDB_Allocate badly allocates memory blocks: bad address value retuned. +################################################################# + +restore [locate_data_file OCC187_from_bug_description.brep] result + +set 2dviewer 0 diff --git a/tests/bugs/moddata_1/bug188 b/tests/bugs/moddata_1/bug188 new file mode 100755 index 0000000000..6b840d4f0a --- /dev/null +++ b/tests/bugs/moddata_1/bug188 @@ -0,0 +1,19 @@ + +puts "============" +puts "BUC60929" +puts "OCC188" +puts "============" + +restore [locate_data_file BUC60929.brep] a + +explode a +checkshape a_1 +checkshape a_2 + +bcommon result a_1 a_2 +checkshape result + +set square 3739.26 +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_1/bug188_1 b/tests/bugs/moddata_1/bug188_1 new file mode 100755 index 0000000000..a7ff6d6824 --- /dev/null +++ b/tests/bugs/moddata_1/bug188_1 @@ -0,0 +1,17 @@ + +puts "================" +puts "OCC188" +puts "================" +puts "" + +restore [locate_data_file BUC60929.brep] a +explode a +checkshape a_1 +checkshape a_2 + +bcut result a_1 a_2 +checkshape result + +set square 669659 +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/bug19777 b/tests/bugs/moddata_1/bug19777 new file mode 100755 index 0000000000..5a05df0fa7 --- /dev/null +++ b/tests/bugs/moddata_1/bug19777 @@ -0,0 +1,27 @@ +puts "========" +puts "OCC19777" +puts "========" +puts "" +###################################################### +# FIP:Integration of new version of read/write VRML2.0 files +###################################################### + +set BugNumber OCC19777 + +if [catch { restore [locate_data_file OCC19777.brep] result} catch_result] { + puts "Error ${BugNumber}: there is reading problem" +} else { + +set nb_v_good 0 +set nb_e_good 0 +set nb_w_good 0 +set nb_f_good 1 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 1 + +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_1/bug20 b/tests/bugs/moddata_1/bug20 new file mode 100755 index 0000000000..b9f4dc0911 --- /dev/null +++ b/tests/bugs/moddata_1/bug20 @@ -0,0 +1,35 @@ +puts "TODO OCC12345 ALL: Faulty OCC20: here is shading problem" + +puts "================" +puts "OCC20" +puts "================" +puts "" +############################### +## Face apearence in shading mode is wrong +############################### + +pload QAcommands +restore [locate_data_file OCC20.brep] result + +checkshape result + +tclean result +vinit +vdisplay result +vsetdispmode result 1 + +vviewparams 5.1346924 95.358439 -4.910448 0.23495967 -0.302 0.923899 -0.7304302 0.5722587 0.372815 9.550874 -7.55706 -28.83166 + +isos result 0 +triangles result + +set info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $info full tri +regexp { +([-0-9.+eE]+) +nodes} $info full nod + +if { $tri != 416 || $nod != 367 } { + puts "Faulty OCC20: here is shading problem" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/bug203 b/tests/bugs/moddata_1/bug203 new file mode 100755 index 0000000000..6e9c8de18b --- /dev/null +++ b/tests/bugs/moddata_1/bug203 @@ -0,0 +1,41 @@ + +puts "========" +puts "OCC203" +puts "========" + +set dx 100 +set dy 100 +set dz 100 + +box b ${dx} ${dy} ${dz} + +renamevar b edge +explode edge e + +renamevar edge face +explode face f + +set radis 5 +set angle 45 + +chamf result1 face edge_1 face_3 A ${radis} ${angle} + +explode result1 e + +decho off +if { [catch {fillet result result1 ${radis} result1_1 ${radis} result1_7 } catch_result] } { + set mistake 1 +} else { + set mistake 0 +} +decho on + +if { $mistake != 0} { + puts "OK OCC203" + puts "Filet can not be created" +} else { + puts "Faulty OCC203: function FILLET works wrongly" + checkshape result +} + + diff --git a/tests/bugs/moddata_1/bug20391 b/tests/bugs/moddata_1/bug20391 new file mode 100755 index 0000000000..1d1972da25 --- /dev/null +++ b/tests/bugs/moddata_1/bug20391 @@ -0,0 +1,20 @@ +puts "============" +puts "OCC20391" +puts "============" +puts "" +####################################################################### +# Shape deforming via 3 scale factors raises error.Appendix for IPAL20387 +####################################################################### + +set BugNumber OCC20391 + +restore [locate_data_file bug19811_VanneMP_supports_tiges_V3.brep] a + +if [catch {deform result a 2 2 2}] { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +set square 2.71197e+07 +set 2dviewer 0 diff --git a/tests/bugs/moddata_1/bug20404 b/tests/bugs/moddata_1/bug20404 new file mode 100755 index 0000000000..b8b4ed7610 --- /dev/null +++ b/tests/bugs/moddata_1/bug20404 @@ -0,0 +1,30 @@ +puts "========================" +puts "OCC20404" +puts "========================" +puts "" +####################################################################### +# Command distmini gives wrong result for given shapes +####################################################################### + +set BugNumber OCC20404 + +restore [locate_data_file OCC20404-line1.brep] e1 +restore [locate_data_file OCC20404-line2.brep] e2 + +distmini d e1 e2 +puts "Distance=[dval d_val]" + +if [expr [dval d_val] > 7.e-13] { + set status 1 +} else { + set status 0 +} + +# Resume +puts "" +if { ${status} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + diff --git a/tests/bugs/moddata_1/bug20524 b/tests/bugs/moddata_1/bug20524 new file mode 100755 index 0000000000..ae86c3c346 --- /dev/null +++ b/tests/bugs/moddata_1/bug20524 @@ -0,0 +1,22 @@ +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" +} + diff --git a/tests/bugs/moddata_1/bug20616 b/tests/bugs/moddata_1/bug20616 new file mode 100755 index 0000000000..257fed4b09 --- /dev/null +++ b/tests/bugs/moddata_1/bug20616 @@ -0,0 +1,34 @@ +puts "========================" +puts "OCC20616" +puts "========================" +puts "" +####################################################################### +# Failed to save/restore [locate_data_file empty] face +####################################################################### + +set BugNumber OCC20616 + +set mistake 0 +foreach t {V E W F Sh So CS C} { + puts "shape type $t" + shape test $t + if [catch {save test $imagedir/${test_image}.brep}] { + puts "Faulty ${BugNumber} save $t" + set mistake 1 + } else { + puts "OK ${BugNumber} save $t" + } + if [catch {restore $imagedir/${test_image}.brep test}] { + puts "Faulty ${BugNumber} restore $t" + set mistake 1 + } else { + puts "OK ${BugNumber} restore $t" + } +} + +if {${mistake} !=0} { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + diff --git a/tests/bugs/moddata_1/bug20627 b/tests/bugs/moddata_1/bug20627 new file mode 100755 index 0000000000..a4fdba0ec9 --- /dev/null +++ b/tests/bugs/moddata_1/bug20627 @@ -0,0 +1,27 @@ +pload QAcommands + +puts "========" +puts "OCC20627" +puts "========" +puts "" +####################################################################### +# Memory leaks in BRepMesh +####################################################################### + +set BugNumber OCC20627 + +OCC20627 1 + +set listmem {} +set i_max 10000 +OCC20627 ${i_max} + +lappend listmem [expr [meminfo w] / 1024] +if { [checktrend $listmem 0 1 "Memory leak detected"] } { + puts "No memory leak" + break +} + + + + diff --git a/tests/bugs/moddata_1/bug20683 b/tests/bugs/moddata_1/bug20683 new file mode 100755 index 0000000000..de23ef0c65 --- /dev/null +++ b/tests/bugs/moddata_1/bug20683 @@ -0,0 +1,31 @@ +puts "========================" +puts "OCC20683" +puts "Customer : TATA" +puts "========================" +puts "" +####################################################################### +# BRepExtrema_ExtCC produces incomplete result. +####################################################################### + +set BugNumber OCC20683 + +# finite line is used +line ll 6834.93 -4100 500 0 0 1 +trim trll ll -1000 -500 +mkedge tree trll + +restore [locate_data_file OCC20683_circ1.brep] e1 +restore [locate_data_file OCC20683_circ2.brep] e2 + +set res_list [distmini d e1 e2] +set res_length [llength ${res_list}] +puts "res_length = ${res_length}" + +# Resume +puts "" +if { ${res_length} != 3 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + diff --git a/tests/bugs/moddata_1/bug20766 b/tests/bugs/moddata_1/bug20766 new file mode 100755 index 0000000000..41cc7a5c4d --- /dev/null +++ b/tests/bugs/moddata_1/bug20766 @@ -0,0 +1,34 @@ +pload QAcommands + +puts "============" +puts "OCC20766" +puts "============" +puts "" +####################################################################### +# Intersection of cone with plane in apex point crashes +####################################################################### + +set BugNumber OCC20766 + +OCC20766 plane 1 0 0 3522.4299999999998 + +set x -3522.4299999999998 +set y 2540 +set z -1461.4300000000001 +set dx 5449.7857099692965 +set dy 0 +set dz 5537.6938973109054 +set PI180 0.017453292519943295 +set semi-angle [expr 0.46689346637921703 / ${PI180}] +set radius 0. + +cone c ${x} ${y} ${z} ${dx} ${dy} ${dz} ${semi-angle} ${radius} + +if [catch { intersect result plane c } ] { + puts "Faulty ${BugNumber} : intersect is wrong" +} else { + puts "OK ${BugNumber}" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/bug20823 b/tests/bugs/moddata_1/bug20823 new file mode 100755 index 0000000000..32254fedac --- /dev/null +++ b/tests/bugs/moddata_1/bug20823 @@ -0,0 +1,33 @@ +puts "============" +puts "OCC20823" +puts "============" +puts "" +####################################################################### +# BRepFilletAPI_MakeFillet2d fails to build a chamfer +####################################################################### + +set BugNumber OCC20823 + +restore [locate_data_file OCC20823.brep] a +mkplane f a +explode f e + +if [catch { chfi2d result f f_1 f_2 CDD 10. 10. } ] { + puts "Faulty ${BugNumber} : chfi2d is wrong" +} else { +set length 267.795 + +set nb_v_good 4 +set nb_e_good 3 +set nb_w_good 1 +set nb_f_good 1 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 9 + +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/bug20904_1 b/tests/bugs/moddata_1/bug20904_1 new file mode 100755 index 0000000000..bfb1812a87 --- /dev/null +++ b/tests/bugs/moddata_1/bug20904_1 @@ -0,0 +1,49 @@ +puts "============" +puts "OCC20904" +puts "============" +puts "" +####################################################################### +# BRepBuilderAPI_Sewing produces a shape with big tolerance +####################################################################### + +set BugNumber OCC20904 + +restore [locate_data_file bug20904_face_bas.brep] a + +set tolerance_in 1.e-6 +set tolerance_out ${tolerance_in} +sewing result ${tolerance_in} a + +set tolerance_list [maxtolerance result] + +regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance_list full MaxFaceTolerance +regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance_list full MaxEdgeTolerance +regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance_list full MaxVertexTolerance + +set status 0 + +if { ${MaxFaceTolerance} > ${tolerance_out} } { + set status 1 + puts "Max Face Tolerance is bad" +} + +if { ${MaxEdgeTolerance} > ${tolerance_out} } { + set status 1 + puts "Max Edge Tolerance is bad" +} + +if { ${MaxVertexTolerance} > ${tolerance_out} } { + set status 1 + puts "Max Vertex Tolerance is bad" +} + +# Resume +puts "" +if { ${status} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +set square 30078.9 +set 2dviewer 0 diff --git a/tests/bugs/moddata_1/bug20904_2 b/tests/bugs/moddata_1/bug20904_2 new file mode 100755 index 0000000000..1952c95978 --- /dev/null +++ b/tests/bugs/moddata_1/bug20904_2 @@ -0,0 +1,48 @@ +puts "============" +puts "OCC20904" +puts "============" +puts "" +####################################################################### +# BRepBuilderAPI_Sewing produces a shape with big tolerance +####################################################################### + +set BugNumber OCC20904 + +restore [locate_data_file bug20904_Shell_argument.brep] a + +set tolerance_in 1.e-6 +set tolerance_out ${tolerance_in} +sewing result ${tolerance_in} a + +set tolerance_list [maxtolerance result] +regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance_list full MaxFaceTolerance +regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance_list full MaxEdgeTolerance +regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance_list full MaxVertexTolerance + +set status 0 + +if { ${MaxFaceTolerance} > ${tolerance_out} } { + set status 1 + puts "Max Face Tolerance is bad" +} + +if { ${MaxEdgeTolerance} > ${tolerance_out} } { + set status 1 + puts "Max Edge Tolerance is bad" +} + +if { ${MaxVertexTolerance} > ${tolerance_out} } { + set status 1 + puts "Max Vertex Tolerance is bad" +} + +# Resume +puts "" +if { ${status} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +set square 1.33253e+06 +set 2dviewer 0 diff --git a/tests/bugs/moddata_1/bug20904_3 b/tests/bugs/moddata_1/bug20904_3 new file mode 100755 index 0000000000..00672d6931 --- /dev/null +++ b/tests/bugs/moddata_1/bug20904_3 @@ -0,0 +1,49 @@ +puts "============" +puts "OCC20904" +puts "============" +puts "" +####################################################################### +# BRepBuilderAPI_Sewing produces a shape with big tolerance +####################################################################### + +set BugNumber OCC20904 + +restore [locate_data_file bug20904_face_bas.brep] a +restore [locate_data_file bug20904_Shell_argument.brep] b + +set tolerance_in 1.e-6 +set tolerance_out 1.e-5 +sewing result ${tolerance_in} a b + +set tolerance_list [maxtolerance result] +regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance_list full MaxFaceTolerance +regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance_list full MaxEdgeTolerance +regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance_list full MaxVertexTolerance + +set status 0 + +if { ${MaxFaceTolerance} > ${tolerance_out} } { + set status 1 + puts "Max Face Tolerance is bad" +} + +if { ${MaxEdgeTolerance} > ${tolerance_out} } { + set status 1 + puts "Max Edge Tolerance is bad" +} + +if { ${MaxVertexTolerance} > ${tolerance_out} } { + set status 1 + puts "Max Vertex Tolerance is bad" +} + +# Resume +puts "" +if { ${status} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +set square 1.36261e+06 +set 2dviewer 0 diff --git a/tests/bugs/moddata_1/bug21121 b/tests/bugs/moddata_1/bug21121 new file mode 100755 index 0000000000..6e51865404 --- /dev/null +++ b/tests/bugs/moddata_1/bug21121 @@ -0,0 +1,89 @@ +puts "TODO OCC11111 ALL: Faulty OCC21121" +puts "TODO OCC11111 ALL: Error : The square of result shape is" + +puts "============" +puts "OCC21121" +puts "============" +puts "" +####################################################################### +# Triangulation on face is not built +####################################################################### + +set BugNumber OCC21121 + +restore [locate_data_file OCC21121.brep] result + +tclean result + +set Deflection 0.1 +catch {incmesh result ${Deflection} } + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod +regexp {deflection +([-0-9.+eE]+)} $tri_info full defl + +if { [string compare $tcl_platform(platform) "windows"] == 0 } { + puts "OS = Windows NT" + set good_tri 1555 + set good_nod 1475 + set good_defl 3.5015692105840144e-06 +} else { + puts "OS = Linux" + set good_tri 1555 + set good_nod 1475 + set good_defl 3.5015692105840144e-06 +} + +proc GetPercent {Value GoodValue} { + set Percent 0. + if {${GoodValue} != 0.} { + set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] + } elseif {${Value} != 0.} { + set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] + } else { + set Percent 0. + } + return ${Percent} +} + +set percent_max 0.1 +set status 0 + +set triangle_percent [GetPercent ${tri} ${good_tri}] +puts "triangle_percent = ${triangle_percent}" +if { ${triangle_percent} > ${percent_max} } { + puts "triangle: Faulty ${BugNumber}" + set status 1 +} else { + puts "triangle: OK ${BugNumber}" +} + +set node_percent [GetPercent ${nod} ${good_nod}] +puts "node_percent = ${node_percent}" +if { ${node_percent} > ${percent_max} } { + puts "node: Faulty ${BugNumber}" + set status 1 +} else { + puts "node: OK ${BugNumber}" +} + +set deflection_percent [GetPercent ${defl} ${good_defl}] +puts "deflection_percent = ${deflection_percent}" +if { ${deflection_percent} > ${percent_max} } { + puts "deflection: Faulty ${BugNumber}" + set status 1 +} else { + puts "deflection: OK ${BugNumber}" +} + +# Resume +puts "" +if { ${status} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +set square 0 +set 2dviewer 0 diff --git a/tests/bugs/moddata_1/bug21122 b/tests/bugs/moddata_1/bug21122 new file mode 100755 index 0000000000..cece00a315 --- /dev/null +++ b/tests/bugs/moddata_1/bug21122 @@ -0,0 +1,104 @@ +puts "TODO OCC11111 ALL: Faulty OCC21122" + +puts "============" +puts "OCC21122" +puts "============" +puts "" +####################################################################### +# Incremental mesh error +####################################################################### + +set BugNumber OCC21122 + +restore [locate_data_file OCC21122.brep] result + +tclean result + +set Deflection 0.1 +catch {incmesh result ${Deflection} } + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod +regexp {Maximal deflection +([-0-9.+eE]+)} $tri_info full defl + + +if { [string compare $tcl_platform(platform) "windows"] == 0 } { + set good_tri 4322 + set good_nod 4324 + set good_defl 8.8817872205847652e-16 + puts "OS = Windows NT" +} else { + puts "OS = Linux" + set good_tri 4322 + set good_nod 4324 + set good_defl 8.8817872205847652e-16 +} + +proc GetPercent {Value GoodValue} { + set Percent 0. + if {${GoodValue} != 0.} { + set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] + } elseif {${Value} != 0.} { + set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] + } else { + set Percent 0. + } + return ${Percent} +} + +set percent_max 0.1 +set status 0 + +set triangle_percent [GetPercent ${tri} ${good_tri}] +puts "triangle_percent = ${triangle_percent}" +if { ${triangle_percent} > ${percent_max} } { + puts "triangle: Faulty ${BugNumber}" + set status 1 +} else { + puts "triangle: OK ${BugNumber}" +} + +set node_percent [GetPercent ${nod} ${good_nod}] +puts "node_percent = ${node_percent}" +if { ${node_percent} > ${percent_max} } { + puts "node: Faulty ${BugNumber}" + set status 1 +} else { + puts "node: OK ${BugNumber}" +} + +set deflection_percent [GetPercent ${defl} ${good_defl}] +puts "deflection_percent = ${deflection_percent}" +if { ${deflection_percent} > ${percent_max} } { + puts "deflection: Faulty ${BugNumber}" + set status 1 +} else { + puts "deflection: OK ${BugNumber}" +} + +set square 275.426 + +set nb_v_good 964 +set nb_e_good 964 +set nb_w_good 1 +set nb_f_good 1 +set nb_sh_good 1 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 1931 + +if { ${status} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +vinit +vdisplay result +vsetdispmode 1 +vfit + +set only_screen 1 + diff --git a/tests/bugs/moddata_1/bug211_1 b/tests/bugs/moddata_1/bug211_1 new file mode 100755 index 0000000000..4223a4cd49 --- /dev/null +++ b/tests/bugs/moddata_1/bug211_1 @@ -0,0 +1,19 @@ + +puts "========" +puts "OCC211" +puts "========" + +########################################## +##Error of fillet prolongation. +########################################## + +restore [locate_data_file OCC211.brep] a + +explode a e + +blend result a 10 a_24 +checkshape result + +set square 1.34399e+06 +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/bug211_2 b/tests/bugs/moddata_1/bug211_2 new file mode 100755 index 0000000000..5857e5b5be --- /dev/null +++ b/tests/bugs/moddata_1/bug211_2 @@ -0,0 +1,18 @@ + +puts "========" +puts "OCC211" +puts "========" + +########################################## +##Error of fillet prolongation. +########################################## + +restore [locate_data_file OCC211.brep] a + +explode a e + +blend result a 10 a_4 +checkshape result + +set square 1.34399e+06 +set 2dviewer 0 diff --git a/tests/bugs/moddata_1/bug21292 b/tests/bugs/moddata_1/bug21292 new file mode 100755 index 0000000000..8da1da51c1 --- /dev/null +++ b/tests/bugs/moddata_1/bug21292 @@ -0,0 +1,66 @@ +puts "========" +puts "OCC21292" +puts "========" +puts "" +###################################################### +# Shading on large model too long +###################################################### + +set BugNumber OCC21292 + +# 1 munite +cpulimit 60 + +restore [locate_data_file OCC21292.brep] result + +vinit +vsetdispmode 1 + +chrono h reset; chrono h start +# +# DISPLAY OPERATION ----- START +# +vdisplay result +# +# DISPLAY OPERATION ----- FINISH +# +chrono h stop; set CPU_time_List [chrono h show] + +set CPU_user_time [lindex ${CPU_time_List} 11] +puts "CPU_user_time=${CPU_user_time}" + + +set square 1.40193e+07 +set nb_v_good 372 +set nb_e_good 369 +set nb_w_good 2 +set nb_f_good 1 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 745 + + +if {[string compare $tcl_platform(platform) "windows"] == 0} { + puts "windows" + set Good_CPU_user_time 0. +} else { + if {[string compare $tcl_platform(os) "SunOS"] == 0} { + puts "SunOS" + set Good_CPU_user_time 6. + } else { + puts "Linux" + set Good_CPU_user_time 6. + } +} + +# Check time boolean operation +if {${Good_CPU_user_time} > ${CPU_user_time}} { + puts "OK ${BugNumber} : CPU user time is good" +} else { + puts "Faulty ${BugNumber} : CPU user time is wrong" +} + + +set only_screen 0 diff --git a/tests/bugs/moddata_1/bug217 b/tests/bugs/moddata_1/bug217 new file mode 100755 index 0000000000..301eceda1c --- /dev/null +++ b/tests/bugs/moddata_1/bug217 @@ -0,0 +1,17 @@ + +puts "========" +puts "OCC217" +puts "========" + +########################################## +##nurbsconvert problem +########################################## + +box b -5 -5 -5 10 10 10 +psphere s 6 + +bfuse result s b +checkshape result + +set square 618.85 +set 2dviewer 0 diff --git a/tests/bugs/moddata_1/bug21858 b/tests/bugs/moddata_1/bug21858 new file mode 100755 index 0000000000..e9a8b9e0aa --- /dev/null +++ b/tests/bugs/moddata_1/bug21858 @@ -0,0 +1,50 @@ +puts "============" +puts "OCC21858" +puts "============" +puts "" +#################################### +# Visualization hangs on this face ( OCC21858.brep ) +#################################### + +set BugNumber OCC21858 +cpulimit 40 +restore [locate_data_file OCC21858.brep] result + +set length 6.48642 + +set nb_v_good 9 +set nb_e_good 10 +set nb_w_good 1 +set nb_f_good 1 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 21 + +set only_screen 0 + +vinit +vsetdispmode 1 +dchrono TestTimer reset +dchrono TestTimer start +vdisplay result +dchrono TestTimer stop +vfit +puts "" +set time_o 0.1 +set tim [ dchrono TestTimer show ] +regexp {Elapsed time: +([-0-9.+eE]+) Hours +([-0-9.+eE]+) Minutes +([-0-9.+eE]+) Seconds} $tim full hourVDisplay minuVDisplay secoVDisplay + +set timVDisplay [expr $hourVDisplay * 3600 + $minuVDisplay * 60 + $secoVDisplay ] + +if { ${tim} < ${time_o} } { + set chro "CHRONO : Faulty (${timVDisplay}%)" + set status 1 + puts ${chro} +} else { + puts "${BugNumber} OK" + set status 0 +} +puts "timVDisplay = ${timVDisplay}" + diff --git a/tests/bugs/moddata_1/bug22039 b/tests/bugs/moddata_1/bug22039 new file mode 100755 index 0000000000..39fe570849 --- /dev/null +++ b/tests/bugs/moddata_1/bug22039 @@ -0,0 +1,46 @@ +pload QAcommands + +puts "================" +puts "OCC22039" +puts "================" +puts "" +####################################################################################### +# Incorrect interactive detection (highlights) of elements +###################################################################################### + +set BugNumber OCC22039 + +restore [locate_data_file OCC12121-CrankArm.brep] result + +vinit +vsetdispmode 1 +vdisplay result +vfit + +set x1 101 +set y1 199 +set Color [QAGetPixelColor ${x1} ${y1}] + +vmoveto ${x1} ${y1} +set ColorMove [QAGetPixelColor ${x1} ${y1}] + +vselect ${x1} ${y1} +set ColorSelect [QAGetPixelColor ${x1} ${y1}] + +set Color_Status 0 +if { ${Color} != ${ColorMove} && ${Color} != ${ColorSelect} && ${ColorMove} != ${ColorSelect} } { + set Color_Status 0 +} else { + set Color_Status 1 +} + +# Resume +puts "" +if { ${Color_Status} != 0} { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +set square 24859.6 +set only_screen 1 diff --git a/tests/bugs/moddata_1/bug22043 b/tests/bugs/moddata_1/bug22043 new file mode 100755 index 0000000000..67764cc1f2 --- /dev/null +++ b/tests/bugs/moddata_1/bug22043 @@ -0,0 +1,25 @@ +puts "============" +puts "OCC22043" +puts "============" +puts "" +####################################################################### +# Checkshape command does not return faulty shapes for the face. CAS63-sp10-*. Appendix to SALOME bug 002019 +####################################################################### + +set BugNumber OCC22043 + +puts "Load shape ..." +restore [locate_data_file bug22043_f181.brep] result + +decho off +set che [checkshape result] +decho on + +if {[regexp {Faulty} $che]} { + puts "OK ${BugNumber} : The face f181 can not be valid because at least it contain self-intersected wire" +} else { + puts "Faulty ${BugNumber} : The face f181 can not be valid because at least it contain self-intersected wire" +} + + +set 2dviewer 0 diff --git a/tests/bugs/moddata_1/bug22080 b/tests/bugs/moddata_1/bug22080 new file mode 100755 index 0000000000..bdf9f890fe --- /dev/null +++ b/tests/bugs/moddata_1/bug22080 @@ -0,0 +1,26 @@ +puts "TODO OCC11111 ALL: Faulty OCC22080 : The face f contains degenerated edge that is far-fetched one" + +puts "============" +puts "OCC22080" +puts "============" +puts "" +####################################################################### +# Checkshape command does not return faulty shapes for the face. CAS63-sp10-*. Appendix to SALOME bug IPAL22072 +####################################################################### + +set BugNumber OCC22080 + +puts "Load shape ..." +restore [locate_data_file bug22080_fx.brep] result + +decho off +set che [checkshape result] +decho on + +if {[regexp {Faulty} $che]} { + puts "OK ${BugNumber} : The face f contains degenerated edge that is far-fetched one" +} else { + puts "Faulty ${BugNumber} : The face f contains degenerated edge that is far-fetched one" +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_1/bug22194 b/tests/bugs/moddata_1/bug22194 new file mode 100755 index 0000000000..d767394eab --- /dev/null +++ b/tests/bugs/moddata_1/bug22194 @@ -0,0 +1,25 @@ +puts "TODO ?OCC12345 ALL: An exception was caught" +puts "TODO ?OCC12345 ALL: \\*\\* Exception \\*\\*.*" +puts "TODO ?OCC12345 ALL: TEST INCOMPLETE" +puts "============" +puts "OCC22194" +puts "============" +puts "" +####################################################################### +# Exception in LocOpe_SplitShape algoritm +####################################################################### + +# TEMPORARY TEST! NO COMPLITED!!!!! + +set BugNumber OCC22194 + +restore [locate_data_file OCC22194-sh.brep] s +restore [locate_data_file OCC22194-pl.brep] pl +section r s pl +explode r +explode s F +splitshape result s s_1 r_1 s_5 r_2 s_13 r_3 s_22 r_4 s_31 r_5 s_39 r_6 s_46 r_7 s_51 r_8 s_68 r_9 s_90 r_10 s_112 r_11 s_133 r_12 s_143 r_13 s_146 r_14 s_151 r_15 s_161 r_16 s_176 r_17 s_183 r_18 s_201 r_19 s_213 r_20 s_213 r_21 s_235 r_22 s_257 r_23 s_270 r_24 s_285 r_25 s_300 r_26 s_314 r_27 +set square 24549.6 +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_1/bug22241 b/tests/bugs/moddata_1/bug22241 new file mode 100755 index 0000000000..13cac44f32 --- /dev/null +++ b/tests/bugs/moddata_1/bug22241 @@ -0,0 +1,51 @@ +puts "========" +puts "OCC22241" +puts "========" +puts "" +########################################################### +# The bug is appendix to the Salome Bug 0021148 +########################################################### + +set BugNumber OCC22241 + +restore [locate_data_file bug22241_c1.draw] c1 +restore [locate_data_file bug22241_c2.draw] c2 + +set extrema_res [extrema c1 c2] +set extrema_length [llength ${extrema_res} ] + +if {${extrema_length} < 8 } { + puts "${BugNumber}: Faulty" +} else { + regexp {Extrema 1 is point : +([-0-9.+eE]+) +([-0-9.+eE]+) +([-0-9.+eE]+)} $extrema_res full X Y Z + set good_X 1 + set good_Y 3.0891916307971289e-33 + set good_Z 0.059999999999999998 + + set percent_max 0.1 + +proc GetPercent {Value GoodValue} { + set Percent 0. + if {${GoodValue} != 0.} { + set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] + } elseif {${Value} != 0.} { + set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] + } else { + set Percent 0. + } + return ${Percent} +} + set X_percent [GetPercent ${X} ${good_X}] + set Y_percent [GetPercent ${Y} ${good_Y}] + set Z_percent [GetPercent ${Z} ${good_Z}] + + if {${X_percent} > ${percent_max} || ${Y_percent} > ${percent_max} || ${Z_percent} > ${percent_max}} { + puts "X = ${X} Y = ${Y} Z = ${Z}" + puts "X_percent = ${X_percent} Y_percent = ${Y_percent} Z_percent = ${Z_percent}" + puts "${BugNumber}: Faulty" + } else { + puts "${BugNumber}: OK" + } + +} + diff --git a/tests/bugs/moddata_1/bug22296 b/tests/bugs/moddata_1/bug22296 new file mode 100755 index 0000000000..8a4cf3d154 --- /dev/null +++ b/tests/bugs/moddata_1/bug22296 @@ -0,0 +1,60 @@ +puts "============" +puts "OCC22296" +puts "============" +puts "" +####################################################################### +# The algorithm BRepSweep_MakeRevol produce non-licit toroidal based face. +# Appendix to the SALOME bug: IPAL22181 +####################################################################### + +set BugNumber OCC22296 + +restore [locate_data_file bug22296_ring.brep] b1 +revol r b1 0.6 3 0 0 0 1 -90 + +set E_Length [explode r f] + +if { ${E_Length} < 6} { + puts "Bad format of explode draw-command" + puts "Faulty ${BugNumber}" +} else { + + copy r_2 f + + set good_umin 0 + set good_umax 6.28319 + set good_vmin 0 + set good_vmax 6.28319 + + set xlist [xbounds f] + set umin [lindex $xlist 0] + set umax [lindex $xlist 1] + set vmin [lindex $xlist 2] + set vmax [lindex $xlist 3] + + set bad_bound 0 + if {${umin} < ${good_umin}} { + puts "umin: ${umin} is wrong" + set bad_bound[expr ${bad_bound} + 1] + } + if {${umax} > ${good_umax}} { + puts "umax: ${umax} is wrong" + set bad_bound [expr ${bad_bound} + 10] + } + if {${vmin} < ${good_vmin}} { + puts "vmin: ${vmin} is wrong" + set bad_bound [expr ${bad_bound} + 100] + } + if {${vmax} > ${good_vmax}} { + puts "vmax: ${vmax} is wrong" + set bad_bound [expr ${bad_bound} + 1000] + } + + if {${bad_bound} > 0 } { + puts "${BugNumber}: Faulty" + } else { + puts "OK ${BugNumber}" + } + +} + diff --git a/tests/bugs/moddata_1/bug22303 b/tests/bugs/moddata_1/bug22303 new file mode 100755 index 0000000000..49f865b87d --- /dev/null +++ b/tests/bugs/moddata_1/bug22303 @@ -0,0 +1,31 @@ +puts "========================" +puts "OCC22303" +puts "========================" +puts "" +####################################################################### +# The algorithm BRepExtrema_DistShapeShape crashes with exception if one of the shapes does non contain vertices +####################################################################### + +set BugNumber OCC22303 + +line ll 0 20 0 1 0 0 +mkedge ee ll +psphere ss 10 + +distmini dd ee ss +puts "Distance=[dval dd_val]" + +if [expr [dval dd_val] - 10. > 1.e-3 ] { + set status 1 +} else { + set status 0 +} + +# Resume +puts "" +if { ${status} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + diff --git a/tests/bugs/moddata_1/bug22459 b/tests/bugs/moddata_1/bug22459 new file mode 100755 index 0000000000..7d4bb7d8d9 --- /dev/null +++ b/tests/bugs/moddata_1/bug22459 @@ -0,0 +1,32 @@ +puts "============" +puts "OCC22459" +puts "============" +####################################################################### +# The ImportExport sample crash +####################################################################### + +catch { pload XDE } + +set BugNumber OCC22459 + +stepread [locate_data_file OCC22459-TEST2.stp] result * + +set exception_status 0 +set msg [ tpstat c ] +set index [ lsearch $msg Exeption ] + +if {$index > -1} { + set exception_status 1 +} + +if { ${exception_status} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +set 2dviewer 0 + + + + diff --git a/tests/bugs/moddata_1/bug22489_1 b/tests/bugs/moddata_1/bug22489_1 new file mode 100755 index 0000000000..e498532566 --- /dev/null +++ b/tests/bugs/moddata_1/bug22489_1 @@ -0,0 +1,27 @@ +puts "================" +puts "OCC22489" +puts "================" +puts "" +####################################################################### +# BRepClass3d_SolidClassifier::PerformInfinitePoint() gives wrong result on the given solid +####################################################################### + +set BugNumber OCC22489 + +restore [locate_data_file bug22489_Solid_2.brep] b + +point p 1000 1000 1000 + +set res [split [bclassify b p] ] + +set ll [llength ${res}] +if {${ll} < 4} { + puts "Bad format of bclassify draw-command; Faulty ${BugNumber}" +} else { + if {[regexp {The point is OUT of shape} $res]} { + puts "OK ${BugNumber}" + } else { + puts "Faulty ${BugNumber}" + } +} + diff --git a/tests/bugs/moddata_1/bug22489_2 b/tests/bugs/moddata_1/bug22489_2 new file mode 100755 index 0000000000..bd36e8cb2a --- /dev/null +++ b/tests/bugs/moddata_1/bug22489_2 @@ -0,0 +1,29 @@ +puts "================" +puts "OCC22489" +puts "================" +puts "" +####################################################################### +# BRepClass3d_SolidClassifier::PerformInfinitePoint() gives wrong result on the given solid +####################################################################### + +set BugNumber OCC22489 + +restore [locate_data_file bug22489_sew1.brep] s + +mksol b s + +point p 1000 1000 1000 + +set res [split [bclassify b p] ] + +set ll [llength ${res}] +if {$ll < 4} { + puts "Bad format of bclassify draw-command; Faulty ${BugNumber}" +} else { + if {[regexp {The point is OUT of shape} $res]} { + puts "OK ${BugNumber}" + } else { + puts "Faulty ${BugNumber}" + } +} + diff --git a/tests/bugs/moddata_1/bug22494 b/tests/bugs/moddata_1/bug22494 new file mode 100755 index 0000000000..bd56b21381 --- /dev/null +++ b/tests/bugs/moddata_1/bug22494 @@ -0,0 +1,27 @@ +puts "================" +puts "OCC22494" +puts "================" +puts "" +####################################################################### +# BRepClass_FaceClassifier bug (ref SALOME issue 21185) +####################################################################### + +set BugNumber OCC22494 + +restore [locate_data_file bug22494_Pb_belogToGeom_FACE.brep] Face + +point p -3.53254182396379145e-05 0.000877856930738714065 + +set res [split [b2dclassify Face p] ] + +set ll [llength ${res}] +if {${ll} < 4} { + puts "Bad format of bclassify draw-command; Faulty ${BugNumber}" +} else { + if {[regexp {The point is ON shape} $res]} { + puts "OK ${BugNumber}" + } else { + puts "Faulty ${BugNumber}" + } +} + diff --git a/tests/bugs/moddata_1/bug22529 b/tests/bugs/moddata_1/bug22529 new file mode 100755 index 0000000000..c465974526 --- /dev/null +++ b/tests/bugs/moddata_1/bug22529 @@ -0,0 +1,18 @@ +puts "========" +puts "OCC22529" +puts "========" +puts "" +########################################################### +# FitALL works incorrectly for small flat shapes +########################################################### + +set BugNumber OCC22529 + +restore [locate_data_file OCC22529.brep] result + +vinit +vdisplay result +vfit + +set length 0.04 +set only_screen 1 diff --git a/tests/bugs/moddata_1/bug22554_1 b/tests/bugs/moddata_1/bug22554_1 new file mode 100755 index 0000000000..f2907cb080 --- /dev/null +++ b/tests/bugs/moddata_1/bug22554_1 @@ -0,0 +1,22 @@ +puts "============" +puts "OCC22554" +puts "============" +puts "" +####################################################################### +# Application hangs on selection +####################################################################### + +set BugNumber OCC22554 + +vinit +vpoint p1 0 0 0 +vpoint p2 5 5 0 +vpoint p3 10 0 0 +vcircle result p1 p2 p3 0 +verase p1 p2 p3 +vfit + +puts "OK ${BugNumber}" + +set only_screen 1 + diff --git a/tests/bugs/moddata_1/bug22554_2 b/tests/bugs/moddata_1/bug22554_2 new file mode 100755 index 0000000000..e42bbf0926 --- /dev/null +++ b/tests/bugs/moddata_1/bug22554_2 @@ -0,0 +1,21 @@ +puts "============" +puts "OCC22554" +puts "============" +puts "" +####################################################################### +# Application hangs on selection +####################################################################### + +set BugNumber OCC22554 + +vinit +vpoint p1 0 0 0 +vpoint p2 30 0 0 +vpoint p3 30 30 0 +vplane result p1 p2 p3 +verase p1 p2 p3 +vfit + +puts "OK ${BugNumber}" + +set only_screen 1 diff --git a/tests/bugs/moddata_1/bug22554_3 b/tests/bugs/moddata_1/bug22554_3 new file mode 100755 index 0000000000..a3e7825abc --- /dev/null +++ b/tests/bugs/moddata_1/bug22554_3 @@ -0,0 +1,21 @@ +puts "============" +puts "OCC22554" +puts "============" +puts "" +####################################################################### +# Application hangs on selection +####################################################################### + +set BugNumber OCC22554 + +vinit +vpoint p1 0 0 0 +vpoint p2 50 0 0 +vpoint p3 25 40 0 +vtriangle result p1 p2 p3 +verase p1 p2 p3 +vfit + +puts "OK ${BugNumber}" + +set only_screen 1 diff --git a/tests/bugs/moddata_1/bug22554_4 b/tests/bugs/moddata_1/bug22554_4 new file mode 100755 index 0000000000..11427172fd --- /dev/null +++ b/tests/bugs/moddata_1/bug22554_4 @@ -0,0 +1,20 @@ +puts "============" +puts "OCC22554" +puts "============" +puts "" +####################################################################### +# Application hangs on selection +####################################################################### + +set BugNumber OCC22554 + +vinit +vpoint p1 0 0 0 +vpoint p2 50 0 0 +vsegment segment p1 p2 +verase p1 p2 +vfit + +puts "OK ${BugNumber}" + +set only_screen 1 diff --git a/tests/bugs/moddata_1/bug22623 b/tests/bugs/moddata_1/bug22623 new file mode 100755 index 0000000000..a2a9aae71c --- /dev/null +++ b/tests/bugs/moddata_1/bug22623 @@ -0,0 +1,44 @@ +puts "============" +puts "OCC22623" +puts "============" +puts "" +puts "ATTENTION! TEST IN DEBUG MODE!" +puts "" +####################################################################### +# Use of uninitializaed variables in HLRBRep_Curve::UpdateMinMax in debug mode +####################################################################### + +catch { pload XDE } + +set BugNumber OCC22623 + +stepread [locate_data_file OCC22623-fg5test.step] a * + +# Axes for a_3 only +hprj p1 -166.887936587259 -524.121423723229 -3.52089319794717 0. 0. 1. 1. 0. 0. + +# Axes for complete assembly +compound a_1 a_2 a_3 a_4 a_5 a +houtl o1 a_3 +hfill o1 p1 0 +hload o1 +hsetprj p1 +hupdate + +set exception_status 0 +set r [hhide] +set index [lsearch $r exception] +if {$index > -1} { + set exception_status 1 +} + +hres2d + +# Resume +puts "" +if { ${exception_status} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + diff --git a/tests/bugs/moddata_1/bug22694 b/tests/bugs/moddata_1/bug22694 new file mode 100755 index 0000000000..deae6f1742 --- /dev/null +++ b/tests/bugs/moddata_1/bug22694 @@ -0,0 +1,48 @@ +puts "===========" +puts "OCC22694" +puts "===========" +###################################################### +# Wrong result obntained after GeomLib::ExtendSurfByLength +###################################################### + +set BugNumber OCC22694 + +catch {pload DCAF} +catch {pload XDE} + +# Create a new document and set UndoLimit +NewDocument D +UndoLimit D 100 + +# Open a transaction +NewCommand D + +ReadStep D [locate_data_file OCC22694-rationalSurface.stp] + +XGetShape sh D 0:1:1:1 + +explode sh F +mksurface ss sh_1 +extendsurf ss 10 2 U +mkface result ss + +vdisplay sh_1 +vdisplay result + +vsetdispmode 1 +vfit + +set square 76338.8 + +set nb_v_good 4 +set nb_e_good 4 +set nb_w_good 1 +set nb_f_good 1 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 0 +set nb_shape_good 10 + +set 2dviewer 1 + diff --git a/tests/bugs/moddata_1/bug22703 b/tests/bugs/moddata_1/bug22703 new file mode 100755 index 0000000000..c954d507d9 --- /dev/null +++ b/tests/bugs/moddata_1/bug22703 @@ -0,0 +1,26 @@ +puts "===========" +puts "OCC22703" +puts "===========" +puts "" +####################################################################### +# Exception in bop command for the specified shapes +####################################################################### + +set BugNumber OCC22703 + +puts "Load first shape ..." +restore [locate_data_file OCC22703-faceAC.brep] b1 + +puts "Load second shape ..." +restore [locate_data_file OCC22703-pln.brep] b2 + +puts "Prepare boolean operation ..." + +if [catch { bop b1 b2 } catch_result] { + puts "Faulty ${BugNumber}" +} else { + puts "${BugNumber} OK" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_1/bug22720 b/tests/bugs/moddata_1/bug22720 new file mode 100755 index 0000000000..919f4aef4e --- /dev/null +++ b/tests/bugs/moddata_1/bug22720 @@ -0,0 +1,20 @@ +puts "============" +puts "OCC22720" +puts "============" +puts "" +####################################################################### +# Wrong intersection point for the case of intersection between sphere and plane +####################################################################### + +set BugNumber OCC22720 + +restore [locate_data_file OCC22720-f1.brep] f1 +restore [locate_data_file OCC22720-f2.brep] f2 + +mksurface s1 f1 +mksurface s2 f2 + +trim s1t s1 0 2 0 2 +intersect result s1t s2 + +set 3dviewer 0 diff --git a/tests/bugs/moddata_1/bug22723 b/tests/bugs/moddata_1/bug22723 new file mode 100755 index 0000000000..cc02453aba --- /dev/null +++ b/tests/bugs/moddata_1/bug22723 @@ -0,0 +1,32 @@ +puts "============" +puts "OCC22723" +puts "============" +puts "" +####################################################################### +# Wrong intersection curve for the case of intersection between cylinder and plane +####################################################################### + +set BugNumber OCC22723 + +restore [locate_data_file bug22723_fz44.brep] b1 +restore [locate_data_file bug22723_fz7.brep] b2 +mksurface s1 b1 +mksurface s2 b2 +intersect i s1 s2 + +regexp {Parameters : ([-0-9.+eE]+) ([-0-9.+eE]+)} [dump i] full a1 a2 +set status 0 + +if { ${a1}>=0 } { + if { ${a2}<6.29 } { + set status 1 + } +} + +if { ${status}==1 } { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} + +set 3dviewer 0 diff --git a/tests/bugs/moddata_1/bug22726 b/tests/bugs/moddata_1/bug22726 new file mode 100755 index 0000000000..af1463101a --- /dev/null +++ b/tests/bugs/moddata_1/bug22726 @@ -0,0 +1,21 @@ +puts "============" +puts "OCC22726" +puts "============" +puts "" +####################################################################### +# Exception on restoring shape +####################################################################### + +set BugNumber OCC22726 + +restore [locate_data_file OCC22726-b211.brep] result + +whatis result + +vinit +vdisplay result +vfit + +set square 812.984 +set 3dviewer 1 + diff --git a/tests/bugs/moddata_1/bug22733 b/tests/bugs/moddata_1/bug22733 new file mode 100755 index 0000000000..916645b137 --- /dev/null +++ b/tests/bugs/moddata_1/bug22733 @@ -0,0 +1,27 @@ +puts "========" +puts "OCC22733" +puts "========" +puts "" +########################################################### +# Empty result for the extrema between a circle and a line +########################################################### + +set BugNumber OCC22733 + +restore [locate_data_file bug22733_ez4.brep] ez4 +restore [locate_data_file bug22733_ez17.brep] ez17 + +mkcurve c4 ez4 +mkcurve c17 ez17 + +set extrema_res [extrema c4 c17] +set extrema_length [llength ${extrema_res} ] + +if {${extrema_length} != 1 } { + puts "${BugNumber}: Faulty" +} else { + puts "${BugNumber}: OK" +} + +set 3dviewer 0 + diff --git a/tests/bugs/moddata_1/bug22736 b/tests/bugs/moddata_1/bug22736 new file mode 100755 index 0000000000..f710e45c31 --- /dev/null +++ b/tests/bugs/moddata_1/bug22736 @@ -0,0 +1,31 @@ +pload QAcommands + +puts "========" +puts "OCC22736" +puts "========" +puts "" +########################################################### +# Incorrect Transformation +########################################################### + +set BugNumber OCC22736 + +set X_mirrorFirstPoint 2.0 +set Y_mirrorFirstPoint 1.0 +set X_mirrorSecondPoint 3.0 +set Y_mirrorSecondPoint 1.0 +set X_p1 1.0 +set Y_p1 0.0 +set X_p2 1.0 +set Y_p2 2.0 +set result_info [OCC22736 ${X_mirrorFirstPoint} ${Y_mirrorFirstPoint} ${X_mirrorSecondPoint} ${Y_mirrorSecondPoint} ${X_p1} {$Y_p1} ${X_p2} ${Y_p2}] +regexp {Status = ([-0-9.+eE]+)} $result_info full status + +# Resume +puts "" +if { ${status} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + diff --git a/tests/bugs/moddata_1/bug22757 b/tests/bugs/moddata_1/bug22757 new file mode 100755 index 0000000000..48fed27774 --- /dev/null +++ b/tests/bugs/moddata_1/bug22757 @@ -0,0 +1,23 @@ +puts "================" +puts "OCC22757" +puts "================" +puts "" +####################################################################################### +# Exception in ShapeHealing +###################################################################################### + +set BugNumber OCC22757 + +catch {pload XDE} + +set status 0 +restore [locate_data_file BUC60887.brep] res +set TestVar [ catch {fixshape result res 0.01} ] + +if { ${TestVar} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +set 3dviewer 0 diff --git a/tests/bugs/moddata_1/bug22759 b/tests/bugs/moddata_1/bug22759 new file mode 100755 index 0000000000..abce98ab17 --- /dev/null +++ b/tests/bugs/moddata_1/bug22759 @@ -0,0 +1,104 @@ +puts "TODO OCC11111 ALL: TEST INCOMPLETE" + +cpulimit 30 + +puts "============" +puts "OCC22759" +puts "============" +puts "" +####################################################################### +# Crash during shape visualization +####################################################################### + +set BugNumber OCC22759 + +catch { pload XDE } + +restore [locate_data_file OCC22759-weldt6.brep] result +checkshape result +tclean result + +set Deflection 0.001 +incmesh result ${Deflection} + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +regexp {deflection +([-0-9.+eE]+)} $tri_info full defl + +set os "ALL" +if {[array get env os_type] != ""} { + set os $env(os_type) +} + +if { [regexp {Windows} $os ] } { + puts "OS = Windows NT" + set good_tri 248672 + set good_nod 127078 + set good_defl 0.0028424483708953232 +} else { + puts "OS = Linux" + set good_tri 248724 + set good_nod 127104 + set good_defl 0.0028424483709341111 +} + +proc GetPercent {Value GoodValue} { + set Percent 0. + if {${GoodValue} != 0.} { + set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] + } elseif {${Value} != 0.} { + set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] + } else { + set Percent 0. + } + return ${Percent} +} + +set percent_max 0.1 +set status 0 + +set triangle_percent [GetPercent ${tri} ${good_tri}] +puts "triangle_percent = ${triangle_percent}" +if { ${triangle_percent} > ${percent_max} } { + puts "triangle: Faulty ${BugNumber}" + set status 1 +} else { + puts "triangle: OK ${BugNumber}" +} + +set node_percent [GetPercent ${nod} ${good_nod}] +puts "node_percent = ${node_percent}" +if { ${node_percent} > ${percent_max} } { + puts "node: Faulty ${BugNumber}" + set status 1 +} else { + puts "node: OK ${BugNumber}" +} + +set deflection_percent [GetPercent ${defl} ${good_defl}] +puts "deflection_percent = ${deflection_percent}" +if { ${deflection_percent} > ${percent_max} } { + puts "deflection: Faulty ${BugNumber}" + set status 1 +} else { + puts "deflection: OK ${BugNumber}" +} + +# Resume +puts "" +if { ${status} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +vinit +vdisplay result +vfit + +vsetdispmode 1 + +set only_screen 1 +set square 0 diff --git a/tests/bugs/moddata_1/bug22761 b/tests/bugs/moddata_1/bug22761 new file mode 100755 index 0000000000..3476f7aec1 --- /dev/null +++ b/tests/bugs/moddata_1/bug22761 @@ -0,0 +1,27 @@ +puts "================" +puts "OCC22761" +puts "================" +puts "" +puts "ATTENTION! TEST IN DEBUG MODE!" +puts "" +####################################################################################### +# Exception in ModelingData in debug mode +####################################################################################### + +set BugNumber OCC22761 + +restore [locate_data_file OCC22761-TransmissionTestModel5-notfixed.brep] result + +set nb_v_good 2171 +set nb_e_good 1210 +set nb_w_good 226 +set nb_f_good 213 +set nb_sh_good 0 +set nb_sol_good 0 +set nb_compsol_good 0 +set nb_compound_good 1 +set nb_shape_good 3821 + +set length 217577 +set 3dviewer 0 + diff --git a/tests/bugs/moddata_1/bug22789 b/tests/bugs/moddata_1/bug22789 new file mode 100755 index 0000000000..0f6bf7e0f8 --- /dev/null +++ b/tests/bugs/moddata_1/bug22789 @@ -0,0 +1,24 @@ +puts "===========" +puts "OCC22789" +puts "===========" +puts "" +####################################################################### +# Exception in Encode regularity if edge has no pcurve +####################################################################### + +set BugNumber OCC22789 + +restore [locate_data_file OCC22789-cErr.brep] result + +if [catch { encoderegularity result } catch_result] { + puts "Faulty ${BugNumber}" +} else { + puts "${BugNumber} OK" +} + +vinit +vdisplay result +vfit + +set 3dviewer 1 + diff --git a/tests/bugs/moddata_1/bug227_1 b/tests/bugs/moddata_1/bug227_1 new file mode 100755 index 0000000000..fa5ae7e57a --- /dev/null +++ b/tests/bugs/moddata_1/bug227_1 @@ -0,0 +1,25 @@ + +puts "========" +puts "OCC227" +puts "(case 1)" +puts "========" + +############################################################## +##Incorrect result with missing faces after a fuse operation beetween the box and the wedge. +############################################################### + +restore [locate_data_file OCC227a.brep] a +fsameparameter a +updatetolerance a +checkshape a + +restore [locate_data_file OCC227b.brep] b +fsameparameter b +updatetolerance b +checkshape b + +bfuse result a b +checkshape result + +set square 1583.92 +set 2dviewer 0 diff --git a/tests/bugs/moddata_1/bug227_2 b/tests/bugs/moddata_1/bug227_2 new file mode 100755 index 0000000000..0f7bfb19b0 --- /dev/null +++ b/tests/bugs/moddata_1/bug227_2 @@ -0,0 +1,25 @@ + +puts "========" +puts "OCC227" +puts "(case 2)" +puts "========" + +############################################################## +##Incorrect result with missing faces after a fuse operation beetween the box and the wedge. +############################################################### + +restore [locate_data_file OCC227a.brep] a +fsameparameter a +updatetolerance a +checkshape a + +restore [locate_data_file OCC227b.brep] b +fsameparameter b +updatetolerance b +checkshape b + +bfuse result b a +checkshape result + +set square 1583.92 +set 2dviewer 0 diff --git a/tests/bugs/moddata_1/bug54 b/tests/bugs/moddata_1/bug54 new file mode 100755 index 0000000000..b3c3bd9279 --- /dev/null +++ b/tests/bugs/moddata_1/bug54 @@ -0,0 +1,21 @@ +if { [array get env os_type] != "" } { + set os $env(os_type) +} +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" +if { [string compare $os "windows"] != 0 } { + puts "TODO OCC12345 ALL: TEST INCOMPLETE" +} +puts "================" +puts "OCC54" +puts "================" +puts "" +#################################################### +## Exception is raised during command "small" in DRAW on attached shape. +#################################################### + +cpulimit 300 +restore [locate_data_file OCC54.brep] result + +checkshape result + +set 3dviewer 0 diff --git a/tests/bugs/moddata_2/begin b/tests/bugs/moddata_2/begin new file mode 100755 index 0000000000..572d363e8b --- /dev/null +++ b/tests/bugs/moddata_2/begin @@ -0,0 +1,9 @@ +set subgroup moddata + + + + + + + + diff --git a/tests/bugs/moddata_2/bug228 b/tests/bugs/moddata_2/bug228 new file mode 100755 index 0000000000..ea1a863db9 --- /dev/null +++ b/tests/bugs/moddata_2/bug228 @@ -0,0 +1,20 @@ + +puts "================" +puts "OCC228" +puts "================" +puts "" +################################################ +## It's impossible to make common of the two shapes in the file attached. +################################################ + +cpulimit 4000 + +restore [locate_data_file OCC228.brep] a +explode a +checkshape a_1 +checkshape a_2 + +bcommon result a_1 a_2 + +set square 66231.3 +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug22802 b/tests/bugs/moddata_2/bug22802 new file mode 100755 index 0000000000..bf4b864fc1 --- /dev/null +++ b/tests/bugs/moddata_2/bug22802 @@ -0,0 +1,71 @@ +pload QAcommands + +puts "===========" +puts "OCC22802" +puts "===========" +puts "" +####################################################################### +# The memory alloccated with an excess is not released +####################################################################### + +set BugNumber OCC22802 + +set log [bcarray] + +# +#state before release the unused memory +#Length: 10 +#FactLength: 100000 +#BlockLength: 100000 +# +#state after release the unused memory +#Length: 10 +#FactLength: 10 +#BlockLength: 100000 +# + +set linelist [split $log "\n"] + +set il 0 +set ifl 0 +set ibl 0 + +set xl_0 0 +set xl_1 0 +set xfl_0 0 +set xfl_1 0 +set xbl_0 0 +set xbl_1 0 + +foreach line $linelist { + if { [regexp {^Length: ([-0-9.+eE]+)} $line full xl_$il] } { incr il } + if { [regexp {FactLength: ([-0-9.+eE]+)} $line full xfl_$ifl] } { incr ifl } + if { [regexp {BlockLength: ([-0-9.+eE]+)} $line full xbl_$ibl] } { incr ibl } +} + +set status 0 +if { ${xl_0} != 10} { + incr status +} +if { ${xfl_0} != 100000} { + incr status +} +if { ${xbl_0} != 100000} { + incr status +} +if { ${xl_1} != 10} { + incr status +} +if { ${xfl_1} != 10} { + incr status +} +if { ${xbl_1} != 100000} { + incr status +} + +if { ${status} != 0} { + puts "Faulty ${BugNumber}" +} else { + puts "${BugNumber} OK" +} + diff --git a/tests/bugs/moddata_2/bug22809_1 b/tests/bugs/moddata_2/bug22809_1 new file mode 100755 index 0000000000..cb1405e257 --- /dev/null +++ b/tests/bugs/moddata_2/bug22809_1 @@ -0,0 +1,165 @@ +puts "============" +puts "OCC22809" +puts "============" +puts "" +############################################################################################################ +# BRepIntCS does not find intersections of an ellipsoid and a line passing through it's apex +########################################################################################################### +# +# Test was corrected. See: +# +# http://tracker.dev.opencascade.org/view.php?id=23248 +# pkv (developer) +# 2012-07-12 09:33 +# The checking can not provide stable result because there is no guarantee that coordinates +# for brics_1 will always be {x1, y1, z1} but not {x2, y2, z2} and +# for brics_42 will always be {x2, y2, z2} but not {x1, y1, z1}. +# The coordinates of brics_1 can be both {x1, y1, z1} and {x2, y2, z2} +# The coordinates of brics_42 can be both {x1, y1, z1} and {x2, y2, z2} +# +########################################################################################################### + +set BugNumber OCC22809 + +# +proc GetPercent {Value GoodValue} { + set Percent 0. + if {${GoodValue} != 0.} { + set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] + } elseif {${Value} != 0.} { + set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] + } else { + set Percent 0. + } + return ${Percent} +} +set percent_max 0.1 +# + +psphere a 100 +nurbsconvert r1 a +line l 0 0 -100 0 0 1 +BRepIntCS l r1 + +regexp {.* is a ([A-Za-z0-9]*)} [ whatis brics_1 ] full info1 + +# N.B. multiple result points are to be processed by other algorithms +# Now there are 241 result points +regexp {.* is a ([A-Za-z0-9]*)} [ whatis brics_2 ] full info2 +regexp {.* is a ([A-Za-z0-9]*)} [ whatis brics_41 ] full info2 + +set word1 [string compare $info1 "point"] +set word2 [string compare $info2 "point"] + +set status_point 0 + +puts "ski $word1" +puts "ski $word2" +if { ${word1} == 0 && ${word2} == 0 } { + set status_point 0 +} else { + set status_point 1 +} + +regexp {.* is a ([A-Za-z0-9]*)} [ whatis brics_3 ] full info3 +set word3 [string compare $info3 "a"] + +set status_nb 0 +if { ${word3} == 0 } { + set status_nb 0 +} else { + set status_nb 1 + # N.B. multiple result points are to be processed by other algorithms + set status_nb 0 +} + +set good_x1 0.000000000000000e+00 +set good_y1 0.000000000000000e+00 +set good_z1 -1.000000000000000e+02 + +set good_x2 0.000000000000000e+00 +set good_y2 0.000000000000000e+00 +set good_z2 1.000000000000000e+02 + +set dump1 [ dump brics_1 ] +regexp {Point : ([-0-9.+eE]+), ([-0-9.+eE]+), ([-0-9.+eE]+)} $dump1 full x1 y1 z1 + +set status_xyz1 0 +set x1_percent [GetPercent ${x1} ${good_x1}] +puts "x1_percent = ${x1_percent}" +if { ${x1_percent} > ${percent_max} } { + puts "x1: Faulty ${BugNumber}" + set status_xyz1 1 +} else { + puts "x1: OK ${BugNumber}" +} + +set y1_percent [GetPercent ${y1} ${good_y1}] +puts "y1_percent = ${y1_percent}" +if { ${y1_percent} > ${percent_max} } { + puts "y1: Faulty ${BugNumber}" + set status_xyz1 1 +} else { + puts "y1: OK ${BugNumber}" +} + +set z1_percent [GetPercent ${z1} ${good_z1}] +puts "z1_percent = ${z1_percent}" +if { ${z1_percent} > ${percent_max} } { + set z1_percent [GetPercent ${z1} ${good_z2}] + puts "z1_percent = ${z1_percent}" + if { ${z1_percent} > ${percent_max} } { + puts "z1: Faulty ${BugNumber}" + set status_xyz1 1 + } else { + puts "z1: OK ${BugNumber}" + } +} else { + puts "z1: OK ${BugNumber}" +} + +set dump2 [ dump brics_2 ] +# N.B. multiple result points are to be processed by other algorithms +set dump2 [ dump brics_41 ] +regexp {Point : ([-0-9.+eE]+), ([-0-9.+eE]+), ([-0-9.+eE]+)} $dump2 full x2 y2 z2 + +set status_xyz2 0 +set x2_percent [GetPercent ${x2} ${good_x2}] +puts "x2_percent = ${x2_percent}" +if { ${x2_percent} > ${percent_max} } { + puts "x2: Faulty ${BugNumber}" + set status_xyz2 1 +} else { + puts "x2: OK ${BugNumber}" +} + +set y2_percent [GetPercent ${y2} ${good_y2}] +puts "y2_percent = ${y2_percent}" +if { ${y2_percent} > ${percent_max} } { + puts "y2: Faulty ${BugNumber}" + set status_xyz2 1 +} else { + puts "y2: OK ${BugNumber}" +} + +set z2_percent [GetPercent ${z2} ${good_z2}] +puts "z2_percent = ${z2_percent}" +if { ${z2_percent} > ${percent_max} } { + set z2_percent [GetPercent ${z2} ${good_z1}] + puts "z2_percent = ${z2_percent}" + if { ${z2_percent} > ${percent_max} } { + puts "z2: Faulty ${BugNumber}" + set status_xyz2 1 + } else { + puts "z2: OK ${BugNumber}" + } +} else { + puts "z2: OK ${BugNumber}" +} + +if { ${status_point} == 0 && ${status_nb} == 0 && ${status_xyz1} == 0 && ${status_xyz2} == 0 } { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} + diff --git a/tests/bugs/moddata_2/bug22809_2 b/tests/bugs/moddata_2/bug22809_2 new file mode 100755 index 0000000000..6cca8168d6 --- /dev/null +++ b/tests/bugs/moddata_2/bug22809_2 @@ -0,0 +1,164 @@ +puts "============" +puts "OCC22809" +puts "============" +puts "" +############################################################################################################ +# BRepIntCS does not find intersections of an ellipsoid and a line passing through it's apex +########################################################################################################### +# +# Test was corrected. See: +# +# http://tracker.dev.opencascade.org/view.php?id=23248 +# pkv (developer) +# 2012-07-12 09:33 +# The checking can not provide stable result because there is no guarantee that coordinates +# for brics_1 will always be {x1, y1, z1} but not {x2, y2, z2} and +# for brics_42 will always be {x2, y2, z2} but not {x1, y1, z1}. +# The coordinates of brics_1 can be both {x1, y1, z1} and {x2, y2, z2} +# The coordinates of brics_42 can be both {x1, y1, z1} and {x2, y2, z2} +# +########################################################################################################### + +set BugNumber OCC22809 + +# +proc GetPercent {Value GoodValue} { + set Percent 0. + if {${GoodValue} != 0.} { + set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] + } elseif {${Value} != 0.} { + set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] + } else { + set Percent 0. + } + return ${Percent} +} +set percent_max 0.1 +# + +psphere a 100 +scalexyz r2 a 2 1 1 +line l 0 0 -100 0 0 1 +BRepIntCS l r2 + +regexp {.* is a ([A-Za-z0-9]*)} [ whatis brics_1 ] full info1 + +# N.B. multiple result points are to be processed by other algorithms +# Now there are 130 result points +regexp {.* is a ([A-Za-z0-9]*)} [ whatis brics_23 ] full info2 + +set word1 [string compare $info1 "point"] +set word2 [string compare $info2 "point"] + +set status_point 0 +if { ${word1} == 0 && ${word2} == 0 } { + set status_point 0 +} else { + set status_point 1 +} + +regexp {.* is a ([A-Za-z0-9]*)} [ whatis brics_3 ] full info3 +set word3 [string compare $info3 "a"] + +set status_nb 0 +if { ${word3} == 0 } { + set status_nb 0 +} else { + set status_nb 1 + # N.B. multiple result points are to be processed by other algorithms + set status_nb 0 +} + +set good_x1 0.000000000000000e+00 +set good_y1 0.000000000000000e+00 +set good_z1 -1.000000000000000e+02 + +set good_x2 0.000000000000000e+00 +set good_y2 0.000000000000000e+00 +set good_z2 1.000000000000000e+02 + +set dump1 [ dump brics_1 ] + +regexp {Point : ([-0-9.+eE]+), ([-0-9.+eE]+), ([-0-9.+eE]+)} $dump1 full x1 y1 z1 + +set status_xyz1 0 +set x1_percent [GetPercent ${x1} ${good_x1}] +puts "x1_percent = ${x1_percent}" +if { ${x1_percent} > ${percent_max} } { + puts "x1: Faulty ${BugNumber}" + set status_xyz1 1 +} else { + puts "x1: OK ${BugNumber}" +} + +set y1_percent [GetPercent ${y1} ${good_y1}] +puts "y1_percent = ${y1_percent}" +if { ${y1_percent} > ${percent_max} } { + puts "y1: Faulty ${BugNumber}" + set status_xyz1 1 +} else { + puts "y1: OK ${BugNumber}" +} + +set z1_percent [GetPercent ${z1} ${good_z1}] +puts "z1_percent = ${z1_percent}" +if { ${z1_percent} > ${percent_max} } { + set z1_percent [GetPercent ${z1} ${good_z2}] + puts "z1_percent = ${z1_percent}" + if { ${z1_percent} > ${percent_max} } { + puts "z1: Faulty ${BugNumber}" + set status_xyz1 1 + } else { + puts "z1: OK ${BugNumber}" + } +} else { + puts "z1: OK ${BugNumber}" +} + +set dump2 [ dump brics_2 ] +# N.B. multiple result points are to be processed by other algorithms +set dump2 [ dump brics_23 ] +regexp {Point : ([-0-9.+eE]+), ([-0-9.+eE]+), ([-0-9.+eE]+)} $dump2 full x2 y2 z2 + +set status_xyz2 0 +set x2_percent [GetPercent ${x2} ${good_x2}] +puts "x2_percent = ${x2_percent}" +if { ${x2_percent} > ${percent_max} } { + puts "x2: Faulty ${BugNumber}" + set status_xyz2 1 +} else { + puts "x2: OK ${BugNumber}" +} + +set y2_percent [GetPercent ${y2} ${good_y2}] +puts "y2_percent = ${y2_percent}" +if { ${y2_percent} > ${percent_max} } { + puts "y2: Faulty ${BugNumber}" + set status_xyz2 1 +} else { + puts "y2: OK ${BugNumber}" +} + +set z2_percent [GetPercent ${z2} ${good_z2}] +puts "z2_percent = ${z2_percent}" +if { ${z2_percent} > ${percent_max} } { + set z2_percent [GetPercent ${z2} ${good_z1}] + puts "z2_percent = ${z2_percent}" + if { ${z2_percent} > ${percent_max} } { + puts "z2: Faulty ${BugNumber}" + set status_xyz2 1 + } else { + puts "z2: OK ${BugNumber}" + } +} else { + puts "z2: OK ${BugNumber}" +} + +# Resume +puts "" +if { ${status_point} == 0 && ${status_nb} == 0 && ${status_xyz1} == 0 && ${status_xyz2} == 0 } { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} + diff --git a/tests/bugs/moddata_2/bug22809_3 b/tests/bugs/moddata_2/bug22809_3 new file mode 100755 index 0000000000..cb4698b3bc --- /dev/null +++ b/tests/bugs/moddata_2/bug22809_3 @@ -0,0 +1,141 @@ +puts "============" +puts "OCC22809" +puts "============" +puts "" +############################################################################################################ +# BRepIntCS does not find intersections of an ellipsoid and a line passing through it's apex +########################################################################################################### + +set BugNumber OCC22809 + +# +proc GetPercent {Value GoodValue} { + set Percent 0. + if {${GoodValue} != 0.} { + set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] + } elseif {${Value} != 0.} { + set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] + } else { + set Percent 0. + } + return ${Percent} +} + +set percent_max 0.1 +# + +psphere a 100 +nurbsconvert r1 a +line l -0.000001 0.0000000001 -100 0 0 1 +BRepIntCS l r1 + +regexp {.* is a ([A-Za-z0-9]*)} [ whatis brics_1] full info1 + +# N.B. multiple result points are to be processed by other algorithms +# Now there are 3 result points +regexp {.* is a ([A-Za-z0-9]*)} [ whatis brics_2 ] full info2 + +set word1 [string compare $info1 "point"] +set word2 [string compare $info2 "point"] + +set status_point 0 +if { ${word1} == 0 && ${word2} == 0 } { + set status_point 0 +} else { + set status_point 1 +} + +regexp {.* is a ([A-Za-z0-9]*)} [ whatis brics_3 ] full info3 +set word3 [string compare $info3 "a"] + +set status_nb 0 +if { ${word3} == 0 } { + set status_nb 0 +} else { + set status_nb 1 + # N.B. multiple result points are to be processed by other algorithms + set status_nb 0 +} + +set dump1 [ dump brics_1 ] + +regexp {Point : ([-0-9.+eE]+), ([-0-9.+eE]+), ([-0-9.+eE]+)} $dump1 full x1 y1 z1 + +set good_x1 -1.000000000000000e-06 +set good_y1 1.000000000000000e-10 +set good_z1 -1.000000000000000e+02 + +set status_xyz1 0 +set x1_percent [GetPercent ${x1} ${good_x1}] +puts "x1_percent = ${x1_percent}" +if { ${x1_percent} > ${percent_max} } { + puts "x1: Faulty ${BugNumber}" + set status_xyz1 1 +} else { + puts "x1: OK ${BugNumber}" +} + +set y1_percent [GetPercent ${y1} ${good_y1}] +puts "y1_percent = ${y1_percent}" +if { ${y1_percent} > ${percent_max} } { + puts "y1: Faulty ${BugNumber}" + set status_xyz1 1 +} else { + puts "y1: OK ${BugNumber}" +} + +set z1_percent [GetPercent ${z1} ${good_z1}] +puts "z1_percent = ${z1_percent}" +if { ${z1_percent} > ${percent_max} } { + puts "z1: Faulty ${BugNumber}" + set status_xyz1 1 +} else { + puts "z1: OK ${BugNumber}" +} + +set dump2 [ dump brics_2 ] +# N.B. multiple result points are to be processed by other algorithms +set dump2 [ dump brics_2 ] + +regexp {Point : ([-0-9.+eE]+), ([-0-9.+eE]+), ([-0-9.+eE]+)} $dump2 full x2 y2 z2 + +set good_x2 -1.000000000000000e-06 +set good_y2 1.000000000000000e-10 +set good_z2 1.000000000000000e+02 + +set status_xyz2 0 +set x2_percent [GetPercent ${x2} ${good_x2}] +puts "x2_percent = ${x2_percent}" +if { ${x2_percent} > ${percent_max} } { + puts "x2: Faulty ${BugNumber}" + set status_xyz2 1 +} else { + puts "x2: OK ${BugNumber}" +} + +set y2_percent [GetPercent ${y2} ${good_y2}] +puts "y2_percent = ${y2_percent}" +if { ${y2_percent} > ${percent_max} } { + puts "y2: Faulty ${BugNumber}" + set status_xyz2 1 +} else { + puts "y2: OK ${BugNumber}" +} + +set z2_percent [GetPercent ${z2} ${good_z2}] +puts "z2_percent = ${z2_percent}" +if { ${z2_percent} > ${percent_max} } { + puts "z2: Faulty ${BugNumber}" + set status_xyz2 1 +} else { + puts "z2: OK ${BugNumber}" +} + +# Resume +puts "" +if { ${status_point} == 0 && ${status_nb} == 0 && ${status_xyz1} == 0 && ${status_xyz2} == 0 } { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} + diff --git a/tests/bugs/moddata_2/bug22809_4 b/tests/bugs/moddata_2/bug22809_4 new file mode 100755 index 0000000000..42b87433da --- /dev/null +++ b/tests/bugs/moddata_2/bug22809_4 @@ -0,0 +1,143 @@ +puts "============" +puts "OCC22809" +puts "============" +puts "" +############################################################################################################ +# BRepIntCS does not find intersections of an ellipsoid and a line passing through it's apex +########################################################################################################### + +set BugNumber OCC22809 + +# +proc GetPercent {Value GoodValue} { + set Percent 0. + if {${GoodValue} != 0.} { + set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] + } elseif {${Value} != 0.} { + set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] + } else { + set Percent 0. + } + return ${Percent} +} +set percent_max 0.1 +# + +psphere a 100 +scalexyz r2 a 2 1 1 +line l -0.000001 0.0000000001 -100 0 0 1 +BRepIntCS l r2 + +regexp {.* is a ([A-Za-z0-9]*)} [ whatis brics_1 ] full info1 + +# N.B. multiple result points are to be processed by other algorithms +# Now there are 2 result points +set info2 [ whatis brics_2 ] +set info2 [ whatis brics_2 ] +regexp {.* is a ([A-Za-z0-9]*)} [ whatis brics_2 ] full info2 + + +set word1 [string compare $info1 "point"] +set word2 [string compare $info2 "point"] + +set status_point 0 +if { ${word1} == 0 && ${word2} == 0 } { + set status_point 0 +} else { + set status_point 1 +} + +regexp {.* is a ([A-Za-z0-9]*)} [ whatis brics_3 ] full info3 +set word3 [string compare $info3 "a"] + +set status_nb 0 +if { ${word3} == 0 } { + set status_nb 0 +} else { + set status_nb 1 + # N.B. multiple result points are to be processed by other algorithms + set status_nb 0 +} + +set dump1 [ dump brics_1 ] + +regexp {Point : ([-0-9.+eE]+), ([-0-9.+eE]+), ([-0-9.+eE]+)} $dump1 full x1 y1 z1 + +set good_x1 -1.000000000000000e-06 +set good_y1 1.000000000000000e-10 +set good_z1 -1.000000000000000e+02 + +set status_xyz1 0 +set x1_percent [GetPercent ${x1} ${good_x1}] +puts "x1_percent = ${x1_percent}" +if { ${x1_percent} > ${percent_max} } { + puts "x1: Faulty ${BugNumber}" + set status_xyz1 1 +} else { + puts "x1: OK ${BugNumber}" +} + +set y1_percent [GetPercent ${y1} ${good_y1}] +puts "y1_percent = ${y1_percent}" +if { ${y1_percent} > ${percent_max} } { + puts "y1: Faulty ${BugNumber}" + set status_xyz1 1 +} else { + puts "y1: OK ${BugNumber}" +} + +set z1_percent [GetPercent ${z1} ${good_z1}] +puts "z1_percent = ${z1_percent}" +if { ${z1_percent} > ${percent_max} } { + puts "z1: Faulty ${BugNumber}" + set status_xyz1 1 +} else { + puts "z1: OK ${BugNumber}" +} + +set dump2 [ dump brics_2 ] +# N.B. multiple result points are to be processed by other algorithms +set dump2 [ dump brics_2 ] + +regexp {Point : ([-0-9.+eE]+), ([-0-9.+eE]+), ([-0-9.+eE]+)} $dump2 full x2 y2 z2 + +set good_x2 -1.000000000000000e-06 +set good_y2 1.000000000000000e-10 +set good_z2 1.000000000000000e+02 + +set status_xyz2 0 +set x2_percent [GetPercent ${x2} ${good_x2}] +puts "x2_percent = ${x2_percent}" +if { ${x2_percent} > ${percent_max} } { + puts "x2: Faulty ${BugNumber}" + set status_xyz2 1 +} else { + puts "x2: OK ${BugNumber}" +} + +set y2_percent [GetPercent ${y2} ${good_y2}] +puts "y2_percent = ${y2_percent}" +if { ${y2_percent} > ${percent_max} } { + puts "y2: Faulty ${BugNumber}" + set status_xyz2 1 +} else { + puts "y2: OK ${BugNumber}" +} + +set z2_percent [GetPercent ${z2} ${good_z2}] +puts "z2_percent = ${z2_percent}" +if { ${z2_percent} > ${percent_max} } { + puts "z2: Faulty ${BugNumber}" + set status_xyz2 1 +} else { + puts "z2: OK ${BugNumber}" +} + +# Resume +puts "" +if { ${status_point} == 0 && ${status_nb} == 0 && ${status_xyz1} == 0 && ${status_xyz2} == 0 } { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} + diff --git a/tests/bugs/moddata_2/bug22851 b/tests/bugs/moddata_2/bug22851 new file mode 100755 index 0000000000..a02d0d1894 --- /dev/null +++ b/tests/bugs/moddata_2/bug22851 @@ -0,0 +1,29 @@ +puts "============" +puts "OCC22851" +puts "============" +puts "" +####################################################################### +# No intersection curve between two surfaces +####################################################################### + +set BugNumber OCC22851 + +restore [locate_data_file bug22851_fz1.brep] b1 +restore [locate_data_file bug22851_fz8.brep] b2 +mksurface s1 b1 +mksurface s2 b2 +intersect i s1 s2 + +set dump_info [dump i] + +set lst [split ${dump_info}] +set dump_length [llength $lst] + +set find_BSCurve [regexp {BSplineCurve} $dump_info] +set find_Degree_Poles_Knots [regexp {Degree +[-0-9.+eE]+, +[-0-9.+eE]+ +Poles, +[-0-9.+eE]+ +Knots} $dump_info] + +if { $dump_length == 0 && !$find_BSCurve && !$find_Degree_Poles_Knots } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} \ No newline at end of file diff --git a/tests/bugs/moddata_2/bug22907 b/tests/bugs/moddata_2/bug22907 new file mode 100755 index 0000000000..5358c4af86 --- /dev/null +++ b/tests/bugs/moddata_2/bug22907 @@ -0,0 +1,50 @@ +puts "========================" +puts "OCC22907" +puts "========================" +puts "" +####################################################################### +# The function 'distmini' produces wrong result. +####################################################################### + +set BugNumber OCC22907 + +###rename to bug22907_e.brep +restore [locate_data_file bug22907_e.brep] b2 +vertex b1 -15.652187256227142 3.2012899919486513 9.9763479999999998 + +distmini d b1 b2 +puts "Distance=[dval d_val]" + +set Good_Distance 0 + +regexp {Vertex *: Min [-0-9.+eE]+ *Max *([-0-9.+eE]+)} [maxtolerance b1] full tol1 +regexp {Edge *: Min [-0-9.+eE]+ *Max *([-0-9.+eE]+)} [maxtolerance b2] full tol2 +regexp {Vertex *: Min [-0-9.+eE]+ *Max *([-0-9.+eE]+)} [maxtolerance b2] full tol3 + +set max_tolerance ${tol1} +if { ${tol2} > ${max_tolerance} } { + set max_tolerance ${tol2} +} +if { ${tol3} > ${max_tolerance} } { + set max_tolerance ${tol3} +} +puts "max_tolerance=${max_tolerance}" + +if [expr abs( [dval d_val] - ${Good_Distance}) > ${max_tolerance}] { + set status 1 +} else { + set status 0 +} + +# Resume +puts "" +if { ${status} == 1 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} +vinit +vdisplay b1 b2 +vfit + +set only_screen 0 diff --git a/tests/bugs/moddata_2/bug22910_1 b/tests/bugs/moddata_2/bug22910_1 new file mode 100755 index 0000000000..0d4212e8e0 --- /dev/null +++ b/tests/bugs/moddata_2/bug22910_1 @@ -0,0 +1,27 @@ +puts "TODO OCC11111 ALL: An exception was caught" +puts "TODO OCC11111 ALL: Exception" +puts "TODO OCC11111 ALL: Faulty OCC22910" + +puts "================" +puts "OCC22910" +puts "================" +puts "" +####################################################################################### +# Failure to compute iso-line for NURBS surface +###################################################################################### + +set BugNumber OCC22910 + +catch { pload MODELING } + +restore [locate_data_file s.rle] result +set exception_status [ catch { uiso u result 0.5 } ] + +if { ${exception_status} == 0 } { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} + +set sqaure 0 +set 3dviewer 0 diff --git a/tests/bugs/moddata_2/bug22910_2 b/tests/bugs/moddata_2/bug22910_2 new file mode 100755 index 0000000000..b95443b5b5 --- /dev/null +++ b/tests/bugs/moddata_2/bug22910_2 @@ -0,0 +1,22 @@ +puts "================" +puts "OCC22910" +puts "================" +puts "" +####################################################################################### +# Failure to compute iso-line for NURBS surface +###################################################################################### + +set BugNumber OCC22910 + +restore [locate_data_file s.rle] s +mkface result s +set exception_status [ catch { incmesh result 0.0038476968063336017 } ] + +if { ${exception_status} == 0 } { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} + +set square 0.110535 +set 3dviewer 0 diff --git a/tests/bugs/moddata_2/bug22923 b/tests/bugs/moddata_2/bug22923 new file mode 100755 index 0000000000..024e57118b --- /dev/null +++ b/tests/bugs/moddata_2/bug22923 @@ -0,0 +1,28 @@ +puts "============" +puts "OCC22923" +puts "============" +####################################################################### +# The command "intersect" throws an exception +####################################################################### + +set BugNumber OCC22923 + +restore [locate_data_file bug22923_Face-2_7.brep] b1 +restore [locate_data_file bug22923_Face-7_0.brep] b2 + +set exception_status 0 + +mksurface s1 b1 +mksurface s2 b2 + +set msg [ intersect i s1 s2 ] +set index [ lsearch $msg Exception ] + +if {$index > -1} { + set exception_status 1 } + +if { ${exception_status} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} diff --git a/tests/bugs/moddata_2/bug22989 b/tests/bugs/moddata_2/bug22989 new file mode 100755 index 0000000000..1a97a44503 --- /dev/null +++ b/tests/bugs/moddata_2/bug22989 @@ -0,0 +1,16 @@ +puts "================" +puts "OCC22989" +puts "================" +puts "" +####################################################################################### +# BSplCLib::Reparametrize() fails on near knots +###################################################################################### + +set BugNumber OCC22989 + +restore [locate_data_file OCC22989-edge-nosameparameter.brep] result + +sameparameter result + +set length 85.0797 +set 3dviewer 0 diff --git a/tests/bugs/moddata_2/bug22993 b/tests/bugs/moddata_2/bug22993 new file mode 100755 index 0000000000..6ad60e9a94 --- /dev/null +++ b/tests/bugs/moddata_2/bug22993 @@ -0,0 +1,17 @@ +puts "TODO OCC11111 ALL: StepFile Error" +puts "===========" +puts "OCC22993" +puts "===========" +###################################################### +# Crash during reading STEP file +###################################################### + +set BugNumber OCC22993 + +catch { pload XDE } + +stepread [locate_data_file OCC22993-23-9421-42601.stp] result * + +set 3viewer 0 + + diff --git a/tests/bugs/moddata_2/bug23092 b/tests/bugs/moddata_2/bug23092 new file mode 100755 index 0000000000..74ac26e8b3 --- /dev/null +++ b/tests/bugs/moddata_2/bug23092 @@ -0,0 +1,28 @@ +puts "================" +puts "OCC23092" +puts "================" +puts "" +################################################################################################### +# Error in BRepProj_Projection algorithm: some edges of resulting projected wire are duplicated +################################################################################################### + +set BugNumber OCC23092 + +restore [locate_data_file OCC23092-bal8h.brep] h +restore [locate_data_file OCC23092-bal8s.brep] s +set info1 [ prj r s h 0 0 1 ] +set word1 [string compare [lindex ${info1} end] "r_1"] +don r_1 r_2 +explode r_1 E +explode r_2 V +set info2 [ don r_1_10 r_2_1 r_2_2 ] +set word2 [string compare [lindex ${info2} end] "r_1_10"] + +# Resume +puts "" +if { ${word1} == 0 && ${word2} == 0 } { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} + diff --git a/tests/bugs/moddata_2/bug231 b/tests/bugs/moddata_2/bug231 new file mode 100755 index 0000000000..4904822b5d --- /dev/null +++ b/tests/bugs/moddata_2/bug231 @@ -0,0 +1,25 @@ +puts "========" +puts "OCC231" +puts "========" +puts "" + +############################################# +##Uncorrect work DRAW command "proj" in version dev +## and receive such result: +## in dev : ext_1 ext_2 ext_3 +## in C40 : ext_1 ext_2 ext_3 ext_4 +############################################# + +restore [locate_data_file OCC231.draw] result + +set str [proj result 1751.38 614.152 -180.331] +set err [llength $str] + +if { $err < 4 } { + puts "Faulty OCC231: Projection was made wrongly" +} else { + puts "OCC231 OK: Projection was made properly" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug23139 b/tests/bugs/moddata_2/bug23139 new file mode 100755 index 0000000000..72ddce67ef --- /dev/null +++ b/tests/bugs/moddata_2/bug23139 @@ -0,0 +1,27 @@ +puts "================" +puts "OCC23139" +puts "================" +puts "" +######################################################################################################## +# BRepFilletAPI_MakeFillet algorithm builds edges with wrong first and last parameters: out of pcurve +######################################################################################################## + +set BugNumber OCC23139 + +### rename to bug23139_aShape_for_fillet.brep +restore [locate_data_file bug23139_aShape_for_fillet.brep] b +explode b e +donly b b_6 +blend result b 20 b_6 +explode result f +#av2d +set exception_status [ catch { pcurve result_1 } ] + +if { ${exception_status} == 0 } { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} + +set 2dviewer 0 +set length 5558.88 diff --git a/tests/bugs/moddata_2/bug23152 b/tests/bugs/moddata_2/bug23152 new file mode 100755 index 0000000000..8e36e8ebed --- /dev/null +++ b/tests/bugs/moddata_2/bug23152 @@ -0,0 +1,53 @@ +puts "===========" +puts "OCC23152" +puts "===========" +###################################################### +# Possibility to have echo of DRAW commands in log file +###################################################### + +set BugNumber OCC23152 + +dchrono t stop +dchrono t start +dchrono t stop + +dlog reset +dlog on +dchrono t show +set log_on [dlog get] + +dlog reset +dlog off +dchrono t show +set log_off [dlog get] + +puts "log_on = ${log_on}" +puts "log_off = ${log_off}" + +set llength_log_on [llength ${log_on}] +set llength_log_off [llength ${log_off}] + +puts "llength log_on= [llength ${log_on}]" +puts "llength log_off= [llength ${log_off}]" + +set status 0 +if { ${llength_log_on} > 0 } { + puts "dlog on work OK" +} else { + puts "dlog on work Faulty" + set status 1 +} +if { ${llength_log_off} == 0 } { + puts "dlog off work OK" +} else { + puts "dlog off work Faulty" + set status 1 +} + +# Resume +puts "" +if { ${status} == 0 } { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} diff --git a/tests/bugs/moddata_2/bug23165 b/tests/bugs/moddata_2/bug23165 new file mode 100755 index 0000000000..831d7a319e --- /dev/null +++ b/tests/bugs/moddata_2/bug23165 @@ -0,0 +1,156 @@ +puts "================" +puts "OCC23165" +puts "================" +puts "" +################################################################################################################### +# BndLib_Add3dCurve::Add incorrectly segmented original B-Spline what resulting in wrong bounding box or exception. +################################################################################################################### + +catch { pload XDE } + +set BugNumber OCC23165 + +smallview + +# 1 step +set exception_status 0 +set e1_status 0 +set status 0 + +set percent_max 0.1 + +proc GetPercent {Value GoodValue} { + set Percent 0. + if {${GoodValue} != 0.} { + set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] + } elseif {${Value} != 0.} { + set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] + } else { + set Percent 0. + } + return ${Percent} +} + +restore [locate_data_file OCC23165-edge1.brep] e1 + +donly e1 +catch { bounding e1 } msg +fit + +set index [lsearch $msg exception] +if {$index > -1} { + set exception_status 1 +} else { + set e1_result [bounding e1] + + set e1_x1 [lindex ${e1_result} 0] + set e1_y1 [lindex ${e1_result} 1] + set e1_z1 [lindex ${e1_result} 2] + set e1_x2 [lindex ${e1_result} 3] + set e1_y2 [lindex ${e1_result} 4] + set e1_z2 [lindex ${e1_result} 5] + + set e1_good_x1 -17.610622244944413 + set e1_good_y1 -0.010622244944394899 + set e1_good_z1 -3.0106222449443973 + set e1_good_x2 -17.589377755055537 + set e1_good_y2 5.7106222251726582 + set e1_good_z2 -1.6146050638816589 + + set e1_x1_percent [GetPercent ${e1_x1} ${e1_good_x1}] + set e1_y1_percent [GetPercent ${e1_y1} ${e1_good_y1}] + set e1_z1_percent [GetPercent ${e1_z1} ${e1_good_z1}] + set e1_x2_percent [GetPercent ${e1_x2} ${e1_good_x2}] + set e1_y2_percent [GetPercent ${e1_y2} ${e1_good_y2}] + set e1_z2_percent [GetPercent ${e1_z2} ${e1_good_z2}] + + if {${e1_x1_percent} > ${percent_max}} { + puts "Faulty ${BugNumber} : x1 for e1 is wrong" + set e1_status 1 + } + if {${e1_y1_percent} > ${percent_max}} { + puts "Faulty ${BugNumber} : y1 for e1 is wrong" + set e1_status 1 + } + if {${e1_z1_percent} > ${percent_max}} { + puts "Faulty ${BugNumber} : z1 for e1 is wrong" + set e1_status 1 + } + if {${e1_x2_percent} > ${percent_max}} { + puts "Faulty ${BugNumber} : x2 for e1 is wrong" + set e1_status 1 + } + if {${e1_y2_percent} > ${percent_max}} { + puts "Faulty ${BugNumber} : y2 for e1 is wrong" + set e1_status 1 + } + if {${e1_z2_percent} > ${percent_max}} { + puts "Faulty ${BugNumber} : z2 for e1 is wrong" + set e1_status 1 + } + +} + +# 2 step +restore [locate_data_file OCC23165-curve.rle] c +mkedge result c 20 36 + +donly result +set result [bounding result] +fit + +set x1 [lindex ${result} 0] +set y1 [lindex ${result} 1] +set z1 [lindex ${result} 2] +set x2 [lindex ${result} 3] +set y2 [lindex ${result} 4] +set z2 [lindex ${result} 5] + +set good_x1 -17.6105835090592 +set good_y1 -4.7133570660117909 +set good_z1 -4.3679100133425806 +set good_x2 -17.589416490940806 +set good_y2 5.7105834892874094 +set good_z2 -1.6146437997669054 + +set x1_percent [GetPercent ${x1} ${good_x1}] +set y1_percent [GetPercent ${y1} ${good_y1}] +set z1_percent [GetPercent ${z1} ${good_z1}] +set x2_percent [GetPercent ${x2} ${good_x2}] +set y2_percent [GetPercent ${y2} ${good_y2}] +set z2_percent [GetPercent ${z2} ${good_z2}] + +if {${x1_percent} > ${percent_max}} { + puts "Faulty ${BugNumber} : x1 is wrong" + set status 1 +} +if {${y1_percent} > ${percent_max}} { + puts "Faulty ${BugNumber} : y1 is wrong" + set status 1 +} +if {${z1_percent} > ${percent_max}} { + puts "Faulty ${BugNumber} : z1 is wrong" + set status 1 +} +if {${x2_percent} > ${percent_max}} { + puts "Faulty ${BugNumber} : x2 is wrong" + set status 1 +} +if {${y2_percent} > ${percent_max}} { + puts "Faulty ${BugNumber} : y2 is wrong" + set status 1 +} +if {${z2_percent} > ${percent_max}} { + puts "Faulty ${BugNumber} : z2 is wrong" + set status 1 +} + +if { ${status} == 0 && ${exception_status} == 0&& ${e1_status} == 0 } { + puts "${BugNumber}: OK" +} else { + puts "${BugNumber}: Faulty" +} + +set 2dviewer 1 +set length 15.8888 + diff --git a/tests/bugs/moddata_2/bug23172 b/tests/bugs/moddata_2/bug23172 new file mode 100755 index 0000000000..e395cc356a --- /dev/null +++ b/tests/bugs/moddata_2/bug23172 @@ -0,0 +1,32 @@ +puts "================" +puts "OCC23172" +puts "================" +puts "" +###################################### +# vexport failed on some Intel GPUs +###################################### + +set BugNumber OCC23172 + +box b 1 2 3 +vinit +vdisplay b +vfit + +set aFile $imagedir/${test_image}.svg + +if { [file exists ${aFile}] } { + file delete ${aFile} +} + +vexport $aFile SVG + +if { [file exists ${aFile}] } { + puts "Export to SVG file was done" + puts "OK : Export to SVG file was done" +} else { + puts "Faulty : Export to SVG file was not done" +} + +set only_screen 1 + diff --git a/tests/bugs/moddata_2/bug23175 b/tests/bugs/moddata_2/bug23175 new file mode 100755 index 0000000000..77789ea835 --- /dev/null +++ b/tests/bugs/moddata_2/bug23175 @@ -0,0 +1,29 @@ +puts "============" +puts "OCC23175" +puts "============" +puts "" +#################################################################################### +# Failed to segment a periodic B-Spline when parameter coincides with existing knot +#################################################################################### + +set BugNumber OCC23175 + +restore [locate_data_file OCC23175-bspline-per-3_draw] result + +catch { segment result 1 2.5 } msg + +set exception_status 0 +set index [lsearch $msg exception] +if {$index > -1} { + set exception_status 1 +} + +if { ${exception_status} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_2/bug23201 b/tests/bugs/moddata_2/bug23201 new file mode 100755 index 0000000000..1522cc32e8 --- /dev/null +++ b/tests/bugs/moddata_2/bug23201 @@ -0,0 +1,79 @@ +puts "============" +puts "OCC23201" +puts "============" +puts "" +####################################################################### +# Projection algorithm produces wrong results. +####################################################################### + +set BugNumber OCC23201 + +proc GetPercent {Value GoodValue} { + set Percent 0. + if {${GoodValue} != 0.} { + set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] + } elseif {${Value} != 0.} { + set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] + } else { + set Percent 0. + } + return ${Percent} +} + +restore [locate_data_file bug23201_Tool_1.brep] b2 +restore [locate_data_file bug23201_Tool_2.brep] b3 + +explode b2 f +mksurface s2 b2_1 + +explode b3 f +mksurface s3 b3_1 + +explode b2 e +mkcurve c2 b2_2 + +explode b3 e +mkcurve c3 b3_2 + +set BugStatus 0 + +set percent_max 0.1 +set good_c23 3.1415926535897922 +set good_c32 3.1415926535897922 + +if [catch { project c23 c2 s3 } ] { + set BugStatus 1 +} else { + set c23_length [lindex [length c23] end] + set length_percent [GetPercent ${c23_length} ${good_c23}] + puts "length_percent = ${length_percent}" + if {${length_percent} > ${percent_max}} { + puts "c23: Faulty" + set BugStatus 1 + } else { + puts "c23: OK" + } +} + +if [catch { project c32 c3 s2 } ] { + set BugStatus 1 +} else { + set c32_length [lindex [length c32] end] + set length_percent [GetPercent ${c32_length} ${good_c32}] + puts "length_percent = ${length_percent}" + if {${length_percent} > ${percent_max}} { + puts "c32: Faulty" + set BugStatus 1 + } else { + puts "c32: OK" + } +} + +# Resume +puts "" +if { ${BugStatus} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + diff --git a/tests/bugs/moddata_2/bug23224 b/tests/bugs/moddata_2/bug23224 new file mode 100755 index 0000000000..67979943b3 --- /dev/null +++ b/tests/bugs/moddata_2/bug23224 @@ -0,0 +1,24 @@ +puts "============" +puts "OCC23224" +puts "============" +puts "" +####################################################################### +# Empty result done by intersection algorithm +####################################################################### + +set BugNumber OCC23224 + +restore [locate_data_file OCC23224-line.brep] l +restore [locate_data_file OCC23224-face.brep] f +mksurface s f +mkcurve c l +intersect result c s +set info1 [dump result] + +if { [regexp {Point +: ([-0-9.+eE]+)} $info1 full] == 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + + diff --git a/tests/bugs/moddata_2/bug23244 b/tests/bugs/moddata_2/bug23244 new file mode 100755 index 0000000000..152ad72e60 --- /dev/null +++ b/tests/bugs/moddata_2/bug23244 @@ -0,0 +1,36 @@ +puts "================" +puts "OCC23244" +puts "================" +puts "" +####################################################################### +# Bug of BRepClass_FaceClassifier: it does not take into account the tolerance +####################################################################### + +set BugNumber OCC23244 + +restore [locate_data_file OCC23244-comp.brep] a + +explode a +explode a_1 + +smallview +donly a_1_2 a_3 +fit + +mkpoint p3 a_3 +projponf a_1_2 p3 +point pp3 69.220445243320853 1216.6123701316949 + +set result [split [b2dclassify a_1_2 pp3 1.e-5] ] + +set ll [llength ${result}] +if {${ll} < 4} { + puts "Bad format of bclassify draw-command; Faulty ${BugNumber}" +} else { + if { [regexp "ON" $result] == 1 } { + puts "OK ${BugNumber}" + } else { + puts "Faulty ${BugNumber}" + } +} + diff --git a/tests/bugs/moddata_2/bug23248 b/tests/bugs/moddata_2/bug23248 new file mode 100755 index 0000000000..df9dccac31 --- /dev/null +++ b/tests/bugs/moddata_2/bug23248 @@ -0,0 +1,27 @@ +puts "================" +puts "OCC23248" +puts "================" +puts "" +####################################################################### +# Wrong result done by solid classifier algorithm for infinite point +####################################################################### + +set BugNumber OCC23248 + +restore [locate_data_file bug23248_so] b + +set result [split [xclassify b 1e-7]] + +set ll [llength ${result}] +if {${ll} < 3} { + puts "Bad format of xclassify draw-command; Faulty ${BugNumber}" +} else { + set status [lindex ${result} 2] + if { [regexp "OUT" $result] == 1 } { + puts "OK ${BugNumber}" + } else { + puts "Faulty ${BugNumber}" + } +} + + diff --git a/tests/bugs/moddata_2/bug23464_1 b/tests/bugs/moddata_2/bug23464_1 new file mode 100755 index 0000000000..4ff1539624 --- /dev/null +++ b/tests/bugs/moddata_2/bug23464_1 @@ -0,0 +1,35 @@ +puts "============" +puts "CR23464" +puts "============" +puts "" +########################################################################################################## +# Projection algorithm produces wrong results +########################################################################################################## + +set int_check 3 +set fract_check 1415927 + +restore [locate_data_file bug23464_c41.draw] c41 +restore [locate_data_file bug23464_s46.draw] s46 + +project result c41 s46 +set info [length result] +regexp {is +([-0-9.+eE]+)} $info full num + +set int_part [expr round($num)] +set y [expr $num - round($num)] +set z [expr $y*10000000] +set fract_part [expr round($z)] + +if { ${int_check} != ${int_part} } { + puts "Error : Integer part of result is incorrect" +} + +if { ${fract_check} != ${fract_part} } { + puts "Error : Fractional part of result is incorrect" +} + + + + + diff --git a/tests/bugs/moddata_2/bug23464_2 b/tests/bugs/moddata_2/bug23464_2 new file mode 100755 index 0000000000..2aac097032 --- /dev/null +++ b/tests/bugs/moddata_2/bug23464_2 @@ -0,0 +1,35 @@ +puts "============" +puts "CR23464" +puts "============" +puts "" +########################################################################################################## +# Projection algorithm produces wrong results +########################################################################################################## + +set int_check 3 +set fract_check 1415927 + +restore [locate_data_file bug23464_c50.draw] c50 +restore [locate_data_file bug23464_s37.draw] s37 + +project result c50 s37 +set info [length result] +regexp {is +([-0-9.+eE]+)} $info full num + +set int_part [expr round($num)] +set y [expr $num - round($num)] +set z [expr $y*10000000] +set fract_part [expr round($z)] + +if { ${int_check} != ${int_part} } { + puts "Error : Integer part of result is incorrect" +} + +if { ${fract_check} != ${fract_part} } { + puts "Error : Fractional part of result is incorrect" +} + + + + + diff --git a/tests/bugs/moddata_2/bug23464_3 b/tests/bugs/moddata_2/bug23464_3 new file mode 100755 index 0000000000..104b8c3173 --- /dev/null +++ b/tests/bugs/moddata_2/bug23464_3 @@ -0,0 +1,35 @@ +puts "============" +puts "CR23464" +puts "============" +puts "" +########################################################################################################## +# Projection algorithm produces wrong results +########################################################################################################## + +set int_check 3 +set fract_check 1415927 + +restore [locate_data_file bug23464_c57.draw] c57 +restore [locate_data_file bug23464_s37.draw] s37 + +project result c57 s37 +set info [length result] +regexp {is +([-0-9.+eE]+)} $info full num + +set int_part [expr round($num)] +set y [expr $num - round($num)] +set z [expr $y*10000000] +set fract_part [expr round($z)] + +if { ${int_check} != ${int_part} } { + puts "Error : Integer part of result is incorrect" +} + +if { ${fract_check} != ${fract_part} } { + puts "Error : Fractional part of result is incorrect" +} + + + + + diff --git a/tests/bugs/moddata_2/bug23464_4 b/tests/bugs/moddata_2/bug23464_4 new file mode 100755 index 0000000000..2065997277 --- /dev/null +++ b/tests/bugs/moddata_2/bug23464_4 @@ -0,0 +1,35 @@ +puts "============" +puts "CR23464" +puts "============" +puts "" +########################################################################################################## +# Projection algorithm produces wrong results +########################################################################################################## + +set int_check 3 +set fract_check 1415927 + +restore [locate_data_file bug23464_c58.draw] c58 +restore [locate_data_file bug23464_s37.draw] s37 + +project result c58 s37 +set info [length result] +regexp {is +([-0-9.+eE]+)} $info full num + +set int_part [expr round($num)] +set y [expr $num - round($num)] +set z [expr $y*10000000] +set fract_part [expr round($z)] + +if { ${int_check} != ${int_part} } { + puts "Error : Integer part of result is incorrect" +} + +if { ${fract_check} != ${fract_part} } { + puts "Error : Fractional part of result is incorrect" +} + + + + + diff --git a/tests/bugs/moddata_2/bug23464_5 b/tests/bugs/moddata_2/bug23464_5 new file mode 100755 index 0000000000..275d6d746f --- /dev/null +++ b/tests/bugs/moddata_2/bug23464_5 @@ -0,0 +1,35 @@ +puts "============" +puts "CR23464" +puts "============" +puts "" +########################################################################################################## +# Projection algorithm produces wrong results +########################################################################################################## + +set int_check 3 +set fract_check 1415927 + +restore [locate_data_file bug23464_c57.draw] c57 +restore [locate_data_file bug23464_s46.draw] s46 + +project result c57 s46 +set info [length result] +regexp {is +([-0-9.+eE]+)} $info full num + +set int_part [expr round($num)] +set y [expr $num - round($num)] +set z [expr $y*10000000] +set fract_part [expr round($z)] + +if { ${int_check} != ${int_part} } { + puts "Error : Integer part of result is incorrect" +} + +if { ${fract_check} != ${fract_part} } { + puts "Error : Fractional part of result is incorrect" +} + + + + + diff --git a/tests/bugs/moddata_2/bug23464_6 b/tests/bugs/moddata_2/bug23464_6 new file mode 100755 index 0000000000..6e6990a84f --- /dev/null +++ b/tests/bugs/moddata_2/bug23464_6 @@ -0,0 +1,35 @@ +puts "============" +puts "CR23464" +puts "============" +puts "" +########################################################################################################## +# Projection algorithm produces wrong results +########################################################################################################## + +set int_check 3 +set fract_check 1415927 + +restore [locate_data_file bug23464_c58.draw] c58 +restore [locate_data_file bug23464_s46.draw] s46 + +project result c58 s46 +set info [length result] +regexp {is +([-0-9.+eE]+)} $info full num + +set int_part [expr round($num)] +set y [expr $num - round($num)] +set z [expr $y*10000000] +set fract_part [expr round($z)] + +if { ${int_check} != ${int_part} } { + puts "Error : Integer part of result is incorrect" +} + +if { ${fract_check} != ${fract_part} } { + puts "Error : Fractional part of result is incorrect" +} + + + + + diff --git a/tests/bugs/moddata_2/bug23475 b/tests/bugs/moddata_2/bug23475 new file mode 100755 index 0000000000..7b306f3caf --- /dev/null +++ b/tests/bugs/moddata_2/bug23475 @@ -0,0 +1,16 @@ +puts "============" +puts "CR23475" +puts "===========" +puts "" +############################################################################### +# Wrong result of Geom_BSpline_Surface::IsVClosed() +############################################################################### + +restore [locate_data_file bug23475.draw] s1 +set info [dump s1] + +if { [regexp "BSplineSurface vclosed" $info] != 1} { + puts "Error : surface is not closed by V" +} + + diff --git a/tests/bugs/moddata_2/bug235 b/tests/bugs/moddata_2/bug235 new file mode 100755 index 0000000000..02d4cd1f0c --- /dev/null +++ b/tests/bugs/moddata_2/bug235 @@ -0,0 +1,41 @@ +puts "================" +puts "OCC235" +puts "================" +puts "" +####################################################### +## Intersection algorithm finds two intersection curves. One curve is closed while +## second is not (the distance between first and last points is 2e-5). +####################################################### + +restore [locate_data_file OCC235a.rle] su1 +############### checkshape su1 # is not a topological shape +restore [locate_data_file OCC235b.rle] su2 +############### checkshape su2 # is not a topological shape + +intersect result su1 su2 + +set dir [directory] +set nb_result [regexp -all {result} $dir] +if { $nb_result != 2 } { + puts "Faulty OCC235 (first checking): Intersection was made WRONGLY" +} else { + puts "OCC235 OK (first checking) : Intersection command works properly" + + regexp {nb +alone +Vertices +: +([-0-9.+eE]+)} [checksection result_1] full num_1 + if { $num_1 != 0 } { + puts " Faulty OCC235 (second checking): Result result_1 is UNclosed !!! " + } else { + puts " OCC235 OK (second checking): Result result_1 is closed !!! " + } + + regexp {nb +alone +Vertices +: +([-0-9.+eE]+)} [checksection result_2] full num_2 + if { $num_2 != 0 } { + puts " Faulty OCC235 (second checking): Result result_2 is UNclosed !!! " + } else { + puts " OCC235 OK (second checking): Result result_2 is closed !!! " + } +} + +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_2/bug23576 b/tests/bugs/moddata_2/bug23576 new file mode 100755 index 0000000000..09e98bd7c9 --- /dev/null +++ b/tests/bugs/moddata_2/bug23576 @@ -0,0 +1,33 @@ +puts "============" +puts "OCC23576" +puts "============" +puts "" +####################################################################### +# Intersection algorithm produces trimmed circle with illegal parametric range. +####################################################################### + +restore [locate_data_file bug23576_ff_b1_4_z564.brep] b1 + +explode b1 +bopcurves b1_1 b1_2 +copy c_1 result + +set log [dump result] + +regexp {Parameters : +([-0-9.+eE]+) +([-0-9.+eE]+)} ${log} full rc1 rc2 +puts "rc1=${rc1}" +puts "rc2=${rc2}" +set 2_PI [expr 2. * 2. * asin(1.0)] +puts "2_PI=${2_PI}" +puts "" + +if {${rc1} < 0.} { + puts "Error: Bad value of parametric range rc1" +} else { + puts "Good value of parametric range rc1" +} +if {${rc2} > ${2_PI}} { + puts "Error: Bad value of parametric range rc2" +} else { + puts "Good value of parametric range rc2" +} diff --git a/tests/bugs/moddata_2/bug23587 b/tests/bugs/moddata_2/bug23587 new file mode 100755 index 0000000000..2e083838eb --- /dev/null +++ b/tests/bugs/moddata_2/bug23587 @@ -0,0 +1,36 @@ +puts "============" +puts "CR23587" +puts "===========" +puts "" +############################################################################### +# Operation "2dintersect "in TestHarness can not find intersection point of two intersecting 2d curves. +############################################################################### + +restore [locate_data_file bug23587_IntEdges.brep] a + +explode a + +plane pl1 0 0 0 0 0 1 +trim trpl1 pl1 -1000 1000 -1000 1000 +mkface f1 trpl1 +pcurve c1 a_1 f1 +pcurve c2 a_2 f1 +pcurve c3 a_3 f1 +pcurve c4 a_4 f1 +set inter1 [2dintersect c1 c2 1.e-6] +set inter2 [2dintersect c3 c2 1.e-6] +set inter3 [2dintersect c1 c4 1.e-6] +set inter4 [2dintersect c3 c4 1.e-6] +set int1 [regexp {Intersection point 1} $inter1] +set int2 [regexp {Intersection point 1} $inter2] +set int3 [regexp {Intersection point 1} $inter3] +set int4 [regexp {Intersection point 1} $inter4] + +if { $int1 == 0 || $int2 == 0 || $int3 == 0 || $int4 ==0 } { + puts "Error : Intersection is not found" +} + +av2d +2dfit + +xwd ${imagedir}/${test_image}.png diff --git a/tests/bugs/moddata_2/bug236 b/tests/bugs/moddata_2/bug236 new file mode 100755 index 0000000000..00f1339229 --- /dev/null +++ b/tests/bugs/moddata_2/bug236 @@ -0,0 +1,40 @@ +puts "TODO OCC12345 ALL: Faulty OCC236" + +puts "================" +puts "OCC236" +puts "================" +puts "" +####################################################### +##Result of intersection of two surfaces of linear extrusion is incorrect. +####################################################### + +restore [locate_data_file OCC236a.rle] su1 +############### checkshape su1 # is not a topological shape +restore [locate_data_file OCC236b.rle] su2 +############### checkshape su2 # is not a topological shape + +intersect result su1 su2 + +set che [directory] +set err [lindex $che [expr [llength $che] - 1]] +if { $err != "result_2"} { + puts "Faulty OCC236" +} else { + puts "OCC236 OK (first checking) : Intersection command works properly" + regexp {nb +alone +Vertices +: +([-0-9.+eE]+)} [checksection result_1] full num + if { $num != 0 } { + puts " Faulty OCC236 (second checking): Result result_1 is UNclosed !!! " + } else { + puts " OCC236 OK (second checking): Result result_1 is closed !!! " + puts "" + } + regexp {nb +alone +Vertices +: +([-0-9.+eE]+)} [checksection result_2] full num + if { $num != 0 } { + puts " Faulty OCC236 (second checking): Result result_2 is UNclosed !!! " + } else { + puts " OCC236 OK (second checking): Result result_2 is closed !!! " + } +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug23603 b/tests/bugs/moddata_2/bug23603 new file mode 100755 index 0000000000..c611fe9fc8 --- /dev/null +++ b/tests/bugs/moddata_2/bug23603 @@ -0,0 +1,14 @@ +puts "============" +puts "CR23603" +puts "============" +puts "" +########################################################################################################## +# Boolean operation between two edges fails +########################################################################################################## + +restore [locate_data_file bug23603_ce.brep] b1 +explode b1 +copy b1_1 e1 +copy b1_2 e2 + +bop e1 e2 diff --git a/tests/bugs/moddata_2/bug23643 b/tests/bugs/moddata_2/bug23643 new file mode 100755 index 0000000000..18d74e47e8 --- /dev/null +++ b/tests/bugs/moddata_2/bug23643 @@ -0,0 +1,29 @@ +puts "========================" +puts "OCC23643" +puts "========================" +puts "" +####################################################################### +# Intersection algorithm produces B-Spline curve in case of coaxial cones +####################################################################### + +restore [locate_data_file bug23643_qf3.brep] b + +explode b +copy b_1 f1 +copy b_2 f2 + +mksurface s1 f1 +mksurface s2 f2 + +trim s1t s1 0 2*pi -18 10 +trim s2t s2 0 2*pi -18 10 + +intersect result s1t s2t + +set log [dump result] + +if {[regexp {Trimmed +curve} ${log}]} { + puts "Intersection algorithm work OK" +} else { + puts "Error: Intersection algorithm work bad" +} diff --git a/tests/bugs/moddata_2/bug23644 b/tests/bugs/moddata_2/bug23644 new file mode 100755 index 0000000000..b4fd0ca772 --- /dev/null +++ b/tests/bugs/moddata_2/bug23644 @@ -0,0 +1,20 @@ +puts "========" +puts "CR23644" +puts "========" + +########################################## +## Intersection between coaxial cones produces exception +########################################## + +pcone cn1 10 0 20 +pcone cn2 20 0 20 +explode cn1 f +explode cn2 f +copy cn1_1 f1 +copy cn2_1 f2 + +if [catch {bopcurves f1 f2} BOPLog] { + if { [regexp "Tolerance Reached=0\n has no 3d curve" ${BOPLog}] != 1 } { + puts "CR23644: Error" + } +} diff --git a/tests/bugs/moddata_2/bug237 b/tests/bugs/moddata_2/bug237 new file mode 100755 index 0000000000..c75601a352 --- /dev/null +++ b/tests/bugs/moddata_2/bug237 @@ -0,0 +1,27 @@ +puts "================" +puts "OCC237" +puts "================" +puts "" +####################################################### +## Hang-ups during the intersection of attached surfaces +####################################################### + +restore [locate_data_file OCC236b.rle] su1 +############### checkshape su1 # is not a topological shape +restore [locate_data_file OCC237b.rle] su2 +############### checkshape su2 # is not a topological shape + +if [catch {intersect result su1 su2 }] { + set mistake 1 +} else { + set mistake 0 +} + +if { $mistake != 0} { + puts "Faulty OCC237: Intersection was made WRONGLY" +} else { + puts "OCC237 OK : Intersection command works properly" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug2442 b/tests/bugs/moddata_2/bug2442 new file mode 100755 index 0000000000..e291a20e5f --- /dev/null +++ b/tests/bugs/moddata_2/bug2442 @@ -0,0 +1,65 @@ +puts "TODO OCC11111 ALL: OCC2442 Faulty" + +puts "============" +puts "OCC2442" +puts "============" +puts "" +###################################################### +# Error in BRepClass3d_SolidClassifier +###################################################### + +set IsGood 1 + +restore [locate_data_file OCC2442-1.brep] a +restore [locate_data_file OCC2442-2.brep] b + +distmini dm1 a b +set dm1_list [dump dm1_val] +set dm1_length [llength $dm1_list] +if {$dm1_length < 6} { + puts "Faulty OCC2442" + set IsGood 0 +} + +explode a +explode b +distmini dm2 a_1 b_1 +set dm2_list [dump dm2_val] +set dm2_length [llength $dm2_list] +if {$dm2_length < 6} { + puts "Faulty OCC2442" + set IsGood 0 +} + +if {$IsGood == 1} { + regexp {([-0-9.+eE]+)} $dm1_list full dist1 + regexp {([-0-9.+eE]+)} $dm2_list full dist2 + + set good_dist 18.4816355578064 + set dist1_percent [expr abs(${dist1} - ${good_dist}) / double(${good_dist}) * 100.] + + set dist2_percent [expr abs(${dist1} - ${dist2}) / double(${dist2}) * 100.] + + set percent_max 0.1 + + if {${dist1_percent} > ${percent_max}} { + puts "OCC2442 Faulty" + set IsGood 0 + } + if {${dist2_percent} > ${percent_max}} { + puts "OCC2442 Faulty" + set IsGood 0 + } + if {${IsGood} == 1} { + puts "OCC2442 OK" + } +} + +set boundbox [boundingstr a] +set x0 [lindex $boundbox 0] +set y0 [lindex $boundbox 1] +set z0 [lindex $boundbox 2] +ttranslate a [expr -1 * $x0] [expr -1 * $y0] [expr -1 * $z0] +ttranslate b [expr -1 * $x0] [expr -1 * $y0] [expr -1 * $z0] + +set 3dviewer 1 diff --git a/tests/bugs/moddata_2/bug247 b/tests/bugs/moddata_2/bug247 new file mode 100755 index 0000000000..a52c866be5 --- /dev/null +++ b/tests/bugs/moddata_2/bug247 @@ -0,0 +1,17 @@ + +puts "========================" +puts " OCC247 " +puts "========================" + +################################################# +##Using of function "bop" with attached shapes calls exception. +################################################# +restore [locate_data_file OCC247a.brep] a +restore [locate_data_file case_8_wire3.brep] b + +bop a b + + + + + \ No newline at end of file diff --git a/tests/bugs/moddata_2/bug25 b/tests/bugs/moddata_2/bug25 new file mode 100755 index 0000000000..b949e02e00 --- /dev/null +++ b/tests/bugs/moddata_2/bug25 @@ -0,0 +1,35 @@ +puts "================" +puts "OCC25" +puts "================" +puts "" + +restore [locate_data_file OCC25-1.brep] sh1 + +decho off +set che [checkshape sh1] +decho on + +if { [regexp {Faulty} $che ] == 1 } { + puts "Faulty OCC25 (case 1): Checkshape says that the wire on face has bad orientation, but it is not truth" +} else { + puts "OCC25 OK (case 1): Checkshape works properly" +} + +# ================================================ +restore [locate_data_file OCC25-2.brep] sh2 + +decho off +set che [checkshape sh2] +decho on + +if { [regexp {BRepCheck_BadOrientationOfSubshape} $che] && [regexp {BRepCheck_UnorientableShape} $che]} { + puts " OCC25 (case 2) OK: Checkshape works properly" +} else { + puts "Faulty OCC25 (case 2): Checkshape works wrongly" +} + +compound sh1 sh2 result + +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_2/bug252_1 b/tests/bugs/moddata_2/bug252_1 new file mode 100755 index 0000000000..0e2c5a2fc5 --- /dev/null +++ b/tests/bugs/moddata_2/bug252_1 @@ -0,0 +1,23 @@ + +puts "================" +puts "OCC252" +puts "================" +puts "" + +pload QAcommands + +restore [locate_data_file OCC252.brep] a + +checkshape a + +explode a w + +OCC252 result a_466 a 0 + +regexp {Mass +: +([-0-9.+eE]+)} [lprops result] full len + +if { ${len} <= 0 } { + puts "Error : OCC252" +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug252_2 b/tests/bugs/moddata_2/bug252_2 new file mode 100755 index 0000000000..437d85f33c --- /dev/null +++ b/tests/bugs/moddata_2/bug252_2 @@ -0,0 +1,22 @@ + +puts "================" +puts "OCC252" +puts "================" +puts "" + +pload QAcommands + +restore [locate_data_file OCC252.brep] a +checkshape a + +explode a w + +OCC252 result a_466 a 1 + +regexp {Mass +: +([-0-9.+eE]+)} [lprops result] full len + +if { ${len} != 0 } { + puts "Error : OCC252" +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug252_3 b/tests/bugs/moddata_2/bug252_3 new file mode 100755 index 0000000000..4cee576453 --- /dev/null +++ b/tests/bugs/moddata_2/bug252_3 @@ -0,0 +1,22 @@ + +puts "================" +puts "OCC252" +puts "================" +puts "" + +pload QAcommands + +restore [locate_data_file OCC252.brep] a +checkshape a + +explode a w + +OCC252 result a_466 a 2 + +regexp {Mass +: +([-0-9.+eE]+)} [lprops result] full len + +if { ${len} <= 0 } { + puts "Error : OCC252" +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug253 b/tests/bugs/moddata_2/bug253 new file mode 100755 index 0000000000..5bdafe4201 --- /dev/null +++ b/tests/bugs/moddata_2/bug253 @@ -0,0 +1,43 @@ +puts "========" +puts "OCC253" +puts "========" + +###################################################### +## Exception while segment operation on periodic BSpline curve. +## More over it seems that command segment in Draw doesnot work. +###################################################### + +restore [locate_data_file OCC253.draw] result +############### checkshape c1 # is not a topological shape + +smallview -2D- + +#store dump of initial curve +set init_dump [dump result] + +set ufirst 0.500000000000006 +set ulast 1.00000000015925 +catch { segment result $ufirst $ulast } + +#compare dump of initial curve and dump of result one +set result_dump [dump result] +if { $init_dump == $result_dump} { + puts "Faulty OCC253: command segment does NOT do anything" +} + +#retrieve amount of knots of result curve from dump +regexp { +Degree +[-0-9.+eE]+, +[-0-9.+eE]+ +Poles, +([-0-9.+eE]+) +KnotsPoles +:} $result_dump full KnotsNumber +#create string to be found in result dump +set trueLastKnot "$KnotsNumber : 1.00000000015925 " + +#verify parametrization of result curve +if { [regexp "1 : 0.500000000000006 " $result_dump] && [regexp $trueLastKnot $result_dump]} { + puts " OCC253 is OK: command segment works properly" +} else { + puts "Faulty OCC253: parametrization of result curve is wrong" +} + +2dfit +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_2/bug254 b/tests/bugs/moddata_2/bug254 new file mode 100755 index 0000000000..aab2e06d87 --- /dev/null +++ b/tests/bugs/moddata_2/bug254 @@ -0,0 +1,17 @@ + +puts "================" +puts "OCC254" +puts "================" +puts "" + +restore [locate_data_file OCC254-1.brep] shape1 +checkshape shape1 + +restore [locate_data_file OCC254-3.brep] shape3 +checkshape shape3 + +common result shape1 shape3 +checkshape result + +set length 1231.07 +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug256 b/tests/bugs/moddata_2/bug256 new file mode 100755 index 0000000000..e75b7f01e3 --- /dev/null +++ b/tests/bugs/moddata_2/bug256 @@ -0,0 +1,23 @@ + +puts "========" +puts "OCC256" +puts "========" + +restore [locate_data_file OCC256.brep] result +checkshape result + +tclean result +vinit +vdisplay result +vsetdispmode result 1 +vfit + +set info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $info full tri +regexp { +([-0-9.+eE]+) +nodes} $info full nod + +if { $tri != 66 && $nod != 66 } { + puts "Error : here is shading problem" +} + +set 3dviewer 0 diff --git a/tests/bugs/moddata_2/bug2569_1 b/tests/bugs/moddata_2/bug2569_1 new file mode 100755 index 0000000000..f7e2a4073a --- /dev/null +++ b/tests/bugs/moddata_2/bug2569_1 @@ -0,0 +1,20 @@ +pload QAcommands + +puts "============" +puts "OCC2569" +puts "============" +puts "" +###################################################### +# If it is not possible to create the bezier curve, +# it should throw an exception. +###################################################### +cpulimit 60 +vinit +set out [OCC2569 26 result] +if {[string compare $out "\n Degree = 25\n"] == 0} { + puts "OCC2569: OK" +} else { + puts "OCC2569: Faulty" +} + +set 3dviewer 0 diff --git a/tests/bugs/moddata_2/bug2569_2 b/tests/bugs/moddata_2/bug2569_2 new file mode 100755 index 0000000000..079685cbec --- /dev/null +++ b/tests/bugs/moddata_2/bug2569_2 @@ -0,0 +1,20 @@ +puts "TODO OCC11111 ALL: Exception" +puts "TODO OCC11111 ALL: An exception was caught" +puts "TODO OCC11111 ALL: TEST INCOMPLETE" + +pload QAcommands + +puts "============" +puts "OCC2569" +puts "============" +puts "" +###################################################### +# If it is not possible to create the bezier curve, +# it should throw an exception. +###################################################### +cpulimit 60 +vinit + +OCC2569 29 result + +set 3dviewer 0 diff --git a/tests/bugs/moddata_2/bug257 b/tests/bugs/moddata_2/bug257 new file mode 100755 index 0000000000..c94021f76f --- /dev/null +++ b/tests/bugs/moddata_2/bug257 @@ -0,0 +1,49 @@ +puts "TODO OCC12345 ALL: OCC257 - Error : xdelta= 3.6651128509496784" +puts "TODO OCC12345 ALL: OCC257 - Error : ydelta= 5.840378793387278" +puts "TODO OCC12345 ALL: OCC257 - Error : zdelta= 1.4898469085120623" + +puts "================" +puts "OCC257" +puts "================" +puts "" + +restore [locate_data_file OCC257.brep] result +checkshape result + +set bb [bounding result] + +set list [split ${bb}] +set listLength [llength ${list}] +if { ${listLength} < 6 } { + puts "Error : listLength = ${listLength}" +} + +set x1 [lindex ${list} 0] +set y1 [lindex ${list} 1] +set z1 [lindex ${list} 2] +set x2 [lindex ${list} 3] +set y2 [lindex ${list} 4] +set z2 [lindex ${list} 5] + +set len [expr ${x2} - ${x1}] +set width [expr ${y2} - ${y1}] +set height [expr ${z2} - ${z1}] + +set R 180 + +set xdelta [expr abs(${len} - ${R}) / ${R} * 100] +set ydelta [expr abs(${width} - ${R}) / ${R} * 100] +set zdelta [expr abs(${height} - ${R}) / ${R} * 100] + +set maxdelta 0.1 + +if { ${xdelta} > ${maxdelta} } then {puts "OCC257 - Error : xdelta= ${xdelta}"} +if { ${ydelta} > ${maxdelta} } then {puts "OCC257 - Error : ydelta= ${ydelta}"} +if { ${zdelta} > ${maxdelta} } then {puts "OCC257 - Error : zdelta= ${zdelta}"} + +if { ${xdelta} <= ${maxdelta} && ${ydelta} <= ${maxdelta} && ${zdelta} <= ${maxdelta} } then { + puts "OCC257: OK" +} + +set 3dviewer 0 + diff --git a/tests/bugs/moddata_2/bug258_1 b/tests/bugs/moddata_2/bug258_1 new file mode 100755 index 0000000000..5a5c898f2f --- /dev/null +++ b/tests/bugs/moddata_2/bug258_1 @@ -0,0 +1,27 @@ + +puts "========================" +puts " OCC258 " +puts "(case 1)" +puts "========================" + +restore [locate_data_file shading_143.brep] result +checkshape result + +tclean result +isos result 0 +vinit +vdisplay result +vsetdispmode result 1 +vfit +triangles result + +set info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $info full tri +regexp { +([-0-9.+eE]+) +nodes} $info full nod + +if { $tri < 71 || $nod < 73 } { + puts "Error (case 1) : here is shading problem" +} + +set 3dviewer 0 + diff --git a/tests/bugs/moddata_2/bug258_2 b/tests/bugs/moddata_2/bug258_2 new file mode 100755 index 0000000000..de68cd1703 --- /dev/null +++ b/tests/bugs/moddata_2/bug258_2 @@ -0,0 +1,28 @@ + +puts "========================" +puts " OCC258 " +puts "(case 2)" +puts "========================" + +restore [locate_data_file shading_144.brep] result +checkshape result + +tclean result +isos result 0 +vinit +vdisplay result +vsetdispmode result 1 +vfit +triangles result + +set info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $info full tri +regexp { +([-0-9.+eE]+) +nodes} $info full nod + +if { $tri < 70 || $nod < 72 } { + puts "Error (case 2) : here is shading problem" +} + +set 3dviewer 0 + + diff --git a/tests/bugs/moddata_2/bug259 b/tests/bugs/moddata_2/bug259 new file mode 100755 index 0000000000..dc0026ffa3 --- /dev/null +++ b/tests/bugs/moddata_2/bug259 @@ -0,0 +1,20 @@ + +puts "========================" +puts " OCC259 " +puts "========================" +puts "" +###################################################### +##Inequality behaviour of checkshape -top on SunOS and IRIX. +###################################################### + +pcylinder b1 1 2 + +dset r sqrt(2)/2 +box b2 -r -r 0 2*r 2*r 2 +trotate b2 0 0 0 0 0 1 135 + +bfuse result b2 b1 +checkshape -top result + +set square 18.8496 +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug262 b/tests/bugs/moddata_2/bug262 new file mode 100755 index 0000000000..f74746bc9e --- /dev/null +++ b/tests/bugs/moddata_2/bug262 @@ -0,0 +1,59 @@ + +puts "========" +puts "OCC262" +puts "========" + +restore [locate_data_file OCC262.brep] a +# checkshape a + +set tolerance 1e-5 + +build3d a ${tolerance} + +fsameparameter a + +explode a E +# Verify only a_1 and a_2 eges becouse a_3 had 3d curve before call of build3d command + +set toler1 [maxtolerance a_1] +regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $toler1 full MaxEdgeTolerance1 + +if { [ expr $MaxEdgeTolerance1 > $tolerance ] } { + puts "OCC262 - FAULTY. Tolerance of a_1 is too big" +} else { + puts "TOLERANCE OF A_1 - OK" +} + +set toler2 [maxtolerance a_2] +regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $toler2 full MaxEdgeTolerance2 + +if { [ expr $MaxEdgeTolerance2 > $tolerance ] } { + puts "OCC262 - FAULTY. Tolerance of a_1 is too big" +} else { + puts "TOLERANCE OF A_2 - OK" +} + + +#set tolerancelist [maxtolerance a] + +#set list [split ${tolerancelist} "\n\t"] +#set listLength [llength ${list}] +#if { ${listLength} < 9 } then {puts "OCC262 - Error : listLength= ${listLength}"} + +#set EdgeList [lindex ${list} 5] +#set MaxEdgeTolerance [lindex [split ${EdgeList}] [expr [llength [split ${EdgeList}] ] - 2] ] + +#set delta [expr abs(${MaxEdgeTolerance} - ${tolerance}) / ${tolerance} * 100] + +#set maxdelta 1 + +#if { ${delta} > ${maxdelta} } then {puts "OCC262 - Error : delta = ${delta}"} else { +# puts "OCC262: OK" +#} + +#puts "MaxEdgeTolerance = ${MaxEdgeTolerance}" + +renamevar a result + +set square 449.437 +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug265 b/tests/bugs/moddata_2/bug265 new file mode 100755 index 0000000000..bf396b067f --- /dev/null +++ b/tests/bugs/moddata_2/bug265 @@ -0,0 +1,16 @@ +puts "========" +puts "OCC265" +puts "========" +puts "" +############################################### +##Exception while projecting hyperbola on plane. +############################################### + +restore [locate_data_file OCC265-hyperbola.draw] hyperbola +restore [locate_data_file OCC265-plane.draw] plane + +projonplane result hyperbola plane + +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_2/bug266 b/tests/bugs/moddata_2/bug266 new file mode 100755 index 0000000000..a45b818019 --- /dev/null +++ b/tests/bugs/moddata_2/bug266 @@ -0,0 +1,21 @@ + +puts "================" +puts "OCC266" +puts "================" +puts "" + +restore [locate_data_file OCC266.brep] a +checkshape a + +renamevar a edge +explode edge e + +renamevar edge face +explode face f + +chamf result face edge_10 face_3 A 1 45 edge_6 face_3 A 1 45 edge_11 face_3 A 1 45 edge_12 face_3 A 1 45 edge_13 face_3 A 1 45 edge_14 face_3 A 1 45 edge_8 face_3 A 1 45 edge_9 face_3 A 1 45 +checkshape result + +set square 48913 +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug268 b/tests/bugs/moddata_2/bug268 new file mode 100755 index 0000000000..971a2d7fae --- /dev/null +++ b/tests/bugs/moddata_2/bug268 @@ -0,0 +1,15 @@ + +puts "========" +puts "OCC268" +puts "========" +puts "" +########################################################### +## Using of command "lprops" for shapes that contain degenerated edges call exception. +########################################################### + +restore [locate_data_file OCC268.brep] result +checkshape result + +set length 56.6039 +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug26_1 b/tests/bugs/moddata_2/bug26_1 new file mode 100755 index 0000000000..cccaa0bc7e --- /dev/null +++ b/tests/bugs/moddata_2/bug26_1 @@ -0,0 +1,18 @@ + +puts "================" +puts "OCC26" +puts "================" +puts "" + +restore [locate_data_file OCC26.brep] a +explode a +checkshape a_1 +checkshape a_2 + +bfuse result a_1 a_2 + +set square 44819.9 +set 2dviewer 0 + + + diff --git a/tests/bugs/moddata_2/bug26_2 b/tests/bugs/moddata_2/bug26_2 new file mode 100755 index 0000000000..2585427aa0 --- /dev/null +++ b/tests/bugs/moddata_2/bug26_2 @@ -0,0 +1,15 @@ + +puts "================" +puts "OCC26" +puts "================" +puts "" + +restore [locate_data_file OCC26.brep] a +explode a +checkshape a_1 +checkshape a_2 + +bfuse result a_2 a_1 + +set square 44819.8 +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug271 b/tests/bugs/moddata_2/bug271 new file mode 100755 index 0000000000..dec89563b7 --- /dev/null +++ b/tests/bugs/moddata_2/bug271 @@ -0,0 +1,26 @@ + +puts "========================" +puts " OCC271 " +puts "========================" +puts "" + +restore [locate_data_file OCC271a.rle] su1 +restore [locate_data_file OCC271b.rle] su2 + +set U1 2.315721254379057e-16 +set U2 0.01131870392278708 +set V1 226.9760100729095 +set V2 203.7283534809051 + +intersect result su1 su2 $U1 $V1 $U2 $V2 + +set che [whatis result] + +if { ![regexp {3d} $che] || ![regexp {curve} $che]} { + puts "Faulty OCC271: command INTERSECT works wrongly" +} else { + puts "OCC271 OK : command INTERSECT works properly" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug2755 b/tests/bugs/moddata_2/bug2755 new file mode 100755 index 0000000000..856197fcbe --- /dev/null +++ b/tests/bugs/moddata_2/bug2755 @@ -0,0 +1,139 @@ +puts "============" +puts "OCC2755" +puts "============" +puts "" +###################################################### +# Boolean Bug in OCC5.0 with the shape having a ellipse curve +###################################################### + +restore [locate_data_file OCC2755.brep] a + +checkshape a + +explode a f +mksurface gs a_1 +set list [proj gs 0 10 50] +set ll 4 + +set good_Parameter1List [list 0 0 0 0] +set good_Parameter2List [list 40.4616826479819 211.944716681974 64.3186164305428 81.0582330575794] +set good_OriginXList [list 0 0 0 0] +set good_OriginYList [list 10 10 10 10] +set good_OriginZList [list 50 50 50 50] +set good_AxisXList [list -0.0300865818651084 -0.941236271764613 0.534306660761684 0.998573938898137] +set good_AxisYList [list 0.999547296325529 -0.337748842654791 -0.845290714645381 0.0533862206328518] +set good_AxisZList [list 0 0 0 0] + +proc CalculatePercent {value good_value} { + if {${good_value} == 0. && ${value} == 0.} { + set percent 0. + } else { + set percent [expr abs(${value} - ${good_value}) / double(${good_value}) * 100.] + } + return ${percent} +} + +if {[llength ${list}] != ${ll}} { + puts "Faulty OCC2755" +} else { + set percent_max 0.1 + set IsGood 1 + for {set i 0} {$i < ${ll}} {incr i} { + set dump_list [dump [lindex ${list} $i]] + regexp { *Parameters *: *([-0-9.+eE]+) *([-0-9.+eE]+)} $dump_list full Parameter1 Parameter2 + regexp { *Origin *:([-0-9.+eE]+), *([-0-9.+eE]+), *([-0-9.+eE]+)} $dump_list full OriginX OriginY OriginZ + regexp { *Axis *:([-0-9.+eE]+), *([-0-9.+eE]+), *([-0-9.+eE]+)} $dump_list full AxisX AxisY AxisZ + + set good_Parameter1 [lindex ${good_Parameter1List} $i] + set good_Parameter2 [lindex ${good_Parameter2List} $i] + set good_OriginX [lindex ${good_OriginXList} $i] + set good_OriginY [lindex ${good_OriginYList} $i] + set good_OriginZ [lindex ${good_OriginZList} $i] + set good_AxisX [lindex ${good_AxisXList} $i] + set good_AxisY [lindex ${good_AxisYList} $i] + set good_AxisZ [lindex ${good_AxisZList} $i] + + set Parameter1_percent [CalculatePercent ${Parameter1} ${good_Parameter1}] + set Parameter2_percent [CalculatePercent ${Parameter2} ${good_Parameter2}] + set OriginX_percent [CalculatePercent ${OriginX} ${good_OriginX}] + set OriginY_percent [CalculatePercent ${OriginY} ${good_OriginY}] + set OriginZ_percent [CalculatePercent ${OriginZ} ${good_OriginZ}] + set AxisX_percent [CalculatePercent ${AxisX} ${good_AxisX}] + set AxisY_percent [CalculatePercent ${AxisY} ${good_AxisY}] + set AxisZ_percent [CalculatePercent ${AxisZ} ${good_AxisZ}] + + puts "good_Parameter1 = ${good_Parameter1}" + puts "Parameter1 = ${Parameter1}" + puts "Parameter1_percent = ${Parameter1_percent}\n" + + puts "good_Parameter2 = ${good_Parameter2}" + puts "Parameter2 = ${Parameter2}" + puts "Parameter2_percent = ${Parameter2_percent}\n" + + puts "good_OriginX = ${good_OriginX}" + puts "OriginX = ${OriginX}" + puts "OriginX_percent = ${OriginX_percent}\n" + + puts "good_OriginY = ${good_OriginY}" + puts "OriginY = ${OriginY}" + puts "OriginY_percent = ${OriginY_percent}\n" + + puts "good_OriginZ = ${good_OriginZ}" + puts "OriginZ = ${OriginZ}" + puts "OriginZ_percent = ${OriginZ_percent}\n" + + puts "good_AxisX = ${good_AxisX}" + puts "AxisX = ${AxisX}" + puts "AxisX_percent = ${AxisX_percent}\n" + + puts "good_AxisY = ${good_AxisY}" + puts "AxisY = ${AxisY}" + puts "AxisY_percent = ${AxisY_percent}\n" + + puts "good_AxisZ = ${good_AxisZ}" + puts "AxisZ = ${AxisZ}" + puts "AxisZ_percent = ${AxisZ_percent}\n" + + if {${Parameter1_percent} > ${percent_max}} { + puts "OCC2755 Faulty (case 3 / $i)" + set IsGood 0 + } + if {${Parameter2_percent} > ${percent_max}} { + puts "OCC2755 Faulty (case 3 / $i)" + set IsGood 0 + } + if {${OriginX_percent} > ${percent_max}} { + puts "OCC2755 Faulty (case 3 / $i)" + set IsGood 0 + } + if {${OriginY_percent} > ${percent_max}} { + puts "OCC2755 Faulty (case 3 / $i)" + set IsGood 0 + } + if {${OriginZ_percent} > ${percent_max}} { + puts "OCC2755 Faulty (case 3 / $i)" + set IsGood 0 + } + if {${AxisX_percent} > ${percent_max}} { + puts "OCC2755 Faulty (case 3 / $i)" + set IsGood 0 + } + if {${AxisY_percent} > ${percent_max}} { + puts "OCC2755 Faulty (case 3 / $i)" + set IsGood 0 + } + if {${AxisZ_percent} > ${percent_max}} { + puts "OCC2755 Faulty (case 3 / $i)" + set IsGood 0 + } + + } + + if {${IsGood} == 1} { + puts "OCC2755 OK" + } + +} + +set 3dviewer 0 + diff --git a/tests/bugs/moddata_2/bug276 b/tests/bugs/moddata_2/bug276 new file mode 100755 index 0000000000..95be721857 --- /dev/null +++ b/tests/bugs/moddata_2/bug276 @@ -0,0 +1,30 @@ +puts "========" +puts "OCC276" +puts "========" +puts "" +######################################################### +##Bad performance of checkshape on faces with multiple wires +######################################################### + +restore [locate_data_file OCC276.brep] result + +dchrono h2 reset +dchrono h2 start + +checkshape result + +dchrono h2 stop +set q2 [ dchrono h2 show ] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $q2 full z2 +if { [expr $z2 > 43] } { + puts "Elapsed time is more then 43 seconds - Faulty" +} else { + puts "Elapsed time is less then 43 seconds - OK" +} + +set 2dviewer 0 + + + + + diff --git a/tests/bugs/moddata_2/bug277 b/tests/bugs/moddata_2/bug277 new file mode 100755 index 0000000000..5a0aa435ba --- /dev/null +++ b/tests/bugs/moddata_2/bug277 @@ -0,0 +1,20 @@ +puts "========" +puts "OCC277" +puts "========" +puts "" + +pload QAcommands + +OCC277 + +set listmem {} +set i_max 10 +for {set i 1} {${i} <= ${i_max}} {incr i} { + OCC277 + + lappend listmem [expr [meminfo w] / 1024] + if { [checktrend $listmem 0 1 "Memory leak detected"] } { + puts "No memory leak, $i iterations" + break + } +} diff --git a/tests/bugs/moddata_2/bug2784_1 b/tests/bugs/moddata_2/bug2784_1 new file mode 100755 index 0000000000..c6a4ae78b8 --- /dev/null +++ b/tests/bugs/moddata_2/bug2784_1 @@ -0,0 +1,35 @@ +puts "============" +puts "OCC2784" +puts "============" +puts "" +###################################################### +# Common and cut operations for two faces gives invalid result +###################################################### +# Common and cut operations for two faces gives invalid result if one of the faces +# has a hole and other face lay in this hole (fill this hole). +###################################################### +## (new topology) +## (bcut) +## (bcommon) +###################################################### + +############# data ############# +box b1 10 20 10 +box b2 1 1 1 +ttranslate b2 5 5 0 +explode b1 f +explode b2 f + +bcut rcut1 b1_5 b2_5 +checkshape rcut1 + +bcommon result rcut1 b2_5 + +regexp {Mass +: +([-0-9.+eE]+)} [sprops result] full m + +if { $m != 0 } { + puts "Error : square is not right" +} + +set 3dviewer 1 + diff --git a/tests/bugs/moddata_2/bug2784_2 b/tests/bugs/moddata_2/bug2784_2 new file mode 100755 index 0000000000..69dc62992d --- /dev/null +++ b/tests/bugs/moddata_2/bug2784_2 @@ -0,0 +1,35 @@ +puts "============" +puts "OCC2784" +puts "============" +puts "" +###################################################### +# Common and cut operations for two faces gives invalid result +###################################################### +# Common and cut operations for two faces gives invalid result if one of the faces +# has a hole and other face lay in this hole (fill this hole). +###################################################### +## (old topology) +## (cut) +## (common) +###################################################### + +############# data ############# +box b1 10 20 10 +box b2 1 1 1 +ttranslate b2 5 5 0 +explode b1 f +explode b2 f + +bcut rcut1 b1_5 b2_5 +checkshape rcut1 + +bcommon result rcut1 b2_5 + +regexp {Mass +: +([-0-9.+eE]+)} [sprops result] full m + +if { $m != 0 } { + puts "Error : square is not right" +} + +set 3dviewer 1 + diff --git a/tests/bugs/moddata_2/bug278_1 b/tests/bugs/moddata_2/bug278_1 new file mode 100755 index 0000000000..c384545153 --- /dev/null +++ b/tests/bugs/moddata_2/bug278_1 @@ -0,0 +1,20 @@ + +puts "========" +puts "OCC278" +puts " (case 1)" +puts "========" + +###################################################################### +##Command "checkshape" does not define self-crossing for some wires and assigns status "valid" for them. +## NOTE akm: there is no actual intersection - it was a bug in displaying complicated curves (my patch deals with it) +## NOTE akm: wire alone is only a curve in the space so it may intersect itself. +## NOTE akm: bug after putting it on plane checkshape found the pb. +####################################################################### + +restore [locate_data_file OCC278a.brep] a + +mkplane result a +checkshape result + +set square 2914.99 +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug278_2 b/tests/bugs/moddata_2/bug278_2 new file mode 100755 index 0000000000..51a833d31e --- /dev/null +++ b/tests/bugs/moddata_2/bug278_2 @@ -0,0 +1,20 @@ + +puts "========" +puts "OCC278" +puts " (case 2)" +puts "========" + +###################################################################### +##Command "checkshape" does not define self-crossing for some wires and assigns status "valid" for them. +## NOTE akm: there is no actual intersection - it was a bug in displaying complicated curves (my patch deals with it) +## NOTE akm: wire alone is only a curve in the space so it may intersect itself. +## NOTE akm: bug after putting it on plane checkshape found the pb. +####################################################################### + +restore [locate_data_file OCC278b.brep] a + +mkplane result a +checkshape result + +set square 22740 +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug278_3 b/tests/bugs/moddata_2/bug278_3 new file mode 100755 index 0000000000..47e7df88e2 --- /dev/null +++ b/tests/bugs/moddata_2/bug278_3 @@ -0,0 +1,26 @@ + +puts "========" +puts "OCC278" +puts " (case 3)" +puts "========" + +###################################################################### +##Command "checkshape" does not define self-crossing for some wires and assigns status "valid" for them. +## NOTE akm: there is no actual intersection - it was a bug in displaying complicated curves (my patch deals with it) +## NOTE akm: wire alone is only a curve in the space so it may intersect itself. +## NOTE akm: bug after putting it on plane checkshape found the pb. +####################################################################### + +restore [locate_data_file OCC278c.brep] a + +mkplane result a +decho off +set che [checkshape result] +decho on + +if { [regexp "Faulty" $che] != 1 } { + puts "Error (case 3) : Checkshape command works wrongly" +} + +set square 43.3075 +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug27_1 b/tests/bugs/moddata_2/bug27_1 new file mode 100755 index 0000000000..2c079ccfbd --- /dev/null +++ b/tests/bugs/moddata_2/bug27_1 @@ -0,0 +1,16 @@ + +puts "================" +puts "OCC27" +puts "================" +puts "" + +restore [locate_data_file shading_128.brep] a +checkshape a + +explode a e +blend result a 1 a_5 1 a_6 1 a_7 1 a_8 +checkshape result + +set square 155.846 +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug27_2 b/tests/bugs/moddata_2/bug27_2 new file mode 100755 index 0000000000..8a81f2a226 --- /dev/null +++ b/tests/bugs/moddata_2/bug27_2 @@ -0,0 +1,17 @@ + +puts "================" +puts "OCC27" +puts "================" +puts "" + +restore [locate_data_file shading_128.brep] a +checkshape a + +explode a e +explode a f +chamf result a a_5 a_1 A 1 45 a_6 a_1 A 1 45 a_7 a_1 A 1 45 a_8 a_1 A 1 45 +checkshape result + +set square 154.145 +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug284 b/tests/bugs/moddata_2/bug284 new file mode 100755 index 0000000000..37a6c9f636 --- /dev/null +++ b/tests/bugs/moddata_2/bug284 @@ -0,0 +1,26 @@ +puts "========" +puts "OCC284" +puts "========" + +######################################################### +## Command "checkshape" "gives" exception during attempt to check attached shape. +######################################################### + +restore [locate_data_file OCC284.brep] result + +decho off +if [catch { checkshape result } catch_result] { + set mistake 1 +} else { + set mistake 0 +} +decho on + +if { $mistake != 0} { + puts "Faulty OCC284 : here is problem in checkshape function" +} else { + puts "OCC284 OK: function checkshape works properly" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug286 b/tests/bugs/moddata_2/bug286 new file mode 100755 index 0000000000..2d133e7830 --- /dev/null +++ b/tests/bugs/moddata_2/bug286 @@ -0,0 +1,28 @@ +puts "TODO OCC12345 ALL: Faulty OCC286: Attempt to project the point on surface gives wrong result." +puts "========================" +puts " OCC286 " +puts "========================" +puts "" + +restore [locate_data_file OCC286a.draw] a +restore [locate_data_file OCC286b.draw] b + +intersect i a b +cvalue i 0.31 x y z +point p x y z +proj b x y z + +set err1 "" +set err2 "" +set err3 "" +regexp {Point +: +([-0-9.+eE]+, +[-0-9.+eE]+, +[-0-9.+eE]+)} [dump ext_1] full err1 +regexp {Point +: +([-0-9.+eE]+, +[-0-9.+eE]+, +[-0-9.+eE]+)} [dump ext_2] full err2 +regexp {Point +: +([-0-9.+eE]+, +[-0-9.+eE]+, +[-0-9.+eE]+)} [dump ext_3] full err3 + +if { $err1 == $err2 || $err1 == $err3 || $err2 == $err3 } { + puts "Faulty OCC286: Attempt to project the point on surface gives wrong result." +} else { + puts "OCC286 OK : Attempt to project the point on surface gives correct result" +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug28_1 b/tests/bugs/moddata_2/bug28_1 new file mode 100755 index 0000000000..5ca2973635 --- /dev/null +++ b/tests/bugs/moddata_2/bug28_1 @@ -0,0 +1,20 @@ + +puts "================" +puts "OCC28" +puts "================" +############################################### +puts "Bug is limitation on currently version of topology (07.06.2002)." +############################################### + +cpulimit 1200 +restore [locate_data_file OCC28.brep] a +explode a +checkshape a_1 +checkshape a_2 + +bfuse result a_1 a_2 +checkshape result + +set square 483935 +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug28_2 b/tests/bugs/moddata_2/bug28_2 new file mode 100755 index 0000000000..0d8eec1bb8 --- /dev/null +++ b/tests/bugs/moddata_2/bug28_2 @@ -0,0 +1,21 @@ + +puts "================" +puts "OCC28" +puts "================" +############################################### +puts "Bug is limitation on currently version of topology (07.06.2002)." +############################################### + +cpulimit 1200 +restore [locate_data_file OCC28.brep] a +explode a +checkshape a_1 +checkshape a_2 + +bfuse result a_2 a_1 +checkshape result + +set square 483935 +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_2/bug299 b/tests/bugs/moddata_2/bug299 new file mode 100755 index 0000000000..fca2b46e0b --- /dev/null +++ b/tests/bugs/moddata_2/bug299 @@ -0,0 +1,26 @@ +puts "TODO OCC11111 ALL: OCC299: Error 2" + +pload QAcommands + +puts "================" +puts "OCC299" +puts "================" +puts "" + +restore [locate_data_file OCC298.brep] pr +checkshape pr + +point p 0.86427836 -1 -1 + +set info_result [OCC299 pr p] +set ll [llength ${info_result}] +if { ${ll} < 4 } { + puts "OCC299: Error 1" +} else { + if { [regexp {IN} $info_result] } { + puts "OCC299: OK" + } else { + puts "OCC299: Error 2" + } +} + diff --git a/tests/bugs/moddata_2/bug303_1 b/tests/bugs/moddata_2/bug303_1 new file mode 100755 index 0000000000..e4a81b44d2 --- /dev/null +++ b/tests/bugs/moddata_2/bug303_1 @@ -0,0 +1,23 @@ +puts "========================" +puts " OCC303 " +puts "(case 1)" +puts "========================" +puts "" +################################################################# +## Exception while segment operation. +################################################################# + +restore [locate_data_file OCC303a.brep] sh1 + +explode sh1 e + +mkcurve c5 sh1_5 +trim result c5 + +if [catch {segment result 22.07126804854423 23.6320483505636} catch_result] { + puts "Faulty OCC303 (case 1): function SEGMENT works wrongly" +} else { + puts "OCC303 OK (case 1): function SEGMENT works properly" +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug303_2 b/tests/bugs/moddata_2/bug303_2 new file mode 100755 index 0000000000..72bc6f3f02 --- /dev/null +++ b/tests/bugs/moddata_2/bug303_2 @@ -0,0 +1,23 @@ +puts "========================" +puts " OCC303 " +puts "(case 2)" +puts "========================" +puts "" +################################################################# +## Exception while segment operation. +################################################################# + +restore [locate_data_file OCC303b.brep] sh1 + +explode sh1 e + +mkcurve c1 sh1_1 +trim result c1 + +if [catch {segment result 23.09944997429109 23.6320483505636} catch_result] { + puts "Faulty OCC303 (case 2): function SEGMENT works wrongly" +} else { + puts "OCC303 OK (case 2): function SEGMENT works properly" +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug308 b/tests/bugs/moddata_2/bug308 new file mode 100755 index 0000000000..9befbc3ca4 --- /dev/null +++ b/tests/bugs/moddata_2/bug308 @@ -0,0 +1,25 @@ +puts "===========" +puts " OCC308 " +puts "===========" +puts "" +################################################################# +## Can not project 3D-curve on surface. +################################################################# + +restore [locate_data_file OCC308a.draw] a +restore [locate_data_file OCC308b.draw] b + +if [catch {project result a b} catch_result] { + set mistake 1 +} else { + set mistake 0 +} + +if { $mistake == 0} { + puts "Faulty OCC308 : function PROJECT works wrongly" +} else { + puts "OCC308 OK : function PROJECT works properly" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug31 b/tests/bugs/moddata_2/bug31 new file mode 100755 index 0000000000..a0b940df16 --- /dev/null +++ b/tests/bugs/moddata_2/bug31 @@ -0,0 +1,33 @@ +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" + +puts "================" +puts "OCC31" +puts "================" +puts "" + +restore [locate_data_file OCC31.brep] sh +checkshape sh + +explode sh f + +explode sh_2 e + +chamf res1 sh sh_2_1 sh_2 7 7 +checkshape res1 + +explode res1 f + +explode res1_5 e + +chamf res2 res1 res1_5_4 res1_5 7 7 +checkshape res2 + +explode res2 f + +explode res2_4 e + +chamf result res2 res2_4_1 res2_4 7 7 +checkshape result + +set square 107634 +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug311_1 b/tests/bugs/moddata_2/bug311_1 new file mode 100755 index 0000000000..4640258cb7 --- /dev/null +++ b/tests/bugs/moddata_2/bug311_1 @@ -0,0 +1,47 @@ +puts "========" +puts "OCC311" +puts "========" + +restore [locate_data_file OCC311.draw] c +#### checkshape c # - not a topological shape + +set ufirst 1e-7 +set ulast 6.2831854071795901 + +segment c ${ufirst} ${ulast} + +set dumpc [dump c] + +set list [split ${dumpc} "\n\t"] +set listLength [llength ${list}] +if { ${listLength} < 25 } { + puts "OCC311 - Error : listLength= ${listLength}" +} + +regexp { +Degree +([-0-9.+eE]+), +([-0-9.+eE]+) +Poles, +([-0-9.+eE]+) +Knots} $dumpc full DegreeNumber PolesNumber KnotsNumber + +set Knots [regexp -all -inline { +([-0-9.+eE]+ +: +[-0-9.+eE]+ +[-0-9.+eE]+)} $dumpc] +regexp { *[-0-9.+eE]+ +: +([-0-9.+eE]+) +[-0-9.+eE]+} [lindex $Knots 1] full FirstKnot +regexp { *[-0-9.+eE]+ +: +([-0-9.+eE]+) +[-0-9.+eE]+} [lindex $Knots [llength $Knots]-1] full LastKnot + +set delta_first [expr abs(${FirstKnot} - ${ufirst}) / ${ufirst} * 100] +set delta_last [expr abs(${LastKnot} - ${ulast}) / ${ulast} * 100] + +set maxdelta 0.01 + +puts "FirstKnot = ${FirstKnot}" +puts "LastKnot = ${LastKnot}" + +if { ${delta_first} > ${maxdelta} } { + puts "OCC311 - Error : delta_first = ${delta_first}" +} +if { ${delta_last} > ${maxdelta} } { + puts "OCC311 - Error : delta_last = ${delta_last}" +} + +if { ${delta_first} <= ${maxdelta} && ${delta_last} <= ${maxdelta} } { + puts "OCC311: OK" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug311_2 b/tests/bugs/moddata_2/bug311_2 new file mode 100755 index 0000000000..88740e7d80 --- /dev/null +++ b/tests/bugs/moddata_2/bug311_2 @@ -0,0 +1,47 @@ +puts "========" +puts "OCC311" +puts "========" + +restore [locate_data_file OCC311.draw] c +#### checkshape c # - not a topological shape + +set ufirst 1e-7 +set ulast 6.2831854071795897 + +segment c ${ufirst} ${ulast} + +set dumpc [dump c] + +set list [split ${dumpc} "\n\t"] +set listLength [llength ${list}] +if { ${listLength} < 25 } { + puts "OCC311 - Error : listLength= ${listLength}" +} + +regexp { +Degree +([-0-9.+eE]+), +([-0-9.+eE]+) +Poles, +([-0-9.+eE]+) +Knots} $dumpc full DegreeNumber PolesNumber KnotsNumber + +set Knots [regexp -all -inline { +([-0-9.+eE]+ +: +[-0-9.+eE]+ +[-0-9.+eE]+)} $dumpc] +regexp { *[-0-9.+eE]+ +: +([-0-9.+eE]+) +[-0-9.+eE]+} [lindex $Knots 1] full FirstKnot +regexp { *[-0-9.+eE]+ +: +([-0-9.+eE]+) +[-0-9.+eE]+} [lindex $Knots [llength $Knots]-1] full LastKnot + +set delta_first [expr abs(${FirstKnot} - ${ufirst}) / ${ufirst} * 100] +set delta_last [expr abs(${LastKnot} - ${ulast}) / ${ulast} * 100] + +set maxdelta 0.01 + +puts "FirstKnot = ${FirstKnot}" +puts "LastKnot = ${LastKnot}" + +if { ${delta_first} > ${maxdelta} } { + puts "OCC311 - Error : delta_first = ${delta_first}" +} +if { ${delta_last} > ${maxdelta} } { + puts "OCC311 - Error : delta_last = ${delta_last}" +} + +if { ${delta_first} <= ${maxdelta} && ${delta_last} <= ${maxdelta} } { + puts "OCC311: OK" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug313 b/tests/bugs/moddata_2/bug313 new file mode 100755 index 0000000000..ff460637b7 --- /dev/null +++ b/tests/bugs/moddata_2/bug313 @@ -0,0 +1,13 @@ + +puts "================" +puts "OCC313" +puts "================" +puts "" + +######################################################## +#### Exeption is raised in DRAW during command "restore" on attahed shape. +######################################################## + +restore [locate_data_file OCC313.brep] result + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug324 b/tests/bugs/moddata_2/bug324 new file mode 100755 index 0000000000..f7bfcc75d5 --- /dev/null +++ b/tests/bugs/moddata_2/bug324 @@ -0,0 +1,21 @@ +puts "========================" +puts " OCC324 " +puts "========================" +puts "" +################################################################# +## The command "intersect" applied to the given arguments "s1" (plane) and "s2" (cylinder) leads +## to the program hang-up. +################################################################# + +restore [locate_data_file OCC324a.draw] s1 +restore [locate_data_file OCC324b.draw] s2 + +if [catch {intersect result s1 s2} catch_result] { + puts "Faulty OCC324: function INTERSECT works wrongly" +} else { + puts "OCC324 OK: function INTERSECT works properly" +} + +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_2/bug324_1 b/tests/bugs/moddata_2/bug324_1 new file mode 100755 index 0000000000..170714785d --- /dev/null +++ b/tests/bugs/moddata_2/bug324_1 @@ -0,0 +1,16 @@ + +puts "========================" +puts "BUC60979" +puts " OCC324 " +puts "========================" +puts "" +################################################################# +## Extrema between trimmed line and circle lead to exception. +################################################################# + +restore [locate_data_file OCC359a.brep] el +restore [locate_data_file OCC359b.brep] ec + +distmini dd el ec + + diff --git a/tests/bugs/moddata_2/bug325 b/tests/bugs/moddata_2/bug325 new file mode 100755 index 0000000000..943aba96e2 --- /dev/null +++ b/tests/bugs/moddata_2/bug325 @@ -0,0 +1,21 @@ +puts "========================" +puts " OCC325 " +puts "========================" +puts "" +################################################## +## Checkshape does not recognize an error in a bad face +################################################## + +restore [locate_data_file OCC325.brep] result + +decho off +set che [checkshape result] +decho on + +if { [regexp {Faulty} $che ] != 1} { + puts "Faulty OCC325: Checkshape command works wrongly" +} else { + puts "OCC325 OK : Checkshape command works properly" +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug326 b/tests/bugs/moddata_2/bug326 new file mode 100755 index 0000000000..5c491ae55e --- /dev/null +++ b/tests/bugs/moddata_2/bug326 @@ -0,0 +1,18 @@ +puts "================" +puts "OCC326" +puts "================" +puts "" +########################################################### +## Exception is raised in sewing on internal edges on attached shape +########################################################### + +restore [locate_data_file OCC326.brep] a + +if [catch { sewing result a } catch_result] { + puts "Faulty OCC326: here is sewing problem" +} else { + puts "OCC326 OK: Sewing is ok, there is no except" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug332 b/tests/bugs/moddata_2/bug332 new file mode 100755 index 0000000000..82893296a6 --- /dev/null +++ b/tests/bugs/moddata_2/bug332 @@ -0,0 +1,104 @@ +puts "================" +puts "OCC332" +puts "================" +puts "" + +pload QAcommands + +set wall_thickness 10 +set dia1 30 +set dia2 50 +set ll 100 +set major_radius 200 + +OCC332 ${wall_thickness} ${dia1} ${dia2} ${ll} ${major_radius} + +checkshape wallSolid_ +checkshape gasSolid_ + + +vinit +vdisplay wallSolid_ +vdisplay gasSolid_ +vzfit + + +explode wallSolid_ w + +vdisplay wallSolid__3 +vdisplay wallSolid__4 +vdisplay wallSolid__5 +vdisplay wallSolid__6 + +set props_3 [lprops wallSolid__3] +set props_4 [lprops wallSolid__4] +set props_5 [lprops wallSolid__5] +set props_6 [lprops wallSolid__6] + +#wire wallSolid__3 +set list [split ${props_3} "\n\t"] +set listLength [llength ${list}] +if { ${listLength} < 20 } { + puts "OCC332 - Error : listLength= ${listLength}" +} + +regexp {Mass +: +([-0-9.+eE]+)} $props_3 full CircleLength_3 + +#wire wallSolid__4 +set list [split ${props_4} "\n\t"] +set listLength [llength ${list}] +if { ${listLength} < 20 } { + puts "OCC332 - Error : listLength= ${listLength}" +} + +regexp {Mass +: +([-0-9.+eE]+)} $props_4 full CircleLength_4 + +#wire wallSolid__5 +set list [split ${props_5} "\n\t"] +set listLength [llength ${list}] +if { ${listLength} < 20 } { + puts "OCC332 - Error : listLength= ${listLength}" +} + +regexp {Mass +: +([-0-9.+eE]+)} $props_5 full CircleLength_5 + +#wire wallSolid__6 +set list [split ${props_6} "\n\t"] +set listLength [llength ${list}] +if { ${listLength} < 20 } { + puts "OCC332 - Error : listLength= ${listLength}" +} + +regexp {Mass +: +([-0-9.+eE]+)} $props_6 full CircleLength_6 + +# Calculation +set pi [expr 2. * asin(1.0)] +set TheoryCircleLength_4 [expr ${pi} * ${dia1}] +set TheoryCircleLength_3 [expr ${pi} * (${dia1} + 2 * ${wall_thickness}) ] +set TheoryCircleLength_6 [expr ${pi} * ${dia2}] +set TheoryCircleLength_5 [expr ${pi} * (${dia2} + 2 * ${wall_thickness}) ] + +set delta_3 [expr abs(${CircleLength_3} - ${TheoryCircleLength_3}) / ${TheoryCircleLength_3} * 100] +set delta_4 [expr abs(${CircleLength_4} - ${TheoryCircleLength_4}) / ${TheoryCircleLength_4} * 100] +set delta_5 [expr abs(${CircleLength_5} - ${TheoryCircleLength_5}) / ${TheoryCircleLength_5} * 100] +set delta_6 [expr abs(${CircleLength_6} - ${TheoryCircleLength_6}) / ${TheoryCircleLength_6} * 100] + +set maxdelta 0.1 + +if { ${delta_3} > ${maxdelta} } then {puts "OCC332 - Error : delta_3= ${delta_3}"} +if { ${delta_4} > ${maxdelta} } then {puts "OCC332 - Error : delta_4= ${delta_4}"} +if { ${delta_5} > ${maxdelta} } then {puts "OCC332 - Error : delta_5= ${delta_5}"} +if { ${delta_6} > ${maxdelta} } then {puts "OCC332 - Error : delta_6= ${delta_6}"} + +if { ${delta_3} <= ${maxdelta} && ${delta_4} <= ${maxdelta} && ${delta_5} <= ${maxdelta} && ${delta_6} <= ${maxdelta} } then { + puts "OCC332: OK" +} +puts "CircleLength_3 = ${CircleLength_3}" +puts "CircleLength_4 = ${CircleLength_4}" +puts "CircleLength_5 = ${CircleLength_5}" +puts "CircleLength_6 = ${CircleLength_6}" + +set only_screen 1 + + + diff --git a/tests/bugs/moddata_2/bug333 b/tests/bugs/moddata_2/bug333 new file mode 100755 index 0000000000..bafe6e77a6 --- /dev/null +++ b/tests/bugs/moddata_2/bug333 @@ -0,0 +1,37 @@ +puts "================" +puts "OCC333" +puts "================" +puts "" +####################################################### +## Superimposed curves during intersection two surfaces +####################################################### + +pload QAcommands + +restore [locate_data_file OCC333a.draw] s12 +############### checkshape su12 # is not a topological shape +restore [locate_data_file OCC333b.draw] s11 +############### checkshape su11 # is not a topological shape +intersect result s12 s11 +explode result e +clknots result_3 +clknots result_13 + +mkedge e_1 result_3 +mkedge e_2 result_13 + +set status [OCC333 e_1 e_2] +if {[llength ${status}] < 1} { + puts "OCC333 ERROR" +} else { + regexp {([-0-9.+eE]+)} ${status} full code + if { ${code} == 3 || ${code} == 2} { + puts "OCC333 OK : Intersection command works properly" + } else { + puts "Faulty OCC333 : Intersection was made WRONGLY" + } +} + +donly i_3 i_13 + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug343 b/tests/bugs/moddata_2/bug343 new file mode 100755 index 0000000000..3335b4a554 --- /dev/null +++ b/tests/bugs/moddata_2/bug343 @@ -0,0 +1,131 @@ +puts "================" +puts "BUC61039" +puts "OCC343" +puts "================" +puts "" + +cpulimit 9000 +pload XDE +if [catch {igesbrep [locate_data_file lh3d_px1.igs] a *} catch_result] { + puts "Faulty OCC343: here is reading problem" +} else { + puts "Reading OCC343 OK" + tpcompound a + # + # First sewing + # + sewing result1 100. a + + set FaceList [explode result1 f] + set FaceListLength [llength ${FaceList}] + if { ${FaceListLength} < 1 } { + puts "OCC343 - Error : FaceListLength= ${FaceListLength}" + } + + set X_List1 [list] + set Y_List1 [list] + set Z_List1 [list] + for {set i 1} {${i} <= ${FaceListLength}} {incr i} { + set props [sprops result1_${i}] + set list [split ${props} "\n\t"] + set listLength [llength ${list}] + if { ${listLength} < 20 } { + puts "OCC343 - Error : listLength= ${listLength}" + } + set Center_Gravity_X [lindex ${list} 5] + set Center_Gravity_Y [lindex ${list} 6] + set Center_Gravity_Z [lindex ${list} 7] + + set Center_Gravity_X [lindex [split ${Center_Gravity_X}] [expr [llength [split ${Center_Gravity_X}] ] - 1] ] + set Center_Gravity_Y [lindex [split ${Center_Gravity_Y}] [expr [llength [split ${Center_Gravity_Y}] ] - 1] ] + set Center_Gravity_Z [lindex [split ${Center_Gravity_Z}] [expr [llength [split ${Center_Gravity_Z}] ] - 1] ] + + lappend X_List1 ${Center_Gravity_X} + lappend Y_List1 ${Center_Gravity_Y} + lappend Z_List1 ${Center_Gravity_Z} + } + + vinit + vdisplay result1 + vfit + + set CycleNumber 10 + for {set j 1} {${j} <= ${CycleNumber}} {incr j} { + veraseall + # + # Second sewing + # + + if [catch {igesbrep [locate_data_file lh3d_px1.igs] a *} catch_result] { + puts "Faulty OCC343: here is reading problem" + } else { + puts "Reading OCC343 OK" + } + + tpcompound a + sewing result2 100. a + + set FaceList [explode result2 f] + set FaceListLength [llength ${FaceList}] + if { ${FaceListLength} < 1 } then {puts "OCC343 - Error : FaceListLength= ${FaceListLength}"} + + set X_List2 [list] + set Y_List2 [list] + set Z_List2 [list] + for {set i 1} {${i} <= ${FaceListLength}} {incr i} { + set props [sprops result2_${i}] + set list [split ${props} "\n\t"] + set listLength [llength ${list}] + if { ${listLength} < 20 } { + puts "OCC343 - Error : listLength= ${listLength}" + } + + set Center_Gravity_X [lindex ${list} 5] + set Center_Gravity_Y [lindex ${list} 6] + set Center_Gravity_Z [lindex ${list} 7] + + set Center_Gravity_X [lindex [split ${Center_Gravity_X}] [expr [llength [split ${Center_Gravity_X}] ] - 1] ] + set Center_Gravity_Y [lindex [split ${Center_Gravity_Y}] [expr [llength [split ${Center_Gravity_Y}] ] - 1] ] + set Center_Gravity_Z [lindex [split ${Center_Gravity_Z}] [expr [llength [split ${Center_Gravity_Z}] ] - 1] ] + + lappend X_List2 ${Center_Gravity_X} + lappend Y_List2 ${Center_Gravity_Y} + lappend Z_List2 ${Center_Gravity_Z} + } + + set ListLength [llength ${X_List1}] + if { ${ListLength} != [llength ${Y_List1}] } then {puts "OCC343 - Error : ListLength= ${ListLength}"} + if { ${ListLength} != [llength ${Z_List1}] } then {puts "OCC343 - Error : ListLength= ${ListLength}"} + if { ${ListLength} != [llength ${X_List2}] } then {puts "OCC343 - Error : ListLength= ${ListLength}"} + if { ${ListLength} != [llength ${Y_List2}] } then {puts "OCC343 - Error : ListLength= ${ListLength}"} + if { ${ListLength} != [llength ${Z_List2}] } then {puts "OCC343 - Error : ListLength= ${ListLength}"} + + for {set i 0} {${i} < ${ListLength}} {incr i} { + set X1 [lindex ${X_List1} ${i}] + set X2 [lindex ${X_List2} ${i}] + if { ${X1} != ${X2} } { + puts "OCC343 - Error : X1= ${X1} X2= ${X2}" + } + set Y1 [lindex ${Y_List1} ${i}] + set Y2 [lindex ${Y_List2} ${i}] + if { ${Y1} != ${Y2} } { + puts "OCC343 - Error : Y1= ${Y1} Y2= ${Y2}" + } + set Z1 [lindex ${Z_List1} ${i}] + set Z2 [lindex ${Z_List2} ${i}] + if { ${Z1} != ${Z2} } { + puts "OCC343 - Error : Z1= ${Z1} Z2= ${Z2}" + } + } + + tclean result1 + vdisplay result1 + vfit + } +} + +set only_screen 1 + + + + diff --git a/tests/bugs/moddata_2/bug35 b/tests/bugs/moddata_2/bug35 new file mode 100755 index 0000000000..b2c088d48a --- /dev/null +++ b/tests/bugs/moddata_2/bug35 @@ -0,0 +1,20 @@ + +puts "================" +puts "OCC35" +puts "================" +puts "" + +restore [locate_data_file OCC35.brep] result +decho off +set info [checkshape result] +decho on + +if { [regexp "Faulty" $info] != 1 } { + puts "Command checkshape works wrongly (should be faulty)" +} + +set 2dviewer 0 + + + + diff --git a/tests/bugs/moddata_2/bug353 b/tests/bugs/moddata_2/bug353 new file mode 100755 index 0000000000..52a2e79662 --- /dev/null +++ b/tests/bugs/moddata_2/bug353 @@ -0,0 +1,16 @@ +pload QAcommands + +puts "================" +puts "OCC353" +puts "================" +puts "" +########################################################## +## Attached DRAW command "TATA_const" hangs in Geom2dGcc_Circ2d3Tan. +########################################################## + +if [catch { OCC353 }] { + puts "OCC353: Error" +} else { + puts "OCC353: OK" +} + diff --git a/tests/bugs/moddata_2/bug354_1 b/tests/bugs/moddata_2/bug354_1 new file mode 100755 index 0000000000..34b9cbbe01 --- /dev/null +++ b/tests/bugs/moddata_2/bug354_1 @@ -0,0 +1,19 @@ + +puts "========================" +puts " OCC354 " +puts "(case 1)" +puts "========================" +puts "" +################################################## +## neither chamfer nor blend is built in similar situation +################################################## + +restore [locate_data_file OCC354a.brep] a + +explode a e + +blend result a 2 a_18 +checkshape result + +set square 593.527 +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug354_2 b/tests/bugs/moddata_2/bug354_2 new file mode 100755 index 0000000000..100a457d91 --- /dev/null +++ b/tests/bugs/moddata_2/bug354_2 @@ -0,0 +1,22 @@ + +puts "========================" +puts " OCC354 " +puts "(case 2)" +puts "========================" +puts "" +################################################## +## neither chamfer nor blend is built in similar situation +################################################## + +restore [locate_data_file OCC354b.brep] a +explode a f + +explode a_5 e + +donl a a_5_6 + +chamf result a a_5_6 a_5 A 2 45 +checkshape result + +set square 589.268 +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug36 b/tests/bugs/moddata_2/bug36 new file mode 100755 index 0000000000..7c61e6b4a9 --- /dev/null +++ b/tests/bugs/moddata_2/bug36 @@ -0,0 +1,29 @@ +puts "========" +puts "OCC36" +puts "========" + +pload XDE + +if [catch { igesbrep [locate_data_file OCC36.igs] a * } res] { + puts "Warning OCC36: here is reading problem" +} else { + puts "Reading OCC36 OK" + + tpcompound r + dchrono h2 reset + dchrono h2 start + sewing result 1.e-7 r + dchrono h2 stop + set q2 [ dchrono h2 show ] + regexp {CPU user time: ([-0-9.+eE]+) seconds} $q2 full z2 + puts "$z2" + if { $z2 > 30 } { + puts "Elapsed time is more then 30 seconds - Faulty" + } else { + puts "Elapsed time is less then 30 seconds - OK" + } +} + +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_2/bug360 b/tests/bugs/moddata_2/bug360 new file mode 100755 index 0000000000..5ff2cb238c --- /dev/null +++ b/tests/bugs/moddata_2/bug360 @@ -0,0 +1,24 @@ +puts "========================" +puts " BUC60980 " +puts " OCC360" +puts "========================" +puts "" +################################################################## +## Can not find a projection the circle on the sphere. +################################################################## + +restore [locate_data_file OCC360a.draw] c +restore [locate_data_file OCC360b.draw] cf + +set che [project result c cf] +puts $che + +if { [regexp {Projection} $che] && [regexp {Failed} $che] } { + puts "Faulty OCC360: command PROJECT works wrongly" +} else { + puts " OCC360 OK : command PROJECT works properly" +} + +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_2/bug366 b/tests/bugs/moddata_2/bug366 new file mode 100755 index 0000000000..850e567f92 --- /dev/null +++ b/tests/bugs/moddata_2/bug366 @@ -0,0 +1,21 @@ + +puts "========================" +puts " OCC366 " +puts "========================" +puts "" +################################################## +## Checkshape says that face is valid but it inludes selfintersecting wire +################################################## + +restore [locate_data_file buc61006.brep] result + +decho off +set che [checkshape result] +decho on + +if { [regexp "Faulty" $che] != 1 } { + puts "Error : Checkshape command works wrongly" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug367 b/tests/bugs/moddata_2/bug367 new file mode 100755 index 0000000000..324a449d0e --- /dev/null +++ b/tests/bugs/moddata_2/bug367 @@ -0,0 +1,24 @@ +pload QAcommands + +puts "================" +puts "OCC367" +puts "BUC61013" +puts "================" +puts "" + +restore [locate_data_file OCC105.brep] result +checkshape result + +set step 0.5 +set goodX -307.47165394 +set goodY -340.18073533 +set goodZ 0 +set percent_tolerance 0.01 + +OCC367 result ${step} ${goodX} ${goodY} ${goodZ} ${percent_tolerance} + +set length 1760.13 +set 2dviewer 0 + + + diff --git a/tests/bugs/moddata_2/bug368 b/tests/bugs/moddata_2/bug368 new file mode 100755 index 0000000000..a3c733f480 --- /dev/null +++ b/tests/bugs/moddata_2/bug368 @@ -0,0 +1,33 @@ + +puts "========================" +puts "BUC61027" +puts " OCC368 " +puts "========================" +puts "" +############################################## +## Visualization is too slow. +############################################## + +restore [locate_data_file OCC368.brep] result +checkshape result + +tclean result +isos result 0 +vinit +dchrono h2 reset +dchrono h2 start +vdisplay result +vsetdispmode result 1 +dchrono h2 stop + +regexp {CPU user time: +([-0-9.+eE]+)} [dchrono h2 show] full z2 + +if { $z2 > 30 } { + puts "Error : Elapsed time is more then 30 seconds" +} + +set 2dviewer 0 + + + + diff --git a/tests/bugs/moddata_2/bug370 b/tests/bugs/moddata_2/bug370 new file mode 100755 index 0000000000..dab5d91141 --- /dev/null +++ b/tests/bugs/moddata_2/bug370 @@ -0,0 +1,24 @@ +puts "========================" +puts "BUC61033" +puts " OCC370 " +puts "========================" +puts "" +################################################################# +##Intersection between a sphere and trimmed plane, using IntPatch_Intersection, lead to infinite cycle. +################################################################# + +sphere gs1 1 +plane gs2 0 0 0 1 0 0 +trim trgs2 gs2 0 1.000001 -1 0.000001 + +intersect result gs1 trgs2 + +cpulimit 300 + +puts "OCC370 OK: function INTERSECT works properly" + +erase gs2 + +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_2/bug371 b/tests/bugs/moddata_2/bug371 new file mode 100755 index 0000000000..5db7f14013 --- /dev/null +++ b/tests/bugs/moddata_2/bug371 @@ -0,0 +1,24 @@ + +puts "========================" +puts "BUC61034" +puts " OCC371 " +puts "========================" +puts "" +################################################################# +##Intersection between two BSplineSurfaces, using IntPatch_Intersection, lead to infinite cycle. +################################################################# + +restore [locate_data_file OCC371a.brep] a +restore [locate_data_file OCC371b.brep] b + +mksurface gs1 a +mksurface gs2 b +trim trgs1 gs1 0.0 1.0 0.9698725179864 1.0 +trim trgs2 gs2 0.0 1.0 0.24333094700742 0.92374551772989 + +#cpulimit 300 +intersect result trgs1 trgs2 + +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_2/bug372 b/tests/bugs/moddata_2/bug372 new file mode 100755 index 0000000000..de1d75e470 --- /dev/null +++ b/tests/bugs/moddata_2/bug372 @@ -0,0 +1,31 @@ +pload QAcommands + +puts "========================" +puts "OCC372" +puts "BUC61036" +puts "========================" +puts "" +############################################################### +##BRepClass3d_SolidClassifier classify point to solid as OUT, but the point is inside the solid. +############################################################### + +restore [locate_data_file OCC372.brep] b1 +checkshape b1 + +point p1 6311.4862583184 -2841.3092756034 16.461053497188 + +set result [OCC299 b1 p1] +set ll [llength ${result}] +if { ${ll} < 4 } then { + puts "OCC372: ERROR 1" +} else { + regexp {The point is (.*) shape} ${result} full status + if {[string compare ${status} "IN"] == 0} then { + puts "status = ${status}" + puts "OCC372: OK" + } else { + puts "status = ${status}" + puts "Faulty : OCC372" + } +} + diff --git a/tests/bugs/moddata_2/bug3721_1 b/tests/bugs/moddata_2/bug3721_1 new file mode 100755 index 0000000000..c2e74d4898 --- /dev/null +++ b/tests/bugs/moddata_2/bug3721_1 @@ -0,0 +1,28 @@ +puts "TODO OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO OCC11111 ALL: Error : The square of result shape is" + +puts "============" +puts "OCC3721" +puts "============" +puts "" +###################################################### +# When using Boolean Operations exception is raised for some tolerance vals. +###################################################### +## (new topology) +## (bfuse) +###################################################### + +restore [locate_data_file OCC3721-1.brep] b1 +restore [locate_data_file OCC3721-2.brep] b2 + +checkshape b1 +checkshape b2 + +if { [catch {bfuse result b1 b2} catch_result] } { + puts "Faulty OCC3721" +} + +checkshape result + +set square 71185 +set 3dviewer 1 diff --git a/tests/bugs/moddata_2/bug3721_2 b/tests/bugs/moddata_2/bug3721_2 new file mode 100755 index 0000000000..1d95c6ef74 --- /dev/null +++ b/tests/bugs/moddata_2/bug3721_2 @@ -0,0 +1,29 @@ +puts "TODO OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO OCC11111 ALL: Error : The square of result shape is" + +puts "============" +puts "OCC3721" +puts "============" +puts "" +###################################################### +# When using Boolean Operations exception is raised for some tolerance vals. +###################################################### +## (new topology) +## (bfuse) +###################################################### + +restore [locate_data_file OCC3721-1.brep] b1 +restore [locate_data_file OCC3721-2.brep] b2 + +checkshape b1 +checkshape b2 + +if { [catch {bfuse result b2 b1} catch_result] } { + puts "Faulty OCC3721" +} + +checkshape result + +set square 71185 +set 3dviewer 1 + diff --git a/tests/bugs/moddata_2/bug3721_3 b/tests/bugs/moddata_2/bug3721_3 new file mode 100755 index 0000000000..e7203b5981 --- /dev/null +++ b/tests/bugs/moddata_2/bug3721_3 @@ -0,0 +1,28 @@ +puts "TODO OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO OCC11111 ALL: Error : The square of result shape is" + +puts "============" +puts "OCC3721" +puts "============" +puts "" +###################################################### +# When using Boolean Operations exception is raised for some tolerance vals. +###################################################### +## (new topology) +## (bcommon) +###################################################### + +restore [locate_data_file OCC3721-1.brep] b1 +restore [locate_data_file OCC3721-2.brep] b2 + +checkshape b1 +checkshape b2 + +if { [catch {bcommon result b2 b1} catch_result] } { + puts "Faulty OCC3721" +} + +checkshape result + +set square 0. +set 3dviewer 1 \ No newline at end of file diff --git a/tests/bugs/moddata_2/bug3721_4 b/tests/bugs/moddata_2/bug3721_4 new file mode 100755 index 0000000000..114a74c187 --- /dev/null +++ b/tests/bugs/moddata_2/bug3721_4 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC3721" +puts "============" +puts "" +###################################################### +# When using Boolean Operations exception is raised for some tolerance vals. +###################################################### +## (new topology) +## (bcut) +###################################################### + +restore [locate_data_file OCC3721-1.brep] b1 +restore [locate_data_file OCC3721-2.brep] b2 + +checkshape b1 +checkshape b2 + +if { [catch {bcut result b1 b2} catch_result] } { + puts "Faulty OCC3721" +} + +checkshape result + +set square 71185 +set 3dviewer 1 + diff --git a/tests/bugs/moddata_2/bug3721_5 b/tests/bugs/moddata_2/bug3721_5 new file mode 100755 index 0000000000..fbcbeafd1c --- /dev/null +++ b/tests/bugs/moddata_2/bug3721_5 @@ -0,0 +1,29 @@ +puts "TODO OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO OCC11111 ALL: Error : The square of result shape is" + +puts "============" +puts "OCC3721" +puts "============" +puts "" +###################################################### +# When using Boolean Operations exception is raised for some tolerance vals. +###################################################### +## (new topology) +## (bcut) +###################################################### + +restore [locate_data_file OCC3721-1.brep] b1 +restore [locate_data_file OCC3721-2.brep] b2 + +checkshape b1 +checkshape b2 + +if { [catch {bcut result b2 b1} catch_result] } { + puts "Faulty OCC3721" +} + +checkshape result + +set square 71185 +set 3dviewer 1 + diff --git a/tests/bugs/moddata_2/bug3721_6 b/tests/bugs/moddata_2/bug3721_6 new file mode 100755 index 0000000000..9f854db4d9 --- /dev/null +++ b/tests/bugs/moddata_2/bug3721_6 @@ -0,0 +1,30 @@ +puts "TODO OCC11111 ALL: Faulty shapes in variables faulty_1 to faulty_" +puts "TODO OCC11111 ALL: Error : The square of result shape is" + +puts "============" +puts "OCC3721" +puts "============" +puts "" +###################################################### +# When using Boolean Operations exception is raised for some tolerance vals. +###################################################### +## (new topology) +## (boptuc) +###################################################### + +restore [locate_data_file OCC3721-1.brep] b1 +restore [locate_data_file OCC3721-2.brep] b2 + +checkshape b1 +checkshape b2 + +bop b1 b2 +if { [catch {boptuc result} catch_result] } { + puts "Faulty OCC3721" +} + +checkshape result + +set square 71185 +set 3dviewer 1 + diff --git a/tests/bugs/moddata_2/bug3721_7 b/tests/bugs/moddata_2/bug3721_7 new file mode 100755 index 0000000000..732e3f4660 --- /dev/null +++ b/tests/bugs/moddata_2/bug3721_7 @@ -0,0 +1,27 @@ +puts "============" +puts "OCC3721" +puts "============" +puts "" +###################################################### +# When using Boolean Operations exception is raised for some tolerance vals. +###################################################### +## (new topology) +## (boptuc) +###################################################### + +restore [locate_data_file OCC3721-1.brep] b1 +restore [locate_data_file OCC3721-2.brep] b2 + +checkshape b1 +checkshape b2 + +bop b2 b1 +if { [catch {boptuc result} catch_result] } { + puts "Faulty OCC3721" +} + +checkshape result + +set square 71185 +set 3dviewer 1 + diff --git a/tests/bugs/moddata_2/bug374_1 b/tests/bugs/moddata_2/bug374_1 new file mode 100755 index 0000000000..e19b57ea85 --- /dev/null +++ b/tests/bugs/moddata_2/bug374_1 @@ -0,0 +1,17 @@ + +puts "========================" +puts "BUC61040" +puts " OCC374 " +puts "========================" +puts "" +#################################### +##Offset surface from bspline surface is not correct +#################################### +restore [locate_data_file OCC374.draw] su + +offset su1 su 1 + +mkface result su1 + +set square 7960.45 +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug374_2 b/tests/bugs/moddata_2/bug374_2 new file mode 100755 index 0000000000..aee0b215e5 --- /dev/null +++ b/tests/bugs/moddata_2/bug374_2 @@ -0,0 +1,17 @@ + +puts "========================" +puts "BUC61040" +puts " OCC374 " +puts "========================" +puts "" +#################################### +##Offset surface from bspline surface is not correct +#################################### +restore [locate_data_file OCC374.draw] su + +offset su2 su -1 + +mkface result su2 + +set square 7181.83 +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug376 b/tests/bugs/moddata_2/bug376 new file mode 100755 index 0000000000..378a38112b --- /dev/null +++ b/tests/bugs/moddata_2/bug376 @@ -0,0 +1,19 @@ + +puts "========================" +puts "BUC61049" +puts " OCC376 " +puts "========================" +puts "" +#################################### +##. Offset can not be created on the attached surface +#################################### + +restore [locate_data_file OCC376.rle] s + +offset r s 1 + +mkface result s + +set square 1256.64 +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug377 b/tests/bugs/moddata_2/bug377 new file mode 100755 index 0000000000..aa2826ec62 --- /dev/null +++ b/tests/bugs/moddata_2/bug377 @@ -0,0 +1,22 @@ +puts "TODO OCC11111 ALL: Error : OCC377" + +pload QAcommands + +puts "========" +puts "OCC377" +puts "BUC61056" +puts "========" +puts "" +################################################################### +##Incorrect behaviour of BRepTopAdapter_FClass2d. It cannot work with parametric representation +## of the first wire on the face. It says that point (1.9812, -0.9557948) is outside the contour for +## forward wire and inside for reversed one if tolerance is equal to 6.45 +################################################################### + +set result_info [ OCC377 [locate_data_file OCC377.brep] 1.9812 -0.9557948 6.45 ] +if { [ regexp {FAULTY} $result_info ]} { + puts "Error : OCC377" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug378 b/tests/bugs/moddata_2/bug378 new file mode 100755 index 0000000000..4e065f12cf --- /dev/null +++ b/tests/bugs/moddata_2/bug378 @@ -0,0 +1,23 @@ +puts "========================" +puts "BUC61058" +puts " OCC378 " +puts "========================" +puts "" +######################################################################## +##Regression on KAS:dev:ros. Draw hangs after try to load 6381.brep shape to 3D Viewer. Case : cgg/004/S2 +######################################################################## + +restore [locate_data_file OCC378.brep] result + +tclean result +vinit + +if [catch {vdisplay result } catch_result] { + puts "Faulty OCC378: function VDISPLAY works wrongly" +} else { + puts " OCC378 OK : function VDISPLAY works properly" +} + +set 3dviewer 1 + + diff --git a/tests/bugs/moddata_2/bug37_1 b/tests/bugs/moddata_2/bug37_1 new file mode 100755 index 0000000000..391810f0b0 --- /dev/null +++ b/tests/bugs/moddata_2/bug37_1 @@ -0,0 +1,20 @@ + +puts "================" +puts "OCC37" +puts "================" +puts "" + +restore [locate_data_file OCC37.brep] sh +explode sh +checkshape sh_1 +checkshape sh_2 + +bfuse result sh_1 sh_2 +checkshape result + +set square 665013 +set 2dviewer 0 + + + + diff --git a/tests/bugs/moddata_2/bug37_2 b/tests/bugs/moddata_2/bug37_2 new file mode 100755 index 0000000000..3811648b03 --- /dev/null +++ b/tests/bugs/moddata_2/bug37_2 @@ -0,0 +1,21 @@ + +puts "================" +puts "OCC37" +puts "================" +puts "" + +restore [locate_data_file OCC37.brep] sh +explode sh +checkshape sh_1 +checkshape sh_2 + +bfuse result sh_2 sh_1 +checkshape result + +set square 665013 +set 2dviewer 0 + + + + + diff --git a/tests/bugs/moddata_2/bug380_1 b/tests/bugs/moddata_2/bug380_1 new file mode 100755 index 0000000000..c11b07dc42 --- /dev/null +++ b/tests/bugs/moddata_2/bug380_1 @@ -0,0 +1,17 @@ + +puts "========================" +puts " OCC380 " +puts "========================" +puts "" +############################## +##Incorrect result of common operation +############################## + +restore [locate_data_file OCC380a.rle] a +restore [locate_data_file OCC380b.rle] b + +bcommon result a b + +set square 21.154 +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug380_2 b/tests/bugs/moddata_2/bug380_2 new file mode 100755 index 0000000000..f340025d38 --- /dev/null +++ b/tests/bugs/moddata_2/bug380_2 @@ -0,0 +1,16 @@ + +puts "========================" +puts " OCC380 " +puts "========================" +puts "" +############################## +##Incorrect result of common operation +############################## + +restore [locate_data_file OCC380a.rle] a +restore [locate_data_file OCC380b.rle] b + +bcommon result b a + +set square 21.154 +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug3896 b/tests/bugs/moddata_2/bug3896 new file mode 100755 index 0000000000..f9135bf24b --- /dev/null +++ b/tests/bugs/moddata_2/bug3896 @@ -0,0 +1,48 @@ +puts "TODO OCC11111 ALL: Faulty OCC3896" + +puts "============" +puts "OCC3896" +puts "============" +puts "" +###################################################### +# BRepCheck_Analyzer does not detect faulty faces in solid shape. +###################################################### + +# +# a_13 face is FORVARD (faulty), but checkshape command does not detect it +# + +set BugNumber OCC3896 + +restore [locate_data_file OCC3896-pipe.brep] a + +explode a f +compound a_1 a_13 result + +explode a_1 e +explode a_13 e + +smallview +donly result +fit +r + +normals result 200 + +puts "Normal of a_13 face is red (FORWARD)" + +for {set i 1} {$i <= 14} {incr i} { + whatis a_$i +} + +decho off +set info_result [checkshape result] +decho on + +if {[regexp {Faulty} $info_result] } { + puts "OK ${BugNumber} : checkshape detect faulty faces in solid shape" +} else { + puts "Faulty ${BugNumber} : checkshape does not detect faulty faces in solid shape" +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug3_1 b/tests/bugs/moddata_2/bug3_1 new file mode 100755 index 0000000000..bdc5055c50 --- /dev/null +++ b/tests/bugs/moddata_2/bug3_1 @@ -0,0 +1,16 @@ + +puts "================" +puts "OCC3" +puts "================" +puts "" + +restore [locate_data_file OCC3-1.brep] a +restore [locate_data_file OCC3-2.brep] b +checkshape a +checkshape b + +bfuse result a b +checkshape result + +set square 11400 +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug3_2 b/tests/bugs/moddata_2/bug3_2 new file mode 100755 index 0000000000..507896eeab --- /dev/null +++ b/tests/bugs/moddata_2/bug3_2 @@ -0,0 +1,17 @@ + +puts "================" +puts "OCC3" +puts "================" +puts "" + +restore [locate_data_file OCC3-1.brep] a +restore [locate_data_file OCC3-2.brep] b +checkshape a +checkshape b + +bfuse result b a +checkshape result + +set square 11400 +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug4 b/tests/bugs/moddata_2/bug4 new file mode 100755 index 0000000000..dead6ca60c --- /dev/null +++ b/tests/bugs/moddata_2/bug4 @@ -0,0 +1,18 @@ + +puts "================" +puts "OCC4" +puts "================" +puts "" + +restore [locate_data_file OCC4.brep] sh +checkshape sh + +explode sh e + +fillet result sh 15 sh_14 +checkshape result + +set square 177328 +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_2/bug408 b/tests/bugs/moddata_2/bug408 new file mode 100755 index 0000000000..2fcb2d5c6e --- /dev/null +++ b/tests/bugs/moddata_2/bug408 @@ -0,0 +1,14 @@ +puts "========================" +puts " OCC408 " +puts "========================" +puts "" + +box b1 0 0 0 1 1 1 +nurbsconvert b1 b1 +box b2 0 -0.5 0 1.5 0.5 0.5 + +bcommon result b1 b2 +checkshape -top result + + + diff --git a/tests/bugs/moddata_2/bug41 b/tests/bugs/moddata_2/bug41 new file mode 100755 index 0000000000..10821dd36e --- /dev/null +++ b/tests/bugs/moddata_2/bug41 @@ -0,0 +1,12 @@ + +puts "================" +puts "OCC41" +puts "================" +puts "" + +puts "Isos lines may be drawn incorrectly" +psphere result 10 -90 + +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_2/bug42 b/tests/bugs/moddata_2/bug42 new file mode 100755 index 0000000000..e2cc3767fa --- /dev/null +++ b/tests/bugs/moddata_2/bug42 @@ -0,0 +1,38 @@ +puts "================" +puts "OCC42" +puts "================" +puts "" +############################################### +## BRepAlgo_Sewing does not sew attached shape with any tolerance. +############################################### + +pload XDE + +# 1. retriesve shape +restore [locate_data_file OCC42.brep] sh +checkshape sh + +# 2. perform sewing +set toler 80 +sewing result $toler sh + +# 3. Verify result of sewing +checkshape result + +# Retrieve free wires from result shape +catch { fbclose result $toler $toler } resOfCatch + +# Amount of free open wires must be equal 0 +set open_wires [explode result_o W] +if { [llength $open_wires] != 0} { + puts "Error : There are free open wires" +} + +# Amount of free closed wires must be equal 1 +set closed_wires [explode result_c W] +if { [llength $closed_wires] != 1} { + puts "Error : Amount of free closed wires is not equal 1" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug428 b/tests/bugs/moddata_2/bug428 new file mode 100755 index 0000000000..0902facb6d --- /dev/null +++ b/tests/bugs/moddata_2/bug428 @@ -0,0 +1,34 @@ +puts "========" +puts "OCC428" +puts "SAM1414" +puts "========" + +################################################ +## Exception during vizualization on attached shape in application. +## Exception is raised in the package StdPrs. +################################################ + +restore [locate_data_file OCC428.brep] result + +tclean result +vinit +vdisplay result +vsetdispmode result 1 +vclear + +isos result 0 +triangles result +vfit + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +if { $tri == 5496 && $nod == 5406 } { + puts "Warning OCC428: here is shading problem, but source shape is invalid" +} else { + puts "Warning OCC428: Shading of OCC428 was made, source shape is invalid" +} + +set 3dviewer 1 + diff --git a/tests/bugs/moddata_2/bug429 b/tests/bugs/moddata_2/bug429 new file mode 100755 index 0000000000..5d47e9cf83 --- /dev/null +++ b/tests/bugs/moddata_2/bug429 @@ -0,0 +1,32 @@ +puts "========================" +puts " OCC429 " +puts "========================" +puts "" +####################################### +## Projection for a point on a surface works wrong +####################################### + +restore [locate_data_file OCC429a.draw] a +restore [locate_data_file OCC429b.draw] b + +intersect i a b + +cvalue i_2 0.43213918 x y z +point p x y z +proj b x y z + +set err1 [string range [dump ext_1] 55 64] +set err2 [string range [dump ext_2] 55 64] +set err3 [string range [dump ext_3] 55 64] +set err4 [string range [dump ext_4] 55 64] +set err5 [string range [dump ext_5] 55 64] +set err6 [string range [dump ext_6] 55 64] + +if { $err1 != "Parameters" || $err2 != "Parameters" || $err3 != "Parameters" || $err4 != "Parameters" || $err5 != "Parameters" || $err6 != "Parameters" } { + puts " OCC286 OK : Projection for a point on a surface works properly" +} else { + puts "Faulty OCC429 : Attempt to project the point on surface gives incorrect result" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug430 b/tests/bugs/moddata_2/bug430 new file mode 100755 index 0000000000..0474ae3583 --- /dev/null +++ b/tests/bugs/moddata_2/bug430 @@ -0,0 +1,19 @@ +puts "========================" +puts " OCC430 " +puts "========================" +puts "" +################################################################ +## Exception when projecting a point on planar surface of linear extrusion oriented along Y axis +################################################################ + +restore [locate_data_file OCC430.rle] result + +if [catch {proj result 49.86391363636364 440.7894090909091 127.05 } catch_result] { + puts "Faulty OCC430: Projection was made wrongly." +} else { + puts "OK OCC348: function PROJECT works properly" +} + +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_2/bug431 b/tests/bugs/moddata_2/bug431 new file mode 100755 index 0000000000..849b8a7036 --- /dev/null +++ b/tests/bugs/moddata_2/bug431 @@ -0,0 +1,23 @@ +puts "========================" +puts " OCC431 " +puts "========================" +puts "" +##################################### +## Intersection of two surfaces is not compleate curve. +##################################### + +restore [locate_data_file OCC431a.draw] su1 +restore [locate_data_file OCC431b.draw] su2 + +intersect result su1 su2 + +set che [whatis result] + +if { ![regexp {curve} $che] || ![regexp {3d} $che]} { + puts "Faulty OCC431 : Command INTERSECT works WRONGLY" +} else { + puts "OCC431 OK : Command INTERSECT works properly" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug432 b/tests/bugs/moddata_2/bug432 new file mode 100755 index 0000000000..c48cb0d588 --- /dev/null +++ b/tests/bugs/moddata_2/bug432 @@ -0,0 +1,12 @@ +puts "========================" +puts " OCC432 " +puts "========================" +puts "" +############################################ +## Regression in dev regarding C40: exception during checkshape +############################################ + +restore [locate_data_file OCC432.brep] result +checkshape result r + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug433 b/tests/bugs/moddata_2/bug433 new file mode 100755 index 0000000000..c87f9d7178 --- /dev/null +++ b/tests/bugs/moddata_2/bug433 @@ -0,0 +1,22 @@ +puts "========================" +puts " OCC433 " +puts "========================" +puts "" +######################################################### +## The attached face gives no errors in checkshape command in dev. However, it looks bad +######################################################### + +restore [locate_data_file OCC433.brep] result + +decho off +set err [checkshape result r] +decho on + +if { [regexp {OK} $err] == 1} { + puts " Faulty OCC433: function CHECKSHAPE works wrongly" +} else { + puts " OCC433 OK: function CHECKSHAPE works properly" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug438_1 b/tests/bugs/moddata_2/bug438_1 new file mode 100755 index 0000000000..d6a4b21eb8 --- /dev/null +++ b/tests/bugs/moddata_2/bug438_1 @@ -0,0 +1,27 @@ +puts "========" +puts "OCC438" +puts " (case 1)" +puts "========" + +#################################### +## Exception during checking of shape from OCC428 +#################################### + +restore [locate_data_file OCC428.brep] result + +decho off +if [catch { checkshape result } catch_result] { + set mistake 1 +} else { + set mistake 0 +} +decho on + +if { $mistake != 0} { + puts "Faulty OCC438 (case 1): here is checking problem" +} else { + puts "OCC438 (case 1) OK" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug441_1 b/tests/bugs/moddata_2/bug441_1 new file mode 100755 index 0000000000..662ca47c9e --- /dev/null +++ b/tests/bugs/moddata_2/bug441_1 @@ -0,0 +1,31 @@ +puts "========================" +puts " OCC441 " +puts "(case 1)" +puts "========================" +puts "" +############################### +## Instability of BRepCheck check status. +############################### + +restore [locate_data_file OCC441a.brep] result + +decho off +set err [checkshape result r] +decho on + +set j 1 +repeat 25 { + restore [locate_data_file OCC441a.brep] result + decho off + set err1 [checkshape result r] + decho on + if { $err != $err1 } { + puts [format " Faulty OCC441: function CHECKSHAPE works wrongly on %s time" $j] + break + } else { + puts [format " OCC441 OK: function CHECKSHAPE works properly %s time" $j] + } + incr j +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug441_2 b/tests/bugs/moddata_2/bug441_2 new file mode 100755 index 0000000000..56dfcc9015 --- /dev/null +++ b/tests/bugs/moddata_2/bug441_2 @@ -0,0 +1,31 @@ +puts "========================" +puts " OCC441 " +puts "(case 2)" +puts "========================" +puts "" +############################### +## Instability of BRepCheck check status. +############################### + +restore [locate_data_file OCC441b.brep] result + +decho off +set err [checkshape result r] +decho on + +set j 1 +repeat 25 { + restore [locate_data_file OCC441b.brep] result + decho off + set err1 [checkshape result r] + decho on + if { $err != $err1 } { + puts [format " Faulty OCC441: function CHECKSHAPE works wrongly on %s time" $j] + break + } else { + puts [format " OCC441 OK: function CHECKSHAPE works properly %s time" $j] + } + incr j +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug441_3 b/tests/bugs/moddata_2/bug441_3 new file mode 100755 index 0000000000..3689d15dd9 --- /dev/null +++ b/tests/bugs/moddata_2/bug441_3 @@ -0,0 +1,31 @@ +puts "========================" +puts " OCC441 " +puts "(case 3)" +puts "========================" +puts "" +############################### +## Instability of BRepCheck check status. +############################### + +restore [locate_data_file OCC441c.brep] result + +decho off +set err [checkshape result r] +decho on + +set j 1 +repeat 25 { + restore [locate_data_file OCC441c.brep] result + decho off + set err1 [checkshape result r] + decho on + if { $err != $err1 } { + puts [format " Faulty OCC441: function CHECKSHAPE works wrongly on %s time" $j] + break + } else { + puts [format " OCC441 OK: function CHECKSHAPE works properly %s time" $j] + } + incr j +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug4426_1 b/tests/bugs/moddata_2/bug4426_1 new file mode 100755 index 0000000000..bea9a8aeee --- /dev/null +++ b/tests/bugs/moddata_2/bug4426_1 @@ -0,0 +1,22 @@ +puts "================" +puts "OCC4426" +puts "================" +puts "" +####################################################################################### +# Incorrect result of intersection in 2D between circle and line +####################################################################################### + +v2d2 +circle c1 2 2 1 +2dfit +2dzoom 120 +line l1 3 0 0 1 +2dintersect l1 c1 +erase l1 c1 +2dfit + +puts "ATTENTION! Check following:" +puts "There is only one intersection point (green X)" + +set 2dviewer 1 + diff --git a/tests/bugs/moddata_2/bug4426_2 b/tests/bugs/moddata_2/bug4426_2 new file mode 100755 index 0000000000..66aa3ab334 --- /dev/null +++ b/tests/bugs/moddata_2/bug4426_2 @@ -0,0 +1,22 @@ +puts "================" +puts "OCC4426" +puts "================" +puts "" +####################################################################################### +# Incorrect result of intersection in 2D between circle and line +####################################################################################### + +v2d2 +line ll1 0 0 0.3 0.7 +line ll2 0 0 0.37 0.63 +trim tll1 ll1 -0.00001 0.00001 +trim tll2 ll2 -0.00001 0.00001 +donly tll1 tll2 +2dintersect tll1 tll2 +2dfit + +puts "ATTENTION! Check following:" +puts "There is the intersection point (green X) on center of grid axis" + +set 2dviewer 1 + diff --git a/tests/bugs/moddata_2/bug444 b/tests/bugs/moddata_2/bug444 new file mode 100755 index 0000000000..509af91b95 --- /dev/null +++ b/tests/bugs/moddata_2/bug444 @@ -0,0 +1,15 @@ + +puts "========" +puts "OCC444" +puts "========" +puts "" +###################################### +## Exception in '2dextrema' command if distance = 0. +###################################### + +restore [locate_data_file OCC444a.draw] a +restore [locate_data_file OCC444a.draw] b + +extrema a b + + diff --git a/tests/bugs/moddata_2/bug453_3 b/tests/bugs/moddata_2/bug453_3 new file mode 100755 index 0000000000..9b9b2f3bf9 --- /dev/null +++ b/tests/bugs/moddata_2/bug453_3 @@ -0,0 +1,35 @@ +puts "========" +puts "OCC453" +puts "(case 3)" +puts "========" +puts "" + +dchrono h2 reset +dchrono h2 start + +set make_print_out 0 + +dset SCALE 1000. +dset SCALE1 5 +tolblend 0.01 1e-04 1e-05 1e-03 + +restore [locate_data_file shading_137.brep] s +tscale s 0 0 0 SCALE1 +explode s E + +blend result s 5.5*SCALE1 s_2 4*SCALE1 s_1 6*SCALE1 s_6 5*SCALE1 s_8 6*SCALE1 s_10 6.5*SCALE1 s_14 7*SCALE1 s_4 5.5*SCALE1 s_5 7*SCALE1 s_16 6*SCALE1 s_11 5*SCALE1 s_19 6.5*SCALE1 s_13 +explode result So +tcopy result_1 result + +dchrono h2 stop +set q2 [ dchrono h2 show ] +regexp {CPU user time: ([-0-9.+eE]+) seconds} $q2 full z2 +puts "$z2" +if { $z2 > 85 } { + puts "Elapsed time is more then 85 seconds - Faulty" +} else { + puts "Elapsed time is less then 85 seconds - OK" +} + +set 2dviewer 1 + diff --git a/tests/bugs/moddata_2/bug454 b/tests/bugs/moddata_2/bug454 new file mode 100755 index 0000000000..412f66ea68 --- /dev/null +++ b/tests/bugs/moddata_2/bug454 @@ -0,0 +1,25 @@ +pload QAcommands + +puts "================" +puts "OCC454" +puts "================" +puts "" + +restore [locate_data_file OCC454_b1.brep] b1 +checkshape b1 + +restore [locate_data_file OCC454_p1.draw] p1 + +set info_result [OCC299 b1 p1] +set ll [llength ${info_result}] +if { ${ll} < 4 } { + puts "OCC454: ERROR 1" +} else { + if { [regexp {IN} ${info_result}] } { + puts "OCC454: OK" + } else { + puts "OCC454: ERROR 2" + } +} + + diff --git a/tests/bugs/moddata_2/bug466 b/tests/bugs/moddata_2/bug466 new file mode 100755 index 0000000000..2af6860574 --- /dev/null +++ b/tests/bugs/moddata_2/bug466 @@ -0,0 +1,13 @@ + +puts "========================" +puts " OCC466 " +puts "========================" +puts "" + +restore [locate_data_file OCC466.brep] res +checkshape res + +nurbsconvert result res + +set square 693.577 +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug469 b/tests/bugs/moddata_2/bug469 new file mode 100755 index 0000000000..75472b6a97 --- /dev/null +++ b/tests/bugs/moddata_2/bug469 @@ -0,0 +1,30 @@ +if { [array get env os_type] != "" } { + set os $env(os_type) +} +if { [string compare $os "windows"] == 0 } { + puts "TODO OCC12345 ALL: An exception was caught" + puts "TODO OCC12345 ALL: \\*\\* Exception \\*\\*.*" +} else { + puts "TODO OCC12345 ALL: Tcl Exception: result is not a topological shape!!!" +} +puts "TODO OCC12345 ALL: TEST INCOMPLETE" + +puts "========================" +puts " OCC469 " +puts "========================" +puts "" +###################################################### +## It's impossible to fuse the two shapes in the file attached. #2740, SAM1493 +###################################################### + +restore [locate_data_file OCC469.brep] a +explode a + +checkshape a_1 +checkshape a_2 + +bfuse result a_1 a_2 +checkshape result + +set square 10 +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug486 b/tests/bugs/moddata_2/bug486 new file mode 100755 index 0000000000..573eb611e5 --- /dev/null +++ b/tests/bugs/moddata_2/bug486 @@ -0,0 +1,33 @@ +pload QAcommands + +puts "========" +puts "OCC486" +puts "========" +puts "" +############################# +## Extrema_ExtPS gives wrong solution. +############################# + +restore [locate_data_file OCC486.draw] s + +# Case 1. Verify whether surface is u-periodic and v-periodic +set result [isperiodic s] +puts $result +set uper "is u-periodic" +set vper "is v-periodic" +if {[regexp $uper $result] && [regexp $vper $result]} { + puts "OCC486 case 1 - Faulty" +} else { + puts "OCC486 case 1 - OK" +} + +# Case 2. Verify extremum distance between point and surface + +point p3d -420.1170080179139 926.8792206000001 229.5109675013802 +if { [ catch { OCC486 s -420.1170080179139 926.8792206000001 229.5109675013802 0 0.0000001 } ] } { + puts "OCC486 case 2 - Faulty" +} else { + puts "OCC486 case 2 - OK" +} + +set 2dviewer 1 diff --git a/tests/bugs/moddata_2/bug496 b/tests/bugs/moddata_2/bug496 new file mode 100755 index 0000000000..d2b2a15e97 --- /dev/null +++ b/tests/bugs/moddata_2/bug496 @@ -0,0 +1,18 @@ +puts "=========" +puts " OCC496 " +puts "=========" +puts "" +############################## +## Exception occurs during fuse operation +############################## + +restore [locate_data_file OCC496a.brep] a_1 +checkshape a_1 + +restore [locate_data_file OCC496b.brep] a_2 +checkshape a_2 + +bfuse result a_1 a_2 + +set square 4949.79 +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug498 b/tests/bugs/moddata_2/bug498 new file mode 100755 index 0000000000..b1be064b6e --- /dev/null +++ b/tests/bugs/moddata_2/bug498 @@ -0,0 +1,48 @@ +puts "TODO OCC12345 ALL: Faulty OCC498: Wrong 3d point from offset surface by parameters" + +puts "=========" +puts " OCC498 " +puts "=========" +puts "" +###################################### +## Wrong 3d point from offset surface by parameters +###################################### + +restore [locate_data_file OCC498.draw] su + +set u1 4.71238898038469 +set u2 7.85398163397449 + +svalue su 0 $u1 x1 y1 z1 +vertex v1 x1 y1 z1 + +svalue su 0 $u2 x2 y2 z2 +vertex v2 x2 y2 z2 + +set newU1 [expr $u1 - 1e-11] +set newU2 [expr $u2 + 1e-11] + +svalue su 0 $newU1 x1 y1 z1 +vertex vv1 x1 y1 z1 + +svalue su 0 $newU2 x2 y2 z2 +vertex vv2 x2 y2 z2 + +distmini d v1 vv1 +regexp {([-0-9.+eE]+)} [dump d_val] full err1 + +distmini d v2 vv2 +regexp {([-0-9.+eE]+)} [dump d_val] full err2 + +if { $err1 > 1.e-7 || $err2 > 1.e-7} { + puts "Faulty OCC498: Wrong 3d point from offset surface by parameters " +} else { + puts "OCC498 OK: Correct 3d point from offset surface by parameters" +} + + + + + + + diff --git a/tests/bugs/moddata_2/bug49_1 b/tests/bugs/moddata_2/bug49_1 new file mode 100755 index 0000000000..1913d98614 --- /dev/null +++ b/tests/bugs/moddata_2/bug49_1 @@ -0,0 +1,18 @@ + +puts "========" +puts "OCC49" +puts "========" + +pload QAcommands + +pcylinder c 10 20 + +set result [OCC49 c] + +if {$result == 1} { + puts "OCC49: OK" +} else { + puts "Error : OCC49" +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug49_2 b/tests/bugs/moddata_2/bug49_2 new file mode 100755 index 0000000000..06d9436776 --- /dev/null +++ b/tests/bugs/moddata_2/bug49_2 @@ -0,0 +1,21 @@ + +puts "========" +puts "OCC49" +puts "========" + +pload QAcommands + +pcylinder c 10 20 +box b 10 10 10 +bcut b_c_cut b c +checkshape b_c_cut + +set result [OCC49 b_c_cut] + +if {$result == 1} { + puts "Error : OCC49" +} else { + puts "OCC49: OK" +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug50 b/tests/bugs/moddata_2/bug50 new file mode 100755 index 0000000000..7db5f09b7c --- /dev/null +++ b/tests/bugs/moddata_2/bug50 @@ -0,0 +1,20 @@ + +puts "========" +puts "OCC50" +puts "========" +puts "" +################################################################### +## the algorithm which allows to calculate and build the fillet presents probably a bug: when +## blending on all edges, the applied algorithm is posting errors and failure during fillet computation. +################################################################### + +restore [locate_data_file OCC50.brep] a +checkshape a + +explode a e + +blend result a 1 a_17 1 a_5 1 a_1 1 a_2 1 a_16 1 a_20 1 a_3 1 a_11 1 a_10 1 a_4 +checkshape result + +set square 7677.49 +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug503 b/tests/bugs/moddata_2/bug503 new file mode 100755 index 0000000000..5195d81b50 --- /dev/null +++ b/tests/bugs/moddata_2/bug503 @@ -0,0 +1,26 @@ +puts "=========" +puts " OCC503 " +puts "=========" +puts "" +############################### +## Draw hangs up during sprops operation +############################### + +#cpulimit 9000 + +restore [locate_data_file OCC503.brep] result + +if [catch {sprops result 0.001 } catch_result] { + set mistake 1 +} else { + set mistake 0 +} + +if { $mistake != 0} { + puts "Faulty OCC503 : Draw hangs up during sprops operation " +} else { + puts "OCC503 OK: function SPROPS works without hangs up " +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug504 b/tests/bugs/moddata_2/bug504 new file mode 100755 index 0000000000..57f168ddd8 --- /dev/null +++ b/tests/bugs/moddata_2/bug504 @@ -0,0 +1,28 @@ +puts "=========" +puts " OCC504 " +puts "=========" +puts "" +############################### +## AllocMemory while intersection command +############################### + +restore [locate_data_file OCC504a.draw] su1 +# checkshape su1 + +restore [locate_data_file OCC504b.draw] su2 +# checkshape su2 + +if [catch {intersect result su1 su2} catch_result] { + puts "Faulty OCC504 : A solution takes all memory and crach with AllocMemory" +} else { + puts "OCC504 OK: function intersection works ok" +} + +if { [regexp {curve} [whatis result_1]] && [regexp {curve} [whatis result_2]] } { + puts "OCC504 OK : Result shape is CORRECT !!! " +} else { + puts " Faulty OCC504: Result shape is INcorrect !!! " +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug505 b/tests/bugs/moddata_2/bug505 new file mode 100755 index 0000000000..0ced41616f --- /dev/null +++ b/tests/bugs/moddata_2/bug505 @@ -0,0 +1,18 @@ + +puts "=========" +puts " OCC505 " +puts "=========" +puts "" +##################################### +## BRepExtrema_DistShapeShape throws an exception. +##################################### + +restore [locate_data_file OCC505a.brep] su1 +checkshape su1 + +restore [locate_data_file OCC505b.brep] su2 +checkshape su2 + +distmini d su1 su2 + + diff --git a/tests/bugs/moddata_2/bug513 b/tests/bugs/moddata_2/bug513 new file mode 100755 index 0000000000..237a686212 --- /dev/null +++ b/tests/bugs/moddata_2/bug513 @@ -0,0 +1,23 @@ +puts "========" +puts "OCC513" +puts "========" +puts "" + +###################################### +## Can not intersect plane and conical surfaces +## The ">intersect" command hangs up the computer. +###################################### + +# cpulimit 9000 + +restore [locate_data_file OCC513a.draw] sa23 +restore [locate_data_file OCC513b.draw] sb8 + +if { [catch {intersect result sa23 sb8} catch_result] } { + puts "Faulty OCC513: function INTERSECTION works wrongly" +} else { + puts "OCC513 OK: function INTERSECTION works properly" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug515 b/tests/bugs/moddata_2/bug515 new file mode 100755 index 0000000000..2120f1b4af --- /dev/null +++ b/tests/bugs/moddata_2/bug515 @@ -0,0 +1,27 @@ +puts "========" +puts "OCC515" +puts "========" +puts "" +################################ +## Wrong projection of the Line on the Cone +################################ + +restore [locate_data_file OCC515a.draw] cx +restore [locate_data_file OCC515b.draw] s + +if { [catch {project c2d cx s -t 0.0015} ] } { + puts "OCC515 FAULTY" +} else { + # create dump of resulting curve + set dump [dump c2d] + # read dump of old curve + set olddump [read [open [locate_data_file OCC515_DUMP]]] + # if the the dumps is equal this bug is still exist + if { $dump == $olddump } { + puts "OCC515 FAULTY" + } else { + puts "OCC515 WARNING: Dumps of old and new curve are different, probably bug is still exist" + } +} + + diff --git a/tests/bugs/moddata_2/bug524 b/tests/bugs/moddata_2/bug524 new file mode 100755 index 0000000000..cb640524b2 --- /dev/null +++ b/tests/bugs/moddata_2/bug524 @@ -0,0 +1,60 @@ +pload QAcommands + +puts "========" +puts "OCC524" +puts "========" +puts "" + + +set LowerVector 1 +set UpperVector 9 +set InitialValueVector 5 +set LowerRowMatrix 1 +set UpperRowMatrix 6 +set LowerColMatrix 1 +set UpperColMatrix 3 +set InitialValueMatrix 4 + +set info_result [OCC524 ${LowerVector} ${UpperVector} ${InitialValueVector} ${LowerRowMatrix} ${UpperRowMatrix} ${LowerColMatrix} ${UpperColMatrix} ${InitialValueMatrix}] + +set ll [llength ${info_result}] + +if {${ll} != 64} { + puts "OCC524: Error" +} else { + regexp {math_Vector of Length = ([-0-9.+eE]+)} ${info_result} full Vector1Length + if {${Vector1Length} != [expr ${UpperVector} - ${LowerVector} + 1]} { + puts "Vector1Length=${Vector1Length}" + puts "OCC524: Error" + } else { + regexp {math_Vector\(1\) = ([-0-9.+eE]+)} ${info_result} full Vector1_1 + regexp {math_Vector\(2\) = ([-0-9.+eE]+)} ${info_result} full Vector1_2 + regexp {math_Vector\(3\) = ([-0-9.+eE]+)} ${info_result} full Vector1_3 + regexp {math_Vector\(4\) = ([-0-9.+eE]+)} ${info_result} full Vector1_4 + regexp {math_Vector\(5\) = ([-0-9.+eE]+)} ${info_result} full Vector1_5 + regexp {math_Vector\(6\) = ([-0-9.+eE]+)} ${info_result} full Vector1_6 + regexp {math_Vector\(7\) = ([-0-9.+eE]+)} ${info_result} full Vector1_7 + regexp {math_Vector\(8\) = ([-0-9.+eE]+)} ${info_result} full Vector1_8 + regexp {math_Vector\(9\) = ([-0-9.+eE]+)} ${info_result} full Vector1_9 + + if {${Vector1_1}!=120. || ${Vector1_2}!=120. || ${Vector1_3}!=120. || ${Vector1_4}!=0. || ${Vector1_5}!=0. || ${Vector1_6}!=0. || ${Vector1_7}!=0. || ${Vector1_8}!= 0.|| ${Vector1_9}!=0.} { + puts "Error : OCC524" + } else { + regexp -all {math_Vector\(1\) = ([-0-9.+eE]+)} ${info_result} full Vector2_1 + regexp -all {math_Vector\(2\) = ([-0-9.+eE]+)} ${info_result} full Vector2_2 + regexp -all {math_Vector\(3\) = ([-0-9.+eE]+)} ${info_result} full Vector2_3 + regexp -all {math_Vector\(4\) = ([-0-9.+eE]+)} ${info_result} full Vector2_4 + regexp -all {math_Vector\(5\) = ([-0-9.+eE]+)} ${info_result} full Vector2_5 + regexp -all {math_Vector\(6\) = ([-0-9.+eE]+)} ${info_result} full Vector2_6 + regexp -all {math_Vector\(7\) = ([-0-9.+eE]+)} ${info_result} full Vector2_7 + regexp -all {math_Vector\(8\) = ([-0-9.+eE]+)} ${info_result} full Vector2_8 + regexp -all {math_Vector\(9\) = ([-0-9.+eE]+)} ${info_result} full Vector2_9 + if {${Vector2_1}!=60. || ${Vector2_2}!=60. || ${Vector2_3}!=60. || ${Vector2_4}!=60. || ${Vector2_5}!=60. || ${Vector2_6}!=60. || ${Vector2_7}!=0. || ${Vector2_8}!= 0.|| ${Vector2_9}!=0.} { + puts "OCC524: Error" + } else { + puts "OCC524: OK" + } + } + } +} + diff --git a/tests/bugs/moddata_2/bug525 b/tests/bugs/moddata_2/bug525 new file mode 100755 index 0000000000..57a6051651 --- /dev/null +++ b/tests/bugs/moddata_2/bug525 @@ -0,0 +1,23 @@ +pload QAcommands + +puts "========" +puts "OCC525" +puts "========" +puts "" +######################################### +## Bug in GeomPlate_BuildPlateSurface::ComputeSurfInit() +######################################### + +set mistake 0 + +decho off +if { [catch { OCC525 } ] } { + set mistake 1 +} +decho on + +if { $mistake == 1 } { + puts "Faulty : OCC525" +} + +set 2dviewer 1 diff --git a/tests/bugs/moddata_2/bug531 b/tests/bugs/moddata_2/bug531 new file mode 100755 index 0000000000..0d8567bf6b --- /dev/null +++ b/tests/bugs/moddata_2/bug531 @@ -0,0 +1,16 @@ + +puts "=======" +puts "OCC531" +puts "=======" +puts "" +########################################################## +## Can not intersect plane and cone.The ">intersect" command hangs up the computer +########################################################## + +restore [locate_data_file OCC531_1.draw] a +restore [locate_data_file OCC531_2.draw] b + +intersect result a b + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug536_11 b/tests/bugs/moddata_2/bug536_11 new file mode 100755 index 0000000000..065edf84b1 --- /dev/null +++ b/tests/bugs/moddata_2/bug536_11 @@ -0,0 +1,25 @@ + +puts "========" +puts "OCC536" +puts "SAM1504" +puts "========" + +vinit + +restore [locate_data_file OCC536.brep] S +checkshape S + +explode S So +checkshape S_1 +checkshape S_2 + +if [catch {bfuse result S_1 S_2}] { + puts "Faulty OCC536" +} else { + puts "OCC536 : OK" + checkshape result +} + +set square 2.5068e+06 +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug536_12 b/tests/bugs/moddata_2/bug536_12 new file mode 100755 index 0000000000..2d7aac8d08 --- /dev/null +++ b/tests/bugs/moddata_2/bug536_12 @@ -0,0 +1,25 @@ + +puts "========" +puts "OCC536" +puts "SAM1504" +puts "========" + +vinit + +restore [locate_data_file OCC536.brep] S +checkshape S + +explode S So +checkshape S_1 +checkshape S_3 + +if [catch {bfuse result S_1 S_3}] { + puts "Faulty OCC536" +} else { + puts "OCC536 : OK" + checkshape result +} + +set square 2.56034e+06 +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug536_13 b/tests/bugs/moddata_2/bug536_13 new file mode 100755 index 0000000000..5a455d5517 --- /dev/null +++ b/tests/bugs/moddata_2/bug536_13 @@ -0,0 +1,25 @@ + +puts "========" +puts "OCC536" +puts "SAM1504" +puts "========" + +vinit + +restore [locate_data_file OCC536.brep] S +checkshape S + +explode S So +checkshape S_1 +checkshape S_4 + +if [catch {bfuse result S_1 S_4}] { + puts "Faulty OCC536" +} else { + puts "OCC536 : OK" + checkshape result +} + +set square 2.5405e+06 +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug536_14 b/tests/bugs/moddata_2/bug536_14 new file mode 100755 index 0000000000..34ede3fede --- /dev/null +++ b/tests/bugs/moddata_2/bug536_14 @@ -0,0 +1,25 @@ + +puts "========" +puts "OCC536" +puts "SAM1504" +puts "========" + +vinit + +restore [locate_data_file OCC536.brep] S +checkshape S + +explode S So +checkshape S_1 +checkshape S_5 + +if [catch {bfuse result S_1 S_5}] { + puts "Faulty OCC536" +} else { + puts "OCC536 : OK" + checkshape result +} + +set square 2.45349e+06 +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug536_21 b/tests/bugs/moddata_2/bug536_21 new file mode 100755 index 0000000000..eb9666b3c4 --- /dev/null +++ b/tests/bugs/moddata_2/bug536_21 @@ -0,0 +1,24 @@ + +puts "========" +puts "OCC536" +puts "SAM1504" +puts "========" + +vinit + +restore [locate_data_file OCC536.brep] S +checkshape S + +explode S So +checkshape S_2 +checkshape S_1 + +if [catch {bfuse result S_2 S_1}] { + puts "Faulty OCC536" +} else { + puts "OCC536 : OK" + checkshape result +} + +set square 2.5068e+06 +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug536_22 b/tests/bugs/moddata_2/bug536_22 new file mode 100755 index 0000000000..e0703dbdd9 --- /dev/null +++ b/tests/bugs/moddata_2/bug536_22 @@ -0,0 +1,24 @@ + +puts "========" +puts "OCC536" +puts "SAM1504" +puts "========" + +vinit + +restore [locate_data_file OCC536.brep] S +checkshape S + +explode S So +checkshape S_3 +checkshape S_1 + +if [catch {bfuse result S_3 S_1}] { + puts "Faulty OCC536" +} else { + puts "OCC536 : OK" + checkshape result +} + +set square 2.56034e+06 +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug536_23 b/tests/bugs/moddata_2/bug536_23 new file mode 100755 index 0000000000..789059a484 --- /dev/null +++ b/tests/bugs/moddata_2/bug536_23 @@ -0,0 +1,24 @@ + +puts "========" +puts "OCC536" +puts "SAM1504" +puts "========" + +vinit + +restore [locate_data_file OCC536.brep] S +checkshape S + +explode S So +checkshape S_4 +checkshape S_1 + +if [catch {bfuse result S_4 S_1}] { + puts "Faulty OCC536" +} else { + puts "OCC536 : OK" + checkshape result +} + +set square 2.5405e+06 +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug536_24 b/tests/bugs/moddata_2/bug536_24 new file mode 100755 index 0000000000..32e2e26211 --- /dev/null +++ b/tests/bugs/moddata_2/bug536_24 @@ -0,0 +1,24 @@ + +puts "========" +puts "OCC536" +puts "SAM1504" +puts "========" + +vinit + +restore [locate_data_file OCC536.brep] S +checkshape S + +explode S So +checkshape S_5 +checkshape S_1 + +if [catch {bfuse result S_5 S_1}] { + puts "Faulty OCC536" +} else { + puts "OCC536 : OK" + checkshape result +} + +set square 2.45349e+06 +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug537 b/tests/bugs/moddata_2/bug537 new file mode 100755 index 0000000000..21df4bcc87 --- /dev/null +++ b/tests/bugs/moddata_2/bug537 @@ -0,0 +1,27 @@ +puts "TODO OCC12345 ALL: Error : OCC537" + +puts "=======" +puts "OCC537" +puts "=======" +puts "" +####################################################################### +##Application do something in intersection operation for long time and eat much memory (This may be the +## reason of BUS ERROR that happens in application). Intersection operation invokes for conical and plane +## surfaces. +####################################################################### + +restore [locate_data_file OCC537_CONE.draw] c +restore [locate_data_file OCC537_PLANE.draw] p + +intersect result c p + +set wt_is [whatis result] + +if { [regexp {WIRE} ${wt_is}] } { + puts " OCC537 OK" +} else { + puts "Error : OCC537" +} + +set 2dviewer 2 + diff --git a/tests/bugs/moddata_2/bug538 b/tests/bugs/moddata_2/bug538 new file mode 100755 index 0000000000..126b5dd948 --- /dev/null +++ b/tests/bugs/moddata_2/bug538 @@ -0,0 +1,25 @@ +puts "TODO OCC11111 ALL: Faulty OCC132" + +puts "================" +puts "OCC538" +puts "================" +puts "" + +restore [locate_data_file OCC538.brep] Face +checkshape Face + +point p 0.2453959532714904 -1.246869357124329 + +set res1 [b2dclassify Face p] +set info_result [split ${res1}] + +set ll [llength ${info_result}] +if {${ll} < 4} { + puts "Faulty OCC132" +} else { + if {[regexp {IN} $info_result]} { + puts "OCC132 : OK" + } else { + puts "Faulty OCC132" + } +} diff --git a/tests/bugs/moddata_2/bug541 b/tests/bugs/moddata_2/bug541 new file mode 100755 index 0000000000..b94710c869 --- /dev/null +++ b/tests/bugs/moddata_2/bug541 @@ -0,0 +1,20 @@ +puts "========================" +puts " OCC541 " +puts "========================" +puts "" +############################################ +## Extrema works wrong for line and circle laying on one plane. +############################################ + +restore [locate_data_file OCC541a.draw] c1x +restore [locate_data_file OCC541b.draw] c2x + +set result [extrema c1x c2x] +set err [llength $result] +if { $err < 1} { + puts "Faulty OCC541 (amount of solution): command extrema does NOT work properly" +} else { + puts "OCC541 OK (amount of solution): : command extrema works properly" +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug542 b/tests/bugs/moddata_2/bug542 new file mode 100755 index 0000000000..6e5fa1b901 --- /dev/null +++ b/tests/bugs/moddata_2/bug542 @@ -0,0 +1,28 @@ + +puts "========" +puts "OCC542" +puts "========" +puts "" +################################ +## Wrong projection of the circle on the sphere +################################ + +restore [locate_data_file OCC542_C3D.draw] c3d +restore [locate_data_file OCC542_S.draw] s + +if { [catch {project result c3d s } catch_result] } { + puts "OCC542 Faulty" +} else { + # create dump of resulting curve + set dump [dump result] + # read dump of old curve + set olddump [read [open [locate_data_file OCC542_DUMP]]] + # if the the dumps is equal this bug is still exist + if { $dump == $olddump } { + puts "OCC542 Faulty" + } else { + puts "OCC542 WARNING: Dumps of old and new curve are different, probably bug is still exist" + } +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug565 b/tests/bugs/moddata_2/bug565 new file mode 100755 index 0000000000..ae63aaddbf --- /dev/null +++ b/tests/bugs/moddata_2/bug565 @@ -0,0 +1,53 @@ +puts "========| OCC565 |========" +################################## +## Can not intersect two trimmed conical surfaces +################################## + +restore [locate_data_file OCC565a.draw] s1 +restore [locate_data_file OCC565b.draw] s2 + +puts "Preliminary check: intersection work with infinite cones:" +if { [catch {intersect inf s1 s2 } catch_result] } { + puts "Faulty OCC565: function intersection works wrongly with infinite cones" +} else { + set j 1 + set er [lindex [whatis inf] 5] + repeat 4 { + set err [lindex [whatis inf_$j] 5] + if { $err != "curve" && $er != "curve"} { + puts " Faulty OCC565: function intersection works wrongly with infinite cones" + break + } else { + puts [format "curve inf_%s : exist " $j] + } + incr j + } + puts "Function intersection works correctly with infinite cones. Then check OCC565:" +} + +trim s1x s1 0 2*pi 0 2.8 +trim s2x s2 0 2*pi 0 2.8 + +if { [catch {intersect result s1x s2x } catch_result] } { + puts "Faulty OCC565 exception: function intersection works wrongly with trimmed cones" +} else { + set nom 0 + set j 1 + set er [lindex [whatis result] 5] + repeat 4 { + set err [lindex [whatis result_$j] 5] + if { $err != "curve" && $er != "curve"} { + break + } else { + set nom [expr $nom + 1] + } + incr j + } + if { $nom == 0} { + puts " Faulty OCC565: function intersection works wrongly with trimmed cones" + } else { + puts " OCC565 OK: function intersection works with trimmed cones" + } +} + + diff --git a/tests/bugs/moddata_2/bug566 b/tests/bugs/moddata_2/bug566 new file mode 100755 index 0000000000..586f59c32b --- /dev/null +++ b/tests/bugs/moddata_2/bug566 @@ -0,0 +1,43 @@ +pload QAcommands + +puts "========" +puts "OCC566" +puts "========" +puts "" +############################################### +##BRepBndLib::AddClose builds box larger than BRepBndLib::Add +############################################### + +restore [locate_data_file OCC566.brep] a + +set err1 [bounding a] +set err2 [OCC566 a] + +regexp { *([-0-9.+eE]+) *([-0-9.+eE]+) *([-0-9.+eE]+) *([-0-9.+eE]+) *([-0-9.+eE]+) *([-0-9.+eE]+)} $err1 full v1_x v1_y v1_z v2_x v2_y v2_z +regexp { *([-0-9.+eE]+) *([-0-9.+eE]+) *([-0-9.+eE]+) *([-0-9.+eE]+) *([-0-9.+eE]+) *([-0-9.+eE]+)} $err2 full v3_x v3_y v3_z v4_x v4_y v4_z + +vertex v1 $v1_x $v1_y $v1_z +vertex v2 $v2_x $v2_y $v2_z + +vertex v3 $v3_x $v3_y $v3_z +vertex v4 $v4_x $v4_y $v4_z + +distmini d1 v1 v2 +distmini d2 v3 v4 + +regexp {([-0-9.+eE]+)$} [dump d1_val] full dis1 +puts $dis1 +regexp {([-0-9.+eE]+)$} [dump d2_val] full dis2 +puts $dis2 + +set err [expr 1.*abs((($dis1 - $dis2) / $dis2) * 100)] +puts "" +puts [format "Different is %s percents" $err] + +if {$err > 1.0} { + puts " Faulty OCC566: BRepBndLib::AddClose builds box larger than BRepBndLib::Add - this should not be so!" +} else { + puts " OCC566 OK" +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug567 b/tests/bugs/moddata_2/bug567 new file mode 100755 index 0000000000..dbfa54d72b --- /dev/null +++ b/tests/bugs/moddata_2/bug567 @@ -0,0 +1,52 @@ +puts "TODO OCC12345 ALL: Faulty OCC565: function intersection works wrongly with trimmed Surfaces" + +puts "========" +puts "OCC567" +puts "========" +puts "" +####################################### +## Can not intersect two Rectangular Trimmed Surfaces . +####################################### + +restore [locate_data_file OCC567a.draw] s1 +restore [locate_data_file OCC567b.draw] s2 + +if { [catch {intersect i s1 s2 } catch_result] } { + puts "Faulty OCC565: function intersection works wrongly with infinite Surfaces" +} else { + set j 1 + repeat 11 { + set err [lindex [whatis i_$j] 5] + if { $err != "curve"} { + puts " Faulty OCC565: function intersection works wrongly with infinite Surfaces" + break + } else { + puts [format "%s ) OCC565 OK: function intersection works with infinite Surfaces" $j] + } + incr j} +} + +trim s1x s1 0 2*pi 0 2*pi/13 +trim s2x s2 0 2*pi 0 2*pi/13 + +if { [catch {intersect result s1x s2x } catch_result] } { + puts "Faulty OCC565 exception: function intersection works wrongly with trimmed Surfaces" +} else { + set nom 0 + set j 1 + repeat 11 { + set err [lindex [whatis result_$j] 5] + if { $err != "curve"} { + break + } else { + set nom [expr $nom + 1] + } + incr j + } + if { $nom == 0} { + puts "Faulty OCC565: function intersection works wrongly with trimmed Surfaces" + } else { + puts " OCC565 OK: function intersection works with trimmed Surfaces" + } +} + diff --git a/tests/bugs/moddata_2/bug569 b/tests/bugs/moddata_2/bug569 new file mode 100755 index 0000000000..6035413da6 --- /dev/null +++ b/tests/bugs/moddata_2/bug569 @@ -0,0 +1,33 @@ +puts "TODO OCC12345 ALL: Faulty OCC569: function intersection works wrongly with trimmed plane and cone surfaces" + +puts "========" +puts "OCC569" +puts "========" +puts "" +################################## +## Can not intersect trimmed plane and cone surfaces +################################## + +restore [locate_data_file OCC569a.draw] s1 +restore [locate_data_file OCC569b.draw] s2 + +if { [catch {intersect result s1 s2 } catch_result] } { + puts "Faulty OCC569 exception: function intersection works wrongly with trimmed plane and cone surfaces " +} else { + set nom 0 + set j 1 + repeat 10 { + set err [lindex [whatis result_$j] 5] + if { $err != "curve"} { + break + } else { + set nom [expr $nom + 1] + } + incr j + } + if { $nom == 0} { + puts "Faulty OCC569: function intersection works wrongly with trimmed plane and cone surfaces" + } else { + puts "OCC569 OK: function intersection works with trimmed plane and cone surfaces" + } +} diff --git a/tests/bugs/moddata_2/bug5696 b/tests/bugs/moddata_2/bug5696 new file mode 100755 index 0000000000..a8abf8aaa9 --- /dev/null +++ b/tests/bugs/moddata_2/bug5696 @@ -0,0 +1,21 @@ +pload QAcommands + +puts "================" +puts "OCC5696" +puts "================" +puts "" +####################################################################################### +# Exception in BRepAdaptor_CompCurve due to uninitialised variable CurIndex +####################################################################################### + +set BugNumber OCC5696 + +set info_result [OCC5696] +set index [string compare ${info_result} "par_edge = 1\n"] +if {$index != 0} { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + + diff --git a/tests/bugs/moddata_2/bug5698 b/tests/bugs/moddata_2/bug5698 new file mode 100755 index 0000000000..56d1bde45c --- /dev/null +++ b/tests/bugs/moddata_2/bug5698 @@ -0,0 +1,25 @@ +puts "TODO OCC11111 ALL: Faulty OCC5698" + +pload QAcommands + +puts "============" +puts "OCC5698" +puts "============" +puts "" +###################################################### +# Incorrect result of intersection of a plane and an extrusion surface +###################################################### + +set BugNumber OCC5698 + +restore [locate_data_file OCC5698.brep] s1 + +set info_result [OCC5698 s1] + +set index [string compare ${info_result} "OK\n"] +if {$index != 0} { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + diff --git a/tests/bugs/moddata_2/bug592 b/tests/bugs/moddata_2/bug592 new file mode 100755 index 0000000000..dd05d32f68 --- /dev/null +++ b/tests/bugs/moddata_2/bug592 @@ -0,0 +1,43 @@ +puts "TODO OCC12345 ALL: Faulty OCC592 : Checkshape BRepCheck_Analyzer does not detect faulty shape" + +puts "========================" +puts " OCC592 " +puts "========================" +puts "" +################################### +##BRepCheck_Analyzer does not detect faulty shape +##################################### + +restore [locate_data_file OCC592.brep] ff114 + +explode ff114 e +mkcurve cc ff114_8 +cvalue cc 0.95 x y z +vertex vv x y z +mksurface gs ff114 +mkface ff gs +donl ff114 vv +trim trcc cc +set aa [distmini dd vv ff] + +puts "******* Result *******" +regexp {([-0-9.+eE]+)$} [dump dd_val] full dis1 +puts "distance between the point on curve and the surface is $dis1" + +set tolerance [maxtolerance ff114_8] +regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxEdgeTolerance +puts "the tolerance of the edge is $MaxEdgeTolerance" +puts "the tolerance is less than distance between point and surface" +puts "BUT" + +decho off +set che [checkshape ff114] +decho on + +if { [regexp {Faulty} $che] != 1 } { + puts "Faulty OCC592 : Checkshape BRepCheck_Analyzer does not detect faulty shape" +} else { + puts "OCC592 OK: Checkshape (BRepCheck_Analyzer) detects bad shape" +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug593 b/tests/bugs/moddata_2/bug593 new file mode 100755 index 0000000000..a275e0a82b --- /dev/null +++ b/tests/bugs/moddata_2/bug593 @@ -0,0 +1,54 @@ +puts "TODO OCC12345 ALL: Error : Projection of a 3D point on surface using GeomAPI_ProjectPointOnSurf works incorrect" + +puts "========================" +puts " OCC593 " +puts "========================" +puts "" +############################################################# +## Projection of a 3D point on surface using GeomAPI_ProjectPointOnSurf works incorrect +############################################################# + +restore [locate_data_file OCC593.brep] ff48 + +set tolerance [maxtolerance ff48] +regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxFaceTolerance + +vertex vv -19.561252535222 17.89876466186 71.408126285268 +distmini dd vv ff48 +regexp {([-0-9.+eE]+)$} [dump dd_val] full ddval + +mksurface gs ff48 + +proj gs -19.561252535222 17.89876466186 71.408126285268 + +set pp1 [lindex [dump ext_1] 9] +set pp2 [lindex [dump ext_1] 10] + +set err [expr abs ([expr $pp2 - $pp1])] +puts [format "MaxFaceTolerance = %s" $MaxFaceTolerance] +puts [format "MaxDistance = %s" $err] +if { $err < $MaxFaceTolerance } { + puts "OCC593 (case 1) : Projection of a 3D point on surface using GeomAPI_ProjectPointOnSurf works properly" +} else { + puts "Error : Projection of a 3D point on surface using GeomAPI_ProjectPointOnSurf works incorrect" +} +copy ext_1 oldext_1 + +puts "" +puts "***** Another example: *****" + +svalue gs 0.56 0.4 x y z +point p x y z +proj gs x y z + +set p1 [lindex [dump ext_1] 9] +set p2 [lindex [dump ext_1] 10] + +set err1 [expr abs ([expr $p2 - $p1])] +puts [format "MaxFaceTolerance = %s" $MaxFaceTolerance] +puts [format "MaxDistance = %s" $err1] +if { $err1 < $MaxFaceTolerance } { + puts "OCC593 (case 2) : Projection of a 3D point on surface using GeomAPI_ProjectPointOnSurf works properly" +} else { + puts "Error : Projection of a 3D point on surface using GeomAPI_ProjectPointOnSurf works incorrect" +} diff --git a/tests/bugs/moddata_2/bug601 b/tests/bugs/moddata_2/bug601 new file mode 100755 index 0000000000..f1cdc4f1f5 --- /dev/null +++ b/tests/bugs/moddata_2/bug601 @@ -0,0 +1,25 @@ +puts "TODO OCC12345 ALL: Faulty OCC601: function BLEND works wrongly" + +puts "========================" +puts " OCC601 " +puts "SAM1542" +puts "========================" +puts "" +############################################# +## No possibility to make a fillet 13 at the inner edge of the shape +############################################# + +restore [locate_data_file OCC601.brep] a +checkshape a + +explode a e + +if [catch {blend result a 13 a_41 } res] { + puts "Faulty OCC601: function BLEND works wrongly" +} else { + puts "OCC601 OK: function BLEND works without exception" + checkshape result + + set square 10 + set 2dviewer 0 +} diff --git a/tests/bugs/moddata_2/bug604 b/tests/bugs/moddata_2/bug604 new file mode 100755 index 0000000000..c460f07d16 --- /dev/null +++ b/tests/bugs/moddata_2/bug604 @@ -0,0 +1,35 @@ +puts "TODO OCC12345 ALL: Faulty OCC604: Result of intersection operation is INcorrect !!!" + +puts "========================" +puts " OCC604" +puts "========================" +puts "" +############################ +## Wrong intersection between two tores. +############################ + +restore [locate_data_file OCC604a.draw] a +restore [locate_data_file OCC604b.draw] b + +if { [catch { intersect result a b } catch_result] } { + puts "Faulty OCC604: function INTERSECTION works with exception" +} else { + set nom 0 + set j 1 + repeat 10 { + set err [lindex [whatis res_$j] 5] + if { $err != "curve"} { + break + } else { + set nom [expr $nom + 1] + } + incr j + } + if { $nom != 1 } { + puts "Faulty OCC604: Result of intersection operation is INcorrect !!!" + } else { + puts "OCC604 OK : Result of intersection operation is CORRECT !!! " + } +} + +set 3dviewer 1 diff --git a/tests/bugs/moddata_2/bug611_1 b/tests/bugs/moddata_2/bug611_1 new file mode 100755 index 0000000000..98f29e83fd --- /dev/null +++ b/tests/bugs/moddata_2/bug611_1 @@ -0,0 +1,20 @@ +puts "========================" +puts "OCC611" +puts "SAM1564" +puts "(case 1)" +puts "========================" +puts "" +############################ +## No possibility to fuse the shapes. +############################ + +restore [locate_data_file OCC611.brep] a +explode a +checkshape a_1 +checkshape a_2 + +bfuse result a_1 a_2 +checkshape result + +set square 531.197 +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug611_2 b/tests/bugs/moddata_2/bug611_2 new file mode 100755 index 0000000000..a9efdc484a --- /dev/null +++ b/tests/bugs/moddata_2/bug611_2 @@ -0,0 +1,21 @@ +puts "=================7=======" +puts "OCC611" +puts "SAM1564" +puts "(case 2)" +puts "========================" +puts "" +############################ +## No possibility to fuse the shapes. +############################ + +restore [locate_data_file OCC611.brep] a +explode a +checkshape a_1 +checkshape a_2 + +bop a_1 a_2 +bopfuse result +checkshape result + +set square 531.197 +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug611_3 b/tests/bugs/moddata_2/bug611_3 new file mode 100755 index 0000000000..3cdd5ce25b --- /dev/null +++ b/tests/bugs/moddata_2/bug611_3 @@ -0,0 +1,20 @@ +puts "========================" +puts "OCC611" +puts "SAM1564" +puts "(case 1)" +puts "========================" +puts "" +############################ +## No possibility to fuse the shapes. +############################ + +restore [locate_data_file OCC611.brep] a +explode a +checkshape a_1 +checkshape a_2 + +bfuse result a_2 a_1 +checkshape result + +set square 531.197 +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug613_1 b/tests/bugs/moddata_2/bug613_1 new file mode 100755 index 0000000000..071719b0bc --- /dev/null +++ b/tests/bugs/moddata_2/bug613_1 @@ -0,0 +1,26 @@ +puts "========================" +puts " OCC613" +puts "(case 1)" +puts "========================" +puts "" +############################################# +## Meshing algo cannot create mesh for faces with internal edges +############################################# + +restore [locate_data_file OCC613a.brep] result + +tclean result +isos result 0 +incmesh result .1 +triangles result + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +if { $tri == 0 || $nod == 0 } { + puts "Error : Meshing algo cannot create mesh for faces with internal edges " +} + +set 3dviewer 1 + diff --git a/tests/bugs/moddata_2/bug613_2 b/tests/bugs/moddata_2/bug613_2 new file mode 100755 index 0000000000..44a4b84083 --- /dev/null +++ b/tests/bugs/moddata_2/bug613_2 @@ -0,0 +1,26 @@ +puts "========================" +puts " OCC613" +puts "(case 2)" +puts "========================" +puts "" +############################################# +## Meshing algo cannot create mesh for faces with internal edges +############################################# + +restore [locate_data_file OCC613b.brep] result + +tclean result +isos result 0 +incmesh result .1 +triangles result + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod + +if { $tri == 0 || $nod == 0 } { + puts "Error : Meshing algo cannot create mesh for faces with internal edges " +} + +set 3dviewer 1 + diff --git a/tests/bugs/moddata_2/bug618 b/tests/bugs/moddata_2/bug618 new file mode 100755 index 0000000000..688f9e02c6 --- /dev/null +++ b/tests/bugs/moddata_2/bug618 @@ -0,0 +1,21 @@ + +puts "========================" +puts "OCC618" +puts "========================" +puts "" +############################ +## Exception during bop +############################ + +restore [locate_data_file OCC618a.brep] a +checkshape a +restore [locate_data_file OCC618b.brep] b +checkshape b + +if [catch {bop a b} catch_result] { + puts "Faulty OCC618 : BOP operation was made wrongly" +} else { + puts "OCC618 OK: BOP operation works OK" +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug6278 b/tests/bugs/moddata_2/bug6278 new file mode 100755 index 0000000000..5a3919f79e --- /dev/null +++ b/tests/bugs/moddata_2/bug6278 @@ -0,0 +1,61 @@ +puts "============" +puts "OCC6278" +puts "============" +puts "" +###################################################### +# Fuse operation produces incorrect result +###################################################### + +set BugNumber OCC6278 + +restore [locate_data_file OCC6278-A.brep] a +restore [locate_data_file OCC6278-B.brep] b + +bfuse result a b +explode result v + +set nb_v_good 4 + +set DumpList [dump result_2] +if {[llength ${DumpList}] < 40} { + puts "Faulty ${BugNumber}: bad format of dump" +} else { + regexp { *- *Point *3D *: *([-0-9.+eE]+), +([-0-9.+eE]+), +([-0-9.+eE]+)} ${DumpList} full x y z + puts $x + puts $y + puts $z + + set percent_max 0.1 + + set x [lindex ${DumpList} 37] + set y [lindex ${DumpList} 38] + set z [lindex ${DumpList} 39] + + set x [string range ${x} 0 end-1] + set y [string range ${y} 0 end-1] + + set good_x -32.3042674857046 + set good_y 20.0000000000001 + set good_z 0. + + set Percent_x [expr abs(${x} - ${good_x}) / abs(${good_x}) * 100.] + set Percent_y [expr abs(${y} - ${good_y}) / abs(${good_y}) * 100.] + if {${z} == 0.} { + set Percent_z 0. + } else { + set Percent_z [expr abs(${good_z} - ${z}) / abs(${z}) * 100.] + } + + if {${Percent_x} > ${percent_max}} { + puts "Faulty ${BugNumber}: bad value of x = ${x}" + } + if {${Percent_y} > ${percent_max}} { + puts "Faulty ${BugNumber}: bad value of y = ${y}" + } + if {${Percent_z} > ${percent_max}} { + puts "Faulty ${BugNumber}: bad value of z = ${z}" + } +} + +set length 278.725 +set 3dviewer 2 diff --git a/tests/bugs/moddata_2/bug6412 b/tests/bugs/moddata_2/bug6412 new file mode 100755 index 0000000000..2521030190 --- /dev/null +++ b/tests/bugs/moddata_2/bug6412 @@ -0,0 +1,33 @@ +puts "========" +puts "OCC6412" +puts "========" +puts "" +#################################################### +## Regression in visualization +#################################################### + +set BugNumber OCC6412 + +restore [locate_data_file OCC6412.brep] result + +tclean result +vinit +vdisplay result +vsetdispmode result 1 + +isos result 0 +triangles result + +set tri 0 +set nod 0 +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod +if { ${tri} == 0 && ${nod} == 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +set 3dviewer 0 + diff --git a/tests/bugs/moddata_2/bug6412_1 b/tests/bugs/moddata_2/bug6412_1 new file mode 100755 index 0000000000..5189653dc0 --- /dev/null +++ b/tests/bugs/moddata_2/bug6412_1 @@ -0,0 +1,17 @@ +puts "================" +puts "OCC6412" +puts "================" +puts "" +####################################################################################### +# Regression in vizualization +####################################################################################### + +set BugNumber OCC6412 + +restore [locate_data_file OCC6412.brep] result +vinit +vfit +vsetdispmode 1 + +set square 3480.05 +set 3dviewer 0 diff --git a/tests/bugs/moddata_2/bug6450_1 b/tests/bugs/moddata_2/bug6450_1 new file mode 100755 index 0000000000..2fcb1e3568 --- /dev/null +++ b/tests/bugs/moddata_2/bug6450_1 @@ -0,0 +1,24 @@ +puts "============" +puts "OCC6450" +puts "============" +puts "" +###################################################### +# Cannot get common part of two parallel halfspaces +###################################################### + +set BugNumber OCC6450 + +plane pl 100 0 0 1 0 0 +mkface f pl +halfspace so1 f 0 0 0 +ttranslate f -200 0 0 +halfspace so2 f 0 0 0 +bcommon result so1 so2 +if {[dtyp result] == ""} { + puts "Faulty ${BugNumber}: operation failed" +} else { + puts "OK ${BugNumber}" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug6450_2 b/tests/bugs/moddata_2/bug6450_2 new file mode 100755 index 0000000000..6acfde9fae --- /dev/null +++ b/tests/bugs/moddata_2/bug6450_2 @@ -0,0 +1,24 @@ +puts "============" +puts "OCC6450" +puts "============" +puts "" +###################################################### +# Cannot get common part of two parallel halfspaces +###################################################### + +set BugNumber OCC6450 + +plane pl 100 0 0 1 0 0 +mkface f pl +halfspace so1 f 0 0 0 +ttranslate f -200 0 0 +trotate f 0 0 0 0 0 1 45 +halfspace so2 f 0 0 0 +bcommon result so1 so2 +if {[dtyp result] == ""} { + puts "Faulty ${BugNumber}: operation failed" +} else { + puts "OK ${BugNumber}" +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug6474 b/tests/bugs/moddata_2/bug6474 new file mode 100755 index 0000000000..97c93c567a --- /dev/null +++ b/tests/bugs/moddata_2/bug6474 @@ -0,0 +1,22 @@ +puts "============" +puts "OCC6474" +puts "============" +puts "" +###################################################### +# Incorrect result of intersection of a plane and an extrusion surface +###################################################### + +set BugNumber OCC6474 + +restore [locate_data_file OCC6474-s1.draw] s1 +restore [locate_data_file OCC6474-s2.draw] s2 + +intersect result s1 s2 + +if {[llength [directory res*]] != 1} { + puts "Faulty ${BugNumber}: more than 1 intersection line is got" +} else { + puts "OK ${BugNumber}" +} + +set 3dviewer 1 diff --git a/tests/bugs/moddata_2/bug65 b/tests/bugs/moddata_2/bug65 new file mode 100755 index 0000000000..91e614ef64 --- /dev/null +++ b/tests/bugs/moddata_2/bug65 @@ -0,0 +1,23 @@ +puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" + +puts "================" +puts "BUC61023" +puts "OCC65" +puts "================" +puts "" +############################################### +## Possibility to make a revolution to have a solid with a volume=0 m3 +############################################### + +restore [locate_data_file OCC65.brep] sh +checkshape sh + +revol result sh 0 0 0 0 0 1 360 + +checkshape result + +set square 1.0134e+06 +set 2dviewer 0 + + + diff --git a/tests/bugs/moddata_2/bug6503 b/tests/bugs/moddata_2/bug6503 new file mode 100755 index 0000000000..8c7c1cc372 --- /dev/null +++ b/tests/bugs/moddata_2/bug6503 @@ -0,0 +1,83 @@ +puts "================" +puts "OCC6503" +puts "================" +puts "" +####################################################################################### +# Incorrect calculation of bounding box for infinite surfaces +####################################################################################### + +set BugNumber OCC6503 + +proc GetPercent {Value GoodValue} { + set Percent 0. + if {${GoodValue} != 0.} { + set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] + } elseif {${Value} != 0.} { + set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] + } else { + set Percent 0. + } + return ${Percent} +} + +plane pl 0 0 0 0 0 1 +mkface f pl +set info_result [bounding f] + +set x1 [lindex ${info_result} 0] +set y1 [lindex ${info_result} 1] +set z1 [lindex ${info_result} 2] +set x2 [lindex ${info_result} 3] +set y2 [lindex ${info_result} 4] +set z2 [lindex ${info_result} 5] + +set good_x1 -1e+100 +set good_y1 -1e+100 +set good_z1 -9.9999999999999995e-08 +set good_x2 1e+100 +set good_y2 1e+100 +set good_z2 9.9999999999999995e-08 + +set percent_max 0.1 +set status 0 + +set x1_percent [GetPercent ${x1} ${good_x1}] +set y1_percent [GetPercent ${y1} ${good_y1}] +set z1_percent [GetPercent ${z1} ${good_z1}] +set x2_percent [GetPercent ${x2} ${good_x2}] +set y2_percent [GetPercent ${y2} ${good_y2}] +set z2_percent [GetPercent ${z2} ${good_z2}] + +if {${x1_percent} > ${percent_max}} { + puts "Faulty ${BugNumber} : x1 is wrong" + set status 1 +} +if {${y1_percent} > ${percent_max}} { + puts "Faulty ${BugNumber} : y1 is wrong" + set status 1 +} +if {${z1_percent} > ${percent_max}} { + puts "Faulty ${BugNumber} : z1 is wrong" + set status 1 +} +if {${x2_percent} > ${percent_max}} { + puts "Faulty ${BugNumber} : x2 is wrong" + set status 1 +} +if {${y2_percent} > ${percent_max}} { + puts "Faulty ${BugNumber} : y2 is wrong" + set status 1 +} +if {${z2_percent} > ${percent_max}} { + puts "Faulty ${BugNumber} : z2 is wrong" + set status 1 +} + +if { ${status} == 0 } { + puts "${BugNumber}: OK" +} else { + puts "${BugNumber}: Faulty" +} + +set 3dviewer 0 + diff --git a/tests/bugs/moddata_2/bug6862_1 b/tests/bugs/moddata_2/bug6862_1 new file mode 100755 index 0000000000..c7c40679cc --- /dev/null +++ b/tests/bugs/moddata_2/bug6862_1 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC6862" +puts "============" +puts "" +####################################################################### +# Tool for checking arguments of Boolean Operations +####################################################################### + +set BugNumber OCC6862 + +# self-intersection test +restore [locate_data_file OCC497a.brep] a_1 +restore [locate_data_file OCC497b.brep] a_2 + +decho off +set resstr [bopargcheck a_2] +decho on + +if {$resstr=="Faulties, that can not be treated by BOP, are detected.\n"} { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug6862_2 b/tests/bugs/moddata_2/bug6862_2 new file mode 100755 index 0000000000..b390a3a97e --- /dev/null +++ b/tests/bugs/moddata_2/bug6862_2 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC6862" +puts "============" +puts "" +####################################################################### +# Tool for checking arguments of Boolean Operations +####################################################################### + +set BugNumber OCC6862 + +# self-intersection test +restore [locate_data_file OCC497e.brep] a_1 +restore [locate_data_file OCC497f.brep] a_2 + +decho off +set resstr [bopargcheck a_2] +decho on + +if {$resstr=="Faulties, that can not be treated by BOP, are detected.\n"} { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug6862_3 b/tests/bugs/moddata_2/bug6862_3 new file mode 100755 index 0000000000..354c8a360f --- /dev/null +++ b/tests/bugs/moddata_2/bug6862_3 @@ -0,0 +1,30 @@ +puts "TODO OCC111111 ALL: Faulty OCC6862" + +puts "============" +puts "OCC6862" +puts "============" +puts "" +####################################################################### +# Tool for checking arguments of Boolean Operations +####################################################################### + +set BugNumber OCC6862 + +# test small edges +restore [locate_data_file OCC651a.brep] a +restore [locate_data_file OCC651b.brep] b + +puts "Checking shapes: bopargcheck a b /FTVEIP ..." +decho off +set resstr [bopargcheck a b /FTVEIP] +decho on + +if {$resstr=="Faulties, that can not be treated by BOP, are detected.\n"} { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} + +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_2/bug6862_4 b/tests/bugs/moddata_2/bug6862_4 new file mode 100755 index 0000000000..6b0e1ea5ae --- /dev/null +++ b/tests/bugs/moddata_2/bug6862_4 @@ -0,0 +1,28 @@ +puts "TODO OCC111111 ALL: Faulty OCC6862" + +puts "============" +puts "OCC6862" +puts "============" +puts "" +####################################################################### +# Tool for checking arguments of Boolean Operations +####################################################################### + +set BugNumber OCC6862 + +# test small edges +restore [locate_data_file OCC651a.brep] a + +decho off +puts "Checking shapes: bopargcheck a b /FTVEIP ..." +set resstr [bopargcheck a /FTVEIP] +decho on + +if {$resstr=="Faulties, that can not be treated by BOP, are detected.\n"} { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug6862_5 b/tests/bugs/moddata_2/bug6862_5 new file mode 100755 index 0000000000..738b2a7ce7 --- /dev/null +++ b/tests/bugs/moddata_2/bug6862_5 @@ -0,0 +1,26 @@ +puts "============" +puts "OCC6862" +puts "============" +puts "" +####################################################################### +# Tool for checking arguments of Boolean Operations +####################################################################### + +set BugNumber OCC6862 + +# test types +box b1 10 20 10 +box b2 20 10 10 +explode b2 f + +decho off +set resstr [bopargcheck b1 b2_1 -C /RFTVEI] +decho on + +if {$resstr=="Faulties, that can not be treated by BOP, are detected.\n"} { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug6862_6 b/tests/bugs/moddata_2/bug6862_6 new file mode 100755 index 0000000000..72b6a61273 --- /dev/null +++ b/tests/bugs/moddata_2/bug6862_6 @@ -0,0 +1,27 @@ +puts "============" +puts "OCC6862" +puts "============" +puts "" +puts "TODO OCC111111 ALL: Faulty OCC6862" + +####################################################################### +# Tool for checking arguments of Boolean Operations +####################################################################### + +set BugNumber OCC6862 + +# test small edges +restore [locate_data_file OCC726.brep] a +explode a + +decho off +set resstr [bopargcheck a_1 a_2 -O /FTVEI] +decho on + +if {$resstr=="Faulties, that can not be treated by BOP, are detected.\n"} { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug6862_7 b/tests/bugs/moddata_2/bug6862_7 new file mode 100755 index 0000000000..5ea0d6d597 --- /dev/null +++ b/tests/bugs/moddata_2/bug6862_7 @@ -0,0 +1,37 @@ +puts "============" +puts "OCC6862" +puts "============" +puts "" +####################################################################### +# Tool for checking arguments of Boolean Operations +####################################################################### + +set BugNumber OCC6862 + +# face verification +box b1 10 20 10 +box b2 20 10 10 +explode b1 f +explode b2 f +bcut r1 b1_6 b2_6 +bcommon r2 b1_6 b2_6 +explode r1 w +explode r2 w +mksurface gs b1_6 +mkface ff gs +add r1_1 ff +add r2_1 ff + +decho off +set resstr [bopargcheck ff b2_6 -F /RTVEIP] +decho on + +if {$resstr=="Faulties, that can not be treated by BOP, are detected.\n"} { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} + +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_2/bug6862_8 b/tests/bugs/moddata_2/bug6862_8 new file mode 100755 index 0000000000..80f386f041 --- /dev/null +++ b/tests/bugs/moddata_2/bug6862_8 @@ -0,0 +1,30 @@ +puts "============" +puts "OCC6862" +puts "============" +puts "" +####################################################################### +# Tool for checking arguments of Boolean Operations +####################################################################### + +set BugNumber OCC6862 + +# test possibility to merge vertices +box b1 10 20 10 +box b2 20 10 10 +explode b1 e +explode b2 e +tcopy b2_10 ee2 +compound b2_10 ee2 comp +donl b1_10 comp + +decho off +set resstr [bopargcheck b1_10 comp -O /RFTEIP] +decho on + +if {$resstr=="Faulties, that can not be treated by BOP, are detected.\n"} { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug6862_9 b/tests/bugs/moddata_2/bug6862_9 new file mode 100755 index 0000000000..4f790dcd86 --- /dev/null +++ b/tests/bugs/moddata_2/bug6862_9 @@ -0,0 +1,30 @@ +puts "============" +puts "OCC6862" +puts "============" +puts "" +####################################################################### +# Tool for checking arguments of Boolean Operations +####################################################################### + +set BugNumber OCC6862 + +# test possibility to merge edges +box b1 10 20 10 +box b2 20 10 10 +explode b1 e +explode b2 e +tcopy b2_10 ee2 +wire ww b2_10 ee2 +donl b1_10 ww + +decho off +set resstr [bopargcheck b1_10 ww -O /RFTVIP] +decho on + +if { $resstr=="Faulties, that can not be treated by BOP, are detected.\n" } { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug7 b/tests/bugs/moddata_2/bug7 new file mode 100755 index 0000000000..b8bc89c712 --- /dev/null +++ b/tests/bugs/moddata_2/bug7 @@ -0,0 +1,24 @@ + +puts "================" +puts "OCC7" +puts "================" +puts "" +######################################################### +## Extrema_ExtPElS throw the exception "gp_VectorWithNullMagnitude". +######################################################### + +ptorus tor 3 1 +explode tor f +vertex vv 0 3 0 + +distmini result vv tor_1 +set info [dump result] + +if { [regexp "TShape # 1 : EDGE" $info] != 1 + || [regexp "TShape # 2 : VERTEX" $info] != 1 + || [regexp "TShape # 3 : VERTEX" $info] != 1 } { + puts "Error : Result is incorrect" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug703 b/tests/bugs/moddata_2/bug703 new file mode 100755 index 0000000000..5244823097 --- /dev/null +++ b/tests/bugs/moddata_2/bug703 @@ -0,0 +1,22 @@ +puts "==========" +puts "OCC703 " +puts "==========" +puts "" +################################################## +## Wrong result of extrema +## Draw command extrema c1 ce gives no solutions, but must be 2 solutions +################################################## + +restore [locate_data_file OCC703_1.draw] c1 +restore [locate_data_file OCC703_2.draw] ce + +set result [extrema c1 ce] +set err [llength $result] +if { $err != 2} { + puts "Faulty OCC703 (amount of solution): command extrema does NOT work properly" +} else { + puts "OCC703 OK (amount of solution): command extrema works properly" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug705 b/tests/bugs/moddata_2/bug705 new file mode 100755 index 0000000000..a440a10d10 --- /dev/null +++ b/tests/bugs/moddata_2/bug705 @@ -0,0 +1,31 @@ + +puts "==========" +puts "OCC705 " +puts "==========" +puts "" +########################################################### +## The matrix of inertia for sphere computed incorrectly. +## In the secod case the not diagonal elements of the inertia matrix are not close to zero. +########################################################### + +psphere result 10 10 10 +ttranslate result 10 10 10 +trotate result 0 0 0 0 1 1 34 + +set list [vprops result] +set inertia [regexp -all -inline { +[-0-9.+eE]+ +[-0-9.+eE]+ +[-0-9.+eE]+} $list] +set matrix [regexp -all -inline {[-0-9.+eE]+} $inertia] + +set matrix12 [lindex $matrix 1] +set matrix21 [lindex $matrix 3] +set matrix23 [lindex $matrix 5] +set matrix32 [lindex $matrix 7] + +if { ${matrix12} != 0. || ${matrix21} != 0. || ${matrix23} != 0. || ${matrix32} != 0. } { + puts "Faulty OCC705" +} else { + puts "OCC705 OK" +} + +set length 123.755 +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug712_2 b/tests/bugs/moddata_2/bug712_2 new file mode 100755 index 0000000000..74870a8aba --- /dev/null +++ b/tests/bugs/moddata_2/bug712_2 @@ -0,0 +1,22 @@ +pload QAcommands + +puts "========" +puts "OCC712" +puts "========" +puts "" +############################################################ +## Exeption is raised in DRAW during building draft with help command "depouille" +## on face in the attached shape. +## The source code of application is also attached and should be checked. +############################################################ + +set draftAngle 15 +set slabThick 30 + +if [catch {OCC712 ${draftAngle} ${slabThick} } catch_result] { + puts "Faulty OCC712" +} else { + puts "OCC712 OK" +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug736 b/tests/bugs/moddata_2/bug736 new file mode 100755 index 0000000000..5507ea2327 --- /dev/null +++ b/tests/bugs/moddata_2/bug736 @@ -0,0 +1,21 @@ +puts "========" +puts "OCC736" +puts "========" +puts "" +##################################################### +## After restoring attached shape(face) it is obviously that there is +## selfintersecting wire. However BRepCheck gives reply that shape looks OK. +##################################################### + +restore [locate_data_file OCC736.brep] result +decho off +set che [checkshape result r] +decho on +if { [regexp {OK} $che ] == 1 } { + puts "Faulty OCC736: checkshape command works wrongly" +} else { + puts "OCC736 OK: checkshape command works PROPERLY" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug7372 b/tests/bugs/moddata_2/bug7372 new file mode 100755 index 0000000000..5478ffbdf0 --- /dev/null +++ b/tests/bugs/moddata_2/bug7372 @@ -0,0 +1,37 @@ +pload QAcommands + +puts "================" +puts "OCC7372" +puts "================" +puts "" +####################################################################################### +# Invalid conversion 2D periodic BSpline curve to Bezier segments +####################################################################################### + +set BugNumber OCC7372 + +OCC7372 + +set mistake 0 +set len [llength [directory segment*]] +if { ${len} != 5 } { + puts "Faulty ${BugNumber} : segment number is wrong" + set mistake 1 +} else { + set good_length 73.3203 + regexp {The length .* is ([-0-9.+eE]+)} [length segment_5] full current_length + if { [expr 1.*abs($good_length - $current_length)/$good_length * 100] > 0.1 } { + puts "Faulty ${BugNumber} : length is wrong for segment_5" + set mistake 1 + } + renamevar segment_5 result +} + +if { ${mistake} != 0 } { + puts "Faulty ${BugNumber}" +} else { + puts "OK ${BugNumber}" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug747 b/tests/bugs/moddata_2/bug747 new file mode 100755 index 0000000000..859231ac7d --- /dev/null +++ b/tests/bugs/moddata_2/bug747 @@ -0,0 +1,20 @@ + +puts "========" +puts "OCC747" +puts "========" +puts "" +############################### +## Exception in DRAW-command "distmini" +############################### + +restore [locate_data_file OCC747_1.brep] s1 +checkshape s1 +restore [locate_data_file OCC747_2.brep] s2 +checkshape s2 + +if { [catch { distmini result s1 s2 } status] } { + puts "Faulty OCC747" +} else { + puts "OCC747 OK" +} + diff --git a/tests/bugs/moddata_2/bug75_1 b/tests/bugs/moddata_2/bug75_1 new file mode 100755 index 0000000000..86035465e7 --- /dev/null +++ b/tests/bugs/moddata_2/bug75_1 @@ -0,0 +1,29 @@ +puts "============" +puts "BUC60861" +puts "OCC75" +puts "============" +puts "" +puts "(case 1)" +############################### +## Incorrect work of section Shell-Shell. +############################### + +restore [locate_data_file BUC60861_gap.brep] ss +checkshape ss + +plane pl1 25680.2288 21428 9995 1 0 0 +mkface f1 pl1 -4000 8000 -5000 5000 +bsection result ss f1 -a + +set good_len 9265 +regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} [maxtolerance result] full tol +regexp {Mass +: +([-0-9.+eE]+)} [lprops result] full len +if { [expr 1.*abs(${good_len} - $len)] > $tol } { + puts "Error : Length is bad" +} + +set 2dviewer 0 + + + + diff --git a/tests/bugs/moddata_2/bug75_2 b/tests/bugs/moddata_2/bug75_2 new file mode 100755 index 0000000000..fdd47364a2 --- /dev/null +++ b/tests/bugs/moddata_2/bug75_2 @@ -0,0 +1,28 @@ +puts "============" +puts "BUC60861" +puts "OCC75" +puts "============" +puts "" +puts "case 2" +############################### +## Incorrect work of section Shell-Shell. +############################### + +restore [locate_data_file BUC60861_gap1.brep] ss +checkshape ss + +plane pl1 25680.2288 21428 9995 1 0 0 +mkface f1 pl1 -1 11 -5 5 +bsection result ss f1 -a + +set good_len 10.0009 +regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} [maxtolerance result] full tol +regexp {Mass +: +([-0-9.+eE]+)} [lprops result] full len +if { [expr 1.*abs(${good_len} - $len)] > $tol } { + puts "Error : len is bad" +} + +set 2dviewer 0 + + + diff --git a/tests/bugs/moddata_2/bug76 b/tests/bugs/moddata_2/bug76 new file mode 100755 index 0000000000..214185d658 --- /dev/null +++ b/tests/bugs/moddata_2/bug76 @@ -0,0 +1,27 @@ +puts "TODO OCC12345 ALL: Error : Volume of OCC76-1.brep is calculated wrongly becuase 3020.94 value must be but 3050.41 is" +puts "TODO OCC12345 ALL: Error : Volume of OCC76-2.brep is calculated wrongly because 9871.39 value must be but 10153.6 is" + +puts "================" +puts "OCC76" +puts "================" +puts "" + +restore [locate_data_file shading_177.brep] sh1 +checkshape sh1 +regexp {Mass +: +([-0-9.+eE]+)} [vprops sh1] full l1 + +restore [locate_data_file OCC76-2.brep] sh2 +checkshape sh2 +regexp {Mass +: +([-0-9.+eE]+)} [vprops sh2] full l2 + +if { [expr abs([expr $l1 - 3020.94])] > 0.00999} { + puts "Error : Volume of OCC76-1.brep is calculated wrongly becuase 3020.94 value must be but $l1 is" +} else { + puts " Volume of OCC76-1.brep is right calculated" +} + +if { [expr abs([expr $l2 - 9871.39 ])] > 0.00999} { + puts "Error : Volume of OCC76-2.brep is calculated wrongly because 9871.39 value must be but $l2 is" +} else { + puts " Volume of OCC76-2.brep is right calculated" +} diff --git a/tests/bugs/moddata_2/bug766 b/tests/bugs/moddata_2/bug766 new file mode 100755 index 0000000000..7be84277bc --- /dev/null +++ b/tests/bugs/moddata_2/bug766 @@ -0,0 +1,21 @@ +puts "========" +puts "OCC766" +puts "========" +puts "" +############################### +## Can not project the 3-D point on the ellipse +############################### + +restore [locate_data_file OCC766.draw] c + +set result [proj c 30 3.944304526105059e-31 20.0] + +set ll [llength $result] + +if {$ll > 0} { + puts "OCC770 OK" +} else { + puts "Faulty OCC770" +} + +set 2dviewer 1 diff --git a/tests/bugs/moddata_2/bug8 b/tests/bugs/moddata_2/bug8 new file mode 100755 index 0000000000..75e16f53c6 --- /dev/null +++ b/tests/bugs/moddata_2/bug8 @@ -0,0 +1,22 @@ +puts "================" +puts "OCC8" +puts "================" +puts "" +################################################### +## BRepTools_WireExplorere gives not all edges from a wire +################################################### + +pload XDE +restore [locate_data_file OCC8.brep] result + +checkshape result + +explode result w +set info [expwire result_1 sh] + +if { [regexp "BRepTools_WireExplorer donne 16 Edges" $info] != 1 } { + puts "Error : BRepTools_WireExplorer gives WRONG number of edges." +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug813 b/tests/bugs/moddata_2/bug813 new file mode 100755 index 0000000000..0cde7ffdb8 --- /dev/null +++ b/tests/bugs/moddata_2/bug813 @@ -0,0 +1,24 @@ +pload QAcommands + +puts "=========" +puts " OCC813 " +puts "=========" +puts "" +##################################### +## Geom2dGcc_Lin2d2Tan fails on point and ellipse +##################################### +set U 200 +set V 200 + +set result [OCC813 $U $V] + +set nb_sol 0 + +regexp {nb of solutions = ([-0-9.+eE]+)} $result full nb_sol + +if {$nb_sol > 0} { + puts "OCC813 OK" +} else { + puts "Faulty OCC813" +} + diff --git a/tests/bugs/moddata_2/bug814 b/tests/bugs/moddata_2/bug814 new file mode 100755 index 0000000000..9772a63d72 --- /dev/null +++ b/tests/bugs/moddata_2/bug814 @@ -0,0 +1,23 @@ +pload QAcommands + +puts "=========" +puts " OCC814 " +puts "=========" +puts "" +#################################### +## Geom2dGcc_Lin2d2Tan fails on circle and ellipse +#################################### + +set result [OCC814] + +set nb_sol 0 + +regexp {nb of solutions = ([-0-9.+eE]+)} $result full nb_sol + +if {$nb_sol > 0} { + puts "OCC814 OK" +} else { + puts "Faulty OCC814" +} + + diff --git a/tests/bugs/moddata_2/bug8169 b/tests/bugs/moddata_2/bug8169 new file mode 100755 index 0000000000..193f62818e --- /dev/null +++ b/tests/bugs/moddata_2/bug8169 @@ -0,0 +1,26 @@ +pload QAcommands + +puts "============" +puts "OCC8169" +puts "============" +puts "" +####################################################################### +# Wrong Geom2dAPI_InterCurveCurve segment +####################################################################### + +set BugNumber OCC6768 + +restore [locate_data_file OCC8169_1.brep] e1 +restore [locate_data_file OCC8169_2.brep] e2 + +plane p 0 0 500 0 0 1 1 0 0 +dump p +mkface result p + +if { [regexp {Faulty} [OCC8169 e1 e2 result]] == 0 } { + puts "OK ${BugNumber}" +} else { + puts "Faulty ${BugNumber}" +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug862 b/tests/bugs/moddata_2/bug862 new file mode 100755 index 0000000000..a1a7fad1e8 --- /dev/null +++ b/tests/bugs/moddata_2/bug862 @@ -0,0 +1,21 @@ + +puts "================" +puts "OCC862" +puts "================" +puts "" +######################################## +## The result is just one extremum - intersection is not found. +######################################## +restore [locate_data_file OCC862_1.draw] c1 +restore [locate_data_file OCC862_2.draw] c2 + +set result [extrema c1 c2] +set err [llength $result] +if { $err <= 1} { + puts "Faulty OCC862 (amount of solution): command extrema does NOT work properly" +} else { + puts "OCC862 OK (amount of solution): command extrema works properly" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug867 b/tests/bugs/moddata_2/bug867 new file mode 100755 index 0000000000..b2c780dc90 --- /dev/null +++ b/tests/bugs/moddata_2/bug867 @@ -0,0 +1,24 @@ +pload QAcommands + +puts "========" +puts "OCC867" +puts "========" +puts "" +###################################################### +## When calling method Init() with surface and its boundary parameters are the +## arguments and then calling method Perform() it raises an exception. +###################################################### + +cylinder c 10 20 +trim c c 0 4 0 2 +point p 30 30 30 +set Umin 0 +set Usup 3 +set Vmin 0 +set Vsup 2 + +if { [ catch {OCC867 p c $Umin $Usup $Vmin $Vsup} catch_result ] } { + puts "Faulty OCC867" +} else { + puts "OCC867 OK" +} diff --git a/tests/bugs/moddata_2/bug88 b/tests/bugs/moddata_2/bug88 new file mode 100755 index 0000000000..dd5438ebe2 --- /dev/null +++ b/tests/bugs/moddata_2/bug88 @@ -0,0 +1,109 @@ +puts "========" +puts "BUC60963" +puts "OCC88" +puts "========" +puts "" +###################################################### +# BUC60963. can not project vertex to face +###################################################### + +restore [locate_data_file OCC88.brep] sh + +set che [checkshape sh] + +explode sh f +checkshape sh_1 +checkshape sh_2 + +mksurface surf1 sh_1 +mksurface surf2 sh_2 +puts "Make line from pos(135; 11; 0) with dir (0;0;1) " +line l 135 11 0 0 0 1 + +intersect res1 l surf1 +intersect res2 l surf2 +#set first1 [whatis res1] +#set second1 [whatis res2] + +puts "Try to intersect with (135;10.9995;0) (0;0;1)" +line ll 135 10.9995 0 0 0 1 +intersect res_1 ll surf1 +intersect res_2 ll surf2 +#set first2 [whatis res_1] +#set second2 [whatis res_2] + +proc CalculatePercent {value good_value} { + if {${good_value} == 0. && ${value} == 0.} { + set percent 0. + } else { + set percent [expr abs(${value} - ${good_value}) / double(${good_value}) * 100.] + } + return ${percent} +} + +set IsGood 1 +set percent_max 0.1 +if {[info exists res1] == 0} { + puts "Faulty OCC88 (case 2)" + set IsGood 0 +} +if {[info exists res2] == 1} { + puts "Faulty OCC88 (case 3)" + set IsGood 0 +} + +if {[info exists res_1] == 0} { + puts "Faulty OCC88 (case 4)" + set IsGood 0 +} +if {[info exists res_2] == 1} { + puts "Faulty OCC88 (case 5)" + set IsGood 0 +} + +if {${IsGood} == 1} { + set dump_list1 [split [dump res1] " :,\n"] + set x1 [lindex ${dump_list1} 10] + set y1 [lindex ${dump_list1} 12] + set z1 [lindex ${dump_list1} 14] + + set dump_list2 [split [dump res_1] " :,\n"] + set x2 [lindex ${dump_list2} 10] + set y2 [lindex ${dump_list2} 12] + set z2 [lindex ${dump_list2} 14] + + set x_percent [CalculatePercent ${x1} ${x2}] + set y_percent [CalculatePercent ${y1} ${y2}] + set z_percent [CalculatePercent ${z1} ${z2}] + + puts "x1 = ${x1}" + puts "x2 = ${x2}" + puts "x_percent = ${x_percent}\n" + + puts "y1 = ${y1}" + puts "y2 = ${y2}" + puts "y_percent = ${y_percent}\n" + + puts "z1 = ${z1}" + puts "z2 = ${z2}" + puts "z_percent = ${z_percent}\n" + + if {${x_percent} > ${percent_max}} { + puts "OCC88 Faulty (case 6)" + set IsGood 0 + } + if {${y_percent} > ${percent_max}} { + puts "OCC88 Faulty (case 7)" + set IsGood 0 + } + if {${z_percent} > ${percent_max}} { + puts "OCC88 Faulty (case 8)" + set IsGood 0 + } +} + +if {${IsGood} == 1} { + puts "OCC88 OK" +} + + diff --git a/tests/bugs/moddata_2/bug889 b/tests/bugs/moddata_2/bug889 new file mode 100755 index 0000000000..4be5dd3b33 --- /dev/null +++ b/tests/bugs/moddata_2/bug889 @@ -0,0 +1,22 @@ +puts "TODO OCC12345 ALL: Faulty OCC889 : Checkshape says that the shape has FAULTY, but it is not truth" + +puts "============" +puts "OCC889" +puts "============" +puts "" +############################################ +## Checkshape founds number of errors on new face. It is not true. +############################################ +restore [locate_data_file OCC889.rle] result + +decho off +set che [checkshape result] +decho on + +if { [ regexp {Faulty} $che ] == 1 } { + puts "Faulty OCC889 : Checkshape says that the shape has FAULTY, but it is not truth" +} else { + puts "OCC889 OK : Checkshape works properly" +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug909 b/tests/bugs/moddata_2/bug909 new file mode 100755 index 0000000000..3573115919 --- /dev/null +++ b/tests/bugs/moddata_2/bug909 @@ -0,0 +1,27 @@ +puts "TODO OCC12345 ALL: Faulty OCC909" + +pload QAcommands + +puts "=======" +puts "OCC909" +puts "=======" +puts "" +####################################################### +## BRepTools_WireExplorer give different number of edges in dev and FIXOCC40 +####################################################### + +restore [locate_data_file OCC909_f.rle] f +restore [locate_data_file OCC909_w.rle] w + +if { [ catch { set result [OCC909 w f] } ] } { + puts "Faulty OCC909" +} else { + set count 0 + regexp {Count = ()} $result full count + if {$count != 2} { + puts "Faulty OCC909" + } else { + puts "OCC909 OK" + } +} + diff --git a/tests/bugs/moddata_2/bug921 b/tests/bugs/moddata_2/bug921 new file mode 100755 index 0000000000..0ea374ac34 --- /dev/null +++ b/tests/bugs/moddata_2/bug921 @@ -0,0 +1,72 @@ +pload QAcommands + +puts "=======" +puts "OCC921" +puts "=======" +puts "" +############################################################ +## I have found that regresiion on file a054a.sat depends on changes in +## BRepTools::AddUVBounds. The method BRepTools::UVBounds(F, u1, u2, v1, v2) +## returns different values in C40 and in dev. It is because there are different +## strings of code. BRepTools.cxx line 213 (in dev version) +############################################################ + +set good_u1 -0.157166 +set good_u2 4.88216 +set good_v1 -1.65583 +set good_v2 7.93778 + +set percent_max 0.1 + +restore [locate_data_file OCC921.rle] a + +set BoundsList [OCC921 a] + +set u1 0 +set u2 0 +set v1 0 +set v2 0 + +regexp {Bounds: *([-0-9.+eE]+) *([-0-9.+eE]+) *([-0-9.+eE]+) *([-0-9.+eE]+)} $BoundsList full u1 u2 v1 v2 + +set u1_percent [expr abs(${u1} - ${good_u1}) / double(${good_u1}) * 100.] +set u2_percent [expr abs(${u2} - ${good_u2}) / double(${good_u2}) * 100.] +set v1_percent [expr abs(${v1} - ${good_v1}) / double(${good_v1}) * 100.] +set v2_percent [expr abs(${v2} - ${good_v2}) / double(${good_v2}) * 100.] + +puts "u1 = ${u1}" +puts "u2 = ${u2}" +puts "v1 = ${v1}" +puts "v2 = ${v2}" + +puts "u1_percent = ${u1_percent}" +puts "u2_percent = ${u2_percent}" +puts "v1_percent = ${v1_percent}" +puts "v2_percent = ${v2_percent}" + +set status 0 + +if {${u1_percent} > ${percent_max}} { + puts "OCC921: Error (case 1)" + set status 1 +} + +if {${u2_percent} > ${percent_max}} { + puts "OCC921: Error (case 2)" + set status 1 +} + +if {${v1_percent} > ${percent_max}} { + puts "OCC921: Error (case 3)" + set status 1 +} + +if {${v2_percent} > ${percent_max}} { + puts "OCC921: Error (case 4)" + set status 1 +} + +if {${status} == 0} { + puts "OCC921: OK" +} + diff --git a/tests/bugs/moddata_2/bug9303 b/tests/bugs/moddata_2/bug9303 new file mode 100755 index 0000000000..11d2950b12 --- /dev/null +++ b/tests/bugs/moddata_2/bug9303 @@ -0,0 +1,107 @@ +puts "============" +puts "OCC9303" +puts "============" +puts "" +###################################################### +# Intersection curve surface doesn't take account of bounds of the surface +###################################################### + +set BugNumber OCC9303 + +proc GetPercent {Value GoodValue} { + set Percent 0. + if {${GoodValue} != 0.} { + set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.] + } elseif {${Value} != 0.} { + set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.] + } else { + set Percent 0. + } + return ${Percent} +} + +cone c 0 0 0 30 0 +trimv nc c 20 30 + +smallview +X+Z +donly nc +fit + +line ll 0 0 20 1 0 0 + +if [catch {intersect res ll nc} result] { + set mistake 1 +} else { + set mistake 0 +} + +if { $mistake == 0} { + puts "${BugNumber} OK : intersection was finished" + puts "" + set nom 0 + set j 1 + repeat 2 { + set che [whatis res_$j] + set err [lindex $che [expr [llength $che] - 1]] + if { $err != "point"} { + break + } else { + set nom [expr $nom + 1] + } + incr j + } + if { $nom != 2 } { + puts [format "Faulty ${BugNumber}: Intersection was made WRONGLY: %s points" $nom] + } else { + puts [format "${BugNumber} OK : Intersection command works properly: %s points" $nom] + + set dump1 [dump res_1] + set x1 [lindex ${dump1} 7] + set y1 [lindex ${dump1} 8] + set z1 [lindex ${dump1} 9] + set x1 [string range ${x1} 0 end-1] + set y1 [string range ${y1} 0 end-1] + + set dump2 [dump res_2] + set x2 [lindex ${dump2} 7] + set y2 [lindex ${dump2} 8] + set z2 [lindex ${dump2} 9] + set x2 [string range ${x2} 0 end-1] + set y2 [string range ${y2} 0 end-1] + + set percent_max 0.1 + set GoodX1 1.154700538379251e+01 + set GoodY1 0.000000000000000e+00 + set GoodZ1 2.000000000000000e+01 + set GoodX2 -1.154700538379251e+01 + set GoodY2 0.000000000000000e+00 + set GoodZ2 2.000000000000000e+01 + + set Percent_x1 [GetPercent ${x1} ${GoodX1}] + set Percent_y1 [GetPercent ${y1} ${GoodY1}] + set Percent_z1 [GetPercent ${z1} ${GoodZ1}] + + set Percent_x2 [GetPercent ${x2} ${GoodX2}] + set Percent_y2 [GetPercent ${y2} ${GoodY2}] + set Percent_z2 [GetPercent ${z2} ${GoodZ2}] + + if {${Percent_x1} > ${percent_max}} { + puts "Faulty ${BugNumber}: bad value of x1 = ${x1}" + } elseif {${Percent_y1} > ${percent_max}} { + puts "Faulty ${BugNumber}: bad value of y1 = ${y1}" + } elseif {${Percent_z1} > ${percent_max}} { + puts "Faulty ${BugNumber}: bad value of z1 = ${z1}" + } elseif {${Percent_x2} > ${percent_max}} { + puts "Faulty ${BugNumber}: bad value of x2 = ${x2}" + } elseif {${Percent_y2} > ${percent_max}} { + puts "Faulty ${BugNumber}: bad value of y2 = ${y2}" + } elseif {${Percent_z2} > ${percent_max}} { + puts "Faulty ${BugNumber}: bad value of z2 = ${z2}" + } else { + puts "${BugNumber}: OK" + } + + } +} else { + puts "Faulty ${BugNumber} : intersection does not finished" +} diff --git a/tests/bugs/moddata_2/bug9303_1 b/tests/bugs/moddata_2/bug9303_1 new file mode 100755 index 0000000000..f4de3efb08 --- /dev/null +++ b/tests/bugs/moddata_2/bug9303_1 @@ -0,0 +1,51 @@ +puts "============" +puts "OCC9303" +puts "============" +puts "" +###################################################### +# Intersection curve surface doesn't take account of bounds of the surface +###################################################### + +set BugNumber OCC9303 + +cone c 0 0 0 30 0 +trimv nc c 20 30 + +smallview +X+Z +donly nc +fit + +line ll 0 0 10 1 0 0 + +decho off +if [catch {intersect res ll nc} result] { + set mistake 1 +} else { + set mistake 0 +} +decho on + +if { $mistake == 0} { + puts "${BugNumber} OK : intersection was finished" + puts "" + set nom 0 + set j 1 + repeat 2 { + set che [whatis res_$j] + set err [lindex $che [expr [llength $che] - 1]] + if { $err != "point"} { + break + } else { + set nom [expr $nom + 1] + } + incr j + } + if { $nom != 0 } { + puts [format "Faulty ${BugNumber}: Intersection was made WRONGLY: %s points" $nom] + } else { + puts [format "${BugNumber} OK : Intersection command works properly: %s points" $nom] + } +} else { + puts "Faulty ${BugNumber} : intersection does not finished" +} + diff --git a/tests/bugs/moddata_2/bug935_1 b/tests/bugs/moddata_2/bug935_1 new file mode 100755 index 0000000000..07ddf00b74 --- /dev/null +++ b/tests/bugs/moddata_2/bug935_1 @@ -0,0 +1,33 @@ + +puts "=========" +puts " OCC935 " +puts "(case 1)" +puts "=========" +puts "" +############################### +## instability in checkshape in KAS:dev version. +############################### + +restore [locate_data_file OCC935_1.brep] result + +decho off +set err [checkshape result] +decho on +set j 1 +repeat 25 { + restore [locate_data_file OCC935_1.brep] result + decho off + set err1 [checkshape result] + decho on + if { $err != $err1 } { + puts [format " Faulty OCC935 (case 1): function CHECKSHAPE works wrongly on %s time" $j] + break + } else { + puts [format " OCC935 (case 1) OK: function CHECKSHAPE works properly %s time" $j] + } + incr j +} + +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_2/bug935_2 b/tests/bugs/moddata_2/bug935_2 new file mode 100755 index 0000000000..7f738a4c26 --- /dev/null +++ b/tests/bugs/moddata_2/bug935_2 @@ -0,0 +1,32 @@ + +puts "=========" +puts " OCC935 " +puts "(case 2)" +puts "=========" +puts "" +############################### +## instability in checkshape in KAS:dev version. +############################### + +restore [locate_data_file OCC935_2.brep] result + +decho off +set err [checkshape result] +decho on + +set j 1 +repeat 25 { + restore [locate_data_file OCC935_2.brep] result + decho off + set err1 [checkshape result] + decho on + if { $err != $err1 } { + puts [format " Faulty OCC935 (case 2): function CHECKSHAPE works wrongly on %s time" $j] + break + } else { + puts [format " OCC935 (case 2) OK: function CHECKSHAPE works properly %s time" $j] + } + incr j +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug943_1 b/tests/bugs/moddata_2/bug943_1 new file mode 100755 index 0000000000..4ee1a39ae1 --- /dev/null +++ b/tests/bugs/moddata_2/bug943_1 @@ -0,0 +1,36 @@ + +puts "=========" +puts " OCC943 " +puts "(case 1)" +puts "=========" +puts "" +##################################################### +## The regression is intersecting pcurves of face, They are added by fixshape. +## (To see this you can try fixshape dF.rle from attachment. But please note, that +## checkshape on result of fixshape sometimes fails and sometimes not. It is +## instability!) +###################################################### + +restore [locate_data_file OCC943_1.brep] result + +decho off +set err [checkshape result] +decho on + +set j 1 +repeat 25 { + restore [locate_data_file OCC943_1.brep] result + decho off + set err1 [checkshape result] + decho on + if { $err != $err1 } { + puts [format " Faulty OCC943 (case 1): function CHECKSHAPE works wrongly on %s time" $j] + break + } else { + puts [format " OCC943 (case 1) OK: function CHECKSHAPE works properly %s time" $j] + } + incr j +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug943_2 b/tests/bugs/moddata_2/bug943_2 new file mode 100755 index 0000000000..5e44ef832e --- /dev/null +++ b/tests/bugs/moddata_2/bug943_2 @@ -0,0 +1,36 @@ + +puts "=========" +puts " OCC943 " +puts "(case 2)" +puts "=========" +puts "" +######################################################### +## distinace between projection and initial point in dev version is larger then in C40. +######################################################### + +restore [locate_data_file OCC943_2.draw] su + +set X 5.759527537723098 +set Y 31.81368637070151 +set Z -0.2989616405627145 + +vertex v $X $Y $Z +proj su $X $Y $Z + +regexp {Parameters +: +[-0-9.+eE]+ +([-0-9.+eE]+)} [dump ext_1] full resV + +cvalue ext_1 $resV cx cy cz +vertex V cx cy cz +distmini d V v + +regexp {([-0-9.+eE]+)$} [dump d_val] full res + +set res_good 1.108e-05 + +if { $res > $res_good } { + puts "" + puts "Faulty OCC493 (case 2)" +} else { + puts "" + puts " OCC493 (case 2) OK" +} diff --git a/tests/bugs/moddata_2/bug956_1 b/tests/bugs/moddata_2/bug956_1 new file mode 100755 index 0000000000..76fda06ebf --- /dev/null +++ b/tests/bugs/moddata_2/bug956_1 @@ -0,0 +1,25 @@ +puts "TODO ?OCC12345 ALL: Faulty OCC956" + +puts "=========" +puts " OCC956 " +puts "(case 1)" +puts "=========" +puts "" +############################################### +##possible regression in KAS:dev on checkshape. Fails on valid shape +############################################### + +restore [locate_data_file OCC956_1.brep] result + +decho off +set che [checkshape result] +decho on + +if { [regexp {Faulty} $che] } { + puts "Faulty OCC956 (case 1): Checkshape says that the shape is incorrect, but it is not truth" +} else { + puts "OCC956 OK (case 1): Checkshape works properly" +} + +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/bug956_2 b/tests/bugs/moddata_2/bug956_2 new file mode 100755 index 0000000000..3e045b22cb --- /dev/null +++ b/tests/bugs/moddata_2/bug956_2 @@ -0,0 +1,26 @@ +puts "TODO ?OCC12345 ALL: Faulty OCC956" + +puts "=========" +puts " OCC956 " +puts "(case 2)" +puts "=========" +puts "" +############################################### +##possible regression in KAS:dev on checkshape. Fails on valid shape +############################################### + +restore [locate_data_file OCC956_2.brep] result + +decho off +set che [checkshape result] +decho on + +if { [regexp {Faulty} $che] } { + puts "Faulty OCC956 (case 2): Checkshape says that the shape is incorrect, but it is not truth" +} else { + puts "OCC956 OK (case 2): Checkshape works properly" +} + +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_2/bug9_1 b/tests/bugs/moddata_2/bug9_1 new file mode 100755 index 0000000000..09ac838eeb --- /dev/null +++ b/tests/bugs/moddata_2/bug9_1 @@ -0,0 +1,88 @@ +puts "TODO OCC12345 ALL: Faulty OCC9" + +puts "================" +puts "OCC9" +puts "================" +puts "" + +pload QAcommands +restore [locate_data_file OCC9-path.draw] d +############### checkshape d # is not a topological shape +restore [locate_data_file OCC9-cur1.draw] b +############### checkshape b # is not a topological shape +restore [locate_data_file OCC9-cur2.draw] c +############### checkshape c # is not a topological shape + +## compute radius +cvalue b 0 x y z +cvalue b 0 P0 +vertex V [dval x] [dval y] [dval z] + +mkedge E d +distmini dm V E + +## make pipe +OCC9 res d b c [dval dm_val] + +## check parametrization + +# puts "Path 0: [dval x] [dval y] [dval z]" + +# cvalue b 1 x y z +# cvalue b 1 P1 +# puts "Path 1: [dval x] [dval y] [dval z]" + +# svalue res 0 0 x y z +# svalue res 0 0 S0 +# puts "Surf 0 0: [dval x] [dval y] [dval z]" + +# svalue res 0 1 x y z +# svalue res 0 1 S1 +# puts "Surf 0 1: [dval x] [dval y] [dval z]" + +set n 1 +set sum 0 +for {set i -470} {$i < 240} {incr i 25} { +# cvalue d $i "P$n" +# svalue res 0 $i "S$n" +# puts "donly res P$n S$n" + incr n + # puts "n = $n i = $i" + + ####cvalue d $i x y z + cvalue b $i x y z + svalue res 0 $i xs ys zs + set dist [expr sqrt (\ + ( [dval x ] - [dval xs ] ) * ( [dval x ] - [dval xs ] )\ + + ( [dval y ] - [dval ys ] ) * ( [dval y ] - [dval ys ] )\ + + ( [dval z ] - [dval zs ] ) * ( [dval z ] - [dval zs ] )\ + ) ] + set sum [expr $sum + $dist ] + puts "1-st Dist at $i : $dist" + + ####cvalue d $i x y z + cvalue c $i x y z + ####svalue res 0 $i xs ys zs + svalue res 1 $i xs ys zs + set dist [expr sqrt (\ + ( [dval x ] - [dval xs ] ) * ( [dval x ] - [dval xs ] )\ + + ( [dval y ] - [dval ys ] ) * ( [dval y ] - [dval ys ] )\ + + ( [dval z ] - [dval zs ] ) * ( [dval z ] - [dval zs ] )\ + ) ] + set sum [expr $sum + $dist ] + puts "2-nd Dist at $i : $dist" + +} +####puts "\n Avg dist on $n intervals: [expr $sum / $n ]" +set Avg_dist [expr $sum / (2 * $n) ] +puts "\n Avg dist on $n intervals: ${Avg_dist}" + +set check_dist [dval dm_val] +puts "\n check_dist = ${check_dist}" +if { ${Avg_dist} > ${check_dist} } { + puts "\n Faulty OCC9" +} else { + puts "\n OCC9: OK" +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/bug9_2 b/tests/bugs/moddata_2/bug9_2 new file mode 100755 index 0000000000..1a1c1cfa7c --- /dev/null +++ b/tests/bugs/moddata_2/bug9_2 @@ -0,0 +1,89 @@ +puts "TODO OCC12345 ALL: Faulty OCC9" + +puts "================" +puts "OCC9" +puts "================" +puts "" + +pload QAcommands +restore [locate_data_file OCC9-path.draw] d +############### checkshape d # is not a topological shape +restore [locate_data_file OCC9-cur1.draw] b +############### checkshape b # is not a topological shape +restore [locate_data_file OCC9-cur2.draw] c +############### checkshape c # is not a topological shape + +## compute radius +cvalue b 0 x y z +cvalue b 0 P0 +vertex V [dval x] [dval y] [dval z] + +mkedge E d +distmini dm V E + +## make pipe +set tolerance 0.0001 +OCC9 res d b c [dval dm_val] ${tolerance} + +## check parametrization + +# puts "Path 0: [dval x] [dval y] [dval z]" + +# cvalue b 1 x y z +# cvalue b 1 P1 +# puts "Path 1: [dval x] [dval y] [dval z]" + +# svalue res 0 0 x y z +# svalue res 0 0 S0 +# puts "Surf 0 0: [dval x] [dval y] [dval z]" + +# svalue res 0 1 x y z +# svalue res 0 1 S1 +# puts "Surf 0 1: [dval x] [dval y] [dval z]" + +set n 1 +set sum 0 +for {set i -470} {$i < 240} {incr i 25} { +# cvalue d $i "P$n" +# svalue res 0 $i "S$n" +# puts "donly res P$n S$n" + incr n + # puts "n = $n i = $i" + + ####cvalue d $i x y z + cvalue b $i x y z + svalue res 0 $i xs ys zs + set dist [expr sqrt (\ + ( [dval x ] - [dval xs ] ) * ( [dval x ] - [dval xs ] )\ + + ( [dval y ] - [dval ys ] ) * ( [dval y ] - [dval ys ] )\ + + ( [dval z ] - [dval zs ] ) * ( [dval z ] - [dval zs ] )\ + ) ] + set sum [expr $sum + $dist ] + puts "1-st Dist at $i : $dist" + + ####cvalue d $i x y z + cvalue c $i x y z + ####svalue res 0 $i xs ys zs + svalue res 1 $i xs ys zs + set dist [expr sqrt (\ + ( [dval x ] - [dval xs ] ) * ( [dval x ] - [dval xs ] )\ + + ( [dval y ] - [dval ys ] ) * ( [dval y ] - [dval ys ] )\ + + ( [dval z ] - [dval zs ] ) * ( [dval z ] - [dval zs ] )\ + ) ] + set sum [expr $sum + $dist ] + puts "2-nd Dist at $i : $dist" + +} +####puts "\n Avg dist on $n intervals: [expr $sum / $n ]" +set Avg_dist [expr $sum / (2 * $n) ] +puts "\n Avg dist on $n intervals: ${Avg_dist}" + +set check_dist ${tolerance} +puts "\n check_dist = ${check_dist}" +if { ${Avg_dist} > ${check_dist} } { + puts "\n Faulty OCC9" +} else { + puts "\n OCC9: OK" +} + +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/fra62476_1 b/tests/bugs/moddata_2/fra62476_1 new file mode 100755 index 0000000000..9d62fef020 --- /dev/null +++ b/tests/bugs/moddata_2/fra62476_1 @@ -0,0 +1,29 @@ +puts "TODO OCC12345 ALL: Error : here is shading problem" + +puts "============" +puts "FRA62476" +puts "" +puts "==================================" +puts "It takes visual check for this BUG" +puts "==================================" +puts "" + +restore [locate_data_file fra62476a.brep] result +checkshape result + +tclean result +incmesh result .1 +triangles result + +set info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $info full tri +regexp { +([-0-9.+eE]+) +nodes} $info full nod + +if { $tri != 93 && $nod != 56 } { + puts "Error : here is shading problem" +} + +set 3dviewer 0 + + + diff --git a/tests/bugs/moddata_2/fra62476_2 b/tests/bugs/moddata_2/fra62476_2 new file mode 100755 index 0000000000..242acd6312 --- /dev/null +++ b/tests/bugs/moddata_2/fra62476_2 @@ -0,0 +1,28 @@ + +puts "==========" +puts "FRA62476" +puts "" +puts "==================================" +puts "It takes visual check for this BUG" +puts "==================================" +puts "" + +restore [locate_data_file fra62476b.brep] result +checkshape result + +tclean result +incmesh result .1 +triangles result + +set info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $info full tri +regexp { +([-0-9.+eE]+) +nodes} $info full nod + +if { $tri !=239 && $nod != 145 } { + puts "Shady FRA62476: here may be shading problem, number tri & nod + are changed" +} + +set 3dviewer 0 + + diff --git a/tests/bugs/moddata_2/ger61235 b/tests/bugs/moddata_2/ger61235 new file mode 100755 index 0000000000..c61d04087d --- /dev/null +++ b/tests/bugs/moddata_2/ger61235 @@ -0,0 +1,24 @@ +puts "===========" +puts "GER61235" +puts "===========" + +restore [locate_data_file ger61235a.brep] tool +checkshape tool +restore [locate_data_file ger61235b.brep] object +checkshape object + +bsection result object tool + +puts "Result of section :" +checkshape result +#To check geometry part +mksurface s1 tool +mksurface s2 object + +puts "Result of intersect :" +intersect result s1 s2 +puts [checksection result] + +set 2dviewer 0 + + diff --git a/tests/bugs/moddata_2/pro19422_1 b/tests/bugs/moddata_2/pro19422_1 new file mode 100755 index 0000000000..30a16449a1 --- /dev/null +++ b/tests/bugs/moddata_2/pro19422_1 @@ -0,0 +1,20 @@ +puts "==========" +puts "PRO19422" +puts "GER60462" +puts "==========" +puts "" +############################################################# +## Errors when cutting, 2 cases in /dp_25/IBug/pro/19422 files o1 t1 and o2 t2, restore. +## cut c1 o1 t1 fails. cut c2 o2 t2 fails +############################################################# + +restore [locate_data_file pro19422a.brep] shape +checkshape shape +restore [locate_data_file pro19422b.brep] tool +checkshape tool + +bcut result shape tool + +set square 3166.93 +set 2dviewer 0 + diff --git a/tests/bugs/moddata_2/pro19422_2 b/tests/bugs/moddata_2/pro19422_2 new file mode 100755 index 0000000000..01e6423b0a --- /dev/null +++ b/tests/bugs/moddata_2/pro19422_2 @@ -0,0 +1,18 @@ +puts "==========" +puts "PRO19422" +puts "==========" +puts "" +############################################################# +## Errors when cutting, 2 cases in /dp_25/IBug/pro/19422 files o1 t1 and o2 t2, restore. +## cut c1 o1 t1 fails. cut c2 o2 t2 fails +############################################################# + +restore [locate_data_file pro19422c.brep] shape +checkshape shape +restore [locate_data_file pro19422d.brep] tool +checkshape tool + +bcut result shape tool + +set square 2369.43 +set 2dviewer 0 diff --git a/tests/bugs/moddata_2/pro20333 b/tests/bugs/moddata_2/pro20333 new file mode 100755 index 0000000000..0f67ccf038 --- /dev/null +++ b/tests/bugs/moddata_2/pro20333 @@ -0,0 +1,26 @@ +puts "TODO OCC12345 ALL: Faulty PRO20333: here is shading problem" + +puts "============" +puts "PRO20333" +puts "" +puts "==================================" +puts "It takes visual check for this BUG" +puts "==================================" + +restore [locate_data_file pro20333a.brep] result +checkshape result + +tclean result +isos result 0 +incmesh result .1 +triangles result + +set info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $info full tri +regexp { +([-0-9.+eE]+) +nodes} $info full nod + +if { $tri != 107 || $nod != 109 } { + puts "Faulty PRO20333: here is shading problem" +} + +set 3dviewer 0 diff --git a/tests/bugs/vis/bug21091_1 b/tests/bugs/vis/bug21091_1 new file mode 100755 index 0000000000..14d4dbaef9 --- /dev/null +++ b/tests/bugs/vis/bug21091_1 @@ -0,0 +1,22 @@ +puts "============" +puts "OCC21091" +puts "OCC21450" +puts "============" +puts "" +###### vcolorscale: vcolorscale [RangeMin RangeMax Intervals HeightFont Position X Y]: draw color scale +###### RangeMin - min of color scale number range +###### RangeMax - max of color scale number range +###### Intervals - number of color scale segments +###### HeightFont - height of font +###### Position - Defines position for color scale labels +############### 0 - NONE +############### 1 - LEFT +############### 2 - RIGHT +############### 3 - CENTER +###### X,Y - coordinates of color scale + +vinit +vcolorscale 10 20 100 16 2 0 0 +set only_screen 0 + + diff --git a/tests/bugs/vis/bug21091_2 b/tests/bugs/vis/bug21091_2 new file mode 100755 index 0000000000..1339daa824 --- /dev/null +++ b/tests/bugs/vis/bug21091_2 @@ -0,0 +1,94 @@ +puts "============" +puts "OCC21091" +puts "OCC21450" +puts "============" +puts "" +#vdrawtext: vdrawtext name X Y Z R G B hor_align ver_align angle zoomable height Aspect FONT +#------------------------------------------------------ +# X\Y\Z - Position Of Text +#------------------------------------------------------ +# R\G\B - Color Of Text +#------------------------------------------------------ +# hor_align 0 to 3 +# HorizontalTextAlignment is HTA_LEFT 0 +# HTA_CENTER 1 +# HTA_RIGHT 2 +# +# ver_align 0 to 4 +# VerticalTextAlignment is VTA_BOTTOM 0 +# VTA_CENTER 1 +# VTA_TOP 2 +#------------------------------------------------------ +# angle - angle turn of text. this variable in degrees +#------------------------------------------------------ +# zoomable - if this variable "0" text not zoomable +# if this variable "1" text zoomable as object in DrawCommands +#------------------------------------------------------ +# height - Font Height +#------------------------------------------------------ +# Aspect - Aspect Font 0 to 4 +# If in list of textfont, not find font with necessary aspect, will be used default font "Courier" with OSD_FA_Regular aspect +# FontAspect is FA_Undefined, FA_Regular, FA_Bold, FA_Italic, FA_BoldItalic +# - 0 - - 1 - - 2 - - 3 - - 4 - +#------------------------------------------------------ +# FONT - font name of font +# If in list of textfont, not find font with necessary Name, will be used default font "Courier" +# + +vinit +set only_screen 1 + +vtrihedron trihedr + +vpoint p1 100 100 -400 +vpoint p2 000 000 -400 +vpoint p3 -100 -100 -400 +vdrawtext OpenCascade 100 100 -400 000 255 255 0 0 000 1 50 1 Times-Roman +vdrawtext OpenCascade 000 000 -400 000 255 255 1 0 000 1 50 1 Times-Roman +vdrawtext OpenCascade -100 -100 -400 000 255 255 2 0 000 1 50 1 Times-Roman + +vpoint p4 100 100 -500 +vpoint p5 000 000 -500 +vpoint p6 -100 -100 -500 +vdrawtext OpenCascade 100 100 -500 255 000 000 0 2 000 1 50 1 Times-Roman +vdrawtext OpenCascade 000 000 -500 255 000 000 1 2 000 1 50 1 Times-Roman +vdrawtext OpenCascade -100 -100 -500 255 000 000 2 2 000 1 50 1 Times-Roman + +vpoint p7 100 100 -450 +vpoint p8 000 000 -450 +vpoint p9 -100 -100 -450 +vdrawtext OpenCascade 100 100 -450 005 255 000 0 1 000 1 50 1 Times-Roman +vdrawtext OpenCascade 000 000 -450 005 255 000 1 1 000 1 50 1 Times-Roman +vdrawtext OpenCascade -100 -100 -450 005 255 000 2 1 000 1 50 1 Times-Roman + + +vdrawtext _.Left._ 200 200 200 255 255 255 0 0 000 1 50 1 Times-Roman +vdrawtext _.Left._ 200 200 200 255 255 000 0 0 090 1 50 1 Times-Roman + +vdrawtext _.Right._ 200 200 200 255 000 255 2 2 000 1 50 1 Times-Roman +vdrawtext _.Right._ 200 200 200 255 155 150 2 2 090 1 50 1 Times-Roman + +vdrawtext _.0123456789._ 200 200 200 000 000 255 1 1 045 1 50 1 Times-Roman +vdrawtext _.0123456789._ 200 200 200 255 000 000 1 1 -45 1 50 1 Times-Roman + +vdrawtext _.~!@#$%^&*:?|+-._ -200 000 400 255 000 000 0 0 0 1 50 1 Times-Roman + +box atextbox -100 -100 -100 -200 -200 -200 +vdisplay atextbox + +vdrawtext OpenCascade -300 -300 -300 000 255 000 0 0 000 0 15 1 Courier +vdrawtext OpenCascade -300 -300 -100 000 255 000 0 0 000 0 15 1 Courier +vdrawtext OpenCascade -100 -100 -300 000 255 000 0 0 000 0 15 1 Courier +vdrawtext OpenCascade -100 -100 -100 000 255 000 0 0 000 0 15 1 Courier + +vdrawtext OpenCascade -300 -100 -300 000 255 000 0 0 000 0 15 1 Courier +vdrawtext OpenCascade -100 -300 -300 000 255 000 0 0 000 0 15 1 Courier +vdrawtext OpenCascade -300 -100 -100 000 255 000 0 0 000 0 15 1 Courier +vdrawtext OpenCascade -100 -300 -100 000 255 000 0 0 000 0 15 1 Courier + +vdrawtext OpenCascade -200 -200 100 255 000 255 0 0 010 0 15 1 Times-Roman +vdrawtext OpenCascade -200 -200 150 000 255 255 0 0 010 0 15 1 Arbat +vdrawtext OpenCascade -200 -200 200 255 255 000 0 0 010 0 15 3 Elephant +vdrawtext OpenCascade -200 -200 250 000 255 005 0 0 010 0 15 4 RockWell +vdrawtext OpenCascade -200 -200 300 255 000 005 0 0 010 0 15 1 Webdings +vdrawtext OpenCascade -200 -200 350 255 000 205 0 0 010 0 15 1 Arial diff --git a/tests/bugs/vis/bug21091_3 b/tests/bugs/vis/bug21091_3 new file mode 100755 index 0000000000..51f40ae183 --- /dev/null +++ b/tests/bugs/vis/bug21091_3 @@ -0,0 +1,35 @@ +puts "TODO OCC11111 ALL: Faulty : Export to pdf file was done but size of file is incorrect" + +puts "============" +puts "OCC21091" +puts "OCC21450" +puts "============" +puts "" +#vinit +#vexport +#vexport full_file_path {PS | EPS | TEX | PDF | SVG | PGF } : exports the view to a vector file of a given format +# + +pload XSDRAW +vinit +set only_screen 1 + +meshfromstl m [locate_data_file shape.stl] + +meshdispmode m 34 + +set aFile $imagedir/${test_image}.pdf + +vexport ${aFile} PDF + +if { [file exists ${aFile}] } { + puts "Export to pdf file was done" + set filesize [file size ${aFile}] + if { $filesize != 154489 } { + puts "Faulty : Export to pdf file was done but size of file is incorrect" + } +} else { + puts "Faulty : Export to pdf file was not done" +} + + diff --git a/tests/bugs/vis/bug21091_4 b/tests/bugs/vis/bug21091_4 new file mode 100755 index 0000000000..a531a6031d --- /dev/null +++ b/tests/bugs/vis/bug21091_4 @@ -0,0 +1,54 @@ +puts "TODO ?OCC11111 ALL: Faulty : Export to" + +puts "============" +puts "OCC21091" +puts "OCC21450" +puts "============" +puts "" +#vexport +#vexport full_file_path {PS | EPS | TEX | PDF | SVG | PGF } : exports the view to a vector file of a given format +#Testing export to PDF format + +vinit +set only_screen 1 + +vtrihedron trihedron + +vpoint p1 -300 -300 -300 +vdrawtext OpenCascade -300 -300 -300 000 255 000 0 0 000 0 15 1 Courier +vpoint p2 -300 -300 -100 +vdrawtext OpenCascade -300 -300 -100 000 255 000 0 0 000 0 15 1 Courier +vpoint p3 -100 -100 -300 +vdrawtext OpenCascade -100 -100 -300 000 255 000 0 0 000 0 15 1 Courier +vpoint p4 -100 -100 -100 +vdrawtext OpenCascade -100 -100 -100 000 255 000 0 0 000 0 15 1 Courier + + +vpoint p5 -300 -100 -300 +vdrawtext OpenCascade -300 -100 -300 000 255 000 0 0 000 0 15 1 Courier +vpoint p6 -100 -300 -300 +vdrawtext OpenCascade -100 -300 -300 000 255 000 0 0 000 0 15 1 Courier +vpoint p7 -300 -100 -100 +vdrawtext OpenCascade -300 -100 -100 000 255 000 0 0 000 0 15 1 Courier +vpoint p8 -100 -300 -100 +vdrawtext OpenCascade -100 -300 -100 000 255 000 0 0 000 0 15 1 Courier + +vaxis ax1 100 100 100 100 100 0 + +box a 110 110 110 200 200 200 +vdisplay a + +set aFile $imagedir/${test_image}.pdf + +vexport ${aFile} PDF + +if { [file exists ${aFile}] } { + puts "Export to pdf file was done" + set filesize [file size ${aFile}] + puts $filesize + if { $filesize != 10055 } { + puts "Faulty : Export to pdf file was done but size of file is incorrect" + } +} else { + puts "Faulty : Export to pdf file was not done" +} diff --git a/tests/bugs/vis/bug21091_5 b/tests/bugs/vis/bug21091_5 new file mode 100755 index 0000000000..b7a7d72f4d --- /dev/null +++ b/tests/bugs/vis/bug21091_5 @@ -0,0 +1,53 @@ +puts "TODO ?OCC11111 ALL: Faulty : Export to" + +puts "============" +puts "OCC21091" +puts "OCC21450" +puts "============" +puts "" +#vexport +#vexport full_file_path {PS | EPS | TEX | PDF | SVG | PGF } : exports the view to a vector file of a given format +#Testing export to PS format + +vinit +set only_screen 1 + +vtrihedron trihedron + +vpoint p1 -300 -300 -300 +vdrawtext OpenCascade -300 -300 -300 000 255 000 0 0 000 0 15 1 Courier +vpoint p2 -300 -300 -100 +vdrawtext OpenCascade -300 -300 -100 000 255 000 0 0 000 0 15 1 Courier +vpoint p3 -100 -100 -300 +vdrawtext OpenCascade -100 -100 -300 000 255 000 0 0 000 0 15 1 Courier +vpoint p4 -100 -100 -100 +vdrawtext OpenCascade -100 -100 -100 000 255 000 0 0 000 0 15 1 Courier + + +vpoint p5 -300 -100 -300 +vdrawtext OpenCascade -300 -100 -300 000 255 000 0 0 000 0 15 1 Courier +vpoint p6 -100 -300 -300 +vdrawtext OpenCascade -100 -300 -300 000 255 000 0 0 000 0 15 1 Courier +vpoint p7 -300 -100 -100 +vdrawtext OpenCascade -300 -100 -100 000 255 000 0 0 000 0 15 1 Courier +vpoint p8 -100 -300 -100 +vdrawtext OpenCascade -100 -300 -100 000 255 000 0 0 000 0 15 1 Courier + +vaxis ax1 100 100 100 100 100 0 + +box a 110 110 110 200 200 200 +vdisplay a + +set aFile $imagedir/${test_image}.ps + +vexport ${aFile} PS + +if { [file exists ${aFile}] } { + puts "Export to PS format was done" + set filesize [file size ${aFile}] + if { $filesize != 10418 } { + puts "Faulty : Export to PS format was done but size of file is incorrect" + } +} else { + puts "Faulty : Export to PS format was not done" +} diff --git a/tests/bugs/vis/bug21091_6 b/tests/bugs/vis/bug21091_6 new file mode 100755 index 0000000000..6697a1b4d4 --- /dev/null +++ b/tests/bugs/vis/bug21091_6 @@ -0,0 +1,53 @@ +puts "TODO ?OCC11111 ALL: Faulty : Export to" + +puts "============" +puts "OCC21091" +puts "OCC21450" +puts "============" +puts "" +#vexport +#vexport full_file_path {PS | EPS | TEX | PDF | SVG | PGF } : exports the view to a vector file of a given format +#Testing export to EPS format + +vinit +set only_screen 1 + +vtrihedron trihedron + +vpoint p1 -300 -300 -300 +vdrawtext OpenCascade -300 -300 -300 000 255 000 0 0 000 0 15 1 Courier +vpoint p2 -300 -300 -100 +vdrawtext OpenCascade -300 -300 -100 000 255 000 0 0 000 0 15 1 Courier +vpoint p3 -100 -100 -300 +vdrawtext OpenCascade -100 -100 -300 000 255 000 0 0 000 0 15 1 Courier +vpoint p4 -100 -100 -100 +vdrawtext OpenCascade -100 -100 -100 000 255 000 0 0 000 0 15 1 Courier + + +vpoint p5 -300 -100 -300 +vdrawtext OpenCascade -300 -100 -300 000 255 000 0 0 000 0 15 1 Courier +vpoint p6 -100 -300 -300 +vdrawtext OpenCascade -100 -300 -300 000 255 000 0 0 000 0 15 1 Courier +vpoint p7 -300 -100 -100 +vdrawtext OpenCascade -300 -100 -100 000 255 000 0 0 000 0 15 1 Courier +vpoint p8 -100 -300 -100 +vdrawtext OpenCascade -100 -300 -100 000 255 000 0 0 000 0 15 1 Courier + +vaxis ax1 100 100 100 100 100 0 + +box a 110 110 110 200 200 200 +vdisplay a + +set aFile $imagedir/${test_image}.eps + +vexport ${aFile} EPS + +if { [file exists ${aFile}] } { + puts "Export to EPS file was done" + set filesize [file size ${aFile}] + if { $filesize != 10362 } { + puts "Faulty : Export to EPS file was done but size of file is incorrect" + } + } else { + puts "Faulty : Export to EPS file was not done" + } diff --git a/tests/bugs/vis/bug21091_7 b/tests/bugs/vis/bug21091_7 new file mode 100755 index 0000000000..4b4da6f803 --- /dev/null +++ b/tests/bugs/vis/bug21091_7 @@ -0,0 +1,52 @@ +puts "============" +puts "OCC21091" +puts "OCC21450" +puts "============" +puts "" +#vexport +#vexport full_file_path {PS | EPS | TEX | PDF | SVG | PGF } : exports the view to a vector file of a given format +#Testing export to TEX format + +vinit +set only_screen 1 + +vtrihedron trihedron + +vpoint p1 -300 -300 -300 +vdrawtext OpenCascade -300 -300 -300 000 255 000 0 0 000 0 15 1 Courier +vpoint p2 -300 -300 -100 +vdrawtext OpenCascade -300 -300 -100 000 255 000 0 0 000 0 15 1 Courier +vpoint p3 -100 -100 -300 +vdrawtext OpenCascade -100 -100 -300 000 255 000 0 0 000 0 15 1 Courier +vpoint p4 -100 -100 -100 +vdrawtext OpenCascade -100 -100 -100 000 255 000 0 0 000 0 15 1 Courier + + +vpoint p5 -300 -100 -300 +vdrawtext OpenCascade -300 -100 -300 000 255 000 0 0 000 0 15 1 Courier +vpoint p6 -100 -300 -300 +vdrawtext OpenCascade -100 -300 -300 000 255 000 0 0 000 0 15 1 Courier +vpoint p7 -300 -100 -100 +vdrawtext OpenCascade -300 -100 -100 000 255 000 0 0 000 0 15 1 Courier +vpoint p8 -100 -300 -100 +vdrawtext OpenCascade -100 -300 -100 000 255 000 0 0 000 0 15 1 Courier + +vaxis ax1 100 100 100 100 100 0 + +box a 110 110 110 200 200 200 +vdisplay a + +set aFile $imagedir/${test_image}.tex + +vexport ${aFile} TEX + +if { [file exists ${aFile}] } { + puts "Export to TEX file was done" + set filesize [file size ${aFile}] + puts "Size of TEX file = $filesize" + if { $filesize >= 1500 } { + puts "Faulty : Export to TEX file was done but size of file is incorrect" + } + } else { + puts "Faulty : Export to TEX file was not done" + } diff --git a/tests/bugs/vis/bug21091_8 b/tests/bugs/vis/bug21091_8 new file mode 100755 index 0000000000..c94b95e4d0 --- /dev/null +++ b/tests/bugs/vis/bug21091_8 @@ -0,0 +1,53 @@ +puts "TODO ?OCC11111 ALL: Faulty : Export to" + +puts "============" +puts "OCC21091" +puts "OCC21450" +puts "============" +puts "" +#vexport +#vexport full_file_path {PS | EPS | TEX | PDF | SVG | PGF } : exports the view to a vector file of a given format +#Testing export to SVG format + +vinit +set only_screen 1 + +vtrihedron trihedron + +vpoint p1 -300 -300 -300 +vdrawtext OpenCascade -300 -300 -300 000 255 000 0 0 000 0 15 1 Courier +vpoint p2 -300 -300 -100 +vdrawtext OpenCascade -300 -300 -100 000 255 000 0 0 000 0 15 1 Courier +vpoint p3 -100 -100 -300 +vdrawtext OpenCascade -100 -100 -300 000 255 000 0 0 000 0 15 1 Courier +vpoint p4 -100 -100 -100 +vdrawtext OpenCascade -100 -100 -100 000 255 000 0 0 000 0 15 1 Courier + + +vpoint p5 -300 -100 -300 +vdrawtext OpenCascade -300 -100 -300 000 255 000 0 0 000 0 15 1 Courier +vpoint p6 -100 -300 -300 +vdrawtext OpenCascade -100 -300 -300 000 255 000 0 0 000 0 15 1 Courier +vpoint p7 -300 -100 -100 +vdrawtext OpenCascade -300 -100 -100 000 255 000 0 0 000 0 15 1 Courier +vpoint p8 -100 -300 -100 +vdrawtext OpenCascade -100 -300 -100 000 255 000 0 0 000 0 15 1 Courier + +vaxis ax1 100 100 100 100 100 0 + +box a 110 110 110 200 200 200 +vdisplay a + +set aFile $imagedir/${test_image}.svg + +vexport ${aFile} SVG + +if { [file exists ${aFile}] } { + puts "Export to SVG file was done" + set filesize [file size ${aFile}] + if { $filesize != 13838 } { + puts "Faulty : Export to SVG file was done but size of file is incorrect" + } + } else { + puts "Faulty : Export to SVG file was not done" + } diff --git a/tests/bugs/vis/bug21091_9 b/tests/bugs/vis/bug21091_9 new file mode 100755 index 0000000000..c671133978 --- /dev/null +++ b/tests/bugs/vis/bug21091_9 @@ -0,0 +1,54 @@ +puts "TODO ?OCC11111 ALL: Faulty : Export to" + +puts "============" +puts "OCC21091" +puts "OCC21450" +puts "============" +puts "" +#vexport +#vexport full_file_path {PS | EPS | TEX | PDF | SVG | PGF } : exports the view to a vector file of a given format +#Testing export to PGF format + +vinit +set only_screen 1 + +vtrihedron trihedron + +vpoint p1 -300 -300 -300 +vdrawtext OpenCascade -300 -300 -300 000 255 000 0 0 000 0 15 1 Courier +vpoint p2 -300 -300 -100 +vdrawtext OpenCascade -300 -300 -100 000 255 000 0 0 000 0 15 1 Courier +vpoint p3 -100 -100 -300 +vdrawtext OpenCascade -100 -100 -300 000 255 000 0 0 000 0 15 1 Courier +vpoint p4 -100 -100 -100 +vdrawtext OpenCascade -100 -100 -100 000 255 000 0 0 000 0 15 1 Courier + + +vpoint p5 -300 -100 -300 +vdrawtext OpenCascade -300 -100 -300 000 255 000 0 0 000 0 15 1 Courier +vpoint p6 -100 -300 -300 +vdrawtext OpenCascade -100 -300 -300 000 255 000 0 0 000 0 15 1 Courier +vpoint p7 -300 -100 -100 +vdrawtext OpenCascade -300 -100 -100 000 255 000 0 0 000 0 15 1 Courier +vpoint p8 -100 -300 -100 +vdrawtext OpenCascade -100 -300 -100 000 255 000 0 0 000 0 15 1 Courier + +vaxis ax1 100 100 100 100 100 0 + +box a 110 110 110 200 200 200 +vdisplay a + +set aFile $imagedir/${test_image}.pgf + +vexport ${aFile} PGF + +if { [file exists ${aFile}] } { + puts "Export to PGF file was done" + set filesize [file size ${aFile}] + puts $filesize + if { $filesize != 20398 } { + puts "Faulty : Export to PGF file was done but size of file is incorrect" + } + } else { + puts "Faulty : Export to PGF file was not done" + } diff --git a/tests/bugs/vis/bug21578 b/tests/bugs/vis/bug21578 new file mode 100755 index 0000000000..f8958d9432 --- /dev/null +++ b/tests/bugs/vis/bug21578 @@ -0,0 +1,52 @@ +puts "TODO OCC11111 ALL: OCC21578: Faulty" +puts "TODO OCC11111 ALL: Error : The square of result shape is" + +puts "============" +puts "OCC21578" +puts "============" +puts "" +###################################################### +# Attached shape is not vizualized in the shaded mode +###################################################### + +set BugNumber OCC21578 + +restore [locate_data_file OCC21578.brep] result + +vinit +tclean result +vsetdispmode 1 +vdisplay result +vfit + +set tri_info [trinfo result] +regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri +regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod +regexp {Maximal deflection +([-0-9.+eE]+)} $tri_info full defl + +set good_tri 231 +set good_nod 236 +set good_defl 0.004029564463949387 + +puts [format " Triangles= %s Nodes= %s Deflection= %s " $tri $nod $defl] + +set status 0 +if {${tri} != ${good_tri}} { + set status 1 +} +if {${nod} != ${good_nod}} { + set status 1 +} +#if {${defl} != ${good_defl}} { +# set status 1 +#} + +if { ${status} != 0 } { + puts "${BugNumber}: Faulty" +} else { + puts "${BugNumber}: OK" +} + +set only_screen 1 +set square 0 + diff --git a/tests/v3d/end b/tests/v3d/end index 4f193e1e2b..1f3e4732b8 100755 --- a/tests/v3d/end +++ b/tests/v3d/end @@ -1,14 +1,8 @@ catch { vfit } -if { [ catch { vdump $imagedir/${test_image}.gif } catch_result ] } { +if { [ catch { vdump $imagedir/${test_image}.png } catch_result ] } { puts $catch_result } -set diff [diffimage $imagedir/${test_image}.gif [ locate_data_file ${group}_${subgroup}_${test_image}.gif ] 0. 0 0 ] - -if { $diff > 10 } { - puts "Error : images are different" -} - puts "TEST COMPLETED"