Searched refs:fnet (Results 1 – 4 of 4) sorted by relevance
| /petsc/src/ts/tutorials/power_grid/stability_9bus/ |
| H A D | ex9busadj.c | 206 PetscScalar *xgen, *xnet, *fgen, *fnet; in ResidualFunction() local
238 PetscCall(VecGetArray(Fnet, &fnet)); in ResidualFunction()
277 fnet[2 * gbus[i]] -= IGi; in ResidualFunction()
278 fnet[2 * gbus[i] + 1] -= IGr; in ResidualFunction()
307 fnet[2 * lbus[i]] += IDi; in ResidualFunction()
308 fnet[2 * lbus[i] + 1] += IDr; in ResidualFunction()
315 PetscCall(VecRestoreArray(Fnet, &fnet)); in ResidualFunction()
|
| H A D | ex9busoptfd.c | 208 PetscScalar *xgen, *xnet, *fgen, *fnet; in ResidualFunction() local
240 PetscCall(VecGetArray(Fnet, &fnet)); in ResidualFunction()
278 fnet[2 * gbus[i]] -= IGi; in ResidualFunction()
279 fnet[2 * gbus[i] + 1] -= IGr; in ResidualFunction()
308 fnet[2 * lbus[i]] += IDi; in ResidualFunction()
309 fnet[2 * lbus[i] + 1] += IDr; in ResidualFunction()
316 PetscCall(VecRestoreArray(Fnet, &fnet)); in ResidualFunction()
|
| H A D | ex9bus.c | 434 PetscScalar *fgen, *fnet; in ResidualFunction() local
466 PetscCall(VecGetArrayWrite(Fnet, &fnet)); in ResidualFunction()
504 fnet[2 * gbus[i]] -= IGi; in ResidualFunction()
505 fnet[2 * gbus[i] + 1] -= IGr; in ResidualFunction()
536 fnet[2 * lbus[i]] += IDi; in ResidualFunction()
537 fnet[2 * lbus[i] + 1] += IDr; in ResidualFunction()
544 PetscCall(VecRestoreArrayWrite(Fnet, &fnet)); in ResidualFunction()
|
| H A D | ex9busopt.c | 353 PetscScalar *xgen, *xnet, *fgen, *fnet; in ResidualFunction() local
385 PetscCall(VecGetArray(Fnet, &fnet)); in ResidualFunction()
423 fnet[2 * gbus[i]] -= IGi; in ResidualFunction()
424 fnet[2 * gbus[i] + 1] -= IGr; in ResidualFunction()
453 fnet[2 * lbus[i]] += IDi; in ResidualFunction()
454 fnet[2 * lbus[i] + 1] += IDr; in ResidualFunction()
461 PetscCall(VecRestoreArray(Fnet, &fnet)); in ResidualFunction()
|