xref: /petsc/src/tao/bound/impls/bqnk/bqnktr.c (revision 7b7fa87dd0d3cb8edd4c97ce1c6ac3f523d11ecd)

#include <../src/tao/bound/impls/bqnk/bqnk.h>
#include <petscksp.h>

PETSC_EXTERN PetscErrorCode TaoCreate_BQNKTR(Tao tao)
{
  PetscErrorCode ierr;

  PetscFunctionBegin;
  ierr = TaoCreate_BQNK(tao);CHKERRQ(ierr);
  tao->ops->solve = TaoSolve_BNTR;
  PetscFunctionReturn(0);
}