| /petsc/src/ksp/ksp/tutorials/ |
| H A D | ex42.c | 560 … DMDASetValuesLocalStencil3D_ADD_VALUES(StokesDOF ***fields_F, MatStencil u_eqn[], MatStencil p_eq… in DMDASetValuesLocalStencil3D_ADD_VALUES() argument
566 II = u_eqn[NSD * n].i; in DMDASetValuesLocalStencil3D_ADD_VALUES()
567 J = u_eqn[NSD * n].j; in DMDASetValuesLocalStencil3D_ADD_VALUES()
568 K = u_eqn[NSD * n].k; in DMDASetValuesLocalStencil3D_ADD_VALUES()
572 II = u_eqn[NSD * n + 1].i; in DMDASetValuesLocalStencil3D_ADD_VALUES()
573 J = u_eqn[NSD * n + 1].j; in DMDASetValuesLocalStencil3D_ADD_VALUES()
574 K = u_eqn[NSD * n + 1].k; in DMDASetValuesLocalStencil3D_ADD_VALUES()
578 II = u_eqn[NSD * n + 2].i; in DMDASetValuesLocalStencil3D_ADD_VALUES()
579 J = u_eqn[NSD * n + 2].j; in DMDASetValuesLocalStencil3D_ADD_VALUES()
580 K = u_eqn[NSD * n + 2].k; in DMDASetValuesLocalStencil3D_ADD_VALUES()
[all …]
|
| H A D | ex49.c | 571 MatStencil u_eqn[NODES_PER_EL * U_DOFS]; /* 2 degrees of freedom */ in AssembleA_Elasticity() local
610 PetscCall(DMDAGetElementEqnums_u(u_eqn, ei, ej)); in AssembleA_Elasticity()
611 …PetscCall(MatSetValuesStencil(A, NODES_PER_EL * U_DOFS, u_eqn, NODES_PER_EL * U_DOFS, u_eqn, Ae, A… in AssembleA_Elasticity()
624 …DMDASetValuesLocalStencil_ADD_VALUES(ElasticityDOF **fields_F, MatStencil u_eqn[], PetscScalar Fe_… in DMDASetValuesLocalStencil_ADD_VALUES() argument
630 …fields_F[u_eqn[2 * n].j][u_eqn[2 * n].i].ux_dof = fields_F[u_eqn[2 * n].j][u_eqn[2 * n].i]… in DMDASetValuesLocalStencil_ADD_VALUES()
631 …fields_F[u_eqn[2 * n + 1].j][u_eqn[2 * n + 1].i].uy_dof = fields_F[u_eqn[2 * n + 1].j][u_eqn[2 * n… in DMDASetValuesLocalStencil_ADD_VALUES()
641 MatStencil u_eqn[NODES_PER_EL * U_DOFS]; /* 2 degrees of freedom */ in AssembleF_Elasticity() local
687 PetscCall(DMDAGetElementEqnums_u(u_eqn, ei, ej)); in AssembleF_Elasticity()
689 PetscCall(DMDASetValuesLocalStencil_ADD_VALUES(ff, u_eqn, Fe)); in AssembleF_Elasticity()
|
| H A D | ex43.c | 708 MatStencil u_eqn[NODES_PER_EL * U_DOFS]; /* 2 degrees of freedom */ in AssembleA_Stokes() local
756 PetscCall(DMDAGetElementEqnums_up(u_eqn, p_eqn, ei, ej)); in AssembleA_Stokes()
757 …PetscCall(MatSetValuesStencil(A, NODES_PER_EL * U_DOFS, u_eqn, NODES_PER_EL * U_DOFS, u_eqn, Ae, A… in AssembleA_Stokes()
758 …PetscCall(MatSetValuesStencil(A, NODES_PER_EL * U_DOFS, u_eqn, NODES_PER_EL * P_DOFS, p_eqn, Ge, A… in AssembleA_Stokes()
759 …PetscCall(MatSetValuesStencil(A, NODES_PER_EL * P_DOFS, p_eqn, NODES_PER_EL * U_DOFS, u_eqn, De, A… in AssembleA_Stokes()
778 MatStencil u_eqn[NODES_PER_EL * U_DOFS]; /* 2 degrees of freedom */ in AssembleA_PCStokes() local
825 PetscCall(DMDAGetElementEqnums_up(u_eqn, p_eqn, ei, ej)); in AssembleA_PCStokes()
826 …PetscCall(MatSetValuesStencil(A, NODES_PER_EL * U_DOFS, u_eqn, NODES_PER_EL * U_DOFS, u_eqn, Ae, A… in AssembleA_PCStokes()
827 …PetscCall(MatSetValuesStencil(A, NODES_PER_EL * U_DOFS, u_eqn, NODES_PER_EL * P_DOFS, p_eqn, Ge, A… in AssembleA_PCStokes()
841 static PetscErrorCode DMDASetValuesLocalStencil_ADD_VALUES(StokesDOF **fields_F, MatStencil u_eqn[]… in DMDASetValuesLocalStencil_ADD_VALUES() argument
[all …]
|
| H A D | ex70.c | 340 PetscInt u_eqn[NODES_PER_EL * U_DOFS]; /* 2 degrees of freedom */ in AssembleStokes_A() local
384 PetscCall(DMDAGetElementEqnums_up(element, u_eqn, p_eqn)); in AssembleStokes_A()
385 …PetscCall(MatSetValuesLocal(A, NODES_PER_EL * U_DOFS, u_eqn, NODES_PER_EL * U_DOFS, u_eqn, Ae, ADD… in AssembleStokes_A()
386 …PetscCall(MatSetValuesLocal(A, NODES_PER_EL * U_DOFS, u_eqn, NODES_PER_EL * P_DOFS, p_eqn, Ge, ADD… in AssembleStokes_A()
387 …PetscCall(MatSetValuesLocal(A, NODES_PER_EL * P_DOFS, p_eqn, NODES_PER_EL * U_DOFS, u_eqn, De, ADD… in AssembleStokes_A()
403 PetscInt u_eqn[NODES_PER_EL * U_DOFS]; /* 2 degrees of freedom */ in AssembleStokes_PC() local
446 PetscCall(DMDAGetElementEqnums_up(element, u_eqn, p_eqn)); in AssembleStokes_PC()
447 …PetscCall(MatSetValuesLocal(A, NODES_PER_EL * U_DOFS, u_eqn, NODES_PER_EL * U_DOFS, u_eqn, Ae, ADD… in AssembleStokes_PC()
448 …PetscCall(MatSetValuesLocal(A, NODES_PER_EL * U_DOFS, u_eqn, NODES_PER_EL * P_DOFS, p_eqn, Ge, ADD… in AssembleStokes_PC()
449 …PetscCall(MatSetValuesLocal(A, NODES_PER_EL * P_DOFS, p_eqn, NODES_PER_EL * U_DOFS, u_eqn, De, ADD… in AssembleStokes_PC()
[all …]
|