0021762: Integration of new Boolean Operation algorithm to OCCT.

[occt.git] / tests / caf / named_shape / F9

diff --git a/tests/caf/named_shape/F9 b/tests/caf/named_shape/F9
index e6775e6..7f348fb 100755 (executable)
--- a/tests/caf/named_shape/F9
+++ b/tests/caf/named_shape/F9
@@ -9,7 +9,7 @@
 # 1. Create 3 boxes $B1, $B2, $B3
 # 2. $FS1 = Fuse ($B1, $B2)
 # 3. $FS2 = Fuse ($B1, $B3)
-# 4. Make  selections of the face 'fuse2_10'
+# 4. Make  selections of the face 'fuse2_23'
 # 5. Modify B2
 # 6. Recompute
 # ===============================================
@@ -38,11 +38,11 @@ explode fuse2 f
 
 
 
-#4. Select fuse2_10 using Attach 
-set Sel2 [AttachShape $doc fuse2_10 $B1]
-GetShape $doc $Sel2:1:2 nf10before
-#nf10before is face
-set info1 [whatis nf10before]
+#4. Select fuse2_23 using Attach 
+set Sel2 [AttachShape $doc fuse2_23 $B1]
+GetShape $doc $Sel2:1:2 nf23before
+#nf23before is face
+set info1 [whatis nf23before]
 
 
 #5. Modify
@@ -56,38 +56,38 @@ ComputeFun $doc $B3:1
 ComputeFun $doc $FS1
 ComputeFun $doc $FS2
 ComputeFun $doc $Sel2:1
-GetShape $doc $Sel2:1:2 nf10after
-#nf10after is face
-set info2 [whatis nf10after]
+GetShape $doc $Sel2:1:2 nf23after
+#nf23after is face
+set info2 [whatis nf23after]
 
 if { [regexp "shape" $info1] != 1 } {
-    puts "Error : There is not word shape in nf10after"
+    puts "Error : There is not word shape in nf23after"
 }
 if { [regexp "FACE" $info1] != 1 } {
-    puts "Error : There is not word FACE in nf10after"
+    puts "Error : There is not word FACE in nf23after"
 }
 if { [regexp "REVERSED" $info1] != 1 } {
-    puts "Error : There is not word REVERSED in nf10after"
+    puts "Error : There is not word REVERSED in nf23after"
 }
 if { [regexp "Modified" $info1] != 1 } {
-    puts "Error : There is not word Modified in nf10after"
+    puts "Error : There is not word Modified in nf23after"
 }
 if { [regexp "Orientable" $info1] != 1 } {
-    puts "Error : There is not word Orientable in nf10after"
+    puts "Error : There is not word Orientable in nf23after"
 }
 
 if { [regexp "shape" $info2] != 1 } {
-    puts "Error : There is not word shape in nf10before"
+    puts "Error : There is not word shape in nf23before"
 }
 if { [regexp "FACE" $info2] != 1 } {
-    puts "Error : There is not word FACE in nf10before"
+    puts "Error : There is not word FACE in nf23before"
 }
 if { [regexp "REVERSED" $info2] != 1 } {
-    puts "Error : There is not word REVERSED in nf10before"
+    puts "Error : There is not word REVERSED in nf23before"
 }
 if { [regexp "Modified" $info2] != 1 } {
-    puts "Error : There is not word Modified in nf10before"
+    puts "Error : There is not word Modified in nf23before"
 }
 if { [regexp "Orientable" $info2] != 1 } {
-    puts "Error : There is not word Orientable in nf10before"
+    puts "Error : There is not word Orientable in nf23before"
 }
\ No newline at end of file