I was off coding some experimental patterns, and came across this one by
accident.

This looke dlike one of those things that one would probably look for, and maybe
ought be in the distribution.

#version 3.8;
global_settings {assumed_gamma 1.0}
default {finish {diffuse 1}}

//#include "functions.inc"

camera {
 location <0, 0, -20>
 right     x*image_width/image_height
 up y
 look_at <0, 0, 0>

}

light_source {<0,  0, -50> rgb 1.0}
sky_sphere {pigment {rgb 1}}

#declare fmod = function (T) {select (T, 1-mod(abs(T),1), mod(abs(T),1))}
#declare AngFreq = 7;
#declare Ang = function {atan2 (x, y)/(tau/AngFreq)}
#declare Ang2 = function {fmod (Ang(x, y, z))}
#declare Rad = function {sqrt (x*x+y*y)}

#declare Mixed = function {Rad (x,y,z) * Ang2(x,y,z)}

plane {z, 0 pigment {function {Mixed(x, y, z)} } }

Post a reply to this message

Attachments:
Download 'coolradialpattern1.png' (172 KB)

Preview of image 'coolradialpattern1.png'