15   const PetscScalar *xarr;  in FormFunction_Subnet()  local
20   PetscCall(VecGetArrayRead(localX, &xarr));  in FormFunction_Subnet()
46           farr[offset]     = xarr[offset] - bus->va * PETSC_PI / 180.0;  in FormFunction_Subnet()
47           farr[offset + 1] = xarr[offset + 1] - bus->vm;  in FormFunction_Subnet()
52           Vm = xarr[offset + 1];  in FormFunction_Subnet()
86           thetaf  = xarr[offsetfrom];  in FormFunction_Subnet()
87           Vmf     = xarr[offsetfrom + 1];  in FormFunction_Subnet()
88           thetat  = xarr[offsetto];  in FormFunction_Subnet()
89           Vmt     = xarr[offsetto + 1];  in FormFunction_Subnet()
116     if (bus && bus->ide == PV_BUS) farr[offset + 1] = xarr[offset + 1] - bus->vm;  in FormFunction_Subnet()
118   PetscCall(VecRestoreArrayRead(localX, &xarr));  in FormFunction_Subnet()
162   const PetscScalar *xarr;  in FormJacobian_Subnet()  local
168   PetscCall(VecGetArrayRead(localX, &xarr));  in FormJacobian_Subnet()
208           Vm = xarr[offset + 1];  in FormJacobian_Subnet()
256           thetaf  = xarr[offsetfrom];  in FormJacobian_Subnet()
257           Vmf     = xarr[offsetfrom + 1];  in FormJacobian_Subnet()
258           thetat  = xarr[offsetto];  in FormJacobian_Subnet()
259           Vmt     = xarr[offsetto + 1];  in FormJacobian_Subnet()
335   PetscCall(VecRestoreArrayRead(localX, &xarr));  in FormJacobian_Subnet()
376   PetscScalar *xarr;  in SetInitialValues_Subnet()  local
381   PetscCall(VecGetArray(localX, &xarr));  in SetInitialValues_Subnet()
392         xarr[offset]     = bus->va * PETSC_PI / 180.0;  in SetInitialValues_Subnet()
393         xarr[offset + 1] = bus->vm;  in SetInitialValues_Subnet()
397         xarr[offset + 1] = gen->vs;  in SetInitialValues_Subnet()
402   PetscCall(VecRestoreArray(localX, &xarr));  in SetInitialValues_Subnet()