matrix-free Helmholtz operator, for the specified coarse gird systems
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| complex(kind=realdp), | intent(inout), | dimension(1-LAP:ni+LAP,1-LAP:nj+LAP) | :: | v_in | ||
| complex(kind=realdp), | intent(inout), | dimension(1-LAP:ni+LAP,1-LAP:nj+LAP) | :: | v_out | ||
| integer, | intent(in) | :: | ni | |||
| integer, | intent(in) | :: | nj | |||
| real(kind=realdp), | intent(in) | :: | hx_c | |||
| real(kind=realdp), | intent(in) | :: | hy_c | |||
| real(kind=realdp), | intent(in), | dimension(1-LAP:ni+LAP,1-LAP:nj+LAP) | :: | kxy | ||
| real(kind=realdp), | intent(in), | dimension(1-LAP:ni+LAP,1-LAP:nj+LAP) | :: | kh2 |