mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-05 18:16:23 +03:00
34dd4990ed
Modifications: 1.Test cases 2. locate_data_file from DrawResources/TestCommands.tcl Fix for mesh end Adjusting testing cases for current state of master using new organization of data files
28 lines
622 B
Plaintext
28 lines
622 B
Plaintext
puts "GER60861"
|
|
puts "Cut"
|
|
puts ""
|
|
|
|
restore [locate_data_file CTO909_object.brep] a
|
|
restore [locate_data_file CTO909_tool_4.brep] b
|
|
|
|
##mod by pkv f
|
|
## a, b are shells but not solids !
|
|
#bcut result a b
|
|
explode a sh
|
|
explode b sh
|
|
bop a_1 b_1
|
|
bopfuse result
|
|
##mod by pkv t
|
|
|
|
# OK
|
|
# JML expects that the result of the cut will contain some
|
|
# of the face(s) of the tool doing the cut
|
|
# He wants to be able to sort the faces of the result and
|
|
# keep the ones of interest for Styler.
|
|
# In the above script the final result is very good but
|
|
# it is the final result and does not contain faces of
|
|
# the tool b.
|
|
|
|
|
|
set square 22963.8
|