Home
last modified time | relevance | path

Searched refs:cdiv3 (Results 1 – 4 of 4) sorted by relevance

/petsc/src/tao/unconstrained/tutorials/
H A Deptorsion2f.F90117 PetscReal zero, p5, area, cdiv3
129 cdiv3 = param/3.0
190 val = -dvdx/hx - dvdy/hy - cdiv3
195 val = dvdx/hx - cdiv3
200 val = dvdy/hy - cdiv3
204 flin = flin - cdiv3*(v + vr + vt)
223 val = -dvdy/hy - cdiv3
228 val = -dvdx/hx - cdiv3
233 val = dvdx/hx + dvdy/hy - cdiv3
237 flin = flin - cdiv3*(vb + vl + v)
H A Deptorsion2.c203 PetscReal three = 3.0, zero = 0.0, *x, floc, cdiv3 = user->param / three; in FormFunctionGradient() local
257 val = -dvdx / hx - dvdy / hy - cdiv3; in FormFunctionGradient()
262 val = dvdx / hx - cdiv3; in FormFunctionGradient()
267 val = dvdy / hy - cdiv3; in FormFunctionGradient()
271 flin -= cdiv3 * (v + vr + vt); in FormFunctionGradient()
289 val = -dvdy / hy - cdiv3; in FormFunctionGradient()
294 val = -dvdx / hx - cdiv3; in FormFunctionGradient()
299 val = dvdx / hx + dvdy / hy - cdiv3; in FormFunctionGradient()
303 flin -= cdiv3 * (vb + vl + v); in FormFunctionGradient()
H A Deptorsion3.c262 PetscReal v, cdiv3 = user->param / three; in FormFunction() local
283 flin -= cdiv3 * (v + vr + vt); in FormFunction()
300 flin = flin - cdiv3 * (vb + vl + v); in FormFunction()
334 PetscReal v, cdiv3 = user->param / three; in FormGradient() local
358 val = -dvdx / hx - dvdy / hy - cdiv3; in FormGradient()
363 val = dvdx / hx - cdiv3; in FormGradient()
368 val = dvdy / hy - cdiv3; in FormGradient()
388 val = -dvdy / hy - cdiv3; in FormGradient()
393 val = -dvdx / hx - cdiv3; in FormGradient()
398 val = dvdx / hx + dvdy / hy - cdiv3; in FormGradient()
H A Deptorsion1.c246 PetscReal v, cdiv3 = user->param / three; in FormFunction() local
267 flin -= cdiv3 * (v + vr + vt); in FormFunction()
284 flin = flin - cdiv3 * (vb + vl + v); in FormFunction()
318 PetscReal v, cdiv3 = user->param / three; in FormGradient() local
342 val = -dvdx / hx - dvdy / hy - cdiv3; in FormGradient()
347 val = dvdx / hx - cdiv3; in FormGradient()
352 val = dvdy / hy - cdiv3; in FormGradient()
372 val = -dvdy / hy - cdiv3; in FormGradient()
377 val = -dvdx / hx - cdiv3; in FormGradient()
382 val = dvdx / hx + dvdy / hy - cdiv3; in FormGradient()