Define integrand_tester_object, the abstract tester integrand.
Abstract interfaces of integrand_tester_object class.
Return informative integrator description.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(integrand_tester_object), | intent(in) | :: | self | Integrand. |
||
| character(len=*), | intent(in), | optional | :: | prefix | Prefixing string. |
Description.
Abstract interfaces of integrand_tester_object class.
Return error.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(integrand_tester_object), | intent(in) | :: | self | Integrand. |
||
| real(kind=R_P), | intent(in) | :: | t | Time. |
||
| real(kind=R_P), | intent(in), | optional | :: | t0 | Initial time. |
|
| class(integrand_object), | intent(in), | optional | :: | U0 | Initial conditions. |
Error.
Abstract interfaces of integrand_tester_object class.
Return exact solution.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(integrand_tester_object), | intent(in) | :: | self | Integrand. |
||
| real(kind=R_P), | intent(in) | :: | t | Time. |
||
| real(kind=R_P), | intent(in), | optional | :: | t0 | Initial time. |
|
| class(integrand_object), | intent(in), | optional | :: | U0 | Initial conditions. |
Exact solution.
Abstract interfaces of integrand_tester_object class.
Export integrand to Tecplot file.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(integrand_tester_object), | intent(in) | :: | self | Integrand. |
||
| character(len=*), | intent(in), | optional | :: | file_name | File name. |
|
| real(kind=R_P), | intent(in), | optional | :: | t | Time. |
|
| character(len=*), | intent(in), | optional | :: | scheme | Scheme used to integrate integrand. |
|
| logical, | intent(in), | optional | :: | close_file | Flag for closing file. |
|
| logical, | intent(in), | optional | :: | with_exact_solution | Flag for export also exact solution. |
|
| class(integrand_object), | intent(in), | optional | :: | U0 | Initial conditions. |
Abstract interfaces of integrand_tester_object class.
Initialize integrand.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(integrand_tester_object), | intent(inout) | :: | self | Integrand. |
||
| real(kind=R_P), | intent(in) | :: | Dt | Time step. |
Abstract interfaces of integrand_tester_object class.
Initialize from command line interface.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(integrand_tester_object), | intent(inout) | :: | self | Integrand. |
||
| type(command_line_interface), | intent(inout) | :: | cli | Command line interface handler. |
Abstract interfaces of integrand_tester_object class.
Set command line interface.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(command_line_interface), | intent(inout) | :: | cli | Command line interface handler. |
The abstract tester integrand.
| generic, public :: add_fast => integrand_add_integrand_fast | Overloading |
| procedure(assignment_integrand), public, pass(lhs) :: assign_integrand |
|
| procedure(assignment_real), public, pass(lhs) :: assign_real |
|
| generic, public :: assignment(=) => assign_integrand, assign_real | Overloading |
| procedure(description_interface), public, pass(self) :: description | Return an informative description of the test. |
| procedure(error_interface), public, pass(self) :: error | Return error. |
| procedure(exact_solution_interface), public, pass(self) :: exact_solution | Return exact solution. |
| procedure(export_tecplot_interface), public, pass(self) :: export_tecplot | Export integrand to Tecplot file. |
| procedure(initialize_interface), public, pass(self) :: initialize | Initialize integrand. |
| procedure(symmetric_operator), public, pass(lhs) :: integrand_add_integrand |
|
| procedure, public, pass(opr) :: integrand_add_integrand_fast |
|
| procedure(integrand_op_real), public, pass(lhs) :: integrand_add_real |
|
| procedure(integrand_dimension_interface), public, pass(self) :: integrand_dimension | Return integrand dimension. |
| procedure(symmetric_operator), public, pass(lhs) :: integrand_multiply_integrand |
|
| procedure, public, pass(opr) :: integrand_multiply_integrand_fast |
|
| procedure(integrand_op_real), public, pass(lhs) :: integrand_multiply_real |
|
| procedure(integrand_op_real_scalar), public, pass(lhs) :: integrand_multiply_real_scalar |
|
| procedure, public, pass(opr) :: integrand_multiply_real_scalar_fast |
|
| procedure(symmetric_operator), public, pass(lhs) :: integrand_sub_integrand |
|
| procedure(integrand_op_real), public, pass(lhs) :: integrand_sub_real |
|
| procedure, public, pass(opr) :: integrand_subtract_integrand_fast |
|
| procedure(local_error_operator), public, pass(lhs) :: local_error |
|
| generic, public :: multiply_fast => integrand_multiply_integrand_fast, integrand_multiply_real_scalar_fast | Overloading |
| generic, public :: operator(*) => integrand_multiply_integrand, integrand_multiply_real, real_multiply_integrand, integrand_multiply_real_scalar, real_scalar_multiply_integrand | Overloading |
| generic, public :: operator(+) => integrand_add_integrand, integrand_add_real, real_add_integrand | Overloading |
| generic, public :: operator(-) => integrand_sub_integrand, integrand_sub_real, real_sub_integrand | Overloading |
| generic, public :: operator(.lterror.) => local_error | Estimate local truncation error. |
| procedure(parse_cli_interface), public, pass(self) :: parse_cli | Initialize from command line interface. |
| procedure(real_op_integrand), public, pass(rhs) :: real_add_integrand |
|
| procedure(real_op_integrand), public, pass(rhs) :: real_multiply_integrand |
|
| procedure(real_scalar_op_integrand), public, pass(rhs) :: real_scalar_multiply_integrand |
|
| procedure(real_op_integrand), public, pass(rhs) :: real_sub_integrand |
|
| procedure(set_cli_interface), public, nopass :: set_cli | Set command line interface. |
| generic, public :: subtract_fast => integrand_subtract_integrand_fast | Overloading |
| procedure(time_derivative), public, pass(self) :: t | Time derivative, residuals. |
| procedure, public, pass(self) :: t_fast | Time derivative, residuals, fast mode. |