Defines a Heaviside function, including Gibbs oscillations.

Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|

real(kind=rk), | public | :: | center | The location of the jump |
|||

integer, | public | :: | order | Approximation order |
|||

real(kind=rk), | public | :: | left | Asymptotic function value left of the jump |
|||

real(kind=rk), | public | :: | right | Asymptotic function value right of the jump |

Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|

type(tem_heaviside_gibbs_type) | :: | me | Description of the Heaviside function |
|||

real(kind=rk), | intent(in) | :: | coord(n,3) | Coordinates to evaluate the function for 1st index goes over number of elements and 2nd index goes over x,y,z coordinates |
||

integer, | intent(in) | :: | n | number of return values |

return value of the function

Calculate sine integral of xvalue. AUTHOR: Allan MacLeod Dept. of Mathematics and Statistics University of Paisley Scotland (e-mail: macl_ms0@paisley.ac.uk)

Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|

real(kind=rk), | intent(in) | :: | xvalue |

This subroutine loads the definition of a spatial Heaviside function including Gibbs oscillations occuring for a high order approximation.

Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|

type(flu_State) | :: | conf | lua state type |
|||

integer, | intent(in) | :: | thandle | aotus parent handle |
||

type(tem_heaviside_gibbs_type), | intent(out) | :: | me | Heaviside function data |