// Entry code: lotzic
// Name      : Jeff Reifel
// Frame rate: 10
#local C=clock;
union
{
light_source{-3*z,1}
#local I=.3;
#while(I<4)                      //starts 36 petals
                     
sphere
{0,1
clipped_by{                     // shapes petals
cone{<-1.1,-1>1<-.6.8>0}
}

pigment{radial rotate y*I*I*9}  // colors petals from green to pink
finish{ambient<1,.5>/I}         // brightens and reddens inner petals
translate<-.1*I,1>
scale.5+y+I/8
rotate<0I*C,-16+12*C+20*I*C>    //
translate<pow(I.6)/99,-6>       //places petals
rotate<0,2225*I>
}                               //around center
#local I=I+.1;
#end 

plane{y,-7                       //water
   finish{reflection.5}
   normal{bumps.1translate 22*C}
     }
cone{-6*y.3y*-9,.2               //stem
   pigment{rgb y}
     } 
     
translate z*5
rotate-x*48
}                                //places objects in front of default camera
sky_sphere{
pigment{wrinkles                 //cloudy sky to be reflected
color_map{[0rgb z][1rgb 2]}
}
}