Adding test cases from grid chl

[occt.git] / tests / bugs / moddata / buc60902

diff --git a/tests/bugs/moddata/buc60902 b/tests/bugs/moddata/buc60902
new file mode 100755 (executable)
index 0000000..9ff9759
--- /dev/null
+++ b/tests/bugs/moddata/buc60902
@@ -0,0 +1,14 @@
+puts "========"
+puts "BUC60902"
+puts "========"
+
+pload QAcommands
+
+set info [BUC60902]
+
+if { [regexp "First tangent is OK" $info] != 1 && [regexp "Last tangent is OK" $info] != 1 } {
+       puts "Error : Result is invalid"
+}
+
+
+