Home
last modified time | relevance | path

Searched refs:num (Results 1 – 25 of 67) sorted by relevance

123

/petsc/src/sys/fileio/ftn-custom/
H A Dzsysiof.c78 PETSC_EXTERN void petscbinaryreadint_(int *fd, void *data, PetscInt *num, PetscInt *count, PetscDat… in petscbinaryreadint_() argument
81 *ierr = PetscBinaryRead(*fd, data, *num, count, *type); in petscbinaryreadint_()
85 PETSC_EXTERN void petscbinaryreadreal_(int *fd, void *data, PetscInt *num, PetscInt *count, PetscDa… in petscbinaryreadreal_() argument
88 *ierr = PetscBinaryRead(*fd, data, *num, count, *type); in petscbinaryreadreal_()
92 PETSC_EXTERN void petscbinaryreadcomplex_(int *fd, void *data, PetscInt *num, PetscInt *count, Pets… in petscbinaryreadcomplex_() argument
95 *ierr = PetscBinaryRead(*fd, data, *num, count, *type); in petscbinaryreadcomplex_()
99 PETSC_EXTERN void petscbinaryreadint1_(int *fd, void *data, PetscInt *num, PetscInt *count, PetscDa… in petscbinaryreadint1_() argument
102 *ierr = PetscBinaryRead(*fd, data, *num, count, *type); in petscbinaryreadint1_()
106 PETSC_EXTERN void petscbinaryreadreal1_(int *fd, void *data, PetscInt *num, PetscInt *count, PetscD… in petscbinaryreadreal1_() argument
109 *ierr = PetscBinaryRead(*fd, data, *num, count, *type); in petscbinaryreadreal1_()
[all …]
/petsc/src/ksp/ksp/tutorials/
H A Dex34.c135 PetscInt dof, i, j, k, d, mx, my, mz, xm, ym, zm, xs, ys, zs, num, numi, numj, numk; in ComputeMatrix() local
161 num = 0; in ComputeMatrix()
166 v[num] = -HxHydHz; in ComputeMatrix()
167 col[num].i = i; in ComputeMatrix()
168 col[num].j = j; in ComputeMatrix()
169 col[num].k = k - 1; in ComputeMatrix()
170 col[num].c = d; in ComputeMatrix()
171 num++; in ComputeMatrix()
175 v[num] = -HxHzdHy; in ComputeMatrix()
176 col[num].i = i; in ComputeMatrix()
[all …]
H A Dex50.c104 PetscInt i, j, M, N, xm, ym, xs, ys, num, numi, numj; in ComputeJacobian() local
124 num = 0; in ComputeJacobian()
128 v[num] = -HxdHy; in ComputeJacobian()
129 col[num].i = i; in ComputeJacobian()
130 col[num].j = j - 1; in ComputeJacobian()
131 num++; in ComputeJacobian()
135 v[num] = -HydHx; in ComputeJacobian()
136 col[num].i = i - 1; in ComputeJacobian()
137 col[num].j = j; in ComputeJacobian()
138 num++; in ComputeJacobian()
[all …]
H A Dex32.c120 PetscInt i, j, mx, my, xm, ym, xs, ys, num, numi, numj; in ComputeMatrix() local
143 num = 0; in ComputeMatrix()
147 v[num] = -HxdHy; in ComputeMatrix()
148 col[num].i = i; in ComputeMatrix()
149 col[num].j = j - 1; in ComputeMatrix()
150 num++; in ComputeMatrix()
154 v[num] = -HydHx; in ComputeMatrix()
155 col[num].i = i - 1; in ComputeMatrix()
156 col[num].j = j; in ComputeMatrix()
157 num++; in ComputeMatrix()
[all …]
H A Dex29.c183 PetscInt numx = 0, numy = 0, num = 0; in ComputeMatrix() local
185 v[num] = -rho * HxdHy; in ComputeMatrix()
186 col[num].i = i; in ComputeMatrix()
187 col[num].j = j - 1; in ComputeMatrix()
189 num++; in ComputeMatrix()
192 v[num] = -rho * HydHx; in ComputeMatrix()
193 col[num].i = i - 1; in ComputeMatrix()
194 col[num].j = j; in ComputeMatrix()
196 num++; in ComputeMatrix()
199 v[num] = -rho * HydHx; in ComputeMatrix()
[all …]
/petsc/src/mat/graphops/order/
H A Dgen1wd.c38 PetscInt num; in SPARSEPACKgen1wd() local
53 num = 0; in SPARSEPACKgen1wd()
59 …PetscCall(SPARSEPACKfn1wd(&root, &xadj[1], &adjncy[1], &mask[1], &nsep, &perm[num + 1], &nlvl, &xl… in SPARSEPACKgen1wd()
60 num += nsep; in SPARSEPACKgen1wd()
62 xblk[*nblks] = *neqns - num + 1; in SPARSEPACKgen1wd()
71 …PetscCall(SPARSEPACKrootls(&node, &xadj[1], &adjncy[1], &mask[1], &nlvl, &xls[1], &perm[num + 1])); in SPARSEPACKgen1wd()
72 lnum = num + 1; in SPARSEPACKgen1wd()
73 num = num + xls[nlvl + 1] - 1; in SPARSEPACKgen1wd()
75 xblk[*nblks] = *neqns - num + 1; in SPARSEPACKgen1wd()
76 i__3 = num; in SPARSEPACKgen1wd()
[all …]
H A Dgenrcm.c43 PetscInt num; in SPARSEPACKgenrcm() local
63 num = 1; in SPARSEPACKgenrcm()
74 PetscCall(SPARSEPACKfnroot(&root, &xadj[1], &adjncy[1], &mask[1], &nlvl, &xls[1], &perm[num])); in SPARSEPACKgenrcm()
75 PetscCall(SPARSEPACKrcm(&root, &xadj[1], &adjncy[1], &mask[1], &perm[num], &ccsize, &xls[1])); in SPARSEPACKgenrcm()
76 num += ccsize; in SPARSEPACKgenrcm()
77 if (num > *neqns) PetscFunctionReturn(PETSC_SUCCESS); in SPARSEPACKgenrcm()
H A Dgenqmd.c52 PetscInt nhdsze, nxnode, rchsze, thresh, num; in SPARSEPACKgenqmd() local
82 num = 0; in SPARSEPACKgenqmd()
90 nump1 = num + 1; in SPARSEPACKgenqmd()
113 ++num; in SPARSEPACKgenqmd()
115 ip = perm[num]; in SPARSEPACKgenqmd()
118 perm[num] = nxnode; in SPARSEPACKgenqmd()
119 invp[nxnode] = num; in SPARSEPACKgenqmd()
149 if (num < *neqns) goto L300; in SPARSEPACKgenqmd()
H A Dgennd.c61 PetscInt num; in SPARSEPACKgennd() local
74 num = 0; in SPARSEPACKgennd()
82 …PetscCall(SPARSEPACKfndsep(&root, &xadj[1], &adjncy[1], &mask[1], &nsep, &perm[num + 1], &xls[1], … in SPARSEPACKgennd()
83 num += nsep; in SPARSEPACKgennd()
84 if (num >= *neqns) goto L400; in SPARSEPACKgennd()
/petsc/src/sys/ftn-mod/
H A Dpetscsysmod.F90317 subroutine petscbinaryreadcomplex(fd, data, num, count, type, z)
322 PetscInt num
327 subroutine petscbinaryreadreal(fd, data, num, count, type, z)
332 PetscInt num
337 subroutine petscbinaryreadint(fd, data, num, count, type, z)
342 PetscInt num
347 subroutine petscbinaryreadcomplex1(fd, data, num, count, type, z)
352 PetscInt num
357 subroutine petscbinaryreadreal1(fd, data, num, count, type, z)
362 PetscInt num
[all …]
/petsc/src/vec/vec/tests/
H A Dex30f.F9016 PetscScalar num
37 num = 2.0
39 PetscCallA(VecSetValue(v1, row, num, INSERT_VALUES, ierr))
41 PetscCallA(VecSetValue(v1, row, num, INSERT_VALUES, ierr))
43 PetscCallA(VecSetValue(v1, row, num, INSERT_VALUES, ierr))
45 PetscCallA(VecSetValue(v1, row, num, INSERT_VALUES, ierr))
46 num = 1.0
48 PetscCallA(VecSetValue(v1, row, num, INSERT_VALUES, ierr))
50 PetscCallA(VecSetValue(v1, row, num, INSERT_VALUES, ierr))
52 PetscCallA(VecSetValue(v1, row, num, INSERT_VALUES, ierr))
[all …]
/petsc/src/benchmarks/
H A DbenchmarkBatch.py2 def generateBatchScript(num, procs, time, *args): argument
20 ''' % (num, (time%86400)/3600, (time%3600)/60, time%60, procs, num, ' '.join(args), num, ' '.join(a…
24 filename = namePattern % (num, n)
40 num = int(sys.argv[1]) variable
44 generateBatchScript(num, procs, time, *sys.argv[4:])
H A DbenchmarkExample.py30 def example(self, library, num): argument
32 return os.path.join(self.dir(), self.arch(), 'lib', library.lower(), 'ex'+str(num))
34 def source(self, library, num, filenametail): argument
37 name = 'ex'+str(num)
47 def __init__(self, library, num, **defaultOptions): argument
50 self.num = num
80 cmd = 'make ex'+str(self.num)
85 bdir = os.path.dirname(self.petsc.example(self.library, self.num))
91 … cmd = 'mv '+os.path.join(sdir, 'ex'+str(self.num))+' '+self.petsc.example(self.library, self.num)
106 …cmd += ' '.join([self.petsc.example(self.library, self.num), self.optionsToString(**self.opts), se…
[all …]
H A DbenchmarkAssembly.py11 num = 0
13 num += 2*3 + 2*4
15 num += 4*(n-2)*5
17 num += (n-2)*(n-2)*7
18 return num
35 def plotSummary(library, num, sizes, nonzeros, times, events): argument
51 title('Performance on '+library+' Example '+str(num))
66 title('Performance on '+library+' Example '+str(num))
80 title('Performance on '+library+' Example '+str(num))
103 …ex = PETScExample(args.library, args.num, log_summary_python = None if args.batch else args.…
[all …]
/petsc/src/dm/impls/plex/
H A Dpointqueue.c12 q->num = 0; in DMPlexPointQueueCreate()
33 if (queue->num < queue->size) PetscFunctionReturn(PETSC_SUCCESS); in DMPlexPointQueueEnsureSize()
45 ++queue->num; in DMPlexPointQueueEnqueue()
52 …PetscCheck(queue->num, PETSC_COMM_SELF, PETSC_ERR_ARG_WRONGSTATE, "Cannot dequeue from an empty qu… in DMPlexPointQueueDequeue()
55 --queue->num; in DMPlexPointQueueDequeue()
62 …PetscCheck(queue->num, PETSC_COMM_SELF, PETSC_ERR_ARG_WRONGSTATE, "Cannot get the front of an empt… in DMPlexPointQueueFront()
70 …PetscCheck(queue->num, PETSC_COMM_SELF, PETSC_ERR_ARG_WRONGSTATE, "Cannot get the back of an empty… in DMPlexPointQueueBack()
77 if (!queue->num) return PETSC_TRUE; in DMPlexPointQueueEmpty()
/petsc/lib/petsc/bin/maint/
H A Ddoublelinecheck.py9 num = int(aa[1]) variable
10 if f == prevf and num == prevnum+1:
11 print('Found double blank line '+f+':'+str(num))
13 prevnum = num
/petsc/src/ksp/pc/impls/tfs/
H A Dgs.c820 PetscInt *num, *map, **reduce; in PCTFS_gs_gop_local_out() local
824 num = gs->num_gop_local_reduce; in PCTFS_gs_gop_local_out()
828 if (*num == 2) { in PCTFS_gs_gop_local_out()
829 num++; in PCTFS_gs_gop_local_out()
831 } else if (*num == 3) { /* corner shared by three elements */ in PCTFS_gs_gop_local_out()
832 num++; in PCTFS_gs_gop_local_out()
834 } else if (*num == 4) { /* corner shared by four elements */ in PCTFS_gs_gop_local_out()
835 num++; in PCTFS_gs_gop_local_out()
838 num++; in PCTFS_gs_gop_local_out()
849 PetscInt *num, *map, **reduce; in PCTFS_gs_gop_local_plus() local
[all …]
/petsc/lib/petsc/bin/maint/abi-compliance-checker/modules/Internals/
H A DBasic.pm449 my ($num, $digs_to_cut, $z) = @_;
450 if($num!~/\./)
452 $num .= ".";
454 $num .= "0";
457 elsif($num=~/\.(.+)\Z/ and length($1)<$digs_to_cut-1)
460 $num .= "0";
463 elsif($num=~/\d+\.(\d){$digs_to_cut,}/) {
464 $num=sprintf("%.".($digs_to_cut-1)."f", $num);
466 $num=~s/\.[0]+\Z//g;
468 $num=~s/(\.[1-9]+)[0]+\Z/$1/g;
[all …]
/petsc/src/sys/classes/draw/utils/
H A Daxis.c30 PetscErrorCode PetscADefTicks(PetscReal low, PetscReal high, int num, int *ntick, PetscReal *ticklo… in PetscADefTicks() argument
36 PetscCall(PetscAGetBase(low, high, num, &base, &power)); in PetscADefTicks()
52 if (i < 2 && num < 10) PetscCall(PetscADefTicks(low, high, num + 1, ntick, tickloc, maxtick)); in PetscADefTicks()
109 PetscErrorCode PetscAGetBase(PetscReal vmin, PetscReal vmax, int num, PetscReal *Base, int *power) in PetscAGetBase() argument
118 base = (vmax - vmin) / (double)(num + 1); in PetscAGetBase()
/petsc/src/mat/graphops/color/impls/minpack/
H A Dnumsrt.c5 PetscErrorCode MINPACKnumsrt(PetscInt *n, PetscInt *nmax, PetscInt *num, PetscInt *mode, PetscInt *… in MINPACKnumsrt() argument
60 --num; in MINPACKnumsrt()
67 l = num[k]; in MINPACKnumsrt()
/petsc/src/sys/classes/viewer/interface/
H A Dview.c399 PetscErrorCode PetscViewerRead(PetscViewer viewer, void *data, PetscInt num, PetscInt *count, Petsc… in PetscViewerRead() argument
406 if (num >= 0) { in PetscViewerRead()
407 for (c = 0; c < num; c++) { in PetscViewerRead()
420 if (c == num - 1) s[i - 1] = '\0'; in PetscViewerRead()
426 if (i == -num || !cnt) break; in PetscViewerRead()
433 …= num, PetscObjectComm((PetscObject)viewer), PETSC_ERR_FILE_READ, "Insufficient data, only read %"… in PetscViewerRead()
434 } else PetscUseTypeMethod(viewer, read, data, num, count, dtype); in PetscViewerRead()
/petsc/src/vec/is/sf/tests/
H A Dex1f.F9010 PetscScalar num
23 num = rank
24 PetscCallA(VecSetValue(v1, row, num, INSERT_VALUES, ierr))
/petsc/src/mat/graphops/partition/impls/chaco/
H A Dchaco.c560 PetscErrorCode MatPartitioningChacoSetEigenNumber(MatPartitioning part, PetscInt num) in MatPartitioningChacoSetEigenNumber() argument
564 PetscValidLogicalCollectiveInt(part, num, 2); in MatPartitioningChacoSetEigenNumber()
565 …cTryMethod(part, "MatPartitioningChacoSetEigenNumber_C", (MatPartitioning, PetscInt), (part, num)); in MatPartitioningChacoSetEigenNumber()
569 static PetscErrorCode MatPartitioningChacoSetEigenNumber_Chaco(MatPartitioning part, PetscInt num) in MatPartitioningChacoSetEigenNumber_Chaco() argument
574 if (num == PETSC_DEFAULT) chaco->eignum = 1; in MatPartitioningChacoSetEigenNumber_Chaco()
576 …PetscCheck(num >= 1 && num <= 3, PetscObjectComm((PetscObject)part), PETSC_ERR_ARG_OUTOFRANGE, "Ca… in MatPartitioningChacoSetEigenNumber_Chaco()
577 chaco->eignum = num; in MatPartitioningChacoSetEigenNumber_Chaco()
597 PetscErrorCode MatPartitioningChacoGetEigenNumber(MatPartitioning part, PetscInt *num) in MatPartitioningChacoGetEigenNumber() argument
601 PetscAssertPointer(num, 2); in MatPartitioningChacoGetEigenNumber()
602 …seMethod(part, "MatPartitioningChacoGetEigenNumber_C", (MatPartitioning, PetscInt *), (part, num)); in MatPartitioningChacoGetEigenNumber()
[all …]
/petsc/src/dm/partitioner/impls/simple/
H A Dpartsimple.c21 PetscInt num, i; in PetscPartitionerSetFromOptions_Simple() local
27 num = 3; in PetscPartitionerSetFromOptions_Simple()
28 …cpartitioner_simple_node_grid", "Number of nodes in each dimension", "", p->nodeGrid, &num, &flg)); in PetscPartitionerSetFromOptions_Simple()
31 p->gridDim = num; in PetscPartitionerSetFromOptions_Simple()
33 num = 3; in PetscPartitionerSetFromOptions_Simple()
34 …, "Number of local processes in each dimension for a given node", "", p->processGrid, &num, &flg)); in PetscPartitionerSetFromOptions_Simple()
37 if (p->gridDim < 0) p->gridDim = num; in PetscPartitionerSetFromOptions_Simple()
38 … num, PetscObjectComm((PetscObject)part), PETSC_ERR_ARG_INCOMP, "Process grid dimension %" PetscIn… in PetscPartitionerSetFromOptions_Simple()
/petsc/src/sys/fileio/
H A Dsysio.c281 PetscErrorCode PetscBinaryRead(int fd, void *data, PetscCount num, PetscInt *count, PetscDataType t… in PetscBinaryRead() argument
283 size_t typesize, m = (size_t)num, n = 0, maxblock = 65536; in PetscBinaryRead()
294 …PetscCheck(num >= 0, PETSC_COMM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Trying to read a negative amount … in PetscBinaryRead()
295 if (!num) PetscFunctionReturn(PETSC_SUCCESS); in PetscBinaryRead()
305 if (type == PETSC_BIT_LOGICAL) m = PetscBTLength(num); in PetscBinaryRead()
313 PetscInt cnt = num * ((type == PETSC_REAL) ? 1 : 2); in PetscBinaryRead()
334 num = n / typesize; /* Should we require `n % typesize == 0` ? */ in PetscBinaryRead()
335 …if (count) PetscCall(PetscIntCast(num, count)); /* TODO: This is most likely wrong for PETSC_BIT_L… in PetscBinaryRead()
339 PetscInt i, cnt = num * ((type == PETSC_REAL) ? 1 : 2); in PetscBinaryRead()
348 if (!PetscBinaryBigEndian()) PetscCall(PetscByteSwap(ptmp, type, num)); in PetscBinaryRead()
[all …]

123