wavenumber_k_Wedge Subroutine

public subroutine wavenumber_k_Wedge(xx, yy)

Wavenumber for Wedge model problem The top layer The bottom layer The middle layer

Arguments

Type IntentOptional Attributes Name
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

Calls

proc~~wavenumber_k_wedge~~CallsGraph proc~wavenumber_k_wedge wavenumber_k_Wedge proc~mg_checkreal_xy2d mg_checkreal_xy2d proc~wavenumber_k_wedge->proc~mg_checkreal_xy2d proc~mg_checkreal_x2d mg_checkreal_x2d proc~mg_checkreal_xy2d->proc~mg_checkreal_x2d proc~mg_checkreal_y2d mg_checkreal_y2d proc~mg_checkreal_xy2d->proc~mg_checkreal_y2d mpi_sendrecv mpi_sendrecv proc~mg_checkreal_x2d->mpi_sendrecv proc~mg_checkreal_y2d->mpi_sendrecv

Called by

proc~~wavenumber_k_wedge~~CalledByGraph proc~wavenumber_k_wedge wavenumber_k_Wedge program~helmholtz_2d helmholtz_2d program~helmholtz_2d->proc~wavenumber_k_wedge