Searched refs:Yffr (Results 1 – 1 of 1) sorted by relevance
526 PetscScalar Yffr, Yffi; /* Real and imaginary fault admittances */ in FormIFunction() local546 Yffr = bus->yff[1]; in FormIFunction()550 Yffr += user->ybusfault[bus->id * 2 + 1]; in FormIFunction()559 … farr[offsetbus] += Yffi * Vr + Yffr * Vi; /* imaginary current due to diagonal elements */ in FormIFunction()560 farr[offsetbus + 1] += Yffr * Vr - Yffi * Vi; /* real current due to diagonal elements */ in FormIFunction()776 PetscScalar Yffr, Yffi, Vm, Vm2, Vm0, Vr0 = 0, Vi0 = 0, PD, QD; in AlgFunction() local797 Yffr = bus->yff[1]; in AlgFunction()800 Yffr += user->ybusfault[bus->id * 2 + 1]; in AlgFunction()806 farr[offsetbus] += Yffi * Vr + Yffr * Vi; in AlgFunction()807 farr[offsetbus + 1] += Yffr * Vr - Yffi * Vi; in AlgFunction()