Home
last modified time | relevance | path

Searched refs:zr (Results 1 – 6 of 6) sorted by relevance

/petsc/src/mat/tests/
H A Dex221.c184 IS zr; in main() local
198 PetscCall(ISCreateGeneral(PETSC_COMM_WORLD, nr, idxs, PETSC_OWN_POINTER, &zr)); in main()
199 PetscCall(PetscObjectSetName((PetscObject)zr, "ZR")); in main()
200 PetscCall(ISViewFromOptions(zr, NULL, "-view_is")); in main()
217 PetscCall(MatZeroRowsIS(A, zr, diag, x, b1)); in main()
218 PetscCall(MatZeroRowsIS(S, zr, diag, x, b2)); in main()
220 PetscCall(MatZeroRowsColumnsIS(A, zr, diag, x, b1)); in main()
221 PetscCall(MatZeroRowsColumnsIS(S, zr, diag, x, b2)); in main()
222 PetscCall(ISDestroy(&zr)); in main()
236 PetscCall(ISCreateGeneral(PETSC_COMM_WORLD, nr, idxs, PETSC_OWN_POINTER, &zr)); in main()
[all …]
/petsc/src/ts/tutorials/
H A Dex11.h416 static PetscScalar cl, cr, wl, zl, wr, zr, pst, durl, skpr1, skpr2; in riem1mdt() local
484 zr = *rstarr * cstarr; in riem1mdt()
485 dpstar = zl * zr * (ustarr - ustarl) / (zl + zr); in riem1mdt()
506 zr = *rstarr * cstarr; in riem1mdt()
508 dpstar = zl * zr * (ustarr - ustarl) / (zl + zr); in riem1mdt()
527 …zr = *pr / cr * PetscSqrtScalar(*gamr * 2. * (*gamr - 1. + (*gamr + 1.) * pst)) * (*gamr - 1. … in riem1mdt()
528 dpstar = zl * zr * (ustarr - ustarl) / (zl + zr); in riem1mdt()
550 …zr = *pr / cr * PetscSqrtScalar(*gamr * 2. * (*gamr - 1. + (*gamr + 1.) * pst)) * (*gamr - 1.… in riem1mdt()
551 dpstar = zl * zr * (ustarr - ustarl) / (zl + zr); in riem1mdt()
562 *ustar = (zl * ustarr + zr * ustarl) / (zl + zr); in riem1mdt()
/petsc/src/snes/tutorials/network/power/
H A Dpower.h85 PetscScalar zr; /* Complex machine impedance ZSOURCE in pu on mbase */ member
/petsc/src/mat/impls/is/
H A Dmatis.c2988 IS zr, zc; in MatAssemblyEnd_IS() local
2992 PetscCall(ISComplement(nzr, 0, nr, &zr)); in MatAssemblyEnd_IS()
2997 PetscCall(ISGetIndices(zr, &zridxs)); in MatAssemblyEnd_IS()
2999 PetscCall(ISGetLocalSize(zr, &nnzr)); in MatAssemblyEnd_IS()
3009 PetscCall(ISRestoreIndices(zr, &zridxs)); in MatAssemblyEnd_IS()
3015 PetscCall(ISDestroy(&zr)); in MatAssemblyEnd_IS()
/petsc/src/tao/pde_constrained/tutorials/
H A Delliptic.c563 …PetscScalar zr[64] = {0.7668, 0.8573, 0.2654, 0.2719, 0.1060, 0.1311, 0.6232, 0.2295, 0.8009, 0.21… in EllipticInitialize() local
1096 zri = zr[i]; in EllipticInitialize()
H A Dparabolic.c676 …PetscScalar zr[64] = {0.7668, 0.8573, 0.2654, 0.2719, 0.1060, 0.1311, 0.6232, 0.2295, 0.8009, 0.21… in ParabolicInitialize() local
1114 zri = zr[i]; in ParabolicInitialize()