mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
32 lines
642 B
Plaintext
32 lines
642 B
Plaintext
puts "========="
|
|
puts "CR24427"
|
|
puts "========="
|
|
puts ""
|
|
###############################
|
|
## Wrong section curves
|
|
###############################
|
|
|
|
restore [locate_data_file bug24427_b1.brep] b1
|
|
restore [locate_data_file bug24427_b2.brep] b2
|
|
|
|
mksurface s1 b1
|
|
mksurface s2 b2
|
|
|
|
trim s1t s1 0 3.1415926535897931 3.3684854563490672 3.9269908169872507
|
|
trim s2t s2 0 3.1415926535897931 -1.0598124096115453e-015 0.013271150216666670
|
|
|
|
intersect i s1t s2t
|
|
don s1t s2t i
|
|
|
|
puts "First test"
|
|
xdistcs i s1 0 1 10 1e-7
|
|
|
|
puts "Second test"
|
|
xdistcs i s2 0 1 10 1e-7
|
|
|
|
donly i s1t s2t
|
|
|
|
smallview
|
|
fit
|
|
checkview -screenshot -2d -path ${imagedir}/${test_image}.png
|