| /petsc/src/mat/tests/ |
| H A D | ex142.c | 21 int n = 10, N, Ny, ndim = 4, i, dim[4], DIM; in main() local
46 for (DIM = 0; DIM < ndim; DIM++) dim[DIM] = n; /* size of real space vector in DIM-dimension */ in main()
50 for (DIM = 1; DIM < 5; DIM++) { in main()
54 for (i = 0; i < DIM - 1; i++) N *= dim[i]; in main()
56 Ny *= 2 * (dim[DIM - 1] / 2 + 1); /* add padding elements to output vector y */ in main()
57 N *= dim[DIM - 1]; in main()
59 PetscCall(PetscPrintf(PETSC_COMM_SELF, "\n %d-D: FFTW on vector of size %d \n", DIM, N)); in main()
78 PetscCall(PetscPrintf(PETSC_COMM_SELF, "DIM: %d, N %d, Ny %d\n", DIM, N, Ny)); in main()
80 switch (DIM) { in main()
94 fplan = fftw_plan_dft_r2c(DIM, (int *)dim, (double *)x_array, (fftw_complex *)y_array, flags); in main()
[all …]
|
| H A D | ex112.c | 22 PetscInt n = 10, N, ndim = 4, dim[4], DIM, i; in main() local
41 for (DIM = 0; DIM < ndim; DIM++) dim[DIM] = n; /* size of transformation in DIM-dimension */ in main()
45 for (DIM = 1; DIM < 5; DIM++) { in main()
46 for (i = 0, N = 1; i < DIM; i++) N *= dim[i]; in main()
47 PetscCall(PetscPrintf(PETSC_COMM_SELF, "\n %d-D: FFTW on vector of size %d \n", DIM, N)); in main()
50 PetscCall(MatCreateFFT(PETSC_COMM_SELF, DIM, dim, MATFFTW, &A)); in main()
|
| H A D | ex121.c | 21 PetscInt n = 10, N, ndim = 4, dim[4], DIM, i, j; in main() local
41 for (DIM = 0; DIM < ndim; DIM++) dim[DIM] = n; /* size of transformation in DIM-dimension */ in main()
45 for (DIM = 1; DIM < 5; DIM++) { in main()
47 for (i = 0, N = 1; i < DIM; i++) N *= dim[i]; in main()
48 PetscCall(PetscPrintf(PETSC_COMM_SELF, "\n %d-D: FFTW on vector of size %d \n", DIM, N)); in main()
85 PetscCall(MatCreateFFT(PETSC_COMM_SELF, DIM, dim, MATFFTW, &A)); in main()
|
| H A D | ex143.c | 19 PetscInt N0 = 50, N1 = 20, N = N0 * N1, DIM; in main() local
47 DIM = 2; in main()
48 …tscPrintf(PETSC_COMM_SELF, "Use FFTW without PETSc-FFTW interface, DIM %" PetscInt_FMT "\n", DIM)); in main()
101 DIM = i; in main()
107 if (rank == 0) printf("Use PETSc-FFTW interface...%d-DIM: %d\n", (int)DIM, (int)N); in main()
109 PetscCall(MatCreateFFT(PETSC_COMM_WORLD, DIM, dim, MATFFTW, &A)); in main()
|
| H A D | ex228.c | 22 PetscInt DIM, dim[5]; /* FFT params */ in main() local
34 DIM = i; in main()
41 …MM_WORLD, "\n %" PetscInt_FMT " dimensions: FFTW on vector of size %" PetscInt_FMT " \n", DIM, N)); in main()
44 PetscCall(MatCreateFFT(PETSC_COMM_SELF, DIM, dim, MATFFTW, &A)); in main()
|
| H A D | ex148.c | 14 PetscInt DIM, dim[2]; in main() local
39 DIM = 2; in main()
42 PetscCall(MatCreateFFT(PETSC_COMM_WORLD, DIM, dim, MATFFTW, &A)); in main()
|
| H A D | ex149.c | 17 PetscInt DIM, dim[3], vsize; in main() local
38 DIM = 3; in main()
43 PetscCall(MatCreateFFT(PETSC_COMM_WORLD, DIM, dim, MATFFTW, &A)); in main()
|
| H A D | ex153.c | 12 PetscInt DIM, dim[5], vsize; in main() local
32 DIM = 5; in main()
38 PetscCall(MatCreateFFT(PETSC_COMM_SELF, DIM, dim, MATFFTW, &A)); in main()
|
| H A D | ex157.c | 12 PetscInt DIM, dim[5], vsize; in main() local
38 DIM = 2; in main()
44 PetscCall(MatCreateFFT(PETSC_COMM_WORLD, DIM, dim, MATFFTW, &A)); in main()
|
| H A D | ex155.c | 13 PetscInt DIM, dim[5], vsize, row, col; in main() local
32 DIM = 2; in main()
38 PetscCall(MatCreateFFT(PETSC_COMM_WORLD, DIM, dim, MATFFTW, &A)); in main()
|
| H A D | ex150.c | 15 PetscInt DIM, dim[5], vsize; in main() local
39 DIM = 4; in main()
46 PetscCall(MatCreateFFT(PETSC_COMM_WORLD, DIM, dim, MATFFTW, &A)); in main()
|
| H A D | ex158.c | 93 PetscInt i, *dim, k, DIM; in main() local
99 DIM = i; in main()
105 …k == 0) PetscCall(PetscPrintf(PETSC_COMM_SELF, "Use PETSc-FFTW interface...%d-DIM:%d \n", DIM, N)); in main()
106 PetscCall(MatCreateFFT(PETSC_COMM_WORLD, DIM, dim, MATFFTW, &A)); in main()
|
| /petsc/src/mat/tests/output/ |
| H A D | ex143.out | 1 Use PETSc-FFTW interface...1-DIM:30
2 Use PETSc-FFTW interface...2-DIM:900
3 Use PETSc-FFTW interface...3-DIM:27000
4 Use PETSc-FFTW interface...4-DIM:810000
|
| H A D | ex142.out | 3 DIM: 1, N 10, Ny 12
6 DIM: 2, N 100, Ny 120
9 DIM: 3, N 1000, Ny 1200
12 DIM: 4, N 10000, Ny 12000
|
| H A D | ex158_2.out | 1 Use PETSc-FFTW interface...2-DIM:900
|
| H A D | ex158.out | 1 Use PETSc-FFTW interface...2-DIM:900
|
| /petsc/src/ts/tutorials/ |
| H A D | ex11.h | 38 #define DIM 2 /* Geometric dimension */ macro
72 PetscReal uh[DIM];
77 PetscReal vals[DIM + 1];
104 PetscReal ru[DIM];
110 PetscReal vals[DIM + 2];
138 for (i = 0; i < DIM; i++) prod += x[i] * y[i]; in DotDIMReal()
159 PetscReal uhn, u[DIM]; in SWFlux()
166 for (i = 0; i < DIM; i++) f->uh[i] = u[i] * uhn + sw->gravity * PetscSqr(x->h) * n[i]; in SWFlux()
174 PetscReal nn[DIM]; in PhysicsRiemann_SW_Rusanov()
248 for (CeedInt j = 0; j < DIM; ++j) PetscPrintf(PETSC_COMM_SELF, " | %g |\n", n[j]); in PhysicsRiemann_SW_Rusanov_CEED()
[all …]
|
| H A D | ex11.c | 80 PetscReal bounds[2 * DIM];
117 PetscReal wind[DIM];
120 PetscReal center[DIM];
164 PetscReal wind[DIM], wn; in PhysicsRiemann_Advect()
203 for (i = 0; i < DIM; ++i) wind[i] = 0.0; in PhysicsRiemann_Advect()
219 PetscReal x0[DIM]; in PhysicsSolution_Advect()
228 PetscReal x0[DIM], v[DIM], r, cost, sint; in PhysicsSolution_Advect()
330 {"Momentum", DIM},
466 {"Momentum", DIM},
484 for (i = 0; i < DIM; i++) uu->ru[i] = 0.0; /* zero out initial velocity */ in PhysicsSolution_Euler()
[all …]
|
| H A D | ex27.c | 42 #define DIM 2 macro
59 PetscReal length[DIM];
|
| /petsc/src/binding/petsc4py/test/ |
| H A D | test_dmplex.py | 16 DIM = 1 variable in BaseTestPlex
24 self.DIM, self.CELLS, self.COORDS, comm=self.COMM
41 self.assertEqual(dim, self.DIM)
42 self.assertEqual(numDepths, self.DIM + 1)
92 for d in range(self.DIM + 1)
160 if self.DIM == 1:
220 if self.DIM == 2 and PETSc.COMM_WORLD.getSize() > 6:
227 metric2.scale(pow(target, 2.0 / self.DIM))
231 if self.DIM == 1:
233 if self.DIM == 3 and PETSc.COMM_WORLD.getSize() > 4:
[all …]
|
| H A D | test_dmda.py | 436 DIM = ( variable
468 DIM = (1, 2, 3) variable
480 for dim in DIM:
512 for dim in DIM:
|
| H A D | test_dmstag.py | 273 DIM = (1, 2, 3) variable
288 for dim in DIM:
|
| /petsc/src/vec/vec/tests/ |
| H A D | ex50.c | 17 PetscInt m = 64, dim[2] = {8, 8}, DIM = 2; /* FFT parameters */ in main() local
48 PetscCall(MatCreateFFT(PETSC_COMM_WORLD, DIM, dim, MATFFTW, &A)); in main()
|