SamuelT wrote:

>If I'm not mistaken, noise3d is the same as bumps.
>

Ah,
well, this is what I used some time ago.

#declare CarpetPigm= pigment {
   function {(sin(x^2)-cos(y^2))}
   scallop_wave
   colour_map {
      [0, rgb 1.5]
      [0.3, rgb <0.8,0,0.1>]
      [1, rgb <0.5,0,0.1>]
   }
   rotate <90,0,0>
   scale <2.65,1,2.65>
}
union{
   disc {0,y, 10
      pigment {CarpetPigm} 
      finish {ambient 0.5}
   }
   intersection {
      isosurface {
         function {y + noise3d(x*30,y*20,z*30)*1}
         bounded_by{ box{<-11,-1,-11>,<11,0.4,11>}}
         threshold    0.48
         method 1
      }
      cylinder {<0,0,0>,<0,0.15,0>,10}
      pigment {CarpetPigm}
   }
}

Ingo

-- 
Photography: http://members.home.nl/ingoogni/
Pov-Ray    : http://members.home.nl/seed7/

Post a reply to this message