29   TaoLineSearch_GPCG *neP = (TaoLineSearch_GPCG *)ls->data;  in TaoLineSearchApply_GPCG()  local
48   if (!neP->W2) {  in TaoLineSearchApply_GPCG()
49     PetscCall(VecDuplicate(x, &neP->W2));  in TaoLineSearchApply_GPCG()
50     PetscCall(VecDuplicate(x, &neP->W1));  in TaoLineSearchApply_GPCG()
51     PetscCall(VecDuplicate(x, &neP->Gold));  in TaoLineSearchApply_GPCG()
52     neP->x = x;  in TaoLineSearchApply_GPCG()
53     PetscCall(PetscObjectReference((PetscObject)neP->x));  in TaoLineSearchApply_GPCG()
54   } else if (x != neP->x) {  in TaoLineSearchApply_GPCG()
55     PetscCall(VecDestroy(&neP->x));  in TaoLineSearchApply_GPCG()
56     PetscCall(VecDestroy(&neP->W1));  in TaoLineSearchApply_GPCG()
57     PetscCall(VecDestroy(&neP->W2));  in TaoLineSearchApply_GPCG()
58     PetscCall(VecDestroy(&neP->Gold));  in TaoLineSearchApply_GPCG()
59     PetscCall(VecDuplicate(x, &neP->W1));  in TaoLineSearchApply_GPCG()
60     PetscCall(VecDuplicate(x, &neP->W2));  in TaoLineSearchApply_GPCG()
61     PetscCall(VecDuplicate(x, &neP->Gold));  in TaoLineSearchApply_GPCG()
62     PetscCall(PetscObjectDereference((PetscObject)neP->x));  in TaoLineSearchApply_GPCG()
63     neP->x = x;  in TaoLineSearchApply_GPCG()
64     PetscCall(PetscObjectReference((PetscObject)neP->x));  in TaoLineSearchApply_GPCG()
73   PetscCall(VecCopy(x, neP->W2));  in TaoLineSearchApply_GPCG()
74   PetscCall(VecCopy(g, neP->Gold));  in TaoLineSearchApply_GPCG()
96     PetscCall(VecWAXPY(neP->W2, ls->step, s, x));  in TaoLineSearchApply_GPCG()
99       PetscCall(VecMedian(neP->W2, ls->lower, ls->upper, neP->W2));  in TaoLineSearchApply_GPCG()
107       PetscCall(TaoLineSearchComputeObjective(ls, neP->W2, f));  in TaoLineSearchApply_GPCG()
110       PetscCall(TaoLineSearchComputeObjectiveAndGTS(ls, neP->W2, f, &gdx));  in TaoLineSearchApply_GPCG()
113       PetscCall(TaoLineSearchComputeObjectiveAndGradient(ls, neP->W2, f, g));  in TaoLineSearchApply_GPCG()
123     PetscCall(VecWAXPY(neP->W1, -1.0, x, neP->W2)); /* W1 = W2 - X */  in TaoLineSearchApply_GPCG()
124     PetscCall(VecDot(neP->W1, neP->Gold, &prered));  in TaoLineSearchApply_GPCG()
166     if (neP->bracket && (ls->stepmax - ls->stepmin <= ls->rtol * ls->stepmax)) {  in TaoLineSearchApply_GPCG()
174   PetscCall(VecCopy(neP->W2, x));  in TaoLineSearchApply_GPCG()
190   TaoLineSearch_GPCG *neP;  in TaoLineSearchCreate_GPCG()  local
202   PetscCall(PetscNew(&neP));  in TaoLineSearchCreate_GPCG()
203   neP->bracket = 0;  in TaoLineSearchCreate_GPCG()
204   neP->infoc   = 1;  in TaoLineSearchCreate_GPCG()
205   ls->data     = (void *)neP;  in TaoLineSearchCreate_GPCG()