Actual source code: bqnkls.c

petsc-3.10.5 2019-03-28
Report Typos and Errors
  1:  #include <../src/tao/bound/impls/bqnk/bqnk.h>

  3: PETSC_EXTERN PetscErrorCode TaoCreate_BQNKLS(Tao tao)
  4: {
  5:   TAO_BNK        *bnk;
  7: 
  9:   TaoCreate_BQNK(tao);
 10:   tao->ops->solve = TaoSolve_BNLS;
 11:   bnk = (TAO_BNK*)tao->data;
 12:   bnk->update_type = BNK_UPDATE_STEP;
 13:   return(0);
 14: }