mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
33 lines
717 B
Plaintext
33 lines
717 B
Plaintext
puts "========"
|
|
puts "OCC26748"
|
|
puts "========"
|
|
puts ""
|
|
#################################################
|
|
# Section between cylindrical and planar faces is not found
|
|
#################################################
|
|
|
|
set ExpTol 5.0e-8
|
|
set GoodNbCurv 1
|
|
|
|
restore [locate_data_file bug26745_BodyA.brep] a
|
|
restore [locate_data_file bug26745_BodyB.brep] b
|
|
|
|
explode a f
|
|
explode b f
|
|
|
|
set log [bopcurves a_9 b_1 -2d]
|
|
|
|
regexp {Tolerance Reached=+([-0-9.+eE]+)\n+([-0-9.+eE]+)} ${log} full Toler NbCurv
|
|
|
|
if {${NbCurv} != ${GoodNbCurv}} {
|
|
puts "Error: Number of curves is bad!"
|
|
}
|
|
|
|
checkreal TolReached $Toler $ExpTol 5.0e-8 0.0
|
|
|
|
smallview
|
|
don c_*
|
|
fit
|
|
disp a_9 b_1
|
|
|
|
checkview -screenshot -2d -path ${imagedir}/${test_image}.png |