1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-05-06 10:36:12 +03:00
occt/tests/bugs/modalg/buc60532_2
apn 352ffd7358 Adding test cases for chl grid
Test case tests/bugs/modalg/dxf906 was renamed to bug889
Adding test cases to tests/bugs/moddata
Modified expressions puts [checkshape result]. Added command vzfit in end file in folder bugs. Unlocked command coordload in QABugs_3.cxx
Modified test case bugs vis buc60738
Added test cases to modalg and moddata
Added test cases to caf and fclasses
Added test cases to group heal
2012-12-21 16:39:38 +04:00

53 lines
794 B
Plaintext
Executable File

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