Searched refs:KA (Results 1 – 6 of 6) sorted by relevance
| /petsc/src/ksp/ksp/tutorials/ |
| H A D | ex77.c | 9 Mat A, KA = NULL; /* linear system matrix */ in main() local
62 PetscCall(MatCreateKAIJ(A, N, N, S, T, &KA)); in main()
114 PetscCall(KSPSetOperators(ksp, KA, KA)); in main()
115 PetscCall(MatGetSize(KA, &M, NULL)); in main()
128 PetscCall(MatDestroy(&KA)); in main()
|
| /petsc/src/ts/tutorials/power_grid/stability_9bus/ |
| H A D | ex9bus.c | 73 const PetscScalar KA[3] = {20.0, 20.0, 20.0}; /* Voltage regulartor gain constant */ variable
168 …fvalue[2 + 2 * i] = PetscRealPart((VR - KA[i] * RF + KA[i] * KF[i] * Efd / TF[i] - KA[i] * (Vref[i… in EventFunction()
173 …fvalue[2 + 2 * i + 1] = PetscRealPart((VR - KA[i] * RF + KA[i] * KF[i] * Efd / TF[i] - KA[i] * (Vr… in EventFunction()
250 fvalue = (VR - KA[i] * RF + KA[i] * KF[i] * Efd / TF[i] - KA[i] * (Vref[i] - Vm)) / TA[i]; in PostEventFunction()
257 fvalue = (VR - KA[i] * RF + KA[i] * KF[i] * Efd / TF[i] - KA[i] * (Vref[i] - Vm)) / TA[i]; in PostEventFunction()
414 Vref[i] = Vm + (VR / KA[i]); in SetInitialGuess()
516 …else fgen[idx + 8] = (-VR + KA[i] * RF - KA[i] * KF[i] * Efd / TF[i] + KA[i] * (Vref[i] - Vm)) / T… in ResidualFunction()
894 val[0] = -(KA[i] * KF[i] / TF[i]) / TA[i]; in ResidualJacobian()
895 val[1] = KA[i] / TA[i]; in ResidualJacobian()
899 val[3] = -KA[i] * dVm_dVr / TA[i]; in ResidualJacobian()
[all …]
|
| H A D | ex9busdmnetwork.c | 45 PetscScalar KA; /* Voltage regulator gain constant */ member
136 static const PetscScalar KA[3] = {20.0, 20.0, 20.0}; /* Voltage regulartor gain constant */ in read_data() local
226 exc[i * 3 + j].KA = KA[j]; in read_data()
454 exc->Vref = Vm + (VR / exc->KA); in SetInitialGuess()
660 PetscScalar k1, k2, KE, TE, TF, KA, KF, Vref, TA; /* Generator parameters */ in FormIFunction() local
675 KA = exc->KA; in FormIFunction()
686 …farr[offsetexc + 2] = (VR - KA * RF + KA * KF * Efd / TF - KA * (Vref - Vm)) / TA + xdotarr[offset… in FormIFunction()
|
| H A D | ex9busadj.c | 46 const PetscScalar KA[3] = {20.0, 20.0, 20.0}; /* Voltage regulartor gain constant */ variable
188 Vref[i] = Vm + (VR / KA[i]); in SetInitialGuess()
287 … fgen[idx + 8] = (VR - KA[i] * RF + KA[i] * KF[i] * Efd / TF[i] - KA[i] * (Vref[i] - Vm)) / TA[i]; in ResidualFunction()
623 val[0] = (KA[i] * KF[i] / TF[i]) / TA[i]; in ResidualJacobian()
624 val[1] = -KA[i] / TA[i]; in ResidualJacobian()
628 val[3] = KA[i] * dVm_dVr / TA[i]; in ResidualJacobian()
629 val[4] = KA[i] * dVm_dVi / TA[i]; in ResidualJacobian()
|
| H A D | ex9busoptfd.c | 43 const PetscScalar KA[3] = {20.0, 20.0, 20.0}; /* Voltage regulartor gain constant */ variable
190 Vref[i] = Vm + (VR / KA[i]); in SetInitialGuess()
288 … fgen[idx + 8] = (VR - KA[i] * RF + KA[i] * KF[i] * Efd / TF[i] - KA[i] * (Vref[i] - Vm)) / TA[i]; in ResidualFunction()
625 val[0] = (KA[i] * KF[i] / TF[i]) / TA[i]; in ResidualJacobian()
626 val[1] = -KA[i] / TA[i]; in ResidualJacobian()
630 val[3] = KA[i] * dVm_dVr / TA[i]; in ResidualJacobian()
631 val[4] = KA[i] * dVm_dVi / TA[i]; in ResidualJacobian()
|
| H A D | ex9busopt.c | 53 const PetscScalar KA[3] = {20.0, 20.0, 20.0}; /* Voltage regulartor gain constant */ variable
227 Vref[i] = Vm + (VR / KA[i]); in SetInitialGuess()
433 … fgen[idx + 8] = (VR - KA[i] * RF + KA[i] * KF[i] * Efd / TF[i] - KA[i] * (Vref[i] - Vm)) / TA[i]; in ResidualFunction()
767 val[0] = (KA[i] * KF[i] / TF[i]) / TA[i]; in ResidualJacobian()
768 val[1] = -KA[i] / TA[i]; in ResidualJacobian()
772 val[3] = KA[i] * dVm_dVr / TA[i]; in ResidualJacobian()
773 val[4] = KA[i] * dVm_dVi / TA[i]; in ResidualJacobian()
|