f(i_start + i - 1, j, k) = lambda(i)band(i, j, k) + (1 - lambda(i))f(i_start + i - 1, j, k) for a DIR_X vertex field; one thread per i, one block per (j, k)
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=dp), | intent(inout), | device, dimension(:, :, :) | :: | f | ||
| real(kind=dp), | intent(in), | device, dimension(:, :, :) | :: | band | ||
| real(kind=dp), | intent(in), | device, dimension(:) | :: | lambda | ||
| integer, | intent(in), | value | :: | i_start | ||
| integer, | intent(in), | value | :: | nz |