Lines Matching refs:vals
256 PetscScalar vals[5]; in StokesSetupMatBlock00() local
270 PetscCall(StokesStencilLaplacian(s, i, j, &sz, cols, vals)); in StokesSetupMatBlock00()
275 for (i = 0; i < sz; i++) vals[i] = -1.0 * vals[i]; /* dynamic viscosity coef mu=-1 */ in StokesSetupMatBlock00()
276 PetscCall(MatSetValues(s->subA[0], 1, &row, sz, cols, vals, INSERT_VALUES)); in StokesSetupMatBlock00()
287 PetscScalar vals[5]; in StokesSetupMatBlock01() local
304 PetscCall(StokesStencilGradientX(s, i, j, &sz, cols, vals)); in StokesSetupMatBlock01()
306 PetscCall(StokesStencilGradientY(s, i, j, &sz, cols, vals)); in StokesSetupMatBlock01()
308 PetscCall(MatSetValues(s->subA[1], 1, &row, sz, cols, vals, INSERT_VALUES)); in StokesSetupMatBlock01()
380 …tencilLaplacian(Stokes *s, PetscInt i, PetscInt j, PetscInt *sz, PetscInt *cols, PetscScalar *vals) in StokesStencilLaplacian() argument
392 vals[0] = -(ae + awb + asb + an); in StokesStencilLaplacian()
394 vals[1] = ae; in StokesStencilLaplacian()
396 vals[2] = an; in StokesStencilLaplacian()
400 vals[0] = as; in StokesStencilLaplacian()
402 vals[1] = -(ae + awb + as + anb); in StokesStencilLaplacian()
404 vals[2] = ae; in StokesStencilLaplacian()
408 vals[0] = aw; in StokesStencilLaplacian()
410 vals[1] = -(aeb + aw + asb + an); in StokesStencilLaplacian()
412 vals[2] = an; in StokesStencilLaplacian()
416 vals[0] = as; in StokesStencilLaplacian()
418 vals[1] = aw; in StokesStencilLaplacian()
420 vals[2] = -(aeb + aw + as + anb); in StokesStencilLaplacian()
424 vals[0] = as; in StokesStencilLaplacian()
426 vals[1] = -(ae + awb + as + an); in StokesStencilLaplacian()
428 vals[2] = ae; in StokesStencilLaplacian()
430 vals[3] = an; in StokesStencilLaplacian()
434 vals[0] = as; in StokesStencilLaplacian()
436 vals[1] = aw; in StokesStencilLaplacian()
438 vals[2] = -(aeb + aw + as + an); in StokesStencilLaplacian()
440 vals[3] = an; in StokesStencilLaplacian()
444 vals[0] = aw; in StokesStencilLaplacian()
446 vals[1] = -(ae + aw + asb + an); in StokesStencilLaplacian()
448 vals[2] = ae; in StokesStencilLaplacian()
450 vals[3] = an; in StokesStencilLaplacian()
454 vals[0] = as; in StokesStencilLaplacian()
456 vals[1] = aw; in StokesStencilLaplacian()
458 vals[2] = -(ae + aw + as + anb); in StokesStencilLaplacian()
460 vals[3] = ae; in StokesStencilLaplacian()
464 vals[0] = as; in StokesStencilLaplacian()
466 vals[1] = aw; in StokesStencilLaplacian()
468 vals[2] = -(ae + aw + as + an); in StokesStencilLaplacian()
470 vals[3] = ae; in StokesStencilLaplacian()
472 vals[4] = an; in StokesStencilLaplacian()
477 …tencilGradientX(Stokes *s, PetscInt i, PetscInt j, PetscInt *sz, PetscInt *cols, PetscScalar *vals) in StokesStencilGradientX() argument
487 vals[0] = -(ae + awb); in StokesStencilGradientX()
489 vals[1] = ae; in StokesStencilGradientX()
493 vals[0] = -(ae + awb); in StokesStencilGradientX()
495 vals[1] = ae; in StokesStencilGradientX()
499 vals[0] = aw; in StokesStencilGradientX()
501 vals[1] = -(aeb + aw); in StokesStencilGradientX()
505 vals[0] = aw; in StokesStencilGradientX()
507 vals[1] = -(aeb + aw); in StokesStencilGradientX()
511 vals[0] = -(ae + awb); in StokesStencilGradientX()
513 vals[1] = ae; in StokesStencilGradientX()
517 vals[0] = aw; in StokesStencilGradientX()
519 vals[1] = -(aeb + aw); in StokesStencilGradientX()
523 vals[0] = aw; in StokesStencilGradientX()
525 vals[1] = -(ae + aw); in StokesStencilGradientX()
527 vals[2] = ae; in StokesStencilGradientX()
531 vals[0] = aw; in StokesStencilGradientX()
533 vals[1] = -(ae + aw); in StokesStencilGradientX()
535 vals[2] = ae; in StokesStencilGradientX()
539 vals[0] = aw; in StokesStencilGradientX()
541 vals[1] = -(ae + aw); in StokesStencilGradientX()
543 vals[2] = ae; in StokesStencilGradientX()
548 …tencilGradientY(Stokes *s, PetscInt i, PetscInt j, PetscInt *sz, PetscInt *cols, PetscScalar *vals) in StokesStencilGradientY() argument
558 vals[0] = -(asb + an); in StokesStencilGradientY()
560 vals[1] = an; in StokesStencilGradientY()
564 vals[0] = as; in StokesStencilGradientY()
566 vals[1] = -(as + anb); in StokesStencilGradientY()
570 vals[0] = -(asb + an); in StokesStencilGradientY()
572 vals[1] = an; in StokesStencilGradientY()
576 vals[0] = as; in StokesStencilGradientY()
578 vals[1] = -(as + anb); in StokesStencilGradientY()
582 vals[0] = as; in StokesStencilGradientY()
584 vals[1] = -(as + an); in StokesStencilGradientY()
586 vals[2] = an; in StokesStencilGradientY()
590 vals[0] = as; in StokesStencilGradientY()
592 vals[1] = -(as + an); in StokesStencilGradientY()
594 vals[2] = an; in StokesStencilGradientY()
598 vals[0] = -(asb + an); in StokesStencilGradientY()
600 vals[1] = an; in StokesStencilGradientY()
604 vals[0] = as; in StokesStencilGradientY()
606 vals[1] = -(as + anb); in StokesStencilGradientY()
610 vals[0] = as; in StokesStencilGradientY()
612 vals[1] = -(as + an); in StokesStencilGradientY()
614 vals[2] = an; in StokesStencilGradientY()