| /petsc/src/mat/tests/ |
| H A D | ex219f.F90 | 7 PetscInt :: n, m, idxm(1), idxn(1), nl1, nl2, zero, one, i
14 zero = 0
18 …M_WORLD, PETSC_DECIDE, PETSC_DECIDE, n, m, one, PETSC_NULL_INTEGER_ARRAY, zero, PETSC_NULL_INTEGER…
52 PetscCallA(MatGetValuesLocal(A, one, [zero], one, [zero], value, ierr))
53 PetscCallA(MatGetValuesLocal(A, one, [zero], one, [zero], values, ierr))
55 PetscCallA(MatGetValuesLocal(A, one, idxn, one, [zero], values, ierr))
|
| H A D | ex36.c | 5 PetscErrorCode SetValues(Mat A, PetscBool zero, PetscBool insertvals) in SetValues() argument
14 v = zero ? 0.0 : 10.0 * i + j + 1; in SetValues()
46 PetscBool zero = PETSC_FALSE, ignorezero = PETSC_FALSE, insertvals = PETSC_FALSE; in main() local
50 PetscCall(PetscOptionsGetBool(NULL, NULL, "-zero", &zero, NULL)); in main()
63 PetscCall(SetValues(T, zero, insertvals)); in main()
73 PetscCall(SetValues(A, zero, insertvals)); in main()
83 PetscCall(SetValues(A, zero, insertvals)); in main()
|
| H A D | ex212f.F90 | 14 PetscInt one, zero, rend
18 zero = 0
33 PetscCallA(MatNullSpaceCreate(PETSC_COMM_WORLD, PETSC_TRUE, zero, PETSC_NULL_VEC_ARRAY, sp, ierr))
40 PetscCallA(MatSetValues(C, one, [zero], one, [zero], [sone], INSERT_VALUES, ierr))
47 PetscCallA(VecSetValues(x, one, [zero], [sone], INSERT_VALUES, ierr))
|
| H A D | ex227.c | 10 PetscInt zero = 0; in main() local
19 PetscCall(MatSetValues(mat, 1, &zero, 1, &zero, &value, INSERT_VALUES)); in main()
|
| /petsc/src/sys/tests/ |
| H A D | ex34.c | 5 PETSC_INTERN PetscReal zero; variable
6 PetscReal zero = 0; variable
18 PetscReal neg_inf = neg_one / zero; /* -inf */ in main()
19 PetscReal pos_inf = pos_one / zero; /* +inf */ in main()
20 …PetscReal x_nan = zero2 / zero; /* NaN */ /* some compilers may optimize out zero/zero and set… in main()
|
| H A D | ex39.c | 5 PETSC_INTERN PetscReal zero; variable
6 PetscReal zero = 0; variable
19 PetscReal neg_inf = neg_one / zero; /* -inf */ in main()
20 PetscReal pos_inf = pos_one / zero; /* +inf */ in main()
21 …PetscReal x_nan = zero2 / zero; /* NaN */ /* some compilers may optimize out zero/zero and set… in main()
|
| /petsc/src/tao/unconstrained/tutorials/ |
| H A D | eptorsion3.c | 261 PetscReal zero = 0.0, vb, vl, vr, vt, dvdx, dvdy, flin = 0.0, fquad = 0.0; in FormFunction() local
274 v = zero; in FormFunction()
275 vr = zero; in FormFunction()
276 vt = zero; in FormFunction()
291 vb = zero; in FormFunction()
292 vl = zero; in FormFunction()
293 v = zero; in FormFunction()
330 PetscReal zero = 0.0, p5 = 0.5, three = 3.0, area, val; in FormGradient() local
339 PetscCall(VecSet(G, zero)); in FormGradient()
348 v = zero; in FormGradient()
[all …]
|
| H A D | eptorsion1.c | 245 PetscReal zero = 0.0, vb, vl, vr, vt, dvdx, dvdy, flin = 0.0, fquad = 0.0; in FormFunction() local
258 v = zero; in FormFunction()
259 vr = zero; in FormFunction()
260 vt = zero; in FormFunction()
275 vb = zero; in FormFunction()
276 vl = zero; in FormFunction()
277 v = zero; in FormFunction()
314 PetscReal zero = 0.0, p5 = 0.5, three = 3.0, area, val; in FormGradient() local
323 PetscCall(VecSet(G, zero)); in FormGradient()
332 v = zero; in FormGradient()
[all …]
|
| /petsc/src/ksp/ksp/tests/ |
| H A D | ex47.c | 11 IS zero, one; in main() local
29 PetscCall(ISCreateStride(comm, 2, 0, 1, &zero)); in main()
32 PetscCall(PetscObjectCompose((PetscObject)zero, "nullspace", (PetscObject)nullsp)); in main()
38 PetscCall(PCFieldSplitSetIS(pc, "0", zero)); in main()
43 PetscCall(ISDestroy(&zero)); in main()
|
| /petsc/src/snes/tests/ |
| H A D | ex21f.F90 | 50 PetscInt one, zero, two
55 zero = 0
58 val = 2.0; PetscCallA(MatSetValues(user%A, one, [zero], one, [zero], [val], INSERT_VALUES, ierr))
59 val = -1.0; PetscCallA(MatSetValues(user%A, one, [zero], one, [one], [val], INSERT_VALUES, ierr))
60 val = -1.0; PetscCallA(MatSetValues(user%A, one, [one], one, [zero], [val], INSERT_VALUES, ierr))
|
| /petsc/src/ts/event/tests/output/ |
| H A D | ex16_1.out | 1 [0] TSEvent: iter 0 - Event 0 zero crossing located at time 1.1 (tol=1e-06)
3 [0] TSEvent: iter 0 - Event 1 zero crossing located at time 1.2 (tol=1e-06)
5 [0] TSEvent: iter 0 - Event 2 zero crossing located at time 1.3 (tol=1e-06)
|
| H A D | ex16_2.out | 2 [0] TSEvent: iter 1 - Event 0 zero crossing located at time 1.1 (tol=1e-06)
4 [0] TSEvent: iter 0 - Event 1 zero crossing located at time 1.2 (tol=1e-06)
7 [0] TSEvent: iter 1 - Event 2 zero crossing located at time 1.3 (tol=1e-06)
|
| /petsc/src/sys/tutorials/ |
| H A D | ex4f90.F90 | 12 PetscMPIInt rank, size, zero, two
21 zero = 0
24 PetscCallMPIA(MPI_Comm_split(MPI_COMM_WORLD, mod(rank, two), zero, PETSC_COMM_WORLD, ierr))
|
| H A D | ex4f.F90 | 11 PetscMPIInt rank, size, grank, zero, two
22 zero = 0
25 PetscCallMPIA(MPI_Comm_split(MPI_COMM_WORLD, mod(rank, two), zero, PETSC_COMM_WORLD, ierr))
|
| /petsc/src/ksp/ksp/tutorials/ |
| H A D | ex89f.F90 | 15 PetscInt :: zero
27 zero = 0
34 PetscCallA(PetscShmgetAllocateArrayInt(zero, n + 1, rowptr, ierr))
35 PetscCallA(PetscShmgetAllocateArrayInt(zero, nz, colind, ierr))
36 PetscCallA(PetscShmgetAllocateArrayScalar(zero, nz, a, ierr))
|
| /petsc/src/sys/classes/draw/tests/ |
| H A D | ex4f.F90 | 15 PetscReal zero, one, value, max
22 zero = 0
27 PetscCall(PetscDrawLine(draw, zero, value, one, value, i, ierr))
|
| /petsc/src/dm/impls/plex/tutorials/ |
| H A D | dmplexgetrestoreclosureindices.F90 | 19 PetscInt, parameter :: sharedNodes = 3, zero = 0
36 PetscCallA(DMPlexGetHeightStratum(dm, zero, cStart, cEnd, ierr))
38 allocate (offsets(Nf + 1), source=zero)
46 …PetscCheckA(size(offsets) == (Nf + 1) .and. offsets(1) == zero, PETSC_COMM_WORLD, PETSC_ERR_PLIB, …
|
| /petsc/src/vec/is/ao/tests/ |
| H A D | ex4f.F90 | 14 PetscInt one, zero
18 zero = 0
41 PetscCallA(ISCreateStride(PETSC_COMM_WORLD, one, zero, one, is, ierr))
|
| /petsc/src/ksp/ksp/tutorials/output/ |
| H A D | ex62_gasm_view.out | 5 maximum iterations=10000, initial guess is zero
28 maximum iterations=10000, initial guess is zero
39 maximum iterations=10000, initial guess is zero
47 tolerance for zero pivot 2.22045e-14
79 maximum iterations=10000, initial guess is zero
90 maximum iterations=10000, initial guess is zero
98 tolerance for zero pivot 2.22045e-14
130 maximum iterations=10000, initial guess is zero
141 maximum iterations=10000, initial guess is zero
149 tolerance for zero pivot 2.22045e-14
[all …]
|
| H A D | ex27_4f.out | 6 maximum iterations=10000, initial guess is zero
20 maximum iterations=10000, initial guess is zero
34 maximum iterations=10000, initial guess is zero
48 maximum iterations=10000, initial guess is zero
67 maximum iterations=10000, initial guess is zero
74 tolerance for zero pivot 2.22045e-14
93 maximum iterations=10000, initial guess is zero
100 tolerance for zero pivot 2.22045e-14
|
| H A D | ex2_redundant.out | 5 maximum iterations=10000, initial guess is zero
14 maximum iterations=10000, initial guess is zero
23 maximum iterations=10000, initial guess is zero
32 maximum iterations=10000, initial guess is zero
41 maximum iterations=10000, initial guess is zero
50 maximum iterations=10000, initial guess is zero
57 tolerance for zero pivot 2.22045e-14
|
| /petsc/src/ksp/pc/tests/output/ |
| H A D | ex9f_1.out | 3 maximum iterations=10000, initial guess is zero
12 tolerance for zero pivot 2.22045e-14
26 maximum iterations=10000, initial guess is zero
37 maximum iterations=10000, initial guess is zero
45 tolerance for zero pivot 2.22045e-14
65 maximum iterations=10000, initial guess is zero
73 tolerance for zero pivot 2.22045e-14
|
| /petsc/src/vec/vec/tutorials/ |
| H A D | ex11f90.F90 | 14 PetscInt, parameter :: zero = 0, one = 1, two = 2
63 PetscCallA(VecStrideNorm(x, zero, NORM_2, norm, ierr))
67 PetscCallA(VecStrideNorm(x, zero, NORM_1, norm, ierr))
71 PetscCallA(VecStrideNorm(x, zero, NORM_INFINITY, norm, ierr))
|
| /petsc/src/ksp/ksp/tests/output/ |
| H A D | ex57_1.out | 7 maximum iterations=10000, initial guess is zero
18 maximum iterations=10000, initial guess is zero
26 tolerance for zero pivot 2.22045e-14
46 maximum iterations=10000, initial guess is zero
54 tolerance for zero pivot 2.22045e-14
74 maximum iterations=10000, initial guess is zero
82 tolerance for zero pivot 2.22045e-14
|
| /petsc/src/snes/tutorials/output/ |
| H A D | ex19_10.out | 50 maximum iterations=10000, initial guess is zero
61 maximum iterations=10000, initial guess is zero
72 maximum iterations=10000, initial guess is zero
80 tolerance for zero pivot 2.22045e-14
107 maximum iterations=10000, initial guess is zero
118 maximum iterations=10000, initial guess is zero
126 tolerance for zero pivot 2.22045e-14
153 maximum iterations=10000, initial guess is zero
164 maximum iterations=10000, initial guess is zero
172 tolerance for zero pivot 2.22045e-14
[all …]
|