Searched refs:nd_y (Results 1 – 1 of 1) sorted by relevance
3760 PetscReal f, grad[3], n[3], norm, norm_y[3], nd, nd_y[3], sign; in TPSNearestPointResJac() local3792 …for (PetscInt i = 0; i < 3; i++) nd_y[i] = n[i] + n_y[0][i] * d[0] + n_y[1][i] * d[1] + n_y[2][i] … in TPSNearestPointResJac()3800 J[1 + j * 3] = (j == 1) * 1. - 2 * (n_y[1][j] * nd + n[1] * nd_y[j]); in TPSNearestPointResJac()3801 J[2 + j * 3] = (j == 2) * 1. - 2 * (n_y[2][j] * nd + n[2] * nd_y[j]); in TPSNearestPointResJac()