Skip to content
Draft
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
533 changes: 11 additions & 522 deletions Project.toml

Large diffs are not rendered by default.

4 changes: 2 additions & 2 deletions problems/AdvDiff/2D_Wave_Train/user_source.jl
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@

function user_source!(S, q, qe, npoin, ::CL,::TOTAL; neqs=1,x=0.0, y=0.0, ymin=0.0, ymax=30000.0, ngl=5, nely=10,xmin = -120000, xmax =120000)

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

#
# S(q(x)) = -ρg
Expand Down Expand Up @@ -65,7 +65,7 @@ end

function user_source!(S, q, qe, npoin, ::CL,::PERT; neqs=1,x=0.0, y=0.0, ymin=0.0, ymax=30000.0, ngl=5, nely=10,xmin = -120000, xmax =120000)

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

#
# S(q(x)) = -ρg
Expand Down
4 changes: 2 additions & 2 deletions problems/AdvDiff/3d_double_periodic/initialize.jl
Original file line number Diff line number Diff line change
Expand Up @@ -16,13 +16,13 @@ function initialize(SD::NSD_3D, PT, mesh::St_mesh, inputs::Dict, OUTPUT_DIR::Str
#---------------------------------------------------------------------------------

if (inputs[:backend] == CPU())
PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()
if inputs[:lrestart] == true
#
# READ RESTART HDF5:
#
q.qn, q.qe = read_output(mesh.SD, inputs[:restart_input_file_path], inputs, mesh.npoin, HDF5(); nvar=length(qvars))
PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

for ip=1:mesh.npoin
ρ = q.qn[ip,1]
Expand Down
4 changes: 2 additions & 2 deletions problems/AdvDiff/3d_double_periodic/user_flux.jl
Original file line number Diff line number Diff line change
Expand Up @@ -4,7 +4,7 @@ function user_flux!(F, G, H,
mesh::St_mesh,
::CL, ::TOTAL; neqs=4, ip=1)

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()


F[1] = 0.2*q[1]
Expand All @@ -21,7 +21,7 @@ function user_flux!(F, G, H,
mesh::St_mesh,
::CL, ::PERT; neqs=4, ip=1)

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

ρ = q[1] + qe[1]
ρu = q[2]
Expand Down
4 changes: 2 additions & 2 deletions problems/AdvDiff/3d_double_periodic/user_source.jl
Original file line number Diff line number Diff line change
Expand Up @@ -5,7 +5,7 @@ function user_source!(S,
::CL, ::TOTAL;
neqs=1)

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

#
# S(q(x)) = -ρg
Expand All @@ -22,7 +22,7 @@ function user_source!(S,
::CL, ::PERT;
neqs=1)

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

#
# S(q(x)) = -ρg
Expand Down
4 changes: 2 additions & 2 deletions problems/AdvDiff/3d_periodic/initialize.jl
Original file line number Diff line number Diff line change
Expand Up @@ -16,13 +16,13 @@ function initialize(SD::NSD_3D, PT, mesh::St_mesh, inputs::Dict, OUTPUT_DIR::Str
#---------------------------------------------------------------------------------

if (inputs[:backend] == CPU())
PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()
if inputs[:lrestart] == true
#
# READ RESTART HDF5:
#
q.qn, q.qe = read_output(mesh.SD, inputs[:restart_input_file_path], inputs, mesh.npoin, HDF5(); nvar=length(qvars))
PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

for ip=1:mesh.npoin
ρ = q.qn[ip,1]
Expand Down
4 changes: 2 additions & 2 deletions problems/AdvDiff/3d_periodic/user_flux.jl
Original file line number Diff line number Diff line change
Expand Up @@ -4,7 +4,7 @@ function user_flux!(F, G, H,
mesh::St_mesh,
::CL, ::TOTAL; neqs=4, ip=1)

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()


F[1] = 0.2*q[1]
Expand All @@ -21,7 +21,7 @@ function user_flux!(F, G, H,
mesh::St_mesh,
::CL, ::PERT; neqs=4, ip=1)

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

ρ = q[1] + qe[1]
ρu = q[2]
Expand Down
4 changes: 2 additions & 2 deletions problems/AdvDiff/3d_periodic/user_source.jl
Original file line number Diff line number Diff line change
Expand Up @@ -5,7 +5,7 @@ function user_source!(S,
::CL, ::TOTAL;
neqs=1,karg...)

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

#
# S(q(x)) = -ρg
Expand All @@ -22,7 +22,7 @@ function user_source!(S,
::CL, ::PERT;
neqs=1, karg...)

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

#
# S(q(x)) = -ρg
Expand Down
4 changes: 2 additions & 2 deletions problems/AdvDiff/Simple_Wave/user_source.jl
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@

function user_source!(S, q, qe, npoin, ::CL,::TOTAL; neqs=1,x=0.0, y=0.0, ymin=0.0, ymax=30000.0, ngl=5, nely=10,xmin = -120000, xmax =120000)

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

#
# S(q(x)) = -ρg
Expand Down Expand Up @@ -65,7 +65,7 @@ end

function user_source!(S, q, qe, npoin, ::CL,::PERT; neqs=1,x=0.0, y=0.0, ymin=0.0, ymax=30000.0, ngl=5, nely=10,xmin = -120000, xmax =120000)

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

#
# S(q(x)) = -ρg
Expand Down
4 changes: 2 additions & 2 deletions problems/AdvDiff/Wave_Train_Overlapping_Plot/user_source.jl
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@

function user_source!(S, q, qe, npoin, ::CL,::TOTAL; neqs=1,x=0.0, y=0.0, ymin=0.0, ymax=30000.0, ngl=5, nely=10,xmin = -120000, xmax =120000)

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

#
# S(q(x)) = -ρg
Expand Down Expand Up @@ -65,7 +65,7 @@ end

function user_source!(S, q, qe, npoin, ::CL,::PERT; neqs=1,x=0.0, y=0.0, ymin=0.0, ymax=30000.0, ngl=5, nely=10,xmin = -120000, xmax =120000)

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

#
# S(q(x)) = -ρg
Expand Down
2 changes: 1 addition & 1 deletion problems/AdvDiff/case1/initialize.jl
Original file line number Diff line number Diff line change
Expand Up @@ -15,7 +15,7 @@ function initialize(SD, PT, mesh::St_mesh, inputs::Dict, OUTPUT_DIR::String, TFl
q = define_q(SD, mesh.nelem, mesh.npoin, mesh.ngl, qvars, TFloat, inputs[:backend]; neqs=length(qvars))
#---------------------------------------------------------------------------------

σ = Float64(64.0)
σ = TFloat(64.0)
for iel_g = 1:mesh.nelem
for i=1:mesh.ngl

Expand Down
2 changes: 1 addition & 1 deletion problems/AdvDiff/fd1d/initialize.jl
Original file line number Diff line number Diff line change
Expand Up @@ -15,7 +15,7 @@ function initialize(SD, PT, mesh::St_mesh, inputs::Dict, OUTPUT_DIR::String, TFl
q = define_q(SD, mesh.nelem, mesh.npoin, mesh.ngl, qvars, TFloat; neqs=length(qvars))
#---------------------------------------------------------------------------------

σ = Float64(64.0)
σ = TFloat(64.0)
for iel_g = 1:mesh.nelem
for i=1:mesh.ngl

Expand Down
2 changes: 1 addition & 1 deletion problems/CompEuler/2d/initialize.jl
Original file line number Diff line number Diff line change
Expand Up @@ -6,7 +6,7 @@ function initialize(SD::NSD_2D, PT::CompEuler, mesh::St_mesh, inputs::Dict, OUTP
"""
@info " Initialize fields for 2D CompEuler with θ equation ........................ "

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

q = define_q(SD, mesh.nelem, mesh.npoin, mesh.ngl, TFloat; neqs=4)

Expand Down
2 changes: 1 addition & 1 deletion problems/CompEuler/2d/user_flux.jl
Original file line number Diff line number Diff line change
@@ -1,6 +1,6 @@
AAfunction user_flux!(F, G, SD::NSD_2D, q, mesh::St_mesh; neqs=4, ip=1)

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

ρ = q[1]
ρu = q[2]
Expand Down
6 changes: 3 additions & 3 deletions problems/CompEuler/2d/user_source.jl
Original file line number Diff line number Diff line change
@@ -1,6 +1,6 @@
function user_source!(S, q, npoin::Int64; neqs=1)

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

#
# S(q(x)) = -ρg
Expand All @@ -16,8 +16,8 @@ end

function user_source(q::Array, npoin::Int64; neqs=1)

PhysConst = PhysicalConst{Float64}()
S = zeros(Float64, neqs)
PhysConst = PhysicalConst{TFloat}()
S = zeros(TFloat, neqs)

#
# S(q(x)) = -ρg
Expand Down
4 changes: 2 additions & 2 deletions problems/CompEuler/2d_squall_line_experiment/initialize.jl
Original file line number Diff line number Diff line change
Expand Up @@ -16,13 +16,13 @@ function initialize(SD, PT, mesh::St_mesh, inputs::Dict, OUTPUT_DIR::String, TFl
#---------------------------------------------------------------------------------

if (inputs[:backend] == CPU())
PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()
if inputs[:lrestart] == true
#
# READ RESTART HDF5:
#
q.qn, q.qe = read_output(mesh.SD, inputs[:restart_input_file_path], inputs, mesh.npoin, HDF5(); nvar=length(qvars))
PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

for ip=1:mesh.npoin
ρ = q.qn[ip,1]
Expand Down
4 changes: 2 additions & 2 deletions problems/CompEuler/2d_squall_line_experiment/user_flux.jl
Original file line number Diff line number Diff line change
Expand Up @@ -4,7 +4,7 @@ function user_flux!(F, G, H,
mesh::St_mesh,
::CL, ::TOTAL; neqs=4, ip=1)

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

ρ = q[1]
ρu = q[2]
Expand Down Expand Up @@ -42,7 +42,7 @@ function user_flux!(F, G, H,
mesh::St_mesh,
::CL, ::PERT; neqs=4, ip=1)

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

ρ = q[1] + qe[1]
ρu = q[2] + qe[2]
Expand Down
Original file line number Diff line number Diff line change
@@ -1,5 +1,5 @@
function user_primitives!(u, qe, uprimitive, ::TOTAL)
PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()
uprimitive[1] = u[1]
uprimitive[2] = u[2]/u[1]
uprimitive[3] = u[3]/u[1]
Expand Down
4 changes: 2 additions & 2 deletions problems/CompEuler/2d_squall_line_experiment/user_source.jl
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@

function user_source!(S, q, qe, npoin, ::CL,::TOTAL; neqs=1,x=0.0, y=0.0, z=0.0, ymin=0.0, zmax=30000.0, ngl=5, nely=10,xmin = -120000, xmax =120000)

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

#
# S(q(x)) = -ρg
Expand Down Expand Up @@ -55,7 +55,7 @@ end

function user_source!(S, q, qe, npoin, ::CL,::PERT; neqs=1,x=0.0, y=0.0, z, zmin=0.0, zmax=30000.0, ngl=5, nely=10,xmin = -120000, xmax =120000)

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

#
# S(q(x)) = -ρg
Expand Down
4 changes: 2 additions & 2 deletions problems/CompEuler/3d/user_flux.jl
Original file line number Diff line number Diff line change
Expand Up @@ -4,7 +4,7 @@ function user_flux!(F, G, H,
mesh::St_mesh,
::CL, ::TOTAL; neqs=4, ip=1)

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

ρ = q[1]
ρu = q[2]
Expand Down Expand Up @@ -44,7 +44,7 @@ function user_flux!(F, G, H,
mesh::St_mesh,
::CL, ::PERT; neqs=4, ip=1)

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

ρ = q[1] + qe[1]
ρu = q[2]
Expand Down
4 changes: 2 additions & 2 deletions problems/CompEuler/3d/user_source.jl
Original file line number Diff line number Diff line change
Expand Up @@ -11,7 +11,7 @@ function user_source!(S,
ymin=0.0,ymax=0.0,
zmin=0.0,zmax=0.0)

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

#
# S(q(x)) = -ρg
Expand Down Expand Up @@ -39,7 +39,7 @@ function user_source!(S,
ymin=0.0, ymax=0.0,
zmin=0.0, zmax=0.0)

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

#
# S(q(x)) = -ρg
Expand Down
4 changes: 2 additions & 2 deletions problems/CompEuler/3d_amr/user_flux.jl
Original file line number Diff line number Diff line change
Expand Up @@ -4,7 +4,7 @@ function user_flux!(F, G, H,
mesh::St_mesh,
::CL, ::TOTAL; neqs=4, ip=1)

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

ρ = q[1]
ρu = q[2]
Expand Down Expand Up @@ -44,7 +44,7 @@ function user_flux!(F, G, H,
mesh::St_mesh,
::CL, ::PERT; neqs=4, ip=1)

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

ρ = q[1] + qe[1]
ρu = q[2]
Expand Down
2 changes: 1 addition & 1 deletion problems/CompEuler/3d_bomex/user_flux.jl
Original file line number Diff line number Diff line change
Expand Up @@ -5,7 +5,7 @@ function user_flux!(F, G, H,
::CL, ::TOTAL; neqs=4, ip=1,
x=0.0, y=0.0, z=0.0)

# PhysConst = PhysicalConst{Float64}()
# PhysConst = PhysicalConst{TFloat}()
T = eltype(q)
ρ = q[1]
ρu = q[2]
Expand Down
4 changes: 2 additions & 2 deletions problems/CompEuler/3d_bomex/user_source.jl
Original file line number Diff line number Diff line change
Expand Up @@ -11,7 +11,7 @@ function user_source!(S,
ymin=0.0,ymax=0.0,
zmin=0.0,zmax=0.0)

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()
# T = eltype(q)
#
# S(q(x)) = -ρg
Expand Down Expand Up @@ -60,7 +60,7 @@ function user_source!(S,
::CL, ::PERT;
neqs=1)

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

#
# S(q(x)) = -ρg
Expand Down
2 changes: 1 addition & 1 deletion problems/CompEuler/HSmount/initialize.jl
Original file line number Diff line number Diff line change
Expand Up @@ -7,7 +7,7 @@ function initialize(SD::NSD_2D, PT::CompEuler, mesh::St_mesh, inputs::Dict, OUTP
@info " Initialize fields for 2D CompEuler with θ equation ........................ "


PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

qvars = ("dρ", "dρu", "dρv", "dρθ")
q = define_q(SD, mesh.nelem, mesh.npoin, mesh.ngl, qvars, TFloat; neqs=length(qvars))
Expand Down
4 changes: 2 additions & 2 deletions problems/CompEuler/HSmount/user_source.jl
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@

function user_source!(S, q, qe, npoin, ::CL,::TOTAL; neqs=1,x=0.0, y=0.0, ymin=0.0, ymax=30000.0, ngl=5, nely=10,xmin = -120000, xmax =120000)

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

#
# S(q(x)) = -ρg
Expand Down Expand Up @@ -65,7 +65,7 @@ end

function user_source!(S, q, qe, npoin, ::CL,::PERT; neqs=1,x=0.0, y=0.0, ymin=0.0, ymax=30000.0, ngl=5, nely=10,xmin = -120000, xmax =120000)

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()

#
# S(q(x)) = -ρg
Expand Down
2 changes: 1 addition & 1 deletion problems/CompEuler/HSmount_Lag/initialize.jl
Original file line number Diff line number Diff line change
Expand Up @@ -13,7 +13,7 @@ function initialize(SD::NSD_2D, PT, mesh::St_mesh, inputs::Dict, OUTPUT_DIR::Str

if (inputs[:backend] == CPU())

PhysConst = PhysicalConst{Float64}()
PhysConst = PhysicalConst{TFloat}()
θref = 250.0 #K
θ0 = 250.0
T0 = θ0
Expand Down
Loading
Loading