mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-09 18:50:54 +03:00
58cf74e0c0
- Added function checkprops, set default tolerance parameter to 1.0e-4 - Using "area" instead of "square". - Options "-equal\notequal" isn't used together with "-s" in blend and offset test cases. - Correct regressions/differences/improvements and CPU problem (set props tolerance to 0.1) - Corrected test cases to use checkprops proc. - Correct image difference - Updated TODOs in test cases. - Updated test cases to get correct images of result shape
56 lines
1.2 KiB
Plaintext
Executable File
56 lines
1.2 KiB
Plaintext
Executable File
puts "============"
|
|
puts "OCC13395"
|
|
puts "============"
|
|
puts ""
|
|
#######################################################################
|
|
# Pipe is constructed wrongly on a result of revolution
|
|
#######################################################################
|
|
|
|
# revolution of an edge to obtain half-disk
|
|
line line1 0 0 0 1 0 0
|
|
mkedge edge1 line1 0 10
|
|
revol revol1 edge1 0 0 0 0 1 0 180
|
|
|
|
# spine for pipe
|
|
line line2 0 0 0 0 1 0
|
|
mkedge edge2 line2 0 10
|
|
wire wire_spine edge2
|
|
|
|
# invalid pipe
|
|
pipe result wire_spine revol1
|
|
|
|
checkprops result -s 828.319
|
|
checkshape result
|
|
set good_vertex 6
|
|
set good_edge 9
|
|
set good_wire 5
|
|
set good_face 5
|
|
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
|
|
|