Lines Matching refs:networkdm
50 DM networkdm, dmcoords; in UserMonitor() local
57 PetscCall(SNESGetDM(snes, &networkdm)); in UserMonitor()
58 PetscCall(DMGetCoordinateDM(networkdm, &dmcoords)); in UserMonitor()
68 PetscCall(DMNetworkIsGhostVertex(networkdm, v, &ghost)); in UserMonitor()
70 PetscCall(DMNetworkGetGlobalVertexIndex(networkdm, v, &gidx)); in UserMonitor()
72 PetscCall(DMNetworkGetGlobalVecOffset(networkdm, v, 0, &offset)); in UserMonitor()
81 PetscCall(DMView(networkdm, PETSC_VIEWER_DRAW_WORLD)); in UserMonitor()
89 DM networkdm; in FormJacobian_subPower() local
99 PetscCall(SNESGetDM(snes, &networkdm)); in FormJacobian_subPower()
100 PetscCall(DMGetLocalVector(networkdm, &localX)); in FormJacobian_subPower()
102 PetscCall(PetscObjectGetComm((PetscObject)networkdm, &comm)); in FormJacobian_subPower()
105 PetscCall(DMGlobalToLocalBegin(networkdm, X, INSERT_VALUES, localX)); in FormJacobian_subPower()
106 PetscCall(DMGlobalToLocalEnd(networkdm, X, INSERT_VALUES, localX)); in FormJacobian_subPower()
111 PetscCall(DMNetworkGetSubnetwork(networkdm, 0, &nv, &ne, &vtx, &edges)); in FormJacobian_subPower()
112 PetscCall(FormJacobian_Power_private(networkdm, localX, J, nv, ne, vtx, edges, appctx)); in FormJacobian_subPower()
115 PetscCall(DMNetworkGetSubnetwork(networkdm, 1, &nv, &ne, &vtx, &edges)); in FormJacobian_subPower()
117 PetscCall(DMNetworkIsGhostVertex(networkdm, vtx[i], &ghostvtex)); in FormJacobian_subPower()
120 PetscCall(DMNetworkGetGlobalVecOffset(networkdm, vtx[i], ALL_COMPONENTS, &offset)); in FormJacobian_subPower()
121 PetscCall(DMNetworkGetComponent(networkdm, vtx[i], ALL_COMPONENTS, NULL, NULL, &nvar)); in FormJacobian_subPower()
130 PetscCall(DMRestoreLocalVector(networkdm, &localX)); in FormJacobian_subPower()
135 PetscErrorCode FormFunction_Dummy(DM networkdm, Vec localX, Vec localF, PetscInt nv, PetscInt ne, c… in FormFunction_Dummy() argument
150 PetscCall(DMNetworkIsGhostVertex(networkdm, vtx[i], &ghostvtex)); in FormFunction_Dummy()
153 PetscCall(DMNetworkGetLocalVecOffset(networkdm, vtx[i], ALL_COMPONENTS, &offset)); in FormFunction_Dummy()
154 PetscCall(DMNetworkGetComponent(networkdm, vtx[i], ALL_COMPONENTS, NULL, NULL, &nvar)); in FormFunction_Dummy()
166 DM networkdm; in FormFunction() local
177 PetscCall(SNESGetDM(snes, &networkdm)); in FormFunction()
178 PetscCall(PetscObjectGetComm((PetscObject)networkdm, &comm)); in FormFunction()
181 PetscCall(DMGetLocalVector(networkdm, &localX)); in FormFunction()
182 PetscCall(DMGetLocalVector(networkdm, &localF)); in FormFunction()
186 PetscCall(DMGlobalToLocalBegin(networkdm, X, INSERT_VALUES, localX)); in FormFunction()
187 PetscCall(DMGlobalToLocalEnd(networkdm, X, INSERT_VALUES, localX)); in FormFunction()
190 PetscCall(DMNetworkGetSubnetwork(networkdm, 0, &nv, &ne, &vtx, &edges)); in FormFunction()
192 PetscCall(FormFunction_Dummy(networkdm, localX, localF, nv, ne, vtx, edges, user)); in FormFunction()
194 PetscCall(FormFunction_Power(networkdm, localX, localF, nv, ne, vtx, edges, &appctx_power)); in FormFunction()
198 PetscCall(DMNetworkGetSubnetwork(networkdm, 1, &nv, &ne, &vtx, &edges)); in FormFunction()
200 PetscCall(FormFunction_Dummy(networkdm, localX, localF, nv, ne, vtx, edges, user)); in FormFunction()
202 PetscCall(FormFunction_Water(networkdm, localX, localF, nv, ne, vtx, edges, NULL)); in FormFunction()
206 PetscCall(DMNetworkGetSharedVertices(networkdm, &nv, &vtx)); in FormFunction()
212 PetscCall(DMNetworkGetComponent(networkdm, vtx[v], ALL_COMPONENTS, NULL, NULL, &nvar)); in FormFunction()
213 PetscCall(DMNetworkGetNumComponents(networkdm, vtx[v], &ncomp)); in FormFunction()
217 PetscCall(DMNetworkGetComponent(networkdm, vtx[v], k, &key, &component, &nvar)); in FormFunction()
218 PetscCall(DMNetworkGetGlobalVecOffset(networkdm, vtx[v], k, &goffset[k])); in FormFunction()
238 PetscCall(DMNetworkGetSupportingEdges(networkdm, vtx[v], &nconnedges, &connedges)); in FormFunction()
242 PetscCall(DMNetworkGetNumComponents(networkdm, e, &ncomp)); in FormFunction()
244 PetscCall(DMNetworkGetComponent(networkdm, e, 0, &keye, &component, NULL)); in FormFunction()
249 PetscCall(DMRestoreLocalVector(networkdm, &localX)); in FormFunction()
251 PetscCall(DMLocalToGlobalBegin(networkdm, localF, ADD_VALUES, F)); in FormFunction()
252 PetscCall(DMLocalToGlobalEnd(networkdm, localF, ADD_VALUES, F)); in FormFunction()
253 PetscCall(DMRestoreLocalVector(networkdm, &localF)); in FormFunction()
261 PetscErrorCode SetInitialGuess(DM networkdm, Vec X, void *appctx) in SetInitialGuess() argument
281 PetscCall(DMNetworkGetSubnetwork(networkdm, 0, &nv, &ne, &vtx, &edges)); in SetInitialGuess()
282 PetscCall(SetInitialGuess_Power(networkdm, localX, nv, ne, vtx, edges, &appctx_power)); in SetInitialGuess()
285 PetscCall(DMNetworkGetSubnetwork(networkdm, 1, &nv, &ne, &vtx, &edges)); in SetInitialGuess()
286 PetscCall(SetInitialGuess_Water(networkdm, localX, nv, ne, vtx, edges, NULL)); in SetInitialGuess()
290 PetscCall(DMNetworkGetSharedVertices(networkdm, &nv, &vtx)); in SetInitialGuess()
292 PetscCall(DMNetworkIsGhostVertex(networkdm, vtx[i], &ghost)); in SetInitialGuess()
295 PetscCall(DMNetworkGetNumComponents(networkdm, vtx[i], &ncomp)); in SetInitialGuess()
297 PetscCall(DMNetworkGetLocalVecOffset(networkdm, vtx[i], j, &offset)); in SetInitialGuess()
298 PetscCall(DMNetworkGetComponent(networkdm, vtx[i], j, &key, (void **)&component, NULL)); in SetInitialGuess()
321 PetscCall(DMLocalToGlobalBegin(networkdm, localX, ADD_VALUES, X)); in SetInitialGuess()
322 PetscCall(DMLocalToGlobalEnd(networkdm, localX, ADD_VALUES, X)); in SetInitialGuess()
457 DM networkdm, dmcoords; in main() local
545 PetscCall(DMNetworkCreate(PETSC_COMM_WORLD, &networkdm)); in main()
548 …PetscCall(DMNetworkRegisterComponent(networkdm, "branchstruct", sizeof(struct _p_EDGE_Power), &app… in main()
549 …PetscCall(DMNetworkRegisterComponent(networkdm, "busstruct", sizeof(struct _p_VERTEX_Power), &appc… in main()
550 …PetscCall(DMNetworkRegisterComponent(networkdm, "genstruct", sizeof(struct _p_GEN), &appctx_power-… in main()
551 …PetscCall(DMNetworkRegisterComponent(networkdm, "loadstruct", sizeof(struct _p_LOAD), &appctx_powe… in main()
553 …PetscCall(DMNetworkRegisterComponent(networkdm, "edge_water", sizeof(struct _p_EDGE_Water), &appct… in main()
554 …PetscCall(DMNetworkRegisterComponent(networkdm, "vertex_water", sizeof(struct _p_VERTEX_Water), &a… in main()
559 PetscCall(DMNetworkSetNumSubNetworks(networkdm, PETSC_DECIDE, Nsubnet)); in main()
560 PetscCall(DMNetworkAddSubnetwork(networkdm, "power", numEdges[0], edgelist_power, &power_netnum)); in main()
561 PetscCall(DMNetworkAddSubnetwork(networkdm, "water", numEdges[1], edgelist_water, &water_netnum)); in main()
566 …PetscCall(DMNetworkAddSharedVertices(networkdm, power_netnum, water_netnum, 1, &power_svtx, &water… in main()
569 PetscCall(DMNetworkLayoutSetUp(networkdm)); in main()
574 PetscCall(DMNetworkGetSubnetwork(networkdm, power_netnum, &nv, &ne, &vtx, &edges)); in main()
576 …for (i = 0; i < ne; i++) PetscCall(DMNetworkAddComponent(networkdm, edges[i], appctx_power->compke… in main()
579 PetscCall(DMNetworkIsSharedVertex(networkdm, vtx[i], &flg)); in main()
582 …PetscCall(DMNetworkAddComponent(networkdm, vtx[i], appctx_power->compkey_bus, &pfdata->bus[i], 2)); in main()
584 …for (j = 0; j < pfdata->bus[i].ngen; j++) PetscCall(DMNetworkAddComponent(networkdm, vtx[i], appct… in main()
587 …for (j = 0; j < pfdata->bus[i].nload; j++) PetscCall(DMNetworkAddComponent(networkdm, vtx[i], appc… in main()
592 PetscCall(DMNetworkGetSubnetwork(networkdm, water_netnum, &nv, &ne, &vtx, &edges)); in main()
593 …for (i = 0; i < ne; i++) PetscCall(DMNetworkAddComponent(networkdm, edges[i], appctx_water->compke… in main()
596 PetscCall(DMNetworkIsSharedVertex(networkdm, vtx[i], &flg)); in main()
599 …PetscCall(DMNetworkAddComponent(networkdm, vtx[i], appctx_water->compkey_vtx, &waterdata->vertex[i… in main()
603 PetscCall(DMNetworkGetSharedVertices(networkdm, &nv, &vtx)); in main()
606 …PetscCall(DMNetworkAddComponent(networkdm, vtx[i], appctx_power->compkey_bus, &pfdata->bus[4], 2)); in main()
608 …PetscCall(DMNetworkAddComponent(networkdm, vtx[i], appctx_power->compkey_load, &pfdata->load[0], 0… in main()
611 …PetscCall(DMNetworkAddComponent(networkdm, vtx[i], appctx_water->compkey_vtx, &waterdata->vertex[0… in main()
615 PetscCall(DMSetCoordinateDim(networkdm, 2)); in main()
616 PetscCall(DMGetCoordinateDM(networkdm, &dmcoords)); in main()
625 PetscCall(DMSetCoordinatesLocal(networkdm, coords)); /* set/get coords to/from networkdm */ in main()
627 if (printCoord) PetscCall(CoordinatePrint(networkdm)); in main()
630 PetscCall(DMSetUp(networkdm)); in main()
647 PetscCall(DMNetworkDistribute(&networkdm, 0)); in main()
649 if (printCoord) PetscCall(CoordinatePrint(networkdm)); in main()
652 PetscCall(DMView(networkdm, PETSC_VIEWER_STDOUT_WORLD)); in main()
663 PetscCall(DMNetworkGetSubnetwork(networkdm, i, &nv, &ne, &vtx, &edges)); in main()
668 PetscCall(DMNetworkIsGhostVertex(networkdm, vtx[v], &ghost)); in main()
669 PetscCall(DMNetworkGetGlobalVertexIndex(networkdm, vtx[v], &gidx)); in main()
676 PetscCall(DMNetworkGetSharedVertices(networkdm, &nv, &vtx)); in main()
679 PetscCall(DMNetworkGetGlobalVertexIndex(networkdm, vtx[v], &gidx)); in main()
686 PetscCall(DMCreateGlobalVector(networkdm, &X)); in main()
688 PetscCall(DMGetLocalVector(networkdm, &user.localXold)); in main()
698 PetscCall(SetInitialGuess(networkdm, X, &user)); in main()
704 PetscCall(SNESSetDM(snes, networkdm)); in main()
731 PetscCall(SNESSetDM(snes_power, networkdm)); in main()
738 PetscCall(DMCreateMatrix(networkdm, &Jac)); in main()
757 PetscCall(SNESSetDM(snes_water, networkdm)); in main()
792 PetscCall(DMGlobalToLocalBegin(networkdm, X, INSERT_VALUES, user.localXold)); in main()
793 PetscCall(DMGlobalToLocalEnd(networkdm, X, INSERT_VALUES, user.localXold)); in main()
797 PetscCall(DMGlobalToLocalBegin(networkdm, X, INSERT_VALUES, user.localXold)); in main()
798 PetscCall(DMGlobalToLocalEnd(networkdm, X, INSERT_VALUES, user.localXold)); in main()
802 PetscCall(DMGlobalToLocalBegin(networkdm, X, INSERT_VALUES, user.localXold)); in main()
803 PetscCall(DMGlobalToLocalEnd(networkdm, X, INSERT_VALUES, user.localXold)); in main()
820 PetscCall(DMRestoreLocalVector(networkdm, &user.localXold)); in main()
827 PetscCall(DMDestroy(&networkdm)); in main()