142   PetscScalar        Efd, RF, VR, Vr, Vi, Vm;  in EventFunction()  local
158     RF  = xgen[idx + 7];  in EventFunction()
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()
193   PetscScalar  Efd, RF, VR;  in PostEventFunction()  local
242         RF  = xgen[idx + 7];  in PostEventFunction()
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()
347   PetscScalar        Efd, RF, VR; /* Exciter variables */  in SetInitialGuess()  local
408     RF  = KF[i] * Efd / TF[i];  in SetInitialGuess()
411     xgen[idx + 1] = RF;  in SetInitialGuess()
438   PetscScalar        Efd, RF, VR;        /* Exciter variables */  in ResidualFunction()  local
477     RF    = xgen[idx + 7];  in ResidualFunction()
513     fgen[idx + 7] = (-RF + KF[i] * Efd / TF[i]) / TF[i];  in ResidualFunction()
516 …else fgen[idx + 8] = (-VR + KA[i] * RF - KA[i] * KF[i] * Efd / TF[i] + KA[i] * (Vref[i] - Vm)) / T…  in ResidualFunction()