Provides tools to calculate the spectral error indicator. More...

Inheritance diagram for spectral_error::spectral_error_t:

Collaboration diagram for spectral_error::spectral_error_t:

[legend]

Public Member Functions
procedure, pass(this)	init (this, json, case)
	Constructor.

procedure, pass(this)	free (this)
	Destructor.

procedure, pass(this)	compute_ (this, t, tstep)
	Compute the indicator (called according to the simcomp controller).

procedure, pass(this)	get_indicators (this, coef)
	Calculate the indicator.

procedure, pass(this)	init_base (this, json, case)
	Constructor for the simulation_component_t (base) class.

procedure, pass(this)	free_base (this)
	Destructor for the simulation_component_t (base) class.

procedure, pass(this)	restart (this, t)
	Wrapper for calling `set_counter` for the time based controllers. Serves as the public interface.

procedure, pass(this)	preprocess (this, t, tstep)
	Wrapper for calling `preprocess_` based on the `preprocess_controller`. Serves as the public interface.

procedure, pass(this)	compute (this, t, tstep)
	Wrapper for calling `compute_` based on the `compute_controller`. Serves as the public interface.

procedure(simulation_component_init), deferred, pass	init (this, json, case)
	The common constructor using a JSON dictionary.

procedure(simulation_component_free), deferred, pass	free (this)
	Destructor.

procedure, pass(this)	preprocess_ (this, t, tstep)
	The preprocessing function to be executed during the run.

procedure, pass(this)	compute_ (this, t, tstep)
	The main function to be executed during the run.

procedure, pass(this)	restart_ (this, t)
	The restart function to be called upon restarting simulation.

Public Attributes
type(field_t), pointer	u => null()
	Pointers to main fields.

type(field_t), pointer	v => null()

type(field_t), pointer	w => null()

type(field_t), pointer	u_hat => null()
	Transformed fields.

type(field_t), pointer	v_hat => null()

type(field_t), pointer	w_hat => null()

type(field_t)	wk
	Working field - Consider making this a simple array.

real(kind=rp)	seri_small = 1.e-14
	Configuration of spectral error calculation.

real(kind=rp)	seri_smallr = 1.e-10
	used for ratios

real(kind=rp)	seri_smallg = 1.e-5
	used for gradients

real(kind=rp)	seri_smalls = 0.2
	used for sigma and rtmp in error calculations

integer	seri_np = 4
	number of points in fitting

integer	seri_np_max = 4

integer	seri_elr = 0
	last modes skipped

real(kind=rp), dimension(:), allocatable	eind_u
	spectral error indicator per element

real(kind=rp), dimension(:), allocatable	eind_v

real(kind=rp), dimension(:), allocatable	eind_w

real(kind=rp), dimension(:), allocatable	sig_u
	fit coeficients per element

real(kind=rp), dimension(:), allocatable	sig_v

real(kind=rp), dimension(:), allocatable	sig_w

type(field_list_t)	speri_l
	List to write the spectral error indicator as a field.

type(file_t)	mf_speri
	File to write.

type(field_writer_t)	writer
	Field writer controller for the output.

type(case_t), pointer	case
	Pointer to the simulation case.

type(time_based_controller_t)	preprocess_controller
	Controller for when to run `preprocess`.

type(time_based_controller_t)	compute_controller
	Controller for when to run `compute`.

type(time_based_controller_t)	output_controller
	Controller for when to do output.

integer	order
	The execution order, lowest excutes first.

Detailed Description

This is a posteriori error measure, based on the local properties of the spectral solution, which was developed by Mavriplis. This method formally only gives an indication of the error.

Definition at line 65 of file spectral_error.f90.

Member Function/Subroutine Documentation

◆ compute()

procedure, pass(this) simulation_component::simulation_component_t::compute	(	class(simulation_component_t), intent(inout)	this,
		real(kind=rp), intent(in)	t,
		integer, intent(in)	tstep
	)

inherited

Parameters

t	The time value.
tstep	The current time-step

Definition at line 73 of file simulation_component.f90.

◆ compute_() [1/2]

procedure, pass(this) simulation_component::simulation_component_t::compute_	(	class(simulation_component_t), intent(inout)	this,
		real(kind=rp), intent(in)	t,
		integer, intent(in)	tstep
	)

inherited

Parameters

t	The time value.
tstep	The current time-step

Definition at line 81 of file simulation_component.f90.

◆ compute_() [2/2]

procedure, pass(this) spectral_error::spectral_error_t::compute_	(	class(spectral_error_t), intent(inout)	this,
		real(kind=rp), intent(in)	t,
		integer, intent(in)	tstep
	)

Definition at line 105 of file spectral_error.f90.

◆ free() [1/2]

procedure(simulation_component_free), deferred, pass simulation_component::simulation_component_t::free ( class(simulation_component_t), intent(inout) this )

pure virtualinherited

Definition at line 77 of file simulation_component.f90.

◆ free() [2/2]

procedure, pass(this) spectral_error::spectral_error_t::free ( class(spectral_error_t), intent(inout) this )

Definition at line 103 of file spectral_error.f90.

◆ free_base()

procedure, pass(this) simulation_component::simulation_component_t::free_base ( class(simulation_component_t), intent(inout) this )

inherited

Definition at line 63 of file simulation_component.f90.

◆ get_indicators()

procedure, pass(this) spectral_error::spectral_error_t::get_indicators	(	class(spectral_error_t), intent(inout)	this,
		type(coef_t), intent(inout)	coef
	)

Parameters

coef	type coef for mesh parameters and space

Definition at line 107 of file spectral_error.f90.

◆ init() [1/2]

procedure(simulation_component_init), deferred, pass simulation_component::simulation_component_t::init	(	class(simulation_component_t), intent(inout)	this,
		type(json_file), intent(inout)	json,
		class(case_t), intent(inout), target	case
	)

pure virtualinherited

Definition at line 75 of file simulation_component.f90.

◆ init() [2/2]

procedure, pass(this) spectral_error::spectral_error_t::init	(	class(spectral_error_t), intent(inout)	this,
		type(json_file), intent(inout)	json,
		class(case_t), intent(inout), target	case
	)

Definition at line 101 of file spectral_error.f90.

◆ init_base()

procedure, pass(this) simulation_component::simulation_component_t::init_base	(	class(simulation_component_t), intent(inout)	this,
		type(json_file), intent(inout)	json,
		class(case_t), intent(inout), target	case
	)

inherited

Parameters

object	The object to be created and initialized.
json	JSON object initializing the simulation component.
case	The simulation case. Constructor for the `simulation_component_t` (base) class.

Definition at line 61 of file simulation_component.f90.

◆ preprocess()

procedure, pass(this) simulation_component::simulation_component_t::preprocess	(	class(simulation_component_t), intent(inout)	this,
		real(kind=rp), intent(in)	t,
		integer, intent(in)	tstep
	)

inherited

Parameters

t	The time value.
tstep	The current time-step

Definition at line 69 of file simulation_component.f90.

◆ preprocess_()

procedure, pass(this) simulation_component::simulation_component_t::preprocess_	(	class(simulation_component_t), intent(inout)	this,
		real(kind=rp), intent(in)	t,
		integer, intent(in)	tstep
	)

inherited

Parameters

t	The time value.
tstep	The current time-step

Definition at line 79 of file simulation_component.f90.

◆ restart()

procedure, pass(this) simulation_component::simulation_component_t::restart	(	class(simulation_component_t), intent(inout)	this,
		real(kind=rp), intent(in)	t
	)

inherited

Parameters

t	The time value.

Definition at line 66 of file simulation_component.f90.

◆ restart_()

procedure, pass(this) simulation_component::simulation_component_t::restart_	(	class(simulation_component_t), intent(inout)	this,
		real(kind=rp), intent(in)	t
	)

inherited

Parameters

t	The time value.

Definition at line 83 of file simulation_component.f90.

Member Data Documentation

◆ case

type(case_t), pointer simulation_component::simulation_component_t::case

inherited

Definition at line 50 of file simulation_component.f90.

◆ compute_controller

type(time_based_controller_t) simulation_component::simulation_component_t::compute_controller

inherited

Definition at line 54 of file simulation_component.f90.

◆ eind_u

real(kind=rp), dimension(:), allocatable spectral_error::spectral_error_t::eind_u

Definition at line 90 of file spectral_error.f90.

◆ eind_v

real(kind=rp), dimension(:), allocatable spectral_error::spectral_error_t::eind_v

Definition at line 90 of file spectral_error.f90.

◆ eind_w

real(kind=rp), dimension(:), allocatable spectral_error::spectral_error_t::eind_w

Definition at line 90 of file spectral_error.f90.

◆ mf_speri

type(file_t) spectral_error::spectral_error_t::mf_speri

Definition at line 96 of file spectral_error.f90.

◆ order

integer simulation_component::simulation_component_t::order

inherited

Definition at line 58 of file simulation_component.f90.

◆ output_controller

type(time_based_controller_t) simulation_component::simulation_component_t::output_controller

inherited

Definition at line 56 of file simulation_component.f90.

◆ preprocess_controller

type(time_based_controller_t) simulation_component::simulation_component_t::preprocess_controller

inherited

Definition at line 52 of file simulation_component.f90.

◆ seri_elr

integer spectral_error::spectral_error_t::seri_elr = 0

Definition at line 88 of file spectral_error.f90.

◆ seri_np

integer spectral_error::spectral_error_t::seri_np = 4

Definition at line 85 of file spectral_error.f90.

◆ seri_np_max

integer spectral_error::spectral_error_t::seri_np_max = 4

Definition at line 86 of file spectral_error.f90.

◆ seri_small

real(kind=rp) spectral_error::spectral_error_t::seri_small = 1.e-14

Definition at line 77 of file spectral_error.f90.

◆ seri_smallg

real(kind=rp) spectral_error::spectral_error_t::seri_smallg = 1.e-5

Definition at line 81 of file spectral_error.f90.

◆ seri_smallr

real(kind=rp) spectral_error::spectral_error_t::seri_smallr = 1.e-10

Definition at line 79 of file spectral_error.f90.

◆ seri_smalls

real(kind=rp) spectral_error::spectral_error_t::seri_smalls = 0.2

Definition at line 83 of file spectral_error.f90.

◆ sig_u

real(kind=rp), dimension(:), allocatable spectral_error::spectral_error_t::sig_u

Definition at line 92 of file spectral_error.f90.

◆ sig_v

real(kind=rp), dimension(:), allocatable spectral_error::spectral_error_t::sig_v

Definition at line 92 of file spectral_error.f90.

◆ sig_w

real(kind=rp), dimension(:), allocatable spectral_error::spectral_error_t::sig_w

Definition at line 92 of file spectral_error.f90.

◆ speri_l

type(field_list_t) spectral_error::spectral_error_t::speri_l

Definition at line 94 of file spectral_error.f90.

◆ u

type(field_t), pointer spectral_error::spectral_error_t::u => null()

Definition at line 67 of file spectral_error.f90.

◆ u_hat

type(field_t), pointer spectral_error::spectral_error_t::u_hat => null()

Definition at line 71 of file spectral_error.f90.

◆ v

type(field_t), pointer spectral_error::spectral_error_t::v => null()

Definition at line 68 of file spectral_error.f90.

◆ v_hat

type(field_t), pointer spectral_error::spectral_error_t::v_hat => null()

Definition at line 72 of file spectral_error.f90.

◆ w

type(field_t), pointer spectral_error::spectral_error_t::w => null()

Definition at line 69 of file spectral_error.f90.

◆ w_hat

type(field_t), pointer spectral_error::spectral_error_t::w_hat => null()

Definition at line 73 of file spectral_error.f90.

◆ wk

type(field_t) spectral_error::spectral_error_t::wk

Definition at line 75 of file spectral_error.f90.

◆ writer

type(field_writer_t) spectral_error::spectral_error_t::writer

Definition at line 98 of file spectral_error.f90.

The documentation for this type was generated from the following file:

/home/runner/work/neko/neko/src/simulation_components/spectral_error.f90

Public Member Functions

Public Attributes

Detailed Description

Member Function/Subroutine Documentation

◆ compute()

◆ compute_() [1/2]

◆ compute_() [2/2]

◆ free() [1/2]

◆ free() [2/2]

◆ free_base()

◆ get_indicators()

◆ init() [1/2]

◆ init() [2/2]

◆ init_base()

◆ preprocess()

◆ preprocess_()

◆ restart()

◆ restart_()

Member Data Documentation

◆ case

◆ compute_controller

◆ eind_u

◆ eind_v

◆ eind_w

◆ mf_speri

◆ order

◆ output_controller

◆ preprocess_controller

◆ seri_elr

◆ seri_np

◆ seri_np_max

◆ seri_small

◆ seri_smallg

◆ seri_smallr

◆ seri_smalls

◆ sig_u

◆ sig_v

◆ sig_w

◆ speri_l

◆ u

◆ u_hat

◆ v

◆ v_hat

◆ w

◆ w_hat

◆ wk

◆ writer