evaluate Interface
public interface evaluate
Module Procedures
private subroutine evaluate_scalar_value(expression, value)
Takes a scalar mathematical expression as input and returns the value.
Usage:
call evaluate_scalar_value('0', output)
call evaluate_scalar_value('sin(0.3*pi)*exp(-pi)', output)
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| character(len=*), | intent(in) | :: | expression |
Mathematical expression |
||
| real(kind=wp), | intent(out) | :: | value |
Parsed result |
private subroutine evaluate_scalar_field(expression, domain, value)
Evaluates a scalar-valued function of 'z' at the provided values for 'z'.
Usage:
call evaluate_scalar_value('0', input(1:n), output(1:n))
call evaluate_scalar_value('sin(pi*z)*exp(-pi*z)', input(1:n), output(1:n))
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| character(len=*), | intent(in) | :: | expression |
Function of 'z' |
||
| real(kind=wp), | intent(in), | dimension(:) | :: | domain |
Values of 'z' |
|
| real(kind=wp), | dimension(:), allocatable | :: | value |
Parsed result |
private subroutine evaluate_vector_value(expression, value)
Takes a vector mathematical expression as input and returns the value.
Usage:
call evaluate_scalar_value('[0,0,0]', output(1:3))
call evaluate_scalar_value('[sin(0.3*pi),0,cos(0,3*pi)]', output(1:3))
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| character(len=*), | intent(in) | :: | expression |
Mathematical expression |
||
| real(kind=wp), | intent(out), | dimension(3) | :: | value |
Parsed result |
private subroutine evaluate_vector_field(expression, domain, value)
Evaluates a vector-valued function of 'z' at the provided values for 'z'.
Usage:
call evaluate_scalar_value('[0,0,0]', input(1:n), output(1:3,1:n))
call evaluate_scalar_value('[sin(pi*z/2),0,cos(pi*z/2)]', input(1:n), output(1:3,1:n))
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| character(len=*), | intent(in) | :: | expression |
Function of 'z' |
||
| real(kind=wp), | intent(in), | dimension(:) | :: | domain |
Values of 'z' |
|
| real(kind=wp), | dimension(:, :), allocatable | :: | value |
Parsed result |
private subroutine evaluate_logical_value(expression, value)
Takes a scalar logical expression as input and returns the value.
Usage:
call evaluate_logical_value('F', output)
call evaluate_logical_value('T', output)
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| character(len=*), | intent(in) | :: | expression |
Character 'T' or 'F' |
||
| logical, | intent(out) | :: | value |
Parsed expression |
private subroutine evaluate_integer_value(expression, value)
Takes a scalar integer expression as input and returns the value.
Usage:
call evaluate_integer_value('10', output)
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| character(len=*), | intent(in) | :: | expression |
Numerical expression |
||
| integer, | intent(out) | :: | value |
Parsed result |