1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-05-01 10:26:12 +03:00
abk 163a262a70 Correction of tolerances in result shape was made for group boolean and
grids:
- heal drop_small_edges,
       fix_face_size,
       fix_gaps,
       split_angle_advanced,
       surface_to_bspline.

Correction of tolerances in input shapes was made for tests:
- bugs heal bug329,
- bugs modalg buc60462_1,
              buc60463,
              bug292,
              bug317,
              bug330,
              bug452_2,
              bug452_3,
              bug625,
              bug697_1,
              bug698,
              bug774_1,
              bug776_1,
              bug776_2,
              bug80,
              bug919,
- bugs moddata buc60652_2,
               buc60652_3,
               buc60707,
               bug368,
               bug75_2,
               fra62476_2,
               ger61235,
               pro20333,
- bugs step buc60948,
- bugs step bug630,
- bugs vis buc60661,
- bugs vis bug288_1,
- bugs vis bug288_4,
- bugs xde bug859,
- bugs xde bug861,
- feat featlf B8,
       featprism L2,
                 L8,
                 M1,
                 O6,
                 O9,
                 R1,
                 S1,
                 S2,
- sewing tol_0_01 T1.
2012-12-28 20:28:09 +04:00

38 lines
1.0 KiB
Plaintext
Executable File

puts "========================"
puts " OCC317 "
puts "========================"
puts ""
##################################################
## A Solid "so" is valid, whereas wire "so_5" from the solid is not valid.
##################################################
restore [locate_data_file OCC317.brep] result
EnsureTolRule result result
set che [checkshape result]
if { [regexp {Faulty} $che] == 1} {
puts "Faulty OCC317: Source shape is invalid. It was detected by Checkshape command"
puts "Body of the script was NOT executed"
} else {
puts "OCC317 OK: Source shape is valid"
explode result w
set che [checkshape result_5]
if { [regexp {Faulty} $che] == 1} {
puts "Faulty OCC317: Wire is invalid. It was detected by Checkshape command"
} else {
puts "OCC317 OK : Wire is valid."
}
set che [checkshape result r]
if { [regexp {OK} $che] != 1 } {
puts "Faulty OCC317: Wire is invalid. It was detected by Checkshape command"
} else {
puts "OCC317 OK : Wire is valid."
}
}
set square 2104.21
set 2dviewer 0