RHS_CenterSource2D Subroutine

public subroutine RHS_CenterSource2D(b, xx, yy)

2D constant wavenumber problem with a central point source A point source located at (0.5,0.5)

Arguments

Type IntentOptional Attributes Name
complex(kind=realdp), dimension(1-LAP:nx+LAP,1-LAP:ny+LAP) :: b
real(kind=realdp), dimension(1-LAP:nx+LAP,1-LAP:ny+LAP) :: xx
real(kind=realdp), dimension(1-LAP:nx+LAP,1-LAP:ny+LAP) :: yy

Called by

proc~~rhs_centersource2d~~CalledByGraph proc~rhs_centersource2d RHS_CenterSource2D program~helmholtz_2d helmholtz_2d program~helmholtz_2d->proc~rhs_centersource2d