Skip to content

Commit 6ba48a5

Browse files
T => tspan
1 parent 2c68bcf commit 6ba48a5

File tree

1 file changed

+23
-23
lines changed

1 file changed

+23
-23
lines changed

src/fem_premade_problems.jl

Lines changed: 23 additions & 23 deletions
Original file line numberDiff line numberDiff line change
@@ -6,10 +6,10 @@ f = (t,x) -> (-5).*exp.((-25).*((3/2)+6.*t.^2+x[:,1]+x[:,1].^2+x[:,2]+x[:,2].^2+
66
x[:,2]))).*((-20)+(-100).*t.^2+(-49).*x[:,1]+(-50).*x[:,1].^2+(-49).*x[:,2]+(-50).*
77
x[:,2].^2+2.*t.*(47+50.*x[:,1]+50.*x[:,2])+exp.(25.*(1+(-2).*t).^2).*(22+
88
100.*t.^2+49.*x[:,1]+50.*x[:,1].^2+49.*x[:,2]+50.*x[:,2].^2+(-2).*t.*(49+50.*x[:,1]+50.*x[:,2])))
9-
T = 2
9+
tspan = (0.0,2.0)
1010
dx = 1//2^(3)
1111
dt = 1//2^(9)
12-
mesh = parabolic_squaremesh([0 1 0 1],dx,dt,T,:dirichlet)
12+
mesh = parabolic_squaremesh([0 1 0 1],dx,dt,tspan,:dirichlet)
1313
"""
1414
Example problem defined by the solution:
1515
```math
@@ -24,22 +24,22 @@ N = 2 #Number of different dt to solve at, 2 for test speed
2424
topdt = 6 # 1//2^(topdt-1) is the max dt. Small for test speed
2525
dts = 1.//2.^(topdt-1:-1:N)
2626
dxs = 1//2^(5) * ones(dts) #Run at 2^-7 for best plot
27-
probs = [HeatProblem(analytic_moving,Du,f,parabolic_squaremesh([0 1 0 1],dxs[i],dts[i],1,:dirichlet)) for i in eachindex(dts)]
27+
probs = [HeatProblem(analytic_moving,Du,f,parabolic_squaremesh([0 1 0 1],dxs[i],dts[i],(0.0,1.0),:dirichlet)) for i in eachindex(dts)]
2828
cs_femheat_moving_dt = ConvergenceSetup(probs,dts)
2929
dxs = 1//2^(4) * ones(dts) #Run at 2^-7 for best plot
30-
probs = [HeatProblem(analytic_moving,Du,f,parabolic_squaremesh([0 1 0 1],dxs[i],dts[i],1,:dirichlet)) for i in eachindex(dts)]
30+
probs = [HeatProblem(analytic_moving,Du,f,parabolic_squaremesh([0 1 0 1],dxs[i],dts[i],(0.0,1.0),:dirichlet)) for i in eachindex(dts)]
3131
cs_femheat_moving_faster_dt = ConvergenceSetup(probs,dts)
3232

3333
#Not good plots, but quick for unit tests
3434
dxs = 1.//2.^(2:-1:1)
3535
dts = 1//2^(6) * ones(dxs) #Run at 2^-7 for best plot
36-
probs = [HeatProblem(analytic_moving,Du,f,parabolic_squaremesh([0 1 0 1],dxs[i],dts[i],1,:dirichlet)) for i in eachindex(dts)]
36+
probs = [HeatProblem(analytic_moving,Du,f,parabolic_squaremesh([0 1 0 1],dxs[i],dts[i],(0.0,1.0),:dirichlet)) for i in eachindex(dts)]
3737
cs_femheat_moving_dx = ConvergenceSetup(probs,dxs)
3838

39-
T = 1
39+
tspan = (0.0,1.0)
4040
dx = 1//2^(3)
4141
dt = 1//2^(7)
42-
mesh = parabolic_squaremesh([0 1 0 1],dx,dt,T,:dirichlet)
42+
mesh = parabolic_squaremesh([0 1 0 1],dx,dt,tspan,:dirichlet)
4343
"""
4444
Example problem defined by the solution:
4545
```math
@@ -53,10 +53,10 @@ prob_femheat_moving7 = HeatProblem(analytic_moving,Du,f,mesh)
5353
analytic_diffuse(t,x) = exp.(-10((x[:,1]-.5).^2 + (x[:,2]-.5).^2 )-t)
5454
f = (t,x) -> exp.(-t-5*(1-2x[:,1]+2x[:,1].^2 - 2x[:,2] +2x[:,2].^2)).*(-161 + 400*(x[:,1] - x[:,1].^2 + x[:,2] - x[:,2].^2))
5555
Du = (t,x) -> -20[analytic_diffuse(t,x).*(x[:,1]-.5) analytic_diffuse(t,x).*(x[:,2]-.5)]
56-
T = 1
56+
tspan = (0.0,1.0)
5757
dx = 1//2^(3)
5858
dt = 1//2^(7)
59-
mesh = parabolic_squaremesh([0 1 0 1],dx,dt,T,:dirichlet)
59+
mesh = parabolic_squaremesh([0 1 0 1],dx,dt,tspan,:dirichlet)
6060
"""
6161
Example problem defined by the solution:
6262
@@ -70,21 +70,21 @@ prob_femheat_diffuse = HeatProblem(analytic_diffuse,Du,f,mesh)
7070

7171

7272
f = (t,x) -> zeros(size(x,1))
73-
u0_func = (x) -> float((abs.(x[:,1]-.5) .< 1e-6) & (abs.(x[:,2]-.5) .< 1e-6)) #Only mass at middle of (0,1)^2
74-
T = 1//2^(5)
73+
u0_func = (x) -> float((abs.(x[:,1]-.5) .< 1e-6) & (abs.(x[:,2]-.5) .< 1e-6)) #Only mass at middle of (0.0,1.0)^2
74+
tspan = (0.0,1/2^(5))
7575
dx = 1//2^(3)
7676
dt = 1//2^(9)
77-
mesh = parabolic_squaremesh([0 1 0 1],dx,dt,T,:dirichlet)
77+
mesh = parabolic_squaremesh([0 1 0 1],dx,dt,tspan,:dirichlet)
7878
u0 = u0_func(mesh.node)
7979
"""
8080
Example problem which starts with a Dirac δ cenetered at (0.5,0.5) and solves with ``f=gD=0``.
8181
This gives the Green's function solution.
8282
"""
8383
prob_femheat_pure = HeatProblem(u0,f,mesh)
8484

85-
T = 1//2^(5)
85+
tspan = (0.0,1/2^(5))
8686
dt = 1//2^(11)
87-
mesh = parabolic_squaremesh([0 1 0 1],dx,dt,T,:dirichlet)
87+
mesh = parabolic_squaremesh([0 1 0 1],dx,dt,tspan,:dirichlet)
8888
u0 = u0_func(mesh.node)
8989
"""
9090
Example problem which starts with a Dirac δ cenetered at (0.5,0.5) and solves with ``f=gD=0``.
@@ -94,10 +94,10 @@ prob_femheat_pure11 = HeatProblem(u0,f,mesh)
9494

9595
f = (t,x,u) -> ones(size(x,1)) - .5u
9696
u0_func = (x) -> zeros(size(x,1))
97-
T = 1
97+
tspan = (0.0,1.0)
9898
dx = 1//2^(3)
9999
dt = 1//2^(7)
100-
mesh = parabolic_squaremesh([0 1 0 1],dx,dt,T,:neumann)
100+
mesh = parabolic_squaremesh([0 1 0 1],dx,dt,tspan,:neumann)
101101
u0 = u0_func(mesh.node)
102102
"""
103103
Homogenous reaction-diffusion problem which starts with 0 and solves with ``f(u)=1-u/2``
@@ -107,10 +107,10 @@ prob_femheat_birthdeath = HeatProblem(u0,f,mesh)
107107

108108
f = (t,x,u) -> [ones(size(x,1))-.5u[:,1] ones(size(x,1))-u[:,2]]
109109
u0_func = (x) -> ones(size(x,1),2).*[.5 .5] # size (x,2), 2 meaning 2 variables
110-
T = 5
110+
tspan = (0.0,5.0)
111111
dx = 1/2^(1)
112112
dt = 1/2^(7)
113-
mesh = parabolic_squaremesh([0 1 0 1],dx,dt,T,:neumann)
113+
mesh = parabolic_squaremesh([0 1 0 1],dx,dt,tspan,:neumann)
114114
u0 = u0_func(mesh.node)
115115
"""
116116
Homogenous reaction-diffusion which starts at 1/2 and solves the system ``f(u)=1-u/2`` and ``f(v)=1-v``
@@ -119,10 +119,10 @@ prob_femheat_birthdeathsystem = HeatProblem(u0,f,mesh)
119119

120120
f = (t,x,u) -> [ones(size(x,1))-.5u[:,1] .5u[:,1]-u[:,2]]
121121
u0_func = (x) -> ones(size(x,1),2).*[.5 .5] # size (x,2), 2 meaning 2 variables
122-
T = 5
122+
tspan = (0.0,5.0)
123123
dx = 1/2^(1)
124124
dt = 1/2^(7)
125-
mesh = parabolic_squaremesh([0 1 0 1],dx,dt,T,:neumann)
125+
mesh = parabolic_squaremesh([0 1 0 1],dx,dt,tspan,:neumann)
126126
u0 = u0_func(mesh.node)
127127
"""
128128
Homogenous reaction-diffusion which starts with 1/2 and solves the system ``f(u)=1-u/2`` and ``f(v)=.5u-v``
@@ -200,10 +200,10 @@ end
200200
f = (t,x,u) -> ones(size(x,1)) - .5u
201201
u0_func = (x) -> zeros(size(x,1))
202202
σ = (t,x,u) -> 1u.^2
203-
T = 5
203+
tspan = (0.0,5.0)
204204
dx = 1//2^(3)
205205
dt = 1//2^(5)
206-
mesh = parabolic_squaremesh([0 1 0 1],dx,dt,T,:neumann)
206+
mesh = parabolic_squaremesh([0 1 0 1],dx,dt,tspan,:neumann)
207207
u0 = u0_func(mesh.node)
208208
"""
209209
Homogenous stochastic reaction-diffusion problem which starts with 0
@@ -213,7 +213,7 @@ prob_femheat_stochasticbirthdeath = HeatProblem(u0,f,mesh,σ=σ)
213213

214214
dx = 1//2^(1)
215215
dt = 1//2^(1)
216-
mesh = parabolic_squaremesh([0 1 0 1],dx,dt,T,:neumann)
216+
mesh = parabolic_squaremesh([0 1 0 1],dx,dt,tspan,:neumann)
217217
u0 = u0_func(mesh.node)
218218
prob_femheat_stochasticbirthdeath_fast = HeatProblem(u0,f,mesh,σ=σ)
219219

0 commit comments

Comments
 (0)