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.

tests/boolean/end

@@ -1,6 +1,7 @@
 if { [isdraw result] } {
    #check if result is valid
    
+   EnsureTolRule result result
    puts "checkshape"
    set ch [checkshape result]
    puts $ch

tests/bugs/heal/bug329

@@ -9,6 +9,7 @@ puts ""
 ###########################################################
 
 restore [locate_data_file OCC329.brep] a 
+EnsureTolRule a a
 
 checkshape a
 set tol1 [maxtolerance a]

tests/bugs/modalg_1/buc60462_1

@@ -10,6 +10,7 @@ puts ""
 restore [locate_data_file buc60462a.brep] a 
 checkshape a
 restore [locate_data_file buc60462b.brep] b
+EnsureTolRule b b
 checkshape b
 bsection result a b
 

tests/bugs/modalg_1/buc60463

@@ -10,6 +10,7 @@ cpulimit 1400
 restore [locate_data_file buc60463a.brep] a 
 checkshape a
 restore [locate_data_file buc60463b.brep] b
+EnsureTolRule b b
 checkshape b
 bsection result a b
 

tests/bugs/modalg_2/bug292

@@ -9,6 +9,7 @@ puts ""
 #################################################################
 
 restore [locate_data_file OCC292.brep] result
+EnsureTolRule result result
 checkshape result
 
 tclean result

tests/bugs/modalg_2/bug317

@@ -7,6 +7,7 @@ puts ""
 ##################################################
 
 restore [locate_data_file OCC317.brep] result
+EnsureTolRule result result
 
 set che [checkshape result]
 if { [regexp {Faulty} $che] == 1} {

tests/bugs/modalg_2/bug330

@@ -10,6 +10,7 @@ puts ""
 ##################################################
 
 restore [locate_data_file OCC330.brep] result
+EnsureTolRule result result
 
 decho off
 set che [checkshape result]

tests/bugs/modalg_2/bug452_2

@@ -7,6 +7,7 @@ puts "========"
 puts ""
 
 restore [locate_data_file mds-part1.rle] a 
+EnsureTolRule a a
 set che [checkshape a]
 if { [regexp {Faulty} $che ] == 1 } {
     puts "Faulty OCC452 (shape 1): Source shape is invalid. It was detected by Checkshape command"
@@ -23,6 +24,7 @@ if { [regexp {Faulty} $che ] == 1 } {
 }
 
 restore [locate_data_file CTO900_ger60239a.rle] c
+EnsureTolRule c c
 set che [checkshape c]
 if { [regexp {Faulty} $che ] == 1 } {
     puts "Faulty OCC452 (shape 3): Source shape is invalid. It was detected by Checkshape command"
@@ -31,6 +33,7 @@ if { [regexp {Faulty} $che ] == 1 } {
 }
 
 restore [locate_data_file CTO900_ger60239b.rle] d
+EnsureTolRule d d
 set che [checkshape d]
 if { [regexp {Faulty} $che ] == 1 } {
     puts "Faulty OCC452 (shape 4): Source shape is invalid. It was detected by Checkshape command"

tests/bugs/modalg_2/bug452_3

@@ -7,6 +7,7 @@ puts "========"
 puts ""
 
 restore [locate_data_file CTO900_ger60239a.rle] a 
+EnsureTolRule a a
 set che [checkshape a]
 if { [regexp {Faulty} $che ] == 1 } {
     puts "Faulty OCC452 (shape 5): Source shape is invalid. It was detected by Checkshape command"
@@ -15,6 +16,7 @@ if { [regexp {Faulty} $che ] == 1 } {
 }
 
 restore [locate_data_file CTO900_ger60239b.rle] b
+EnsureTolRule b b
 set che [checkshape b]
 if { [regexp {Faulty} $che ] == 1 } {
     puts "Faulty OCC452 (shape 6): Source shape is invalid. It was detected by Checkshape command"

tests/bugs/modalg_3/bug698

@@ -7,6 +7,7 @@ cpulimit 10000
 restore [locate_data_file OCC698_1.brep] b4 
 checkshape b4
 restore [locate_data_file OCC698_2.brep] b5 
+EnsureTolRule b5 b5
 checkshape b5
 
 bcut result b5 b4

tests/bugs/modalg_4/bug697_1

@@ -10,6 +10,7 @@ puts ""
 ######################################################
 
 restore [locate_data_file OCC697_1.brep] b1 
+EnsureTolRule b1 b1
 restore [locate_data_file OCC697_2.brep] b2 
 
 checkshape b1

tests/bugs/modalg_4/bug774_1

@@ -10,6 +10,7 @@ puts ""
 #################################
 
 restore [locate_data_file OCC774.brep] a 
+EnsureTolRule a a
 explode a
 checkshape a_1
 checkshape a_2

tests/bugs/modalg_4/bug776_1

@@ -10,6 +10,7 @@ puts ""
 ##########################################
 
 restore [locate_data_file OCC776.brep] a 
+EnsureTolRule a a
 explode a
 checkshape a_1
 checkshape a_2

tests/bugs/modalg_4/bug776_2

@@ -10,6 +10,7 @@ puts ""
 ##########################################
 
 restore [locate_data_file OCC776.brep] a 
+EnsureTolRule a a
 explode a
 checkshape a_1
 checkshape a_2

tests/bugs/modalg_4/bug80

@@ -8,6 +8,7 @@ puts ""
 ##########################################################
 
 restore [locate_data_file BUC60877_lh.brep] sh 
+EnsureTolRule sh sh
 checkshape sh
 
 plane pl 820 198 140 -1e-06 0 1

tests/bugs/modalg_4/bug919

@@ -14,6 +14,7 @@ explode a
 
 # See comment in CR23244:
 restore [locate_data_file OCC919-PROC.brep] a_1 
+EnsureTolRule a_1 a_1
 #
 
 checkshape a_1

tests/bugs/moddata_1/buc60652_2

@@ -7,6 +7,7 @@ puts "=========="
 pload QAcommands
 
 restore [locate_data_file buc60652b.brep] result
+EnsureTolRule result result
 checkshape result
 BUC60652 result
 

tests/bugs/moddata_1/buc60652_3

@@ -7,6 +7,7 @@ puts "==========="
 pload QAcommands
 
 restore [locate_data_file buc60652c.brep] result 
+EnsureTolRule result result
 checkshape result
 BUC60652 result
 

tests/bugs/moddata_1/buc60707

@@ -7,6 +7,7 @@ puts ""
 ## Fillets created in CasCade version 3 do not display as shaded surfaces. 
 #################################################
 restore [locate_data_file buc60707a.brep] result
+EnsureTolRule result result
 checkshape result
 
 tclean result

tests/bugs/moddata_2/bug368

@@ -9,6 +9,7 @@ puts ""
 ##############################################
 
 restore [locate_data_file OCC368.brep] result
+EnsureTolRule result result
 checkshape result
 
 tclean result

tests/bugs/moddata_2/fra62476_2

@@ -8,6 +8,7 @@ puts "=================================="
 puts ""
 
 restore [locate_data_file fra62476b.brep] result 
+EnsureTolRule result result
 checkshape result
 
 tclean result

tests/bugs/moddata_2/ger61235

@@ -5,6 +5,7 @@ puts "==========="
 restore [locate_data_file ger61235a.brep] tool 
 checkshape tool
 restore [locate_data_file ger61235b.brep] object 
+EnsureTolRule object object
 checkshape object
 
 bsection result object tool 

tests/bugs/moddata_2/pro20333

@@ -8,6 +8,7 @@ puts "It takes visual check for this BUG"
 puts "=================================="
 
 restore [locate_data_file pro20333a.brep] result
+EnsureTolRule result result
 checkshape result
 
 tclean result

tests/bugs/step/buc60948

@@ -5,6 +5,7 @@ puts "BUC60948"
 puts "========================"
 
 restore [locate_data_file pump4.brep] a_1 
+EnsureTolRule a_1 a_1
 checkshape a_1
 
 #####################################################################

tests/bugs/step/bug630

@@ -7,6 +7,7 @@ puts ""
 ########################################################
 
 restore [locate_data_file OCC630.brep] a1
+EnsureTolRule a1 a1
 checkshape a1
 
 ######################################################################

tests/bugs/vis/buc60661

@@ -13,6 +13,7 @@ pload XDE
 ##################################################################
 
 restore [locate_data_file buc60661a.brep] buc60661
+EnsureTolRule buc60661 buc60661
 checkshape buc60661
 
 ######################################################################

tests/bugs/vis/bug288_1

@@ -4,6 +4,7 @@ puts "(case 1)"
 puts "========================"
 
 restore [locate_data_file shading_058.brep] result 
+EnsureTolRule result result
 checkshape result
 
 tclean result

tests/bugs/vis/bug288_4

@@ -4,6 +4,7 @@ puts "(case 4)"
 puts "========================"
 
 restore [locate_data_file shading_151.brep] result 
+EnsureTolRule result result
 checkshape result
 
 tclean result

tests/bugs/xde/bug859

@@ -8,6 +8,7 @@ puts ""
 ##################### 
 
 restore [locate_data_file OCC859.brep] a
+EnsureTolRule a a
 checkshape a
 
 sewing result a

tests/bugs/xde/bug861

@@ -8,6 +8,7 @@ puts ""
 ######################################################
 
 restore [locate_data_file OCC859.brep] result
+EnsureTolRule result result
 checkshape result
 
 freebounds result 0.1

tests/feat/featlf/B8

@@ -2,6 +2,7 @@
 # Date : 26 Nov 98
 
 restore [locate_data_file cts21832_base.brep] base
+EnsureTolRule base base
 restore [locate_data_file cts21832_cont.brep] cont
 
 explode cont wire

tests/feat/featprism/L2

@@ -2,6 +2,7 @@
 # Date : 23mar98
 
 restore [locate_data_file CTO900_ger60224-part.rle] base
+EnsureTolRule base base
 restore [locate_data_file ger60224-tool.rle] wire
 
 mkplane cont wire

tests/feat/featprism/L8

@@ -2,6 +2,7 @@
 # Date : 10 Sept 98
 
 restore [locate_data_file CTO900_pro12880c.rle] base
+EnsureTolRule base base
 restore [locate_data_file pro12880_face.rle] cont
 
 featprism base cont cont 0 1 0 1 1

tests/feat/featprism/M1

@@ -2,6 +2,7 @@
 # Date : 15 Sept 98
 
 restore [locate_data_file CTO900_ger50084c.rle] base
+EnsureTolRule base base
 restore [locate_data_file ger50084_face.rle] wire
 
 ## contour est un wire -> on en fait une face

tests/feat/featprism/O6

@@ -7,6 +7,7 @@
 cpulimit 2000
 
 restore [locate_data_file CFE900_cts20geq.rle] base
+EnsureTolRule base base
 restore [locate_data_file cts20960_face.brep] cont
 
 explode base face

tests/feat/featprism/O9

@@ -2,6 +2,7 @@
 # Date : 25 Nov 98
 
 restore [locate_data_file cts20088_base.brep] base
+EnsureTolRule base base
 restore [locate_data_file contour_pkv.rle] cont
 
 explode base face

tests/feat/featprism/R1

@@ -2,6 +2,7 @@
 # Date : 02 Dec 98
 
 restore [locate_data_file CFE900_pro16gff.rle] base
+EnsureTolRule base base
 restore [locate_data_file pro16769_face.brep] cont
 
 explode base face

tests/feat/featprism/S1

@@ -1,6 +1,7 @@
 # cts20088
 
 restore [locate_data_file cts20088_base.brep] base
+EnsureTolRule base base
 restore [locate_data_file contour_pkv.rle] cont
 
 explode base face

tests/feat/featprism/S2

@@ -2,6 +2,7 @@
 puts "TODO OCC22810 ALL: Error : The area of the resulting shape is"
 
 restore [locate_data_file cts20088_base.brep] base
+EnsureTolRule base base
 restore [locate_data_file contour_pkv.rle] cont
 
 explode base face

tests/heal/drop_small_edges/end

@@ -1,4 +1,5 @@
 puts [fixsmall result a 1]
+EnsureTolRule result result
 if { [isdraw result] } {
   puts [checkshape result]
 }

tests/heal/fix_face_size/end

@@ -1,2 +1,3 @@
 puts [DT_ApplySeq result a MDTV ToV4]
+EnsureTolRule result result
 puts [checkshape result]

tests/heal/fix_gaps/end

@@ -1,2 +1,3 @@
 fixwgaps result a 0.001
+EnsureTolRule result result
 puts [checkshape result]

tests/heal/split_angle_advanced/end

@@ -1,3 +1,4 @@
 puts [DT_SplitAngle result a]
+EnsureTolRule result result
 puts [checkshape result]
 

tests/heal/surface_to_bspline/end

@@ -1,2 +1,3 @@
 puts [DT_ToBspl result a]
+EnsureTolRule result result
 puts [checkshape result]

tests/sewing/tol_0_01/T1

@@ -1 +1,2 @@
 restore [locate_data_file CFE900_pro16gdo.rle] a
+EnsureTolRule a a