Searched refs:el_coords (Results 1 – 4 of 4) sorted by relevance
| /petsc/src/ksp/ksp/tutorials/ |
| H A D | ex43.c | 688 …ErrorCode GetElementCoords(DMDACoor2d **_coords, PetscInt ei, PetscInt ej, PetscScalar el_coords[]) in GetElementCoords() argument 692 el_coords[NSD * 0] = _coords[ej][ei].x; in GetElementCoords() 693 el_coords[NSD * 0 + 1] = _coords[ej][ei].y; in GetElementCoords() 694 el_coords[NSD * 1] = _coords[ej + 1][ei].x; in GetElementCoords() 695 el_coords[NSD * 1 + 1] = _coords[ej + 1][ei].y; in GetElementCoords() 696 el_coords[NSD * 2] = _coords[ej + 1][ei + 1].x; in GetElementCoords() 697 el_coords[NSD * 2 + 1] = _coords[ej + 1][ei + 1].y; in GetElementCoords() 698 el_coords[NSD * 3] = _coords[ej][ei + 1].x; in GetElementCoords() 699 el_coords[NSD * 3 + 1] = _coords[ej][ei + 1].y; in GetElementCoords() 716 PetscScalar el_coords[NODES_PER_EL * NSD]; in AssembleA_Stokes() local [all …]
|
| H A D | ex49.c | 551 …ErrorCode GetElementCoords(DMDACoor2d **_coords, PetscInt ei, PetscInt ej, PetscScalar el_coords[]) in GetElementCoords() argument 555 el_coords[NSD * 0 + 0] = _coords[ej][ei].x; in GetElementCoords() 556 el_coords[NSD * 0 + 1] = _coords[ej][ei].y; in GetElementCoords() 557 el_coords[NSD * 1 + 0] = _coords[ej + 1][ei].x; in GetElementCoords() 558 el_coords[NSD * 1 + 1] = _coords[ej + 1][ei].y; in GetElementCoords() 559 el_coords[NSD * 2 + 0] = _coords[ej + 1][ei + 1].x; in GetElementCoords() 560 el_coords[NSD * 2 + 1] = _coords[ej + 1][ei + 1].y; in GetElementCoords() 561 el_coords[NSD * 3 + 0] = _coords[ej][ei + 1].x; in GetElementCoords() 562 el_coords[NSD * 3 + 1] = _coords[ej][ei + 1].y; in GetElementCoords() 575 PetscScalar el_coords[NODES_PER_EL * NSD]; in AssembleA_Elasticity() local [all …]
|
| H A D | ex42.c | 909 PetscScalar el_coords[NODES_PER_EL * NSD]; in AssembleA_Stokes() local 926 PetscCall(GetElementCoords3D(_coords, ei, ej, ek, el_coords)); in AssembleA_Stokes() 939 FormStressOperatorQ13D(Ae, el_coords, prop_eta); in AssembleA_Stokes() 940 FormGradientOperatorQ13D(Ge, el_coords); in AssembleA_Stokes() 942 FormDivergenceOperatorQ13D(De, el_coords); in AssembleA_Stokes() 944 FormStabilisationOperatorQ13D(Ce, el_coords, prop_eta); in AssembleA_Stokes() 995 PetscScalar el_coords[NODES_PER_EL * NSD]; in AssembleA_PCStokes() local 1013 PetscCall(GetElementCoords3D(_coords, ei, ej, ek, el_coords)); in AssembleA_PCStokes() 1026 FormStressOperatorQ13D(Ae, el_coords, prop_eta); in AssembleA_PCStokes() 1027 FormGradientOperatorQ13D(Ge, el_coords); in AssembleA_PCStokes() [all …]
|
| H A D | ex70.c | 325 …orCode GetElementCoords(const PetscScalar _coords[], const PetscInt e2n[], PetscScalar el_coords[]) in GetElementCoords() argument 330 for (PetscInt d = 0; d < NSD; d++) el_coords[NSD * i + d] = _coords[NSD * e2n[i] + d]; in GetElementCoords() 348 PetscScalar el_coords[NODES_PER_EL * NSD]; in AssembleStokes_A() local 366 PetscCall(GetElementCoords(_coords, element, el_coords)); in AssembleStokes_A() 378 BForm_DivT(Ae, el_coords, prop_eta); in AssembleStokes_A() 379 BForm_Grad(Ge, el_coords); in AssembleStokes_A() 380 BForm_Div(De, el_coords); in AssembleStokes_A() 381 BForm_Stabilisation(Ce, el_coords, prop_eta); in AssembleStokes_A() 411 PetscScalar el_coords[NODES_PER_EL * NSD]; in AssembleStokes_PC() local 429 PetscCall(GetElementCoords(_coords, element, el_coords)); in AssembleStokes_PC() [all …]
|