To add comments or start new threads please go to the full version of: fractals and holograms

eastbosbud
i have discovered a fractal formula that looks strikingly like an interference pattern of a hologram... can this be converted to a 3-d-image? has anyone heard of this before? sorry im new here and uneducated but intensely curious and relatively bright i think
Fractal1 {
fractal:
title="Fractal1" width=640 height=480 layers=1 resolution=720
credits="JAMES;1/3/2006"
layer:
method=multipass caption="Background" opacity=100
mapping:
center=0/0 magn=0.0009765625
formula:
maxiter=100 percheck=off filename="ldm.ufm" entry="DM0" p_p1=0.5/0.0
p_Op1=Addition p_Op2=Multiplication p_r1=None p_je=yes p_seed=0/0
p_bailout=4.0 f_fn1=cotan f_fn2=sqr f_fn3=cabs f_fn4=recip
inside:
transfer=none
outside:
transfer=linear
gradient:
smooth=yes rotation=-428 index=-328 color=16121855 index=-228
color=46591 index=-128 color=156 index=-428 color=8716288
opacity:
smooth=no index=0 opacity=255
}

ldm.ufm:DM0 {
;100 simple formulas rolled into 1
init:
z = @fn3(pixel)
loop:
if (@je == true)
z = @fn4(z^2) + @seed
endif
if @Op1 == 0
pp1 = z + p1
elseif @Op1 == 1
pp1 = z - p1
elseif @Op1 == 2
pp1 = z * p1
elseif @Op1 == 3
pp1 = z / p1
else
pp1 = z ^ p1
endif
if (@r1 == 1 || @r1 == 3)
if pp1 == 0
pp1 = 1e-20
endif
pp1 = 1/pp1
endif
if @Op2 == 0
pp2 = p1+fn1(fn2(pp1))
elseif @Op2 == 1
pp2 = p1-fn1(fn2(pp1))
elseif @Op2 == 2
pp2 = p1*fn1(fn2(pp1))
elseif @Op2 == 3
pp2 = p1/fn1(fn2(pp1))
else
pp2 = p1^fn1(fn2(pp1))
endif
if (@r1 == 2 || @r1 == 3)
if pp2 == 0
pp2 = 1e-20
endif
pp2 = 1/pp2
endif
z=pp2
bailout:
|z|<=@bailout
default:
title="DM0"
method = multipass
periodicity = 0
param p1
caption="Parameter 1"
default=(0.5,0.0)
endparam
param Op1
caption = "Operator 1"
enum = "Addition" "Subtraction" "Multiplication" "Division" "Exponent"
hint = "P1 [Op2] fn1(fn2(z [Op1] P1))"
default = 0
endparam
param Op2
caption = "Operator 2"
enum = "Addition" "Subtraction" "Multiplication" "Division" "Exponent"
hint = "P1 [Op2] fn1(fn2(z [Op1] P1))"
default = 2
endparam
param r1
caption="Reciprocate"
enum = "None" "Recip Oper1" "Recip Oper2" "Both"
default = 0
endparam
param je
caption = "Julia Component"
default = false
endparam
param seed
caption = "Julia Seed"
default = (0,0)
endparam
param bailout
caption="Bailout"
default=4.0
endparam
func fn1
caption = "Function 1"
default = sinh()
endfunc
func fn2
caption = "Function 2"
default = sqr()
endfunc
func fn3
caption = "Function 3"
default = ident()
endfunc
func fn4
caption = "Julia Function"
default = ident()
endfunc
}
check it out it was created with ultrafractal
philip347
You have the apparatus for the projection head, your drive system software for the unit and a projector, right?
eastbosbud
no i don't this is just a wild guess on my part but if you have the equipment feel free to check it out and follow up with results
PhysOrg scientific forums are totally dedicated to science, physics, and technology. Besides topical forums such as nanotechnology, quantum physics, silicon and III-V technology, applied physics, materials, space and others, you can also join our news and publications discussions. We also provide an off-topic forum category. If you need specific help on a scientific problem or have a question related to physics or technology, visit the PhysOrg Forums. Here you’ll find experts from various fields online every day.
To quit out of "lo-fi" mode and return to the regular forums, please click here.