GetPressureNeumannBCPointer
This routine returns the pointer to Neumann boundary condition of pressure field in AbstractSTDBE_ kernel, that is obj%NBCForPressure(nbcNo)%ptr
.
- After obtaining the Neumann boundary condition pointer, user can set the boundary condition
nbcNo
should be lesser than total Neumann boundary condition
INTERFACE
MODULE FUNCTION STDBE_GetPressureNeumannBCPointer(obj, nbcNo) RESULT(ans)
CLASS(AbstractSTDBE_), INTENT(INOUT) :: obj
INTEGER(I4B), INTENT(IN) :: nbcNo
!! Neumann boundary nunber
CLASS(NeumannBC_), POINTER :: ans
END FUNCTION STDBE_GetPressureNeumannBCPointer
END INTERFACE