Dirichlet Subroutine

public subroutine Dirichlet(ap, an, as, aw, ae, i, j, ni, nj, hx_c, hy_c)

Dirichlet, ap=h^2, which will devided by h^2 in the rountine of the operator When use this Dirichlet, you have to be carefull with the RHS respectively

Arguments

Type IntentOptional Attributes Name
complex(kind=realdp) :: ap
real(kind=realdp) :: an
real(kind=realdp) :: as
real(kind=realdp) :: aw
real(kind=realdp) :: ae
integer, intent(in) :: i
integer, intent(in) :: j
integer, intent(in) :: ni
integer, intent(in) :: nj
real(kind=realdp), intent(in) :: hx_c
real(kind=realdp), intent(in) :: hy_c

Called by

proc~~dirichlet~~CalledByGraph proc~dirichlet Dirichlet proc~if_bcs if_BCs proc~if_bcs->proc~dirichlet proc~cslp_op_bc CSLP_OP_BC proc~cslp_op_bc->proc~if_bcs proc~damp_jacobi_smoother Damp_Jacobi_smoother proc~damp_jacobi_smoother->proc~if_bcs proc~helmholtz2d_bc Helmholtz2d_BC proc~helmholtz2d_bc->proc~if_bcs proc~helmholtz2d_bc_mg Helmholtz2d_BC_mg proc~helmholtz2d_bc_mg->proc~if_bcs proc~arnoldi arnoldi proc~arnoldi->proc~helmholtz2d_bc proc~cmatvec cmatvec proc~cmatvec->proc~helmholtz2d_bc proc~f_cycle F_cycle proc~f_cycle->proc~cslp_op_bc proc~f_cycle->proc~damp_jacobi_smoother proc~f_cycle->proc~f_cycle proc~mg_bicgstab mg_bicgstab proc~f_cycle->proc~mg_bicgstab proc~mg_fullgmres mg_fullgmres proc~f_cycle->proc~mg_fullgmres proc~v_cycle V_cycle proc~f_cycle->proc~v_cycle proc~full_pgcr full_pgcr proc~full_pgcr->proc~helmholtz2d_bc proc~precond_x Precond_x proc~full_pgcr->proc~precond_x proc~full_pgmres full_pgmres proc~full_pgmres->proc~helmholtz2d_bc proc~full_pgmres->proc~precond_x proc~fullgmres fullgmres proc~fullgmres->proc~helmholtz2d_bc proc~fullgmres->proc~arnoldi proc~helm_a2hx Helm_A2hx proc~helm_a2hx->proc~helmholtz2d_bc_mg proc~helm_ahx Helm_Ahx proc~helm_ahx->proc~helmholtz2d_bc_mg proc~mg_arnoldi mg_arnoldi proc~mg_arnoldi->proc~cslp_op_bc proc~mg_bicgstab->proc~cslp_op_bc proc~mg_fullgmres->proc~cslp_op_bc proc~mg_fullgmres->proc~mg_arnoldi proc~pfgmres pfgmres proc~pfgmres->proc~helmholtz2d_bc proc~pfgmres->proc~precond_x proc~pre_fullgmres Pre_fullgmres proc~pre_fullgmres->proc~helmholtz2d_bc proc~prearnoldi Prearnoldi proc~pre_fullgmres->proc~prearnoldi proc~pre_fullgmres->proc~precond_x proc~pre_restartgmres Pre_restartgmres proc~pre_restartgmres->proc~helmholtz2d_bc proc~pre_restartgmres->proc~prearnoldi proc~pre_restartgmres->proc~precond_x proc~prearnoldi->proc~helmholtz2d_bc proc~prearnoldi->proc~precond_x proc~restartgmres restartgmres proc~restartgmres->proc~helmholtz2d_bc proc~restartgmres->proc~arnoldi proc~v_cycle->proc~cslp_op_bc proc~v_cycle->proc~damp_jacobi_smoother proc~v_cycle->proc~mg_bicgstab proc~v_cycle->proc~mg_fullgmres proc~v_cycle->proc~v_cycle interface~operator(ASTERISK) OPERATOR(*) interface~operator(ASTERISK)->proc~cmatvec proc~ex Ex proc~ex->proc~helm_a2hx proc~ex->proc~helm_ahx proc~mgcslp_invmhx MGCSLP_invMHx proc~ex->proc~mgcslp_invmhx proc~mgcslp_invmhx->proc~f_cycle proc~mgcslp_invmhx->proc~v_cycle proc~mgcslp_invmx MGCSLP_invMx proc~mgcslp_invmx->proc~f_cycle proc~mgcslp_invmx->proc~v_cycle proc~p_adef1x P_ADEF1x proc~p_adef1x->proc~helm_ahx proc~p_adef1x->proc~mgcslp_invmx proc~qx Qx proc~p_adef1x->proc~qx proc~p_defx P_DEFx proc~p_defx->proc~helm_ahx proc~p_defx->proc~qx proc~p_tlkmx P_TLKMx proc~p_tlkmx->proc~helm_ahx proc~p_tlkmx->proc~mgcslp_invmx proc~p_tlkmx->proc~qx proc~px Px proc~px->proc~helm_ahx proc~px->proc~qx program~helmholtz_2d helmholtz_2d program~helmholtz_2d->proc~full_pgcr program~helmholtz_2d->proc~full_pgmres program~helmholtz_2d->proc~fullgmres program~helmholtz_2d->proc~pfgmres program~helmholtz_2d->proc~pre_fullgmres program~helmholtz_2d->proc~pre_restartgmres program~helmholtz_2d->proc~restartgmres proc~cprecon cprecon proc~cprecon->proc~mgcslp_invmx proc~def_arnoldi def_arnoldi proc~def_arnoldi->proc~ex proc~def_arnoldi->proc~mgcslp_invmhx proc~def_bicgstab DEF_bicgstab proc~def_bicgstab->proc~ex proc~def_bicgstab->proc~mgcslp_invmhx proc~def_fullgmres DEF_fullgmres proc~def_fullgmres->proc~ex proc~def_fullgmres->proc~mgcslp_invmhx proc~def_fullgmres->proc~def_arnoldi proc~def_px DEF_Px proc~def_px->proc~p_adef1x proc~def_px->proc~p_defx proc~def_px->proc~p_tlkmx proc~multileveladp_px MultiLevelADP_Px proc~def_px->proc~multileveladp_px proc~multileveladp_px->proc~mgcslp_invmhx proc~multilevel_invey MultiLevel_invEy proc~multileveladp_px->proc~multilevel_invey proc~precond_x->proc~mgcslp_invmx proc~precond_x->proc~def_px interface~operator(SLASH) OPERATOR(/) interface~operator(SLASH)->proc~cprecon proc~def_prefgmres DEF_prefgmres proc~def_prefgmres->proc~multileveladp_px proc~invey invEy proc~invey->proc~def_bicgstab proc~invey->proc~def_fullgmres proc~multilevel_invey->proc~def_prefgmres proc~qx->proc~invey