| /petsc/src/sys/utils/ |
| H A D | mathfit.c | 47 PetscBLASInt two = 2, ipiv[2], info; in PetscLinearRegression() local 51 PetscCallBLAS("LAPACKgetrf", LAPACKgetrf_(&two, &two, H, &two, ipiv, &info)); in PetscLinearRegression() 52 PetscCallBLAS("LAPACKgetri", LAPACKgetri_(&two, H, &two, ipiv, work, &two, &info)); in PetscLinearRegression()
|
| /petsc/src/vec/vec/tutorials/ |
| H A D | ex20f90.F90 | 23 PetscScalar one, two, three 34 two = 2.0 69 PetscCallA(VecSet(y, two, ierr)) 71 PetscCallA(VecSet(z(2), two, ierr)) 97 PetscCallA(VecScale(x, two, ierr)) 118 PetscCallA(VecAYPX(y, two, x, ierr)) 138 PetscCallA(VecWAXPY(w, two, x, y, ierr)) 161 dots(3) = two
|
| H A D | ex1f90.F90 | 22 PetscScalar one, two, three 32 two = 2.0 67 PetscCallA(VecSet(y, two, ierr)) 69 PetscCallA(VecSet(z(2), two, ierr)) 95 PetscCallA(VecScale(x, two, ierr)) 116 PetscCallA(VecAYPX(y, two, x, ierr)) 136 PetscCallA(VecWAXPY(w, two, x, y, ierr)) 159 dots(3) = two
|
| H A D | ex1.c | 18 PetscScalar one = 1.0, two = 2.0, three = 3.0, dots[3], dot; in main() local 52 PetscCall(VecSet(y, two)); in main() 54 PetscCall(VecSet(z[1], two)); in main() 76 PetscCall(VecScale(x, two)); in main() 94 PetscCall(VecAYPX(y, two, x)); in main() 110 PetscCall(VecWAXPY(w, two, x, y)); in main() 139 dots[2] = two; in main()
|
| H A D | ex7f.F90 | 12 PetscScalar, parameter :: two = 2.0 22 PetscCall(VecSet(vec, two, ierr))
|
| H A D | ex16f.F90 | 10 PetscInt, parameter :: n = 20, four = 4, two = 2, one = 1 28 PetscCallA(VecSetSizes(s, PETSC_DECIDE, n/two, ierr)) 29 PetscCallA(VecSetBlockSize(s, two, ierr))
|
| H A D | ex12f.F90 | 11 PetscInt, parameter :: zero = 0, one = 1, two = 2 20 PetscCallA(VecSetBlockSize(v, two, ierr))
|
| /petsc/src/sys/tutorials/ |
| H A D | ex4f90.F90 | 12 PetscMPIInt rank, size, zero, two 22 two = 2 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 23 two = 2 25 PetscCallMPIA(MPI_Comm_split(MPI_COMM_WORLD, mod(rank, two), zero, PETSC_COMM_WORLD, ierr))
|
| /petsc/src/vec/vec/tests/ |
| H A D | ex19f.F90 | 14 PetscScalar one, two, three, dot 21 two = 2.0 37 PetscCallA(VecSet(y, two, ierr)) 44 PetscCallA(VecScale(x, two, ierr))
|
| H A D | ex3.c | 10 PetscScalar one = 1.0, two = 2.0, three = 3.0; in main() local 28 PetscCall(VecSet(y, two)); in main() 34 PetscCall(VecSetValues(y, 1, &idx, &two, INSERT_VALUES)); in main()
|
| H A D | ex1.c | 8 PetscScalar one = 1.0, two = 2.0; in main() local 23 PetscCall(VecSet(y, two)); in main()
|
| H A D | ex8.c | 8 PetscScalar two = 2.0, vals[6] = {10, 11, 12, 13, 14, 15}; in main() local 27 PetscCall(VecSet(y, two)); in main()
|
| H A D | ex6.c | 8 PetscScalar two = 2.0, vals[6] = {10, 11, 12, 13, 14, 15}; in main() local 27 PetscCall(VecSet(y, two)); in main()
|
| H A D | ex7.c | 8 PetscScalar two = 2.0, vals[6] = {10, 11, 12, 13, 14, 15}; in main() local 27 PetscCall(VecSet(y, two)); in main()
|
| /petsc/src/mat/tutorials/ |
| H A D | ex17f.F90 | 20 PetscInt, parameter :: zero = 0, one = 1, two = 2, three = 3 48 …PetscCallA(MatMPIAIJSetPreallocation(A, three, PETSC_NULL_INTEGER_ARRAY, two, PETSC_NULL_INTEGER_A… 50 …PetscCallA(MatMPIBAIJSetPreallocation(A, one, three, PETSC_NULL_INTEGER_ARRAY, two, PETSC_NULL_INT… 51 PetscCallA(MatSeqSBAIJSetPreallocation(A, one, two, PETSC_NULL_INTEGER_ARRAY, ierr)) 52 …PetscCallA(MatMPISBAIJSetPreallocation(A, one, two, PETSC_NULL_INTEGER_ARRAY, one, PETSC_NULL_INTE…
|
| H A D | ex15f.F90 | 16 PetscInt, parameter :: one = 1, two = 2, three = 3 25 …PetscCallA(MatMPIAIJSetPreallocation(A, three, PETSC_NULL_INTEGER_ARRAY, two, PETSC_NULL_INTEGER_A… 35 PetscCallA(MatSetValues(A, one, [r], two, cols, vals, INSERT_VALUES, ierr)) 42 PetscCallA(MatSetValues(A, one, [r], two, cols, vals, INSERT_VALUES, ierr))
|
| /petsc/src/snes/tests/ |
| H A D | ex21f.F90 | 50 PetscInt one, zero, two 56 two = 2 57 …PetscCallA(MatCreateSeqAIJ(PETSC_COMM_SELF, two, two, two, PETSC_NULL_INTEGER_ARRAY, user%A, ierr))
|
| /petsc/src/dm/tutorials/ |
| H A D | ex2.c | 28 …PetscInt glider_loc[2] = {10, 20}, blinker_loc[2] = {20, 10}, two, steps = 100, viz_interval = … in main() local 36 …glider", "Coordinate at which to center a glider", NULL, glider_loc, (two = 2, &two), &has_glider)… in main() 37 …nker", "Coordinate at which to center a blinker", NULL, blinker_loc, (two = 2, &two), &has_blinker… in main()
|
| /petsc/src/sys/tests/ |
| H A D | ex49f.F90 | 41 PetscMPIInt, parameter:: two = 2, five = 5, seven = 7 52 mx = [five, seven, two] 53 my = [five, seven, two]
|
| /petsc/src/ts/tutorials/ |
| H A D | ex1f.F90 | 35 PetscReal two, lambda 42 two = 2.0 67 uxx = (-ur + two*u - ul)*hydhx 68 uyy = (-ut + two*u - ub)*hxdhy 90 PetscScalar two, one, lambda 100 two = 2.0 127 v(3) = -two*(hydhx + hxdhy) + sc*lambda*exp(xx(row(1)))
|
| /petsc/src/snes/tutorials/ |
| H A D | ex40f90.F90 | 43 PetscInt ten, two, one 50 two = 2 53 … DM_BOUNDARY_NONE, DMDA_STENCIL_BOX, ten, ten, PETSC_DECIDE, PETSC_DECIDE, two, one, PETSC_NULL_IN…
|
| H A D | ex5f.F90 | 169 PetscScalar two, one, hx, hy 182 two = 2.0 197 uxx = hydhx*(two*u - x(i - 1, j) - x(i + 1, j)) 198 uyy = hxdhy*(two*u - x(i, j - 1) - x(i, j + 1)) 257 PetscScalar two, one, hx, hy, v(5) 265 two = 2.0 302 v(3) = two*(hydhx + hxdhy) - sc*lambda*exp(x(i, j))
|
| /petsc/src/ksp/ksp/tests/ |
| H A D | ex52f.F90 | 15 PetscScalar two, zero 31 two = 2.0 33 PetscCallA(MatSetValues(A, one, [row], one, [col], [two], INSERT_VALUES, ierr))
|
| /petsc/src/binding/petsc4py/demo/legacy/wrap-f2py/ |
| H A D | Bratu2D.F90 | 96 PetscReal hx, hy, hxdhy, hydhx, sc, one, two 100 two = 2.0 115 uxx = (two*u - x(i - 1, j) - x(i + 1, j))*hydhx 116 uyy = (two*u - x(i, j - 1) - x(i, j + 1))*hxdhy 135 PetscReal hx, hy, hxdhy, hydhx, sc, v(5), one, two 140 two = 2.0 160 v(3) = two*(hydhx + hxdhy) - lambda*exp(x(i, j))*sc
|