From bdf7024d71f824667a91022b4e049742fa7bdafe Mon Sep 17 00:00:00 2001
From: Thomas White <taw@physics.org>
Date: Thu, 9 Sep 2010 14:23:15 +0200
Subject: render_hkl --povray: Scale reflectivity with value

---
 src/povray.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/povray.c b/src/povray.c
index a4864aba..808d3e22 100644
--- a/src/povray.c
+++ b/src/povray.c
@@ -283,11 +283,11 @@ int povray_render_animation(UnitCell *cell, double *ref, unsigned int *counts,
 			fprintf(fh, "sphere { <%.5f, %.5f, %.5f>, %.5f "
 			            "texture{pigment{color rgb <%f, %f, %f>"
 			            " transmit %f} "
-			            "finish { reflection 0.1 } } \n"
+			            "finish { reflection %f } } \n"
 			            "transform { TRANS }\n"
 			            "}\n",
 			            x/1e9, y/1e9, z/1e9, radius,
-			            r, g, b, trans);
+			            r, g, b, trans, 0.1*(1.0-trans));
 
 		}
 
-- 
cgit v1.2.3