Lines Matching refs:lbus
54 const PetscInt lbus[3] = {4, 5, 7}; /* Buses at which loads are incident */ variable
523 Vr = xnet[2 * lbus[i]]; /* Real part of load bus voltage */ in ResidualFunction()
524 Vi = xnet[2 * lbus[i] + 1]; /* Imaginary part of the load bus voltage */ in ResidualFunction()
527 …Vm0 = PetscSqrtScalar(v0[2 * lbus[i]] * v0[2 * lbus[i]] + v0[2 * lbus[i] + 1] * v0[2 * lbus[i] + 1… in ResidualFunction()
536 fnet[2 * lbus[i]] += IDi; in ResidualFunction()
537 fnet[2 * lbus[i] + 1] += IDr; in ResidualFunction()
931 Vr = xnet[2 * lbus[i]]; /* Real part of load bus voltage */ in ResidualJacobian()
932 Vi = xnet[2 * lbus[i] + 1]; /* Imaginary part of the load bus voltage */ in ResidualJacobian()
936 …Vm0 = PetscSqrtScalar(v0[2 * lbus[i]] * v0[2 * lbus[i]] + v0[2 * lbus[i] + 1] * v0[2 * lbus[i] + 1… in ResidualJacobian()
960 row[0] = net_start + 2 * lbus[i]; in ResidualJacobian()
961 col[0] = net_start + 2 * lbus[i]; in ResidualJacobian()
962 col[1] = net_start + 2 * lbus[i] + 1; in ResidualJacobian()
967 row[0] = net_start + 2 * lbus[i] + 1; in ResidualJacobian()
968 col[0] = net_start + 2 * lbus[i]; in ResidualJacobian()
969 col[1] = net_start + 2 * lbus[i] + 1; in ResidualJacobian()