Lines Matching refs:lbus
32 const PetscInt lbus[3] = {4, 5, 7}; /* Buses at which loads are incident */ variable
440 Vr = xnet[2 * lbus[i]]; /* Real part of load bus voltage */ in ResidualFunction()
441 Vi = xnet[2 * lbus[i] + 1]; /* Imaginary part of the load bus voltage */ in ResidualFunction()
444 …Vm0 = PetscSqrtScalar(v0[2 * lbus[i]] * v0[2 * lbus[i]] + v0[2 * lbus[i] + 1] * v0[2 * lbus[i] + 1… in ResidualFunction()
453 fnet[2 * lbus[i]] += IDi; in ResidualFunction()
454 fnet[2 * lbus[i] + 1] += IDr; in ResidualFunction()
803 Vr = xnet[2 * lbus[i]]; /* Real part of load bus voltage */ in ResidualJacobian()
804 Vi = xnet[2 * lbus[i] + 1]; /* Imaginary part of the load bus voltage */ in ResidualJacobian()
808 …Vm0 = PetscSqrtScalar(v0[2 * lbus[i]] * v0[2 * lbus[i]] + v0[2 * lbus[i] + 1] * v0[2 * lbus[i] + 1… in ResidualJacobian()
832 row[0] = net_start + 2 * lbus[i]; in ResidualJacobian()
833 col[0] = net_start + 2 * lbus[i]; in ResidualJacobian()
834 col[1] = net_start + 2 * lbus[i] + 1; in ResidualJacobian()
839 row[0] = net_start + 2 * lbus[i] + 1; in ResidualJacobian()
840 col[0] = net_start + 2 * lbus[i]; in ResidualJacobian()
841 col[1] = net_start + 2 * lbus[i] + 1; in ResidualJacobian()