mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
48 lines
1.1 KiB
Plaintext
Executable File
48 lines
1.1 KiB
Plaintext
Executable File
puts "============"
|
|
puts "OCC13140"
|
|
puts "============"
|
|
puts ""
|
|
#######################################################################
|
|
# Exception during creation pipe on from attached spine and profile
|
|
#######################################################################
|
|
|
|
restore [locate_data_file OCC13140_Spine.brep] Spine
|
|
restore [locate_data_file OCC13140_Profile.brep] Profile
|
|
|
|
pipe result Spine Profile
|
|
|
|
set square 3.68518
|
|
set good_vertex 2
|
|
set good_edge 3
|
|
set good_wire 1
|
|
set good_face 1
|
|
|
|
set explode_v_length [llength [explode result v] ]
|
|
set explode_e_length [llength [explode result e] ]
|
|
set explode_w_length [llength [explode result w] ]
|
|
set explode_f_length [llength [explode result f] ]
|
|
|
|
if { ${explode_v_length} != ${good_vertex} } {
|
|
puts "vertex: Faulty"
|
|
} else {
|
|
puts "vertex: OK"
|
|
}
|
|
if { ${explode_e_length} != ${good_edge} } {
|
|
puts "edge: Faulty"
|
|
} else {
|
|
puts "edge: OK"
|
|
}
|
|
if { ${explode_w_length} != ${good_wire} } {
|
|
puts "wire: Faulty"
|
|
} else {
|
|
puts "wire: OK"
|
|
}
|
|
if { ${explode_f_length} != ${good_face} } {
|
|
puts "face: Faulty"
|
|
} else {
|
|
puts "face: OK"
|
|
}
|
|
|
|
set 2dviewer 0
|
|
|