OpenCascade/occt
1
0
Fork 0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-03 17:56:21 +03:00
Code Packages Releases Activity

Added test cases to folders /bugs/modalg and /bugs/moddata from chl grid.

Browse Source 
Modified TODO in some offset cases.
Deleted the same test cases bug697_* in /bugs/modalg
Deleted test cases which is based on v2d commands
Added test cases to folder bugs
This commit is contained in:
apn 2013-01-25 16:22:41 +04:00
parent 6c3e4c2965
commit 809eca9db6
185 changed files with 4888 additions and 327 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

41
tests/bugs/caf/bug22788_1 Executable file
View File

@ -0,0 +1,41 @@
puts "============"
puts "OCC22788"
puts "============"
puts ""
#######################################################################
#
#######################################################################
pload QAcommands
set BugNumber OCC22788
NewDocument D MDTV-Standard
set aFile OCC22788.std
Open [locate_data_file ${aFile}] D
Close D
return
set log [OCC159 D]
set list [split ${log}]
set ll [llength ${list}]
if { ${ll} < 13 } {
puts "OCC159: Error"
} else {
set DocRefCount1 [lindex ${list} 2]
set DocOwner1 [lindex ${list} 5]
set DocOwner2 [lindex ${list} 8]
set DocRefCount2 [lindex ${list} 11]
set deltaRefCount [expr ${DocRefCount1} - ${DocRefCount2}]
if { ${DocOwner2} == "NULL" && ${deltaRefCount} >= 1 } then {
puts "OCC159: OK"
} else {
puts "OCC159: Error"
}
}

31
tests/bugs/caf/bug22788_2 Executable file
View File

@ -0,0 +1,31 @@
puts "================"
puts "OCC22788"
puts "================"
puts ""
#######################################################################################
# Exception during closing of document due to corrupted memory.
######################################################################################
set BugNumber OCC22788
set aFile [locate_data_file OCC22788.std]
Open ${aFile} D
GetShape D 0:2 result
smallview
fit
set catch_status 0
if { [catch {Close D} catch_result] } {
set catch_status 1
}
if { ${catch_status} != 0 } {
puts "Faulty ${BugNumber}"
} else {
puts "OK ${BugNumber}"
}
set square 220000
set 2dviewer 0

26
tests/bugs/fclasses/bug22611 Executable file
View File

@ -0,0 +1,26 @@
puts "TODO OCC22611 ALL: Tcl Exception: invalid command name"
puts "TODO OCC22611 ALL: TEST INCOMPLETE"
puts "========"
puts "OCC22611"
puts "========"
puts ""
#######################################################################
# Memory leak in expression interpreter
#######################################################################
pload QAcommands
set BugNumber OCC22611
OCC22611 "0.1214343" 1
set listmem {}
set i_max 1000000
OCC22611 "0.1214343" ${i_max}
lappend listmem [expr [meminfo w] / 1024]
if { [checktrend $listmem 0 1 "Memory leak detected"] } {
puts "No memory leak"
break
}

18
tests/bugs/fclasses/bug22744 Executable file
View File

@ -0,0 +1,18 @@
pload QAcommands
puts "============"
puts "OCC22744"
puts "============"
puts ""
#######################################################################
# Global HashCode function for TCollection_ExtendedString
#######################################################################
set BugNumber OCC22744
set QATestVar [ catch { OCC22744 } ]
if { ${QATestVar} == 0 } {
puts "OK ${BugNumber}"
} else {
puts "Faulty ${BugNumber}"
}

61
tests/bugs/fclasses/bug23192_1 Executable file
View File

@ -0,0 +1,61 @@
puts "================"
puts "OCC23192"
puts "================"
puts ""
#######################################################################################
# Regression in writestl command
#######################################################################################
catch { pload XDE }
set BugNumber OCC23192
set aFile $imagedir/${test_image}.stl
catch {exec rm -f ${aFile}}
set anASCIImode 1
set InParallel 0
box res 10 10 10
writestl res ${aFile} ${anASCIImode} ${InParallel}
catch {exec chmod 777 ${aFile}}
if { [file exists ${aFile}] } {
readstl result ${aFile}
set nb_v_good 8
set nb_e_good 18
set nb_w_good 12
set nb_f_good 12
set nb_sh_good 1
set nb_sol_good 0
set nb_compsol_good 0
set nb_compound_good 0
set nb_shape_good 51
# Check file size
set size_status 0
if [string compare $tcl_platform(platform) "windows"] {
set filesize [lindex [exec ls -l ${aFile}] 5]
} else {
set filesize [lindex [exec ls -l ${aFile}] 4]
}
if { ${filesize} != 0 } {
set size_status 0
} else {
set size_status 1
}
if { ${size_status} == 0 } {
puts "OK ${BugNumber}"
} else {
puts "Faulty ${BugNumber}"
}
} else {
puts "Faulty ${BugNumber}"
}
set square 600
set 3dviewer 0

60
tests/bugs/fclasses/bug23192_2 Executable file
View File

@ -0,0 +1,60 @@
puts "================"
puts "OCC23192"
puts "================"
puts ""
#######################################################################################
# Regression in writestl command
#######################################################################################
catch { pload XDE }
set BugNumber OCC23192
set aFile $imagedir/${test_image}.stl
catch {exec rm -f ${aFile}}
set anASCIImode 0
set InParallel 0
box res 10 10 10
writestl res ${aFile} ${anASCIImode} ${InParallel}
catch {exec chmod 777 ${aFile}}
if { [file exists ${aFile}] } {
readstl result ${aFile}
set nb_v_good 8
set nb_e_good 18
set nb_w_good 12
set nb_f_good 12
set nb_sh_good 1
set nb_sol_good 0
set nb_compsol_good 0
set nb_compound_good 0
set nb_shape_good 51
# Check file size
set size_status 0
if [string compare $tcl_platform(platform) "windows"] {
set filesize [lindex [exec ls -l ${aFile}] 5]
} else {
set filesize [lindex [exec ls -l ${aFile}] 4]
}
if { ${filesize} != 0 } {
set size_status 0
} else {
set size_status 1
}
if { ${size_status} == 0 } {
puts "OK ${BugNumber}"
} else {
puts "Faulty ${BugNumber}"
}
} else {
puts "Faulty ${BugNumber}"
}
set square 600
set 3dviewer 0

14
tests/bugs/iges/bug22294 Executable file
View File

@ -0,0 +1,14 @@
puts "================"
puts "OCC22294"
puts "================"
####
igesbrep [locate_data_file OCC22294.igs] a *
tpcompound result
vinit
vdisplay result
vfit
vsetdispmode 1
set 3dviewer 1

13
tests/bugs/iges/bug22504 Executable file
View File

@ -0,0 +1,13 @@
puts "================"
puts "OCC22504"
puts "================"
####
igesbrep [locate_data_file OCC22504.igs] a *
tpcompound result
vinit
vdisplay result
vfit
vsetdispmode 1
set 3dviewer 1

35
tests/bugs/modalg/bug20521 Executable file
View File

@ -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

25
tests/bugs/modalg/bug20827 Executable file
View File

@ -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

33
tests/bugs/modalg/bug21060 Executable file
View File

@ -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

60
tests/bugs/modalg/bug21415 Executable file
View File

@ -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

36
tests/bugs/modalg/bug21754 Executable file
View File

@ -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

74
tests/bugs/modalg/bug21909 Executable file
View File

@ -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

29
tests/bugs/modalg/bug22196 Executable file
View File

@ -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

36
tests/bugs/modalg/bug22306_1 Executable file
View File

@ -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

37
tests/bugs/modalg/bug22306_2 Executable file
View File

@ -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

36
tests/bugs/modalg/bug22306_3 Executable file
View File

@ -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

36
tests/bugs/modalg/bug22306_4 Executable file
View File

@ -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

36
tests/bugs/modalg/bug22306_5 Executable file
View File

@ -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

37
tests/bugs/modalg/bug22361 Executable file
View File

@ -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

30
tests/bugs/modalg/bug22428 Executable file
View File

@ -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

18
tests/bugs/modalg/bug22500 Executable file
View File

@ -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

30
tests/bugs/modalg/bug22558 Executable file
View File

@ -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}"
}

22
tests/bugs/modalg/bug22586 Executable file
View File

@ -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

33
tests/bugs/modalg/bug22631 Executable file
View File

@ -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

36
tests/bugs/modalg/bug22641 Executable file
View File

@ -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

49
tests/bugs/modalg/bug22695 Executable file
View File

@ -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

22
tests/bugs/modalg/bug22717 Executable file
View File

@ -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

36
tests/bugs/modalg/bug22725 Executable file
View File

@ -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

30
tests/bugs/modalg/bug22727 Executable file
View File

@ -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

16
tests/bugs/modalg/bug22765 Executable file
View File

@ -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

40
tests/bugs/modalg/bug22770_1 Executable file
View File

@ -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

27
tests/bugs/modalg/bug22770_10 Executable file
View File

@ -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

27
tests/bugs/modalg/bug22770_11 Executable file
View File

@ -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

27
tests/bugs/modalg/bug22770_12 Executable file
View File

@ -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

39
tests/bugs/modalg/bug22770_13 Executable file
View File

@ -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

27
tests/bugs/modalg/bug22770_14 Executable file
View File

@ -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

39
tests/bugs/modalg/bug22770_15 Executable file
View File

@ -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

31
tests/bugs/modalg/bug22770_16 Executable file
View File

@ -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

31
tests/bugs/modalg/bug22770_17 Executable file
View File

@ -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

30
tests/bugs/modalg/bug22770_18 Executable file
View File

@ -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

30
tests/bugs/modalg/bug22770_19 Executable file
View File

@ -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

39
tests/bugs/modalg/bug22770_2 Executable file
View File

@ -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

30
tests/bugs/modalg/bug22770_20 Executable file
View File

@ -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

30
tests/bugs/modalg/bug22770_21 Executable file
View File

@ -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

30
tests/bugs/modalg/bug22770_22 Executable file
View File

@ -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

28
tests/bugs/modalg/bug22770_23 Executable file
View File

@ -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

30
tests/bugs/modalg/bug22770_24 Executable file
View File

@ -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

30
tests/bugs/modalg/bug22770_25 Executable file
View File

@ -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

30
tests/bugs/modalg/bug22770_26 Executable file
View File

@ -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

28
tests/bugs/modalg/bug22770_27 Executable file
View File

@ -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

28
tests/bugs/modalg/bug22770_28 Executable file
View File

@ -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

28
tests/bugs/modalg/bug22770_29 Executable file
View File

@ -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

37
tests/bugs/modalg/bug22770_3 Executable file
View File

@ -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

28
tests/bugs/modalg/bug22770_30 Executable file
View File

@ -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

28
tests/bugs/modalg/bug22770_4 Executable file
View File

@ -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

28
tests/bugs/modalg/bug22770_5 Executable file
View File

@ -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

28
tests/bugs/modalg/bug22770_6 Executable file
View File

@ -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

28
tests/bugs/modalg/bug22770_7 Executable file
View File

@ -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

29
tests/bugs/modalg/bug22770_8 Executable file
View File

@ -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

27
tests/bugs/modalg/bug22770_9 Executable file
View File

@ -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

40
tests/bugs/modalg/bug22771 Executable file
View File

@ -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

14
tests/bugs/modalg/bug22781_1 Executable file
View File

@ -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

21
tests/bugs/modalg/bug22781_2 Executable file
View File

@ -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

15
tests/bugs/modalg/bug22781_3 Executable file
View File

@ -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

21
tests/bugs/modalg/bug22781_4 Executable file
View File

@ -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

30
tests/bugs/modalg/bug22783 Executable file
View File

@ -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

36
tests/bugs/modalg/bug22786 Executable file
View File

@ -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

35
tests/bugs/modalg/bug22790 Executable file
View File

@ -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

26
tests/bugs/modalg/bug22798_1 Executable file
View File

@ -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

27
tests/bugs/modalg/bug22798_2 Executable file
View File

@ -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

36
tests/bugs/modalg/bug22801 Executable file
View File

@ -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

30
tests/bugs/modalg/bug22814 Executable file
View File

@ -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

37
tests/bugs/modalg/bug22818_1 Executable file
View File

@ -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

38
tests/bugs/modalg/bug22818_2 Executable file
View File

@ -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

28
tests/bugs/modalg/bug22823 Executable file
View File

@ -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

28
tests/bugs/modalg/bug22828 Executable file
View File

@ -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

30
tests/bugs/modalg/bug22830 Executable file
View File

@ -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

33
tests/bugs/modalg/bug22833 Executable file
View File

@ -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

27
tests/bugs/modalg/bug22881 Executable file
View File

@ -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

53
tests/bugs/modalg/bug22884 Executable file
View File

@ -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

17
tests/bugs/modalg/bug22946 Executable file
View File

@ -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

27
tests/bugs/modalg/bug22986 Executable file
View File

@ -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

24
tests/bugs/modalg/bug22990 Executable file
View File

@ -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

27
tests/bugs/modalg/bug23004 Executable file
View File

@ -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

34
tests/bugs/modalg/bug23008 Executable file
View File

@ -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

34
tests/bugs/modalg/bug23029 Executable file
View File

@ -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

28
tests/bugs/modalg/bug23031 Executable file
View File

@ -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

31
tests/bugs/modalg/bug23043 Executable file
View File

@ -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

17
tests/bugs/modalg/bug23060 Executable file
View File

@ -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

27
tests/bugs/modalg/bug23089 Executable file
View File

@ -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

34
tests/bugs/modalg/bug23100 Executable file
View File

@ -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

23
tests/bugs/modalg/bug23114 Executable file
View File

@ -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

23
tests/bugs/modalg/bug23125 Executable file
View File

@ -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

22
tests/bugs/modalg/bug23158 Executable file
View File

@ -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

28
tests/bugs/modalg/bug23160 Executable file
View File

@ -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

47
tests/bugs/modalg/bug23162_1 Executable file
View File

@ -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

47
tests/bugs/modalg/bug23162_2 Executable file
View File

@ -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

47
tests/bugs/modalg/bug23162_3 Executable file
View File

@ -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

Some files were not shown because too many files have changed in this diff Show More