Lines Matching refs:lbus
23 const PetscInt lbus[3] = {4, 5, 7}; /* Buses at which loads are incident */ variable
295 Vr = xnet[2 * lbus[i]]; /* Real part of load bus voltage */ in ResidualFunction()
296 Vi = xnet[2 * lbus[i] + 1]; /* Imaginary part of the load bus voltage */ in ResidualFunction()
299 …Vm0 = PetscSqrtScalar(v0[2 * lbus[i]] * v0[2 * lbus[i]] + v0[2 * lbus[i] + 1] * v0[2 * lbus[i] + 1… in ResidualFunction()
308 fnet[2 * lbus[i]] += IDi; in ResidualFunction()
309 fnet[2 * lbus[i] + 1] += IDr; in ResidualFunction()
661 Vr = xnet[2 * lbus[i]]; /* Real part of load bus voltage */ in ResidualJacobian()
662 Vi = xnet[2 * lbus[i] + 1]; /* Imaginary part of the load bus voltage */ in ResidualJacobian()
666 …Vm0 = PetscSqrtScalar(v0[2 * lbus[i]] * v0[2 * lbus[i]] + v0[2 * lbus[i] + 1] * v0[2 * lbus[i] + 1… in ResidualJacobian()
690 row[0] = net_start + 2 * lbus[i]; in ResidualJacobian()
691 col[0] = net_start + 2 * lbus[i]; in ResidualJacobian()
692 col[1] = net_start + 2 * lbus[i] + 1; in ResidualJacobian()
697 row[0] = net_start + 2 * lbus[i] + 1; in ResidualJacobian()
698 col[0] = net_start + 2 * lbus[i]; in ResidualJacobian()
699 col[1] = net_start + 2 * lbus[i] + 1; in ResidualJacobian()