| /petsc/src/ts/tutorials/power_grid/stability_9bus/ |
| H A D | ex9busadj.c | 119 PetscScalar Vr, Vi, IGr, IGi, Vm, Vm2; in SetInitialGuess() local
146 Vm2 = Vm * Vm; in SetInitialGuess()
147 IGr = (Vr * PG[i] + Vi * QG[i]) / Vm2; in SetInitialGuess()
148 IGi = (Vi * PG[i] - Vr * QG[i]) / Vm2; in SetInitialGuess()
208 PetscScalar Vr, Vi, Vm, Vm2; in ResidualFunction() local
297 Vm2 = Vm * Vm; in ResidualFunction()
304 IDr = (PD * Vr + QD * Vi) / Vm2; in ResidualFunction()
305 IDi = (-QD * Vr + PD * Vi) / Vm2; in ResidualFunction()
434 PetscScalar Vr, Vi, Vm, Vm2; in ResidualJacobian() local
662 Vm2 = Vm * Vm; in ResidualJacobian()
[all …]
|
| H A D | ex9busoptfd.c | 121 PetscScalar Vr, Vi, IGr, IGi, Vm, Vm2; in SetInitialGuess() local
148 Vm2 = Vm * Vm; in SetInitialGuess()
149 IGr = (Vr * PG[i] + Vi * QG[i]) / Vm2; in SetInitialGuess()
150 IGi = (Vi * PG[i] - Vr * QG[i]) / Vm2; in SetInitialGuess()
210 PetscScalar Vr, Vi, Vm, Vm2; in ResidualFunction() local
298 Vm2 = Vm * Vm; in ResidualFunction()
305 IDr = (PD * Vr + QD * Vi) / Vm2; in ResidualFunction()
306 IDi = (-QD * Vr + PD * Vi) / Vm2; in ResidualFunction()
435 PetscScalar Vr, Vi, Vm, Vm2; in ResidualJacobian() local
664 Vm2 = Vm * Vm; in ResidualJacobian()
[all …]
|
| H A D | ex9busopt.c | 158 PetscScalar Vr, Vi, IGr, IGi, Vm, Vm2; in SetInitialGuess() local
185 Vm2 = Vm * Vm; in SetInitialGuess()
186 IGr = (Vr * PG[i] + Vi * QG[i]) / Vm2; in SetInitialGuess()
187 IGi = (Vi * PG[i] - Vr * QG[i]) / Vm2; in SetInitialGuess()
246 PetscScalar Vr, Vi, IGr, IGi, Vm, Vm2; in InitialGuess() local
273 Vm2 = Vm * Vm; in InitialGuess()
274 IGr = (Vr * PGv[i] + Vi * QG[i]) / Vm2; in InitialGuess()
275 IGi = (Vi * PGv[i] - Vr * QG[i]) / Vm2; in InitialGuess()
355 PetscScalar Vr, Vi, Vm, Vm2; in ResidualFunction() local
443 Vm2 = Vm * Vm; in ResidualFunction()
[all …]
|
| H A D | ex9bus.c | 345 PetscScalar Vr, Vi, IGr, IGi, Vm, Vm2; in SetInitialGuess() local
372 Vm2 = Vm * Vm; in SetInitialGuess()
373 IGr = (Vr * PG[i] + Vi * QG[i]) / Vm2; in SetInitialGuess()
374 IGi = (Vi * PG[i] - Vr * QG[i]) / Vm2; in SetInitialGuess()
436 PetscScalar Vr, Vi, Vm, Vm2; in ResidualFunction() local
526 Vm2 = Vm * Vm; in ResidualFunction()
533 IDr = (PD * Vr + QD * Vi) / Vm2; in ResidualFunction()
534 IDi = (-QD * Vr + PD * Vi) / Vm2; in ResidualFunction()
692 PetscScalar Vr, Vi, Vm, Vm2; in ResidualJacobian() local
934 Vm2 = Vm * Vm; in ResidualJacobian()
[all …]
|
| H A D | ex9busdmnetwork.c | 366 PetscScalar Vr = 0, Vi = 0, Vm = 0, Vm2; /* Terminal voltage variables */ in SetInitialGuess() local
406 Vm2 = Vm * Vm; in SetInitialGuess()
408 IGr = (Vr * gen->PG + Vi * gen->QG) / Vm2; in SetInitialGuess()
410 IGi = (Vi * gen->PG - Vr * gen->QG) / Vm2; in SetInitialGuess()
527 PetscScalar Vm, Vm2, Vm0; in FormIFunction() local
711 Vm2 = Vm * Vm; in FormIFunction()
718 IDr = (PD * Vr + QD * Vi) / Vm2; in FormIFunction()
719 IDi = (-QD * Vr + PD * Vi) / Vm2; in FormIFunction()
776 PetscScalar Yffr, Yffi, Vm, Vm2, Vm0, Vr0 = 0, Vi0 = 0, PD, QD; in AlgFunction() local
922 Vm2 = Vm * Vm; in AlgFunction()
[all …]
|