Skip to main content

GetVelocityDirichletBCPointer

This routine returns the pointer to Dirichlet boundary condition of Velocity field in AbstractSteadyStokes_ kernel, that is obj%DBCForVelocity(dbcNo)%ptr.

  • After obtaining the Dirichlet boundary condition pointer, user can set the boundary condition
  • dbcNo should be lesser than total dirichlet boundary condition.

Interface​

INTERFACE
  MODULE FUNCTION getVelocityDirichletBCPointer(obj, dbcNo) RESULT(ans)
    CLASS(AbstractSteadyStokes_), INTENT(INOUT) :: obj
    INTEGER(I4B), INTENT(IN) :: dbcNo
    !! Dirichlet boundary nunber
    CLASS(DirichletBC_), POINTER :: ans
  END FUNCTION getVelocityDirichletBCPointer
END INTERFACE

Example​