1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-08-09 13:22:24 +03:00
Files
occt/tests/bugs/modalg_4/bug6502
ski a8676008f7 Adding of testing cases from subgroups 937 940 and 941 of CHL group
Splitting of subgroups bugs/modalg and bugs/moddata to optimise time of testing
Correction of end file in group v3d
Small correction of test case
2013-02-08 15:16:15 +04:00

22 lines
556 B
Plaintext
Executable File

puts "================"
puts "OCC6502"
puts "================"
puts ""
#######################################################################################
# Failure calculation of ShrunkRange resulting to failure of boolean operation
#######################################################################################
set BugNumber OCC6502
restore [locate_data_file OCC6502.brep] a
plane pl 100 0 0 1 0 0
mkface f pl
if { [catch { bsection result a f -a } catch_result] } {
puts "Faulty ${BugNumber}"
}
set length 37.7831
set 3dviewer 0