#version 3.8; global_settings {assumed_gamma 1.0 } camera { location <0, 0, -10> right x*image_width/image_height up y look_at <0, 0, 0> } #declare E = 0.000001; light_source {<0, 500, -1000> rgb 1} sky_sphere {pigment {rgb 1}} #declare Gradient = pigment { gradient x color_map { [0.00 rgbt 1] [0.00 rgb 0] [0.33 rgb x] [0.50 rgb x] [0.50 rgbt 1] [0.50 rgb y] [0.66 rgb y] [1.00 rgb z] [1.00 rgbt 1] } } #declare fG = function {pigment {Gradient}} #declare Val = fG (val("-inf"), 0, 0); #debug concat( "Val(val(\"-inf\")) = ", vstr(5, Val, ", ", 0, 3), " \n") #declare Val = fG (-0, 0, 0); #debug concat( "Val(-0) = ", vstr(5, Val, ", ", 0, 3), " \n") #declare Val = fG (0, 0, 0); #debug concat( "Val(0) = ", vstr(5, Val, ", ", 0, 3), " \n") #declare Val = fG (+0, 0, 0); #debug concat( "Val(+0) = ", vstr(5, Val, ", ", 0, 3), " \n") #declare Val = fG (E, 0, 0); #debug concat( "Val(E) = ", vstr(5, Val, ", ", 0, 3), " \n") #declare Val = fG (0.5-E, 0, 0); #debug concat( "Val(0.5-E) = ", vstr(5, Val, ", ", 0, 3), " \n") #declare Val = fG (0.5, 0, 0); #debug concat( "Val(0.5) = ", vstr(5, Val, ", ", 0, 3), " \n") #declare Val = fG (0.5+E, 0, 0); #debug concat( "Val(0.5+E) = ", vstr(5, Val, ", ", 0, 3), " \n") #declare Val = fG (1-E, 0, 0); #debug concat( "Val(1-E) = ", vstr(5, Val, ", ", 0, 3), " \n") #declare Val = fG (-0+1, 0, 0); #debug concat( "Val(-0+1) = ", vstr(5, Val, ", ", 0, 3), " \n") #declare Val = fG (1, 0, 0); #debug concat( "Val(1) = ", vstr(5, Val, ", ", 0, 3), " \n") #declare Val = fG (+0+1, 0, 0); #debug concat( "Val(+0+1) = ", vstr(5, Val, ", ", 0, 3), " \n") #declare Val = fG (val("nan"), 0, 0); #debug concat( "Val(val(\"nan\")) = ", vstr(5, Val, ", ", 0, 3), " \n") #declare Val = fG (val("+inf"), 0, 0); #debug concat( "Val(val(\"+inf\")) = ", vstr(5, Val, ", ", 0, 3), " \n") box {<0, 0, 0> <10, 1, 0.001> pigment {Gradient scale <10, 1, 1>} translate -x*5}