63           PetscScalar     Gff, Bff, Gft, Bft, Gtf, Btf, Gtt, Btt;  in FormFunction_Subnet()  local
75           Btf = branch->ytf[1];  in FormFunction_Subnet()
97 …farr[offsetto] += Gtt * Vmt * Vmt + Vmt * Vmf * (Gtf * PetscCosScalar(thetatf) + Btf * PetscSinSca…  in FormFunction_Subnet()
98 …farr[offsetto + 1] += -Btt * Vmt * Vmt + Vmt * Vmf * (-Btf * PetscCosScalar(thetatf) + Gtf * Petsc…  in FormFunction_Subnet()
228           PetscScalar     Gff, Bff, Gft, Bft, Gtf, Btf, Gtt, Btt;  in FormJacobian_Subnet()  local
241           Btf = branch->ytf[1];  in FormJacobian_Subnet()
303 …values[0] = Vmt * Vmf * (Gtf * -PetscSinScalar(thetatf) + Btf * PetscCosScalar(thetaft));         …  in FormJacobian_Subnet()
304 …values[1] = 2.0 * Gtt * Vmt + Vmf * (Gtf * PetscCosScalar(thetatf) + Btf * PetscSinScalar(thetatf)…  in FormJacobian_Subnet()
305 …values[2] = Vmt * Vmf * (Gtf * PetscSinScalar(thetatf) + Btf * -PetscCosScalar(thetatf));         …  in FormJacobian_Subnet()
306 …values[3] = Vmt * (Gtf * PetscCosScalar(thetatf) + Btf * PetscSinScalar(thetatf));                …  in FormJacobian_Subnet()
317 …           values[0] = Vmt * Vmf * (Btf * PetscSinScalar(thetatf) + Gtf * PetscCosScalar(thetatf));  in FormJacobian_Subnet()
318 …values[1] = -2.0 * Btt * Vmt + Vmf * (-Btf * PetscCosScalar(thetatf) + Gtf * PetscSinScalar(thetat…  in FormJacobian_Subnet()
319 …         values[2] = Vmt * Vmf * (-Btf * PetscSinScalar(thetatf) + Gtf * -PetscCosScalar(thetatf));  in FormJacobian_Subnet()
320               values[3] = Vmt * (-Btf * PetscCosScalar(thetatf) + Gtf * PetscSinScalar(thetatf));  in FormJacobian_Subnet()