mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
26 lines
626 B
Plaintext
26 lines
626 B
Plaintext
puts "========"
|
|
puts "OCC27746"
|
|
puts "========"
|
|
puts ""
|
|
#################################################
|
|
# Incomplete result of SECTION operation
|
|
#################################################
|
|
|
|
restore [locate_data_file bug27746_first.brep] b1
|
|
restore [locate_data_file bug27746_second.brep] b2
|
|
|
|
explode b1 f; compound b1_60 b1_61 b1
|
|
explode b2 f; compound b2_14 b2_18 b2
|
|
donly b1 b2
|
|
|
|
bclearobjects
|
|
bcleartools
|
|
baddobjects b1
|
|
baddtools b2
|
|
bfillds
|
|
bbop result 4
|
|
|
|
regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection result] full nbv
|
|
if { $nbv != 2 } { puts "Error : Section is incorrect" }
|
|
|
|
checkprops result -l 4.39869 |