This routine builds the quadblock at one particular grid point in the Gaussian
grid and for one particular Gaussian weight.
For a 2x2 block at index in the top-left block we have
as index of the bottom-right corner of the 2x2 block. The other
corners are then filled by subtracting one from an index.
Arguments
| Type | Intent | Optional | Attributes | | Name | |
|---|
| complex(kind=dp), |
intent(inout) |
| | :: |
quadblock(:,:) | |
| type(matrix_elements_t), |
intent(in) |
| | :: |
elements | |
| real(kind=dp), |
intent(in) |
| | :: |
x | |
| real(kind=dp), |
intent(in) |
| | :: |
x0 | |
| real(kind=dp), |
intent(in) |
| | :: |
x1 | |
| real(kind=dp), |
intent(in) |
| | :: |
weight | |
| type(dims_t), |
intent(in) |
| | :: |
dims | |