| /petsc/src/mat/tests/ |
| H A D | ex144.c | 10 const ptrdiff_t N0 = 2056, N1 = 2056; in main() local 35 …alloc_local = fftw_mpi_local_size_2d_transposed(N0, N1 / 2 + 1, PETSC_COMM_WORLD, &local_n0, &loca… in main() 50 N = 2 * N0 * (N1 / 2 + 1); in main() 51 N_factor = N0 * N1; in main() 52 n = 2 * local_n0 * (N1 / 2 + 1); in main() 89 …fplan = fftw_mpi_plan_dft_r2c_2d(N0, N1, (double *)x_arr, (fftw_complex *)y_arr, PETSC_COMM_WORLD,… in main() 90 …bplan = fftw_mpi_plan_dft_c2r_2d(N0, N1, (fftw_complex *)y_arr, (double *)z_arr, PETSC_COMM_WORLD,… in main() 102 PetscCall(VecSetSizes(ini, local_n0 * N1, N0 * N1)); in main() 103 PetscCall(VecSetSizes(final, local_n0 * N1, N0 * N1)); in main() 107 if (N1 % 2 == 0) { in main() [all …]
|
| H A D | ex146.c | 9 ptrdiff_t N0 = 256, N1 = 256, N2 = 256, N3 = 2, dim[4]; in main() local 36 …alloc_local = fftw_mpi_local_size_3d_transposed(N0, N1, N2 / 2 + 1, PETSC_COMM_WORLD, &local_n0, &… in main() 50 N = 2 * N0 * N1 * (N2 / 2 + 1); in main() 51 N_factor = N0 * N1 * N2; in main() 52 n = 2 * local_n0 * N1 * (N2 / 2 + 1); in main() 53 n1 = local_n1 * N0 * 2 * N1; in main() 78 …fplan = fftw_mpi_plan_dft_r2c_3d(N0, N1, N2, (double *)x_arr, (fftw_complex *)y_arr, PETSC_COMM_WO… in main() 79 …bplan = fftw_mpi_plan_dft_c2r_3d(N0, N1, N2, (fftw_complex *)y_arr, (double *)z_arr, PETSC_COMM_WO… in main() 92 VecSetSizes(ini, local_n0 * N1 * N2, N_factor); in main() 93 VecSetSizes(final, local_n0 * N1 * N2, N_factor); in main() [all …]
|
| H A D | ex143.c | 19 PetscInt N0 = 50, N1 = 20, N = N0 * N1, DIM; in main() local 50 N = N0 * N1; in main() 51 alloc_local = fftw_mpi_local_size_2d(N0, N1, PETSC_COMM_WORLD, &local_n0, &local_0_start); in main() 57 …PetscCall(VecCreateMPIWithArray(PETSC_COMM_WORLD, 1, (PetscInt)local_n0 * N1, (PetscInt)N, (const … in main() 59 …PetscCall(VecCreateMPIWithArray(PETSC_COMM_WORLD, 1, (PetscInt)local_n0 * N1, (PetscInt)N, (const … in main() 61 …PetscCall(VecCreateMPIWithArray(PETSC_COMM_WORLD, 1, (PetscInt)local_n0 * N1, (PetscInt)N, (const … in main() 64 …fplan = fftw_mpi_plan_dft_2d(N0, N1, data_in, data_out, PETSC_COMM_WORLD, FFTW_FORWARD, FFTW_ESTIM… in main() 65 …bplan = fftw_mpi_plan_dft_2d(N0, N1, data_out, data_out2, PETSC_COMM_WORLD, FFTW_BACKWARD, FFTW_ES… in main()
|
| H A D | ex158.c | 15 PetscInt N0 = 50, N1 = 20, N = N0 * N1; in main() local 47 N = N0 * N1; in main() 48 alloc_local = fftw_mpi_local_size_2d(N0, N1, PETSC_COMM_WORLD, &local_n0, &local_0_start); in main() 54 …PetscCall(VecCreateMPIWithArray(PETSC_COMM_WORLD, 1, (PetscInt)local_n0 * N1, (PetscInt)N, (const … in main() 56 …PetscCall(VecCreateMPIWithArray(PETSC_COMM_WORLD, 1, (PetscInt)local_n0 * N1, (PetscInt)N, (const … in main() 58 …PetscCall(VecCreateMPIWithArray(PETSC_COMM_WORLD, 1, (PetscInt)local_n0 * N1, (PetscInt)N, (const … in main() 61 …fplan = fftw_mpi_plan_dft_2d(N0, N1, data_in, data_out, PETSC_COMM_WORLD, FFTW_FORWARD, FFTW_ESTIM… in main() 62 …bplan = fftw_mpi_plan_dft_2d(N0, N1, data_out, data_out2, PETSC_COMM_WORLD, FFTW_BACKWARD, FFTW_ES… in main()
|
| H A D | ex147.c | 9 ptrdiff_t N0 = 2, N1 = 2, N2 = 2, N3 = 2, dim[4], N, D; in main() local 33 dim[1] = N1; in main() 51 N = 2 * N0 * N1 * N2 * (N3 / 2 + 1); in main() 52 N_factor = N0 * N1 * N2 * N3; in main() 53 n = 2 * local_n0 * N1 * N2 * (N3 / 2 + 1); in main() 54 n1 = local_n1 * N0 * 2 * N1 * N2; in main()
|
| H A D | ex148.c | 9 PetscInt N0 = 50, N1 = 50, N = N0 * N1; in main() local 31 PetscCall(VecSetSizes(input, PETSC_DECIDE, N0 * N1)); in main() 41 dim[1] = N1; in main()
|
| H A D | ex153.c | 7 PetscInt N0 = 10, N1 = 10, N2 = 10, N3 = 10, N4 = 10, N = N0 * N1 * N2 * N3 * N4; in main() local 34 dim[1] = N1; in main()
|
| H A D | ex149.c | 10 PetscInt N0 = 3, N1 = 3, N2 = 3, N = N0 * N1 * N2; in main() local 40 dim[1] = N1; in main()
|
| H A D | ex155.c | 8 PetscInt N0 = 4096, N1 = 4096, N2 = 256, N3 = 10, N4 = 10, N = N0 * N1; in main() local 34 dim[1] = N1; in main()
|
| H A D | ex157.c | 7 PetscInt N0 = 2048, N1 = 2048, N2 = 3, N3 = 5, N4 = 5, N = N0 * N1; in main() local 40 dim[1] = N1; in main()
|
| H A D | ex150.c | 10 PetscInt N0 = 3, N1 = 3, N2 = 3, N3 = 3, N4 = 3, N = N0 * N1 * N2 * N3; in main() local 41 dim[1] = N1; in main()
|
| /petsc/src/mat/tutorials/ |
| H A D | ex4f.F90 | 11 PetscInt :: i, rstart, rend, M1, N1 38 PetscCallA(MatGetSize(A, M1, N1, ierr)) 41 if (rend < N1) PetscCallA(MatSetValue(A, i, rend, one, INSERT_VALUES, ierr))
|
| /petsc/src/vec/is/section/interface/hdf5/ |
| H A D | sectionhdf5.c | 179 PetscInt N1, M1; in PetscSectionLoad_HDF5_SingleField() local 193 PetscCallMPI(MPIU_Allreduce(&n, &N1, 1, MPIU_INT, MPI_SUM, comm)); in PetscSectionLoad_HDF5_SingleField() 199 …N1 == N, comm, PETSC_ERR_ARG_SIZ, "Unable to load s->atlasDof: sum of local sizes (%" PetscInt_FMT… in PetscSectionLoad_HDF5_SingleField() 209 …N1 == N, comm, PETSC_ERR_ARG_SIZ, "Unable to load s->atlasOff: sum of local sizes (%" PetscInt_FMT… in PetscSectionLoad_HDF5_SingleField() 232 …N1 == N, comm, PETSC_ERR_ARG_SIZ, "Unable to load s->bc->atlasDof: sum of local sizes (%" PetscInt… in PetscSectionLoad_HDF5_SingleField() 246 …N1 == N, comm, PETSC_ERR_ARG_SIZ, "Unable to load s->bc->atlasOff: sum of local sizes (%" PetscInt… in PetscSectionLoad_HDF5_SingleField()
|
| /petsc/src/mat/impls/fft/fftw/ |
| H A D | fftw.c | 508 PetscInt n1, N1; in MatCreateVecsFFTW_FFTW() local 525 PetscCall(PetscIntCast(fft->N, &N1)); in MatCreateVecsFFTW_FFTW() 526 PetscCall(VecCreateMPIWithArray(comm, 1, n1, N1, (const PetscScalar *)data_fin, fin)); in MatCreateVecsFFTW_FFTW() 534 PetscCall(PetscIntCast(fft->N, &N1)); in MatCreateVecsFFTW_FFTW() 535 PetscCall(VecCreateMPIWithArray(comm, 1, n1, N1, (const PetscScalar *)data_fout, fout)); in MatCreateVecsFFTW_FFTW() 544 PetscCall(PetscIntCast(fft->N, &N1)); in MatCreateVecsFFTW_FFTW() 545 PetscCall(VecCreateMPIWithArray(comm, 1, n1, N1, (const PetscScalar *)data_bout, bout)); in MatCreateVecsFFTW_FFTW() 555 PetscCall(PetscIntCast(2 * dim[0] * (dim[1] / 2 + 1), &N1)); in MatCreateVecsFFTW_FFTW() 559 PetscCall(VecCreateMPIWithArray(comm, 1, (PetscInt)n1, N1, (PetscScalar *)data_finr, fin)); in MatCreateVecsFFTW_FFTW() 566 PetscCall(VecCreateMPIWithArray(comm, 1, (PetscInt)n1, N1, (PetscScalar *)data_fout, fout)); in MatCreateVecsFFTW_FFTW() [all …]
|
| /petsc/src/snes/tutorials/ |
| H A D | ex73f90t.F90 | 429 PetscInt its, N1, N2, i, j, irow, row(1) 465 N1 = solver%my*solver%mx 483 PetscCallA(VecSetSizes(x1, PETSC_DECIDE, N1, ierr)) 490 PetscCallA(MatSetSizes(Amat, PETSC_DECIDE, PETSC_DECIDE, N1, N1, ierr)) 494 PetscCallA(MatSetSizes(solver%AmatLin, PETSC_DECIDE, PETSC_DECIDE, N1, N1, ierr)) 513 PetscCallA(MatSetSizes(Cmat, PETSC_DECIDE, PETSC_DECIDE, N2, N1, ierr)) 517 PetscCallA(MatSetSizes(Bmat, PETSC_DECIDE, PETSC_DECIDE, N1, N2, ierr))
|
| /petsc/src/binding/petsc4py/src/petsc4py/PETSc/ |
| H A D | Const.pyx | 120 `N1` 142 N1 = NORM_1 variable in NormType
|
| /petsc/src/vec/is/sf/utils/ |
| H A D | sfutils.c | 755 PetscInt N1 = PETSC_INT_MIN; in PetscSFCreateByMatchingIndices() local 757 if (rootIndices[i] > N1) N1 = rootIndices[i]; in PetscSFCreateByMatchingIndices() 758 PetscCallMPI(MPIU_Allreduce(MPI_IN_PLACE, &N1, 1, MPIU_INT, MPI_MAX, comm)); in PetscSFCreateByMatchingIndices() 759 …PetscCheck(N1 < N, PETSC_COMM_SELF, PETSC_ERR_ARG_WRONG, "Max. root index (%" PetscInt_FMT ") out … in PetscSFCreateByMatchingIndices() 761 N1 = PETSC_INT_MIN; in PetscSFCreateByMatchingIndices() 763 if (leafIndices[i] > N1) N1 = leafIndices[i]; in PetscSFCreateByMatchingIndices() 764 PetscCallMPI(MPIU_Allreduce(MPI_IN_PLACE, &N1, 1, MPIU_INT, MPI_MAX, comm)); in PetscSFCreateByMatchingIndices() 765 …PetscCheck(N1 < N, PETSC_COMM_SELF, PETSC_ERR_ARG_WRONG, "Max. leaf index (%" PetscInt_FMT ") out … in PetscSFCreateByMatchingIndices()
|
| /petsc/src/mat/utils/ |
| H A D | axpy.c | 98 PetscInt M1, M2, N1, N2; in MatAXPY() local 107 PetscCall(MatGetSize(X, &M1, &N1)); in MatAXPY() 111 …N1 == N2, PetscObjectComm((PetscObject)Y), PETSC_ERR_ARG_SIZ, "Non conforming matrix add: global s… in MatAXPY()
|
| /petsc/src/dm/impls/plex/cgns/ |
| H A D | plexcgns2.c | 1052 PetscInt N1 = PETSC_INT_MIN; in PetscSFFindMatchingIndices() local 1054 if (rootIndices[i] > N1) N1 = rootIndices[i]; in PetscSFFindMatchingIndices() 1055 PetscCallMPI(MPIU_Allreduce(MPI_IN_PLACE, &N1, 1, MPIU_INT, MPI_MAX, comm)); in PetscSFFindMatchingIndices() 1056 …PetscCheck(N1 < N, PETSC_COMM_SELF, PETSC_ERR_ARG_WRONG, "Max. root index (%" PetscInt_FMT ") out … in PetscSFFindMatchingIndices() 1058 N1 = PETSC_INT_MIN; in PetscSFFindMatchingIndices() 1060 if (leafIndices[i] > N1) N1 = leafIndices[i]; in PetscSFFindMatchingIndices() 1061 PetscCallMPI(MPIU_Allreduce(MPI_IN_PLACE, &N1, 1, MPIU_INT, MPI_MAX, comm)); in PetscSFFindMatchingIndices() 1062 …PetscCheck(N1 < N, PETSC_COMM_SELF, PETSC_ERR_ARG_WRONG, "Max. leaf index (%" PetscInt_FMT ") out … in PetscSFFindMatchingIndices()
|
| /petsc/src/ksp/pc/interface/ |
| H A D | precon.c | 539 PetscInt m1, M1, m2, M2, n1, N1, n2, N2, m3, M3, n3, N3; in PCMatApplyTranspose_Private() local 555 PetscCall(MatGetSize(Y, &M1, &N1)); in PCMatApplyTranspose_Private() 556 …N1 == N2, PETSC_COMM_SELF, PETSC_ERR_ARG_SIZ, "Incompatible number of columns between block of inp… in PCMatApplyTranspose_Private() 574 for (n1 = 0; n1 < N1; ++n1) { in PCMatApplyTranspose_Private()
|
| /petsc/src/dm/impls/stag/ |
| H A D | stagutils.c | 1273 PetscErrorCode DMStagSetGlobalSizes(DM dm, PetscInt N0, PetscInt N1, PetscInt N2) in DMStagSetGlobalSizes() argument 1283 …PetscCheck(dim <= 1 || N1 >= 0, PetscObjectComm((PetscObject)dm), PETSC_ERR_ARG_SIZ, "Number of el… in DMStagSetGlobalSizes() 1286 if (N1) stag->N[1] = N1; in DMStagSetGlobalSizes()
|
| /petsc/src/vec/vec/utils/ |
| H A D | vinv.c | 1719 PetscInt n1, n2, N1, N2; in VecEqual() local 1728 PetscCall(VecGetSize(vec1, &N1)); in VecEqual() 1730 if (N1 != N2) flg1 = PETSC_FALSE; in VecEqual()
|
| /petsc/src/ksp/ksp/interface/ |
| H A D | itfunc.c | 1204 PetscInt n1, N1, n2, N2, Bbn = PETSC_DECIDE; in KSPMatSolve_Private() local 1226 PetscCall(MatGetSize(X, NULL, &N1)); in KSPMatSolve_Private() 1227 …N1 == N2, PETSC_COMM_SELF, PETSC_ERR_ARG_SIZ, "Incompatible number of columns between block of rig… in KSPMatSolve_Private()
|
| /petsc/lib/petsc/bin/maint/abi-compliance-checker/ |
| H A D | abi-compliance-checker.pl | 2976 my $N1 = $T1->{"Name"}; 2979 $N1=~s/\A(struct|union|enum) //; 2982 if($N1 ne $N2 and $N2!~/\A\Q$N1\E_v\d+\Z/ 2983 and not isAnon($N1) 2993 if($N1!~/\Avoid\s*\*/ 6263 my ($N1, $N2) = ($TN1, $TN2); 6264 $N1=~s/\b(struct|union) //g; 6267 if($N1 eq $N2)
|
| /petsc/src/ksp/pc/impls/mg/ |
| H A D | mg.c | 584 PetscInt N1, N2; in PCApply_MG_Internal() local 587 PetscCall(MatGetSize(mglevels[levels - 1]->B, NULL, &N1)); in PCApply_MG_Internal() 590 if (N1 != N2 || !flg) PetscCall(MatDestroy(&mglevels[levels - 1]->B)); in PCApply_MG_Internal()
|