self_advection_diffusion_2d Module

  1. SELF_advection_diffusion_2d.f90
  2. self_advection_diffusion_2d

Uses


Contents

Interfaces

Derived Types

Subroutines


Interfaces

interface

  • public subroutine boundaryflux_advection_diffusion_2d_gpu(fb, fextb, dfavg, nhat, nscale, flux, u, v, nu, N, nel, nvar) bind(c,name="0")

    Arguments

    TypeIntentOptionalAttributesName
    type(c_ptr), value:: fb
    type(c_ptr), value:: fextb
    type(c_ptr), value:: dfavg
    type(c_ptr), value:: nhat
    type(c_ptr), value:: nscale
    type(c_ptr), value:: flux
    real(kind=c_prec), value:: u
    real(kind=c_prec), value:: v
    real(kind=c_prec), value:: nu
    integer(kind=c_int), value:: N
    integer(kind=c_int), value:: nel
    integer(kind=c_int), value:: nvar

interface

  • public subroutine fluxmethod_advection_diffusion_2d_gpu(solution, solutiongradient, flux, u, v, nu, N, nel, nvar) bind(c,name="0")

    Arguments

    TypeIntentOptionalAttributesName
    type(c_ptr), value:: solution
    type(c_ptr), value:: solutiongradient
    type(c_ptr), value:: flux
    real(kind=c_prec), value:: u
    real(kind=c_prec), value:: v
    real(kind=c_prec), value:: nu
    integer(kind=c_int), value:: N
    integer(kind=c_int), value:: nel
    integer(kind=c_int), value:: nvar

interface

  • public subroutine setboundarycondition_advection_diffusion_2d_gpu(extboundary, boundary, sideinfo, N, nel, nvar) bind(c,name="0")

    Arguments

    TypeIntentOptionalAttributesName
    type(c_ptr), value:: extboundary
    type(c_ptr), value:: boundary
    type(c_ptr), value:: sideinfo
    integer(kind=c_int), value:: N
    integer(kind=c_int), value:: nel
    integer(kind=c_int), value:: nvar

interface

  • public subroutine setgradientboundarycondition_advection_diffusion_2d_gpu(extboundary, boundary, sideinfo, N, nel, nvar) bind(c,name="0")

    Arguments

    TypeIntentOptionalAttributesName
    type(c_ptr), value:: extboundary
    type(c_ptr), value:: boundary
    type(c_ptr), value:: sideinfo
    integer(kind=c_int), value:: N
    integer(kind=c_int), value:: nel
    integer(kind=c_int), value:: nvar

Derived Types

type, public, extends(advection_diffusion_2d_t) :: advection_diffusion_2d

Components

TypeVisibilityAttributesNameInitial
type(MappedScalar2D), public :: dSdt
real(kind=prec), public :: dt
real(kind=prec), public :: entropy
type(MappedVector2D), public :: flux
type(MappedScalar2D), public :: fluxDivergence
type(SEMQuad), public, pointer:: geometry
logical, public :: gradient_enabled =.false.
integer, public :: ioIterate =0
type(Mesh2D), public, pointer:: mesh
real(kind=prec), public :: nu
integer, public :: nvar
type(MappedScalar2D), public :: solution
type(MappedVector2D), public :: solutionGradient
type(MappedScalar2D), public :: source
real(kind=prec), public :: t
procedure(SELF_timeIntegrator), public, pointer:: timeIntegrator=> Euler_timeIntegrator
real(kind=prec), public :: u
real(kind=prec), public :: v
type(MappedScalar2D), public :: workSol

Type-Bound Procedures

procedure, public :: CalculateEntropy => CalculateEntropy_advection_diffusion_2d
procedure, public :: CalculateSolutionGradient => CalculateSolutionGradient_DGModel2D_t
procedure, public :: CalculateTendency => CalculateTendency_DGModel2D_t
procedure, public :: Euler_timeIntegrator
procedure, public :: ForwardStep => ForwardStep_Model
procedure, public :: Free => Free_DGModel2D_t
procedure, public :: GetSimulationTime
procedure, public :: IncrementIOCounter
procedure, public :: Init => Init_DGModel2D_t
procedure, public :: LowStorageRK2_timeIntegrator
procedure, public :: LowStorageRK3_timeIntegrator
procedure, public :: LowStorageRK4_timeIntegrator
procedure, public :: PreTendency => PreTendency_Model
procedure, public :: PrintType => PrintType_Model
procedure, public :: ReadModel => Read_DGModel2D_t
procedure, public :: ReportEntropy => ReportEntropy_Model
procedure, public :: SetMetadata => SetMetadata_DGModel2D_t
procedure, public :: SetSimulationTime
generic, public :: SetSolution => SetSolutionFromChar_DGModel2D_t, SetSolutionFromEqn_DGModel2D_t
generic, public :: SetTimeIntegrator => SetTimeIntegrator_withChar
procedure, public :: SourceMethod => sourcemethod_DGModel2D_t
procedure, public :: UpdateGRK2 => UpdateGRK2_DGModel2D_t
procedure, public :: UpdateGRK3 => UpdateGRK3_DGModel2D_t
procedure, public :: UpdateGRK4 => UpdateGRK4_DGModel2D_t
procedure, public :: UpdateSolution => UpdateSolution_DGModel2D_t
procedure, public :: WriteModel => Write_DGModel2D_t
procedure, public :: WriteTecplot => WriteTecplot_DGModel2D_t
procedure, public :: boundaryflux => boundaryflux_advection_diffusion_2d
procedure, public :: entropy_func => entropy_func_advection_diffusion_2d_t
procedure, public :: flux1D => flux1d_Model
procedure, public :: flux2d => flux2d_advection_diffusion_2d_t
procedure, public :: flux3D => flux3d_Model
procedure, public :: fluxmethod => fluxmethod_advection_diffusion_2d
procedure, public :: hbc1d_NoNormalFlow => hbc1d_Generic_Model
procedure, public :: hbc1d_Prescribed => hbc1d_Prescribed_Model
procedure, public :: hbc1d_Radiation => hbc1d_Generic_Model
procedure, public :: hbc2d_NoNormalFlow => hbc2d_Generic_Model
procedure, public :: hbc2d_Prescribed => hbc2d_Prescribed_Model
procedure, public :: hbc2d_Radiation => hbc2d_Generic_Model
procedure, public :: hbc3d_NoNormalFlow => hbc3d_Generic_Model
procedure, public :: hbc3d_Prescribed => hbc3d_Prescribed_Model
procedure, public :: hbc3d_Radiation => hbc3d_Generic_Model
procedure, public :: pbc1d_NoNormalFlow => pbc1d_Generic_Model
procedure, public :: pbc1d_Prescribed => pbc1d_Prescribed_Model
procedure, public :: pbc1d_Radiation => pbc1d_Generic_Model
procedure, public :: pbc2d_NoNormalFlow => pbc2d_Generic_Model
procedure, public :: pbc2d_Prescribed => pbc2d_Prescribed_Model
procedure, public :: pbc2d_Radiation => pbc2d_Generic_Model
procedure, public :: pbc3d_NoNormalFlow => pbc3d_Generic_Model
procedure, public :: pbc3d_Prescribed => pbc3d_Prescribed_Model
procedure, public :: pbc3d_Radiation => pbc3d_Generic_Model
procedure, public :: riemannflux1d => riemannflux1d_Model
procedure, public :: riemannflux2d => riemannflux2d_advection_diffusion_2d_t
procedure, public :: riemannflux3d => riemannflux3d_Model
procedure, public :: setboundarycondition => setboundarycondition_advection_diffusion_2d
procedure, public :: setgradientboundarycondition => setgradientboundarycondition_advection_diffusion_2d
procedure, public :: source1d => source1d_Model
procedure, public :: source2d => source2d_Model
procedure, public :: source3d => source3d_Model

Subroutines

public subroutine CalculateEntropy_advection_diffusion_2d(this)

Arguments

TypeIntentOptionalAttributesName
class(advection_diffusion_2d), intent(inout) :: this

public subroutine boundaryflux_advection_diffusion_2d(this)

Arguments

TypeIntentOptionalAttributesName
class(advection_diffusion_2d), intent(inout) :: this

public subroutine fluxmethod_advection_diffusion_2d(this)

Arguments

TypeIntentOptionalAttributesName
class(advection_diffusion_2d), intent(inout) :: this

public subroutine setboundarycondition_advection_diffusion_2d(this)

Boundary conditions are set to periodic boundary conditions

Arguments

TypeIntentOptionalAttributesName
class(advection_diffusion_2d), intent(inout) :: this

public subroutine setgradientboundarycondition_advection_diffusion_2d(this)

Gradient boundary conditions are set to periodic boundary conditions

Arguments

TypeIntentOptionalAttributesName
class(advection_diffusion_2d), intent(inout) :: this