- /
 - 
        
Shock Wave Completed
 
        on 1 Nov 2021
        
        
 
    - 0
 - 58
 - 0
 - 0
 - 280
 
%Zeta Fun
l=@linspace;
r=3; %No Loop,
m=600;
L=.375;  %L
n=1.3; %orig 1
x=l(.2-L,L,m);  % x=[-1 1]
y=l(.05-L,L+.05,m);   %y=[-1 1]
[X,Y]=meshgrid(x,y); %mesh
Z=zeros(m);
C=X+i*Y;
for k=1:(r+15)
    f=asin(C.^(tan(((conj((Z)+C.^2))+C.^2).^n))); %Shock Equation
    Z=atanh(sqrt(((C.^(sqrt(asinh(tan(log((f.^f).^n)))))).^C)+C.^2));%
end
pcolor(abs(Z)); %abs
shading interp
c=jet;
colormap([c;c;c])
%brighten()
axis off
Image
            

