Module that defines a world-tube class.
The implementation is found in submodule_world_tube_implementation.f90.
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
type(wtube), | public | :: | wt | A world-tube object that can be made available by use association. |
The interface for the world-tube constructor.
The world tube being constructed.
A routine to determine whether a given element boundary is a world-tube boundary.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(wtube), | intent(in) | :: | this | The routine is called on this world-tube object. |
||
integer(kind=ip), | intent(in) | :: | n | The index of the element to check. |
||
integer(kind=ip), | intent(in) | :: | dir | The direction of the boundary within the element: -1 for left. boundary, +1 for the right boundary. |
On return, .true. if this is a world-tube boundary and .false. if it is not.
A world tube class.
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer(kind=ip), | public | :: | n | The number of elements on the grid. |
|||
type(rgf), | public | :: | win | A real grid function that contains a window function used to define the world-tube. |
|||
type(rgf), | public | :: | dwin | A real grid function that contains the radial derivative of the window function. |
|||
type(rgf), | public | :: | d2win | A real grid function that contains the second radial derivative of the window function. |
|||
type(igfb), | public | :: | boundary_info | An integer boundary grid function that contains information about whether an element boundary coincides with the world-tube. |
|||
integer(kind=ip), | public | :: | windex1 | The element index of the left boundary of the world-tube. |
|||
integer(kind=ip), | public | :: | windex2 | The element index of the right boundary of the world-tube. |
public interface init_wtube() |
procedure, public, non_overridable :: is_boundary | Routine to decide whether a given element boundary is a world-tube boundary. |