| /petsc/src/ksp/ksp/tutorials/network/ |
| H A D | ex4.c | 9 PetscInt i, j, net, Nsubnet, ne, nv, nvar, v, goffset, row, compkey0, compkey1, compkey; in main() local
22 if (size == 1) Nsubnet = 2; in main()
23 else Nsubnet = (PetscInt)size; in main()
24 PetscCall(PetscCalloc2(Nsubnet, &numEdges, Nsubnet, &edgelist)); in main()
27 for (i = 0; i < Nsubnet; i++) { in main()
66 PetscCall(DMNetworkSetNumSubNetworks(dmnetwork, PETSC_DECIDE, Nsubnet)); in main()
68 for (i = 0; i < Nsubnet; i++) { in main()
78 …for (j = Nsubnet - 1; j >= 1; j--) PetscCall(DMNetworkAddSharedVertices(dmnetwork, 0, j, 2, asvtx,… in main()
84 for (net = 0; net < Nsubnet; net++) { in main()
160 for (i = 0; i < Nsubnet; i++) { in main()
|
| H A D | ex3.c | 18 …PetscInt i, j, net, Nsubnet, nsubnet, ne, nv, nvar, v, ncomp, compkey0, compkey1, compkey, … in main() local
47 PetscCall(DMNetworkGetNumSubNetworks(dmnetwork, NULL, &Nsubnet)); in main()
50 for (i = 0; i < Nsubnet; i++) numEdges[i] = 0; in main()
51 for (i = 0; i < Nsubnet; i++) { in main()
83 for (i = 0; i < Nsubnet; i++) { in main()
90 for (j = 1; j < Nsubnet; j++) { in main()
99 for (net = 0; net < Nsubnet; net++) { in main()
199 for (i = 0; i < Nsubnet; i++) { in main()
|
| /petsc/src/dm/impls/network/ |
| H A D | network.c | 83 PetscErrorCode DMNetworkGetNumSubNetworks(DM dm, PeOp PetscInt *nsubnet, PeOp PetscInt *Nsubnet) in DMNetworkGetNumSubNetworks() argument
89 if (Nsubnet) *Nsubnet = network->cloneshared->Nsubnet; in DMNetworkGetNumSubNetworks()
107 PetscErrorCode DMNetworkSetNumSubNetworks(DM dm, PetscInt nsubnet, PetscInt Nsubnet) in DMNetworkSetNumSubNetworks() argument
112 …PetscCheck(network->cloneshared->Nsubnet == 0, PetscObjectComm((PetscObject)dm), PETSC_ERR_ARG_INC… in DMNetworkSetNumSubNetworks()
116 PetscValidLogicalCollectiveInt(dm, Nsubnet, 3); in DMNetworkSetNumSubNetworks()
118 if (Nsubnet == PETSC_DECIDE) { in DMNetworkSetNumSubNetworks()
120 …PetscCallMPI(MPIU_Allreduce(&nsubnet, &Nsubnet, 1, MPIU_INT, MPI_SUM, PetscObjectComm((PetscObject… in DMNetworkSetNumSubNetworks()
122 …k(Nsubnet >= 1, PetscObjectComm((PetscObject)dm), PETSC_ERR_ARG_INCOMP, "Number of global subnetwo… in DMNetworkSetNumSubNetworks()
124 network->cloneshared->Nsubnet = Nsubnet; in DMNetworkSetNumSubNetworks()
126 PetscCall(PetscCalloc1(Nsubnet, &network->cloneshared->subnet)); in DMNetworkSetNumSubNetworks()
[all …]
|
| H A D | networkview.c | 297 nsubnet = network->cloneshared->Nsubnet; /* num of subnetworks */ in DMView_Network()
|
| /petsc/src/snes/tutorials/network/ |
| H A D | ex1.c | 329 PetscInt i, gidx, offset, v, nv, Nsubnet; in CoordinateVecSetUp() local
336 PetscCall(DMNetworkGetNumSubNetworks(dmcoords, NULL, &Nsubnet)); in CoordinateVecSetUp()
337 for (i = 0; i < Nsubnet; i++) { in CoordinateVecSetUp()
459 PetscInt Nsubnet = 2, numVertices[2], numEdges[2], i, j, nv, ne, it_max = 10; in main() local
496 for (i = 0; i < Nsubnet; i++) { in main()
559 PetscCall(DMNetworkSetNumSubNetworks(networkdm, PETSC_DECIDE, Nsubnet)); in main()
662 for (i = 0; i < Nsubnet; i++) { in main()
702 user.subsnes_id = Nsubnet; in main()
800 user.subsnes_id = Nsubnet; in main()
|
| /petsc/include/petsc/private/ |
| H A D | dmnetworkimpl.h | 122 PetscInt nsubnet, Nsubnet; /* Local and global number of subnetworks */ member
|
| /petsc/doc/manual/ |
| H A D | dmnetwork.md | 42 DMNetworkSetNumSubNetworks(DM dm, PetscInt nsubnet, PetscInt Nsubnet);
45 Here, `nsubnet` and `Nsubnet` are the local and global number of subnetworks.
|