1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-10 18:51:21 +03:00
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

36 lines
775 B
Plaintext
Executable File

puts "TODO OCC12345 ALL: Faulty OCC20: here is shading problem"
puts "================"
puts "OCC20"
puts "================"
puts ""
###############################
## Face apearence in shading mode is wrong
###############################
pload QAcommands
restore [locate_data_file OCC20.brep] result
checkshape result
tclean result
vinit
vdisplay result
vsetdispmode result 1
QASetViewCharac 5.1346924 95.358439 -4.910448 0.23495967 -0.302 0.923899 -0.7304302 0.5722587 0.372815 9.550874 -7.55706 -28.83166
isos result 0
triangles result
set info [trinfo result]
regexp { +([-0-9.+eE]+) +triangles} $info full tri
regexp { +([-0-9.+eE]+) +nodes} $info full nod
if { $tri != 416 || $nod != 367 } {
puts "Faulty OCC20: here is shading problem"
}
set 2dviewer 0