Wednesday, December 26, 2007

First flame



Recursion again²

Recursion

support = Ondulation2[ :support=, LinearBezier[ :support=, [Vector::O, Vector::X] ], :freq=, 2, :amp=, 0.5 ]
support.geo( 3.0 ).splits( 10 ) do |bezier|
bezier = support.move( (bezier.firstpoint..bezier.lastpoint) )
bezier.geo( 3.0 ).splits( 10 ) do |bezier|
bezier = support.move( (bezier.firstpoint..bezier.lastpoint) )
bezier.geo( 5.0 ).splits( 10 ) do |bezier|
render.add_object( support.move( (bezier.firstpoint..bezier.lastpoint) ), Style.new( :stroke=, Color.black, :strokewidth=, 0.001 ) )
end
end
end

Pattern 0.1