impls/neldermead/neldermead.c

6   PetscReal *values  = nm->f_values;
28   nm->f_values[index] = f;
47   PetscCall(PetscMalloc1(nm->N + 1, &nm->f_values));
72   PetscCall(PetscFree(nm->f_values));
132   PetscCall(TaoComputeObjective(tao, nm->simplex[0], &nm->f_values[0]));
143     PetscCall(TaoComputeObjective(tao, nm->simplex[i], &nm->f_values[i]));
159     PetscCall(TaoLogConvergenceHistory(tao, nm->f_values[nm->indices[0]], nm->f_values[nm->indices[nm->N]] - nm->f_values[nm->indices[0]], 0.0, tao->ksp_its));
160     PetscCall(TaoMonitor(tao, tao->niter, nm->f_values[nm->indices[0]], nm->f_values[nm->indices[nm->N]] - nm->f_values[nm->indices[0]], 0.0, 1.0));
168     if (nm->f_values[nm->indices[0]] <= fr && fr < nm->f_values[nm->indices[nm->N - 1]]) {
173     } else if (fr < nm->f_values[nm->indices[0]]) {
184     } else if (nm->f_values[nm->indices[nm->N - 1]] <= fr && fr < nm->f_values[nm->indices[nm->N]]) {
199       if (fc < nm->f_values[nm->indices[nm->N]]) PetscCall(NelderMeadReplace(nm, nm->indices[nm->N], Xmuc, fc));
209         PetscCall(TaoComputeObjective(tao, nm->simplex[nm->indices[i]], &nm->f_values[nm->indices[i]]));