Shock Wave Part 2

on 23 Oct 2021

%Fractal w/ Zeta fn

l=@linspace; %save char

r=2; %No Loop

m=200; %24000 out of memory

L=.35; %L=2 is normal, l=10 is zoom out

n=1; %orig 1

x=l(.2-L,L,m); % x=[-5 5]

y=l(.1-L,L+.1,m); %y=[-5 5]

[X,Y]=meshgrid(x,y);

Z=zeros(m);

C=X+i*Y;

for k=1:r

f=asin(C.^(tan(((conj((Z)+C.^2))+C.^2).^n)));

Z=atanh(sqrt(((C.^(sqrt(asinh(tan(log10(((f).^(f)).^n)))))).^C)+C.^2)); %(x:-5/+5, y:-5/+5)

end

%W=abs(Z); %less etails, %abs(Z)

pcolor(abs(Z)); %

shading interp

colormap(hot(66))

axis off

Load full remix tree