In [1]:
using Plots;
gadfly();
In [2]:
include("../fdtd/update.jl");
include("../fdtd/sources.jl");
include("../fdtd/boundaries.jl");
using update;
using sources;
In [9]:
#Global parameters
size = 200;
endTime = 800;
num_snaps = 200;
snap_step = div(endTime, num_snaps);
#Grid
hy = zeros(size-1);
mu = ones(size-1);
ez = zeros(size);
eps = ones(size);
for i in 100:size
eps[i] = 9
end
# output params
ez_snapshot = Array{Any}(num_snaps);
hy_snapshot = Array{Any}(num_snaps);
In [10]:
# Time steps
for time in 1:endTime
# Incident
# ez_inc, hy_inc = sources.gaussian_source(50, time);
delay = 150.
width = 250.
ez_inc = exp(-(time + 0.5 - (-0.5) - delay) * (time + 0.5 - (-0.5) - delay) / width);
hy_inc = exp(-(time - delay) * (time - delay) / width) / globals.imp0;
#
# Magnetic
#
# Interior update
update.update_magnetic_field!(ez, hy, mu);
# TFSF
hy[49] -= hy_inc
#
# Electric
#
# ABC
boundaries.trivial_abc!(ez, size);
boundaries.trivial_abc!(ez, 1, false);
# Interior update
update.update_electric_field!(ez, hy, eps);
# TFSF
ez[50] += ez_inc
# Snapshots for animation
if mod(time, snap_step) == 0
ez_snapshot[div(time,snap_step)] = (time, copy(ez))
hy_snapshot[div(time,snap_step)] = (time, copy(hy).*globals.imp0)
end
end
In [11]:
anim = Animation()
for i = 1:num_snaps
p = plot(1:size, ez_snapshot[i][2], lab="Ez")
plot!(1:size-1, hy_snapshot[i][2], lab="Hy*imp0")
time = ez_snapshot[i][1]
plot!(ann=[(150, 1.5, "time =$time")])
plot!(ann=[(0, 1.1, "ABC")])
plot!(ann=[(180, 1.1, "ABC")])
plot!(ann=[(80, 1.2, "Eps = 1")])
plot!(ann=[(100, 1.1, "Eps = 9")])
plot!([100, 100], [-2, 2])
plot!(xlims=(1, 200), ylims=(-2, 2))
frame(anim, p)
end
gif(anim, "./05_inhomogeneity.gif", fps=15)
Out[11]:
In [ ]: