Searched refs:U_DOFS (Results 1 – 4 of 4) sorted by relevance
| /petsc/src/ksp/ksp/tutorials/ |
| H A D | ex70.c | 40 #define U_DOFS 2 /* degrees of freedom per velocity node */ macro 148 PetscScalar B[3][U_DOFS * NODES_PER_EL]; in BForm_DivT() 223 PetscScalar Ge[U_DOFS * NODES_PER_EL * P_DOFS * NODES_PER_EL]; in BForm_Div() 229 nr_g = U_DOFS * NODES_PER_EL; in BForm_Div() 340 PetscInt u_eqn[NODES_PER_EL * U_DOFS]; /* 2 degrees of freedom */ in AssembleStokes_A() 344 PetscScalar Ae[NODES_PER_EL * U_DOFS * NODES_PER_EL * U_DOFS]; in AssembleStokes_A() 345 PetscScalar Ge[NODES_PER_EL * U_DOFS * NODES_PER_EL * P_DOFS]; in AssembleStokes_A() 346 PetscScalar De[NODES_PER_EL * P_DOFS * NODES_PER_EL * U_DOFS]; 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() [all …]
|
| H A D | ex43.c | 65 #define U_DOFS 2 /* degrees of freedom per velocity node */ macro 499 PetscScalar B[3][U_DOFS * NODES_PER_EL]; in FormStressOperatorQ1() 576 PetscScalar Ge[U_DOFS * NODES_PER_EL * P_DOFS * NODES_PER_EL]; in FormDivergenceOperatorQ1() 583 nr_g = U_DOFS * NODES_PER_EL; in FormDivergenceOperatorQ1() 708 MatStencil u_eqn[NODES_PER_EL * U_DOFS]; /* 2 degrees of freedom */ in AssembleA_Stokes() 712 PetscScalar Ae[NODES_PER_EL * U_DOFS * NODES_PER_EL * U_DOFS]; in AssembleA_Stokes() 713 PetscScalar Ge[NODES_PER_EL * U_DOFS * NODES_PER_EL * P_DOFS]; in AssembleA_Stokes() 714 PetscScalar De[NODES_PER_EL * P_DOFS * NODES_PER_EL * U_DOFS]; 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() [all …]
|
| H A D | ex42.c | 20 #define U_DOFS 3 /* degrees of freedom per velocity node */ macro 600 PetscScalar B[6][U_DOFS * NODES_PER_EL]; in FormStressOperatorQ13D() 601 const PetscInt nvdof = U_DOFS * NODES_PER_EL; in FormStressOperatorQ13D() 700 PetscScalar Ge[U_DOFS * NODES_PER_EL * P_DOFS * NODES_PER_EL]; in FormDivergenceOperatorQ13D() 707 nr_g = U_DOFS * NODES_PER_EL; in FormDivergenceOperatorQ13D() 901 MatStencil u_eqn[NODES_PER_EL * U_DOFS]; in AssembleA_Stokes() 905 PetscScalar Ae[NODES_PER_EL * U_DOFS * NODES_PER_EL * U_DOFS]; in AssembleA_Stokes() 906 PetscScalar Ge[NODES_PER_EL * U_DOFS * NODES_PER_EL * P_DOFS]; in AssembleA_Stokes() 907 PetscScalar De[NODES_PER_EL * P_DOFS * NODES_PER_EL * U_DOFS]; in AssembleA_Stokes() 968 …PetscCall(MatSetValuesStencil(A, NODES_PER_EL * U_DOFS, u_eqn, NODES_PER_EL * U_DOFS, u_eqn, Ae, A… in AssembleA_Stokes() [all …]
|
| H A D | ex49.c | 79 #define U_DOFS 2 /* degrees of freedom per displacement node */ macro 425 PetscScalar B[3][U_DOFS * NODES_PER_EL]; in FormStressOperatorQ1() 571 MatStencil u_eqn[NODES_PER_EL * U_DOFS]; /* 2 degrees of freedom */ in AssembleA_Elasticity() 574 PetscScalar Ae[NODES_PER_EL * U_DOFS * NODES_PER_EL * U_DOFS]; 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() 641 MatStencil u_eqn[NODES_PER_EL * U_DOFS]; /* 2 degrees of freedom */ in AssembleF_Elasticity() 644 PetscScalar Fe[NODES_PER_EL * U_DOFS]; in AssembleF_Elasticity() 737 u_dof = U_DOFS; /* Vx, Vy - velocities */ in solve_elasticity_2d()
|