| /petsc/src/ts/tutorials/power_grid/stability_9bus/ ! |
| H A D | ex9busadj.c | 83 Mat Ybus; /* Network admittance matrix */ member 233 PetscCall(MatMult(user->Ybus, Xnet, Fnet)); in ResidualFunction() 412 PetscCall(MatGetRow(user->Ybus, 2 * i, &ncols, NULL, NULL)); in PreallocateJacobian() 415 PetscCall(MatRestoreRow(user->Ybus, 2 * i, &ncols, NULL, NULL)); in PreallocateJacobian() 635 PetscCall(MatGetRow(user->Ybus, 2 * i, &ncols, &cols, &yvals)); in ResidualJacobian() 642 PetscCall(MatRestoreRow(user->Ybus, 2 * i, &ncols, &cols, &yvals)); in ResidualJacobian() 644 PetscCall(MatGetRow(user->Ybus, 2 * i + 1, &ncols, &cols, &yvals)); in ResidualJacobian() 651 PetscCall(MatRestoreRow(user->Ybus, 2 * i + 1, &ncols, &cols, &yvals)); in ResidualJacobian() 817 PetscCall(MatCreate(PETSC_COMM_WORLD, &user.Ybus)); in main() 818 PetscCall(MatSetSizes(user.Ybus, PETSC_DECIDE, PETSC_DECIDE, user.neqs_net, user.neqs_net)); in main() [all …]
|
| H A D | ex9busopt.c | 90 Mat Ybus; /* Network admittance matrix */ member 380 PetscCall(MatMult(user->Ybus, Xnet, Fnet)); in ResidualFunction() 557 PetscCall(MatGetRow(user->Ybus, 2 * i, &ncols, NULL, NULL)); in PreallocateJacobian() 560 PetscCall(MatRestoreRow(user->Ybus, 2 * i, &ncols, NULL, NULL)); in PreallocateJacobian() 779 PetscCall(MatGetRow(user->Ybus, 2 * i, &ncols, &cols, &yvals)); in ResidualJacobian() 786 PetscCall(MatRestoreRow(user->Ybus, 2 * i, &ncols, &cols, &yvals)); in ResidualJacobian() 788 PetscCall(MatGetRow(user->Ybus, 2 * i + 1, &ncols, &cols, &yvals)); in ResidualJacobian() 795 PetscCall(MatRestoreRow(user->Ybus, 2 * i + 1, &ncols, &cols, &yvals)); in ResidualJacobian() 1113 PetscCall(MatCreate(PETSC_COMM_WORLD, &user.Ybus)); in main() 1114 PetscCall(MatSetSizes(user.Ybus, PETSC_DECIDE, PETSC_DECIDE, user.neqs_net, user.neqs_net)); in main() [all …]
|
| H A D | ex9busoptfd.c | 80 Mat Ybus; /* Network admittance matrix */ member 235 PetscCall(MatMult(user->Ybus, Xnet, Fnet)); in ResidualFunction() 413 PetscCall(MatGetRow(user->Ybus, 2 * i, &ncols, NULL, NULL)); in PreallocateJacobian() 416 PetscCall(MatRestoreRow(user->Ybus, 2 * i, &ncols, NULL, NULL)); in PreallocateJacobian() 637 PetscCall(MatGetRow(user->Ybus, 2 * i, &ncols, &cols, &yvals)); in ResidualJacobian() 644 PetscCall(MatRestoreRow(user->Ybus, 2 * i, &ncols, &cols, &yvals)); in ResidualJacobian() 646 PetscCall(MatGetRow(user->Ybus, 2 * i + 1, &ncols, &cols, &yvals)); in ResidualJacobian() 653 PetscCall(MatRestoreRow(user->Ybus, 2 * i + 1, &ncols, &cols, &yvals)); in ResidualJacobian() 1005 PetscCall(MatCreate(PETSC_COMM_WORLD, &ctx->Ybus)); in FormFunction() 1006 PetscCall(MatSetSizes(ctx->Ybus, PETSC_DECIDE, PETSC_DECIDE, ctx->neqs_net, ctx->neqs_net)); in FormFunction() [all …]
|
| H A D | ex9bus.c | 114 Mat Ybus; /* Network admittance matrix */ member 211 PetscCall(MatSetValues(user->Ybus, 1, &row_loc, 1, &col_loc, &val, ADD_VALUES)); in PostEventFunction() 215 PetscCall(MatSetValues(user->Ybus, 1, &row_loc, 1, &col_loc, &val, ADD_VALUES)); in PostEventFunction() 217 PetscCall(MatAssemblyBegin(user->Ybus, MAT_FINAL_ASSEMBLY)); in PostEventFunction() 218 PetscCall(MatAssemblyEnd(user->Ybus, MAT_FINAL_ASSEMBLY)); in PostEventFunction() 227 PetscCall(MatSetValues(user->Ybus, 1, &row_loc, 1, &col_loc, &val, ADD_VALUES)); in PostEventFunction() 231 PetscCall(MatSetValues(user->Ybus, 1, &row_loc, 1, &col_loc, &val, ADD_VALUES)); in PostEventFunction() 233 PetscCall(MatAssemblyBegin(user->Ybus, MAT_FINAL_ASSEMBLY)); in PostEventFunction() 234 PetscCall(MatAssemblyEnd(user->Ybus, MAT_FINAL_ASSEMBLY)); in PostEventFunction() 461 PetscCall(MatMult(user->Ybus, Xnet, Fnet)); in ResidualFunction() [all …]
|
| H A D | ex9busdmnetwork.c | 117 Mat Ybus; in read_data() local 164 PetscCall(MatCreate(PETSC_COMM_SELF, &Ybus)); in read_data() 165 PetscCall(MatSetType(Ybus, MATBAIJ)); in read_data() 166 PetscCall(MatLoad(Ybus, Ybusview)); in read_data() 172 PetscCall(MatGetLocalSize(Ybus, &m, &n)); in read_data() 200 PetscCall(MatGetValues(Ybus, 1, row, 2, col, bus[i * 9 + j].yff)); in read_data() 337 …PetscCall(MatGetValues(Ybus, 1, row, 2, col, branch[i * 9 + j].yft)); /*imaginary part of admittan… in read_data() 351 PetscCall(MatDestroy(&Ybus)); in read_data()
|