| /petsc/src/mat/impls/aij/mpi/kokkos/ |
| H A D | mpiaijkok.kokkos.cxx | 782 PetscInt *Fi, Fm, Fnz; in MatMPIAIJKokkosBcastBegin() local
784 PetscCall(PetscMalloc1(Fm + 1, &Fi)); in MatMPIAIJKokkosBcastBegin()
785 Fi[0] = 0; in MatMPIAIJKokkosBcastBegin()
786 …peBegin(ownerSF, MPIU_INT, PETSC_MEMTYPE_HOST, E_RowLen, PETSC_MEMTYPE_HOST, &Fi[1], MPI_REPLACE)); in MatMPIAIJKokkosBcastBegin()
787 PetscCall(PetscSFBcastEnd(ownerSF, MPIU_INT, E_RowLen, &Fi[1], MPI_REPLACE)); in MatMPIAIJKokkosBcastBegin()
788 for (PetscInt i = 0; i < Fm; i++) Fi[i + 1] += Fi[i]; in MatMPIAIJKokkosBcastBegin()
789 Fnz = Fi[Fm]; in MatMPIAIJKokkosBcastBegin()
823 …for (PetscInt j = Fi[roffset[i]]; j < Fi[roffset[i + 1]]; j++) { // I will receive rows [roffset[i… in MatMPIAIJKokkosBcastBegin()
870 first = Fj + Fi[i]; in MatMPIAIJKokkosBcastBegin()
871 last = Fj + Fi[i + 1]; in MatMPIAIJKokkosBcastBegin()
[all …]
|
| /petsc/src/ts/tutorials/power_grid/stability_9bus/ |
| H A D | ex9busdmnetwork.c | 466 …rrorCode dq2ri(PetscScalar Fd, PetscScalar Fq, PetscScalar delta, PetscScalar *Fr, PetscScalar *Fi) in dq2ri() argument
470 *Fi = -Fd * PetscCosScalar(delta) + Fq * PetscSinScalar(delta); in dq2ri()
475 PetscErrorCode ri2dq(PetscScalar Fr, PetscScalar Fi, PetscScalar delta, PetscScalar *Fd, PetscScala… in ri2dq() argument
478 *Fd = Fr * PetscSinScalar(delta) - Fi * PetscCosScalar(delta); in ri2dq()
479 *Fq = Fr * PetscCosScalar(delta) + Fi * PetscSinScalar(delta); in ri2dq()
|
| H A D | ex9busadj.c | 97 …rrorCode dq2ri(PetscScalar Fd, PetscScalar Fq, PetscScalar delta, PetscScalar *Fr, PetscScalar *Fi) in dq2ri() argument
101 *Fi = -Fd * PetscCosScalar(delta) + Fq * PetscSinScalar(delta); in dq2ri()
106 PetscErrorCode ri2dq(PetscScalar Fr, PetscScalar Fi, PetscScalar delta, PetscScalar *Fd, PetscScala… in ri2dq() argument
109 *Fd = Fr * PetscSinScalar(delta) - Fi * PetscCosScalar(delta); in ri2dq()
110 *Fq = Fr * PetscCosScalar(delta) + Fi * PetscSinScalar(delta); in ri2dq()
|
| H A D | ex9busoptfd.c | 99 …rrorCode dq2ri(PetscScalar Fd, PetscScalar Fq, PetscScalar delta, PetscScalar *Fr, PetscScalar *Fi) in dq2ri() argument
103 *Fi = -Fd * PetscCosScalar(delta) + Fq * PetscSinScalar(delta); in dq2ri()
108 PetscErrorCode ri2dq(PetscScalar Fr, PetscScalar Fi, PetscScalar delta, PetscScalar *Fd, PetscScala… in ri2dq() argument
111 *Fd = Fr * PetscSinScalar(delta) - Fi * PetscCosScalar(delta); in ri2dq()
112 *Fq = Fr * PetscCosScalar(delta) + Fi * PetscSinScalar(delta); in ri2dq()
|
| H A D | ex9bus.c | 297 …rrorCode dq2ri(PetscScalar Fd, PetscScalar Fq, PetscScalar delta, PetscScalar *Fr, PetscScalar *Fi) in dq2ri() argument
301 *Fi = -Fd * PetscCosScalar(delta) + Fq * PetscSinScalar(delta); in dq2ri()
306 PetscErrorCode ri2dq(PetscScalar Fr, PetscScalar Fi, PetscScalar delta, PetscScalar *Fd, PetscScala… in ri2dq() argument
309 *Fd = Fr * PetscSinScalar(delta) - Fi * PetscCosScalar(delta); in ri2dq()
310 *Fq = Fr * PetscCosScalar(delta) + Fi * PetscSinScalar(delta); in ri2dq()
|
| H A D | ex9busopt.c | 111 …rrorCode dq2ri(PetscScalar Fd, PetscScalar Fq, PetscScalar delta, PetscScalar *Fr, PetscScalar *Fi) in dq2ri() argument
115 *Fi = -Fd * PetscCosScalar(delta) + Fq * PetscSinScalar(delta); in dq2ri()
120 PetscErrorCode ri2dq(PetscScalar Fr, PetscScalar Fi, PetscScalar delta, PetscScalar *Fd, PetscScala… in ri2dq() argument
123 *Fd = Fr * PetscSinScalar(delta) - Fi * PetscCosScalar(delta); in ri2dq()
124 *Fq = Fr * PetscCosScalar(delta) + Fi * PetscSinScalar(delta); in ri2dq()
|