0033017: Implement an algorithm to find a proximity between a pair of shapes

[occt.git] / tests / lowalgos / proximity / C3

diff --git a/tests/lowalgos/proximity/C3 b/tests/lowalgos/proximity/C3
new file mode 100644 (file)
index 0000000..9323eb8
--- /dev/null
+++ b/tests/lowalgos/proximity/C3
@@ -0,0 +1,28 @@
+puts "============"
+puts "0033017: Implement an algorithm to find a proximity between a pair of shapes"
+puts "==========="
+puts "" 
+
+cylinder cy1 0 0 1 1 0 0 0.1
+trimv cy1 cy1 0 1
+mkface fcy1 cy1
+incmesh fcy1 1.e-3
+
+cylinder cy2 0 0 0 1 0 0 0.1
+trimv cy2 cy2 0 1
+mkface fcy2 cy2
+incmesh fcy2 1.e-3
+
+set log [proximity fcy1 fcy2 -value -profile]
+regexp {Proximity value: ([0-9+-.eE]*)} $log full val;
+
+set tol 1.e-3
+set expected 1.0
+
+regexp {Status of ProxPnt1 on ([A-Za-z0-9._-]*) : ([A-Za-z]*)} $log full val1 val2
+set status1 ${val2}
+set expected_status1 Border
+
+regexp {Status of ProxPnt2 on ([A-Za-z0-9._-]*) : ([A-Za-z]*)} $log full val1 val2
+set status2 ${val2}
+set expected_status2 Border
\ No newline at end of file