- /
-
the lesser blooming tree
on 23 Oct 2022
- 6
- 10
- 1
- 0
- 279
axis off
f(0,0,[0,0,-6,0,7,0],[0,55,99,55,99,55],-2,1)
function f(x,y,d,R,n,N)
if n<N
X=R.*sind(d)+x;
Y=R.*cosd(d)+y;
line(X,Y,X+n,color=(n>3)*[0,1,0]+randi(0:1)*(n==6)*[1,-1,0],LineWidth=norm(R)/5);
A=[0 -48 -25 43 31];
for i=2:5
r=rem(i,2);
L=.58+r*.07;
f(X(i),Y(i),d+A(i),L*R,n+1,7-r)
end
end
end