mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-10 18:51:21 +03:00
f1aa2b6272
Adding procedures checkcolor and checkpoint. Modified test cases which are used QAGetPixelColor or QAAISGetPixelColor2d Allow using command QAAISGetPixelColor2d on WNT Rename test case tests/bugs/vis/bug19619 to pro19619 Added test cases to modalg and moddata
38 lines
876 B
Plaintext
Executable File
38 lines
876 B
Plaintext
Executable File
#INTERFACE IGES
|
|
puts "========"
|
|
puts "OCC398"
|
|
puts "========"
|
|
puts ""
|
|
#############################################################
|
|
## ShapeHealing modification 1:1 increases number of unique shapes in compound structure.
|
|
#############################################################
|
|
|
|
pload XDE
|
|
catch { source $env(CSF_DrawPluginQADefaults)/QARebuildCommands }
|
|
|
|
restore [locate_data_file OCC398.brep] a
|
|
#statsh a
|
|
#nbshapes a
|
|
#Statshape should give 3 solids
|
|
#Nbshape should return 1 solid
|
|
|
|
scaleshape result a 10
|
|
|
|
#statsh res
|
|
|
|
|
|
set nb_info [nbshapes result]
|
|
set nb_sol_good 1
|
|
|
|
#if { $sol == 1 } {
|
|
# puts " OCC398 : scaleshape operation was made properly"
|
|
#} else {
|
|
# puts "Faulty OCC398: scaleshape operation was made wrongly"
|
|
#}
|
|
|
|
#Statshape should give 3 solids
|
|
#Nbshape should return 1 solid (3 solids is returned if bug not fixed)
|
|
|
|
set square 180000.
|
|
set 2dviewer 0
|