0026070: Ray tracing with reflections is poor on rotated presentation

[occt.git] / tests / v3d / raytrace / bug26070

diff --git a/tests/v3d/raytrace/bug26070 b/tests/v3d/raytrace/bug26070
new file mode 100755 (executable)
index 0000000..fed4e92
--- /dev/null
+++ b/tests/v3d/raytrace/bug26070
@@ -0,0 +1,70 @@
+puts "============"
+puts "OCC26070"
+puts "============"
+puts ""
+#########################################################################
+# Ray tracing with reflections is poor on rotated presentation
+#########################################################################
+
+#source samples/tcl/cad.tc
+# make base 
+box b0 0  0 0 12 7 6
+explode b0 e
+blend b01 b0 1 b0_8
+blend b02 b01 1 b0_6
+
+# make cut at bottom
+box b1 3 -1 0 2 9 1.5
+bcut b2 b02 b1
+explode b2 e
+blend b3 b2 1 b2_27
+blend b4 b3 1 b2_30
+
+# make central cut
+box h1 3 -1 2.5 2 9 0.5
+box h2 3 -1 3 2 9 2
+plane p 4 -1 3 0 1 0
+pcylinder c p 1 9
+bcommon h3 h2 c
+bcut b5 b4 h1
+bcut b6 b5 h3
+
+# make side cut
+box b7 9 -1 1 2 9 4
+explode b7 e
+blend b71 b7 1 b7_6
+blend b72 b71 1 b7_8
+bcut b8 b6 b72
+
+# make box for inner cylindrical cut
+box bc1 -1 0 2 9 1 4
+box bc2 2 -1 2 4 3 3
+bcut bc3 bc1 bc2
+explode bc3 e
+blend bc4 bc3 1 bc3_20
+blend bc5 bc4 1 bc3_23
+blend bc6 bc5 1.99 bc3_21
+blend bc7 bc6 1.99 bc3_22
+
+# make inner cylindrical cut
+explode bc7 f
+revol r bc7_1 -1 0 6 1 0 0 100
+bcut b9 b8 r
+
+# make outer cylindrical cut
+plane p2 -1 0 6 1 0 0
+pcylinder c2 p2 6 15
+bcommon res b9 c2
+
+# show result
+#donly res
+trotate res 0 0 0 0 0 1 90
+#vinit
+vdisplay res
+vsetdispmode 1
+#vshowfaceboundary res 1 255 255 255
+vfit
+
+vrenderparams -rayTrace -reflections
+vlocrotate res 0 0 0 0 0 1 180
+vfit