| /dports/science/elmerfem/elmerfem-release-9.0/fem/src/modules/ |
| H A D | Electrokinetics.F90 | 219 TYPE(Element_t), POINTER :: BoundaryElement, ParentElement local
276 BoundaryElement => Model % CurrentElement
277 IF ( .NOT. ASSOCIATED(BoundaryElement) ) THEN
280 other_body_id = BoundaryElement % BoundaryInfo % outbody
282 ParentElement => BoundaryElement % BoundaryInfo % Right
285 ParentElement => BoundaryElement % BoundaryInfo % Right
302 bc_id = GetBCId(BoundaryElement)
303 BC => GetBC(BoundaryElement)
307 Nboundary = BoundaryElement % TYPE % NumberOfNodes
311 U = BoundaryElement % TYPE % NodeU(BoundaryElementNode)
[all …]
|
| H A D | ParticleDynamics.F90 | 1454 TYPE(Element_t), POINTER :: BulkElement, BoundaryElement local
1617 BoundaryElement => Mesh % Faces( j )
1620 BoundaryElement => Mesh % Edges(j)
1625 IF(.NOT. ASSOCIATED( BoundaryElement % BoundaryInfo ) ) CYCLE
1626 IF ( BoundaryElement % BoundaryInfo % Constraint == &
1640 CALL GetElementNodes(BoundaryNodes,BoundaryElement)
1641 Dist = PointFaceDistance(BoundaryElement,BoundaryNodes,Coord,Normal)
|
| /dports/science/elmerfem/elmerfem-release-9.0/elmerice/UserFunctions/ |
| H A D | USF_Sliding.F90 | 200 TYPE(Element_t), POINTER :: BoundaryElement, ParentElement local
237 BoundaryElement => Model % CurrentElement
238 BC => GetBC(BoundaryElement)
324 other_body_id = BoundaryElement % BoundaryInfo % outbody
516 BoundaryElement => Model % CurrentElement
517 IF ( .NOT. ASSOCIATED(BoundaryElement) ) THEN
520 other_body_id = BoundaryElement % BoundaryInfo % outbody
522 ParentElement => BoundaryElement % BoundaryInfo % Right
525 ParentElement => BoundaryElement % BoundaryInfo % Right
753 BoundaryElement => Model % CurrentElement
[all …]
|
| H A D | Buoyancy.F90 | 65 TYPE(Element_t), POINTER :: BoundaryElement, BCElement, CurElement, ParentElement local
232 BoundaryElement => Model % CurrentElement
233 IF ( .NOT. ASSOCIATED(BoundaryElement) ) THEN
236 other_body_id = BoundaryElement % BoundaryInfo % outbody
238 ParentElement => BoundaryElement % BoundaryInfo % Right
241 ParentElement => BoundaryElement % BoundaryInfo % Right
442 BoundaryElement => Model % CurrentElement
443 IF ( .NOT. ASSOCIATED(BoundaryElement) ) THEN
446 other_body_id = BoundaryElement % BoundaryInfo % outbody
448 ParentElement => BoundaryElement % BoundaryInfo % Right
[all …]
|
| H A D | USF_GetFrictionHeating.F90 | 173 TYPE(Element_t), POINTER :: BoundaryElement, ParentElement local
186 BoundaryElement => Model % CurrentElement
187 other_body_id = BoundaryElement % BoundaryInfo % outbody
189 ParentElement => BoundaryElement % BoundaryInfo % Right
190 IF ( .NOT. ASSOCIATED(ParentElement) ) ParentElement => BoundaryElement % BoundaryInfo % Left
192 ParentElement => BoundaryElement % BoundaryInfo % Right
193 …IF (ParentElement % BodyId == other_body_id) ParentElement => BoundaryElement % BoundaryInfo % Left
|
| H A D | USF_Contact.F90 | 52 TYPE(Element_t), POINTER :: Element, CurElement, BoundaryElement local
107 BoundaryElement => Model % CurrentElement
108 BC => GetBC(BoundaryElement)
351 BoundaryElement => Model % CurrentElement
352 … IF (ALL(GroundedMask(GroundedMaskPerm(BoundaryElement % NodeIndexes))>-0.5)) Friction = .TRUE.
|
| /dports/science/elmerfem/elmerfem-release-9.0/meshgen2d/src/include/ |
| H A D | BoundaryElement.h | 9 class BoundaryElement
12 friend std::ostream& operator<< (std::ostream& o, const BoundaryElement& A);
13 BoundaryElement( int edgeTag, Node* n1, Node* n2 ) in BoundaryElement() function
63 std::ostream& operator<< (std::ostream& o, const BoundaryElement& A);
|
| H A D | Mesh.h | 12 class BoundaryElement; variable
49 std::vector< BoundaryElement * > boundaryElements;
|
| H A D | GeometryEdge.h | 47 void elements(std::vector< BoundaryElement * >& strip, int direction);
81 std::vector< BoundaryElement * > bels;
|
| H A D | Layer.h | 29 void collectBoundaryElements(std::vector< BoundaryElement* >& elements) in collectBoundaryElements()
|
| H A D | Loop.h | 77 void collectBoundaryElements( std::vector< BoundaryElement * >& chain ) in collectBoundaryElements()
|
| /dports/science/elmerfem/elmerfem-release-9.0/elmerice/Solvers/ |
| H A D | IntegrateVertically.F90 | 68 BoundaryElement local
177 BoundaryElement => GetBoundaryElement(t)
179 NodeIndexes => BoundaryElement % NodeIndexes
180 IF (ParEnv % myPe .NE. BoundaryElement % partIndex) CYCLE
186 CALL LocalMatrixBC( STIFF, FORCE, BoundaryElement, n, NodalVar)
|
| H A D | IntegratedVelocity.F90 | 69 BoundaryElement local
179 BoundaryElement => GetBoundaryElement(t)
181 NodeIndexes => BoundaryElement % NodeIndexes
182 IF (ParEnv % myPe .NE. BoundaryElement % partIndex) CYCLE
193 CALL LocalMatrixBC( STIFF, FORCE, BoundaryElement, n, NodalVar)
|
| H A D | SSASolver.F90 | 408 BoundaryElement => GetBoundaryElement(t)
414 NodeIndexes => BoundaryElement % NodeIndexes
449 other_body_id = BoundaryElement % BoundaryInfo % outbody
451 ParentElement => BoundaryElement % BoundaryInfo % Right
905 BoundaryElement local
1002 BoundaryElement => GetBoundaryElement(t)
1004 NodeIndexes => BoundaryElement % NodeIndexes
1005 IF (ParEnv % myPe .NE. BoundaryElement % partIndex) CYCLE
1009 other_body_id = BoundaryElement % BoundaryInfo % outbody
1011 ParentElement => BoundaryElement % BoundaryInfo % Right
[all …]
|
| H A D | CaffeSolver.F90 | 2266 TYPE(Element_t), POINTER :: BoundaryElement, ParentElement local
2275 BoundaryElement => Model % CurrentElement
2282 IF ( .NOT. ASSOCIATED(BoundaryElement) ) THEN
2286 NBoundary = BoundaryElement % Type % NumberOfNodes
2300 other_body_id = BoundaryElement % BoundaryInfo % outbody
2314 BoundaryElement % ElementIndex, ' not found'
2357 BoundaryElement => Model % CurrentElement
2364 IF ( .NOT. ASSOCIATED(BoundaryElement) ) THEN
2368 NBoundary = BoundaryElement % Type % NumberOfNodes
2382 other_body_id = BoundaryElement % BoundaryInfo % outbody
[all …]
|
| /dports/science/elmerfem/elmerfem-release-9.0/meshgen2d/src/ |
| H A D | BoundaryElement.cpp | 5 void BoundaryElement::
11 std::ostream& operator<< (std::ostream& o, const BoundaryElement& A) in operator <<()
|
| H A D | TriangleNELayer.cpp | 19 std::vector<BoundaryElement*> bels[4]; in discretize()
58 std::vector<BoundaryElement*> bels[4]; in discretize()
97 std::vector<BoundaryElement*> bels[4]; in discretize()
194 std::vector<BoundaryElement*> bels[4]; in discretize()
290 std::vector<BoundaryElement*> bels[4]; in discretize()
348 std::vector<BoundaryElement*> bels[4]; in discretize()
|
| H A D | make.inc | 28 BoundaryElement.$(OBJ_EXT) \
55 BoundaryElement.$(OBJ_EXT):
|
| H A D | BoundaryLayer.cpp | 45 std::vector< BoundaryElement * > bels; in exportNodes()
|
| H A D | Mesh.cpp | 404 std::vector<BoundaryElement *>::iterator bi; in createMiddleNodes()
407 BoundaryElement *e = *bi; in createMiddleNodes()
454 std::vector< BoundaryElement* >::const_iterator be; in outputHeader()
495 std::vector< BoundaryElement* >::iterator bel; in outputBoundary()
|
| /dports/science/elmerfem/elmerfem-release-9.0/elmerice/Solvers/AdjointSSA/ |
| H A D | AdjointSSA_SSASolver.F90 | 69 TYPE(Element_t),POINTER :: CurrentElement, Element, ParentElement, BoundaryElement local
331 BoundaryElement => GetBoundaryElement(t)
335 NodeIndexes => BoundaryElement % NodeIndexes
336 IF (ParEnv % myPe .NE. BoundaryElement % partIndex) CYCLE
371 other_body_id = BoundaryElement % BoundaryInfo % outbody
373 ParentElement => BoundaryElement % BoundaryInfo % Right
374 … IF ( .NOT. ASSOCIATED(ParentElement) ) ParentElement => BoundaryElement % BoundaryInfo % Left
376 ParentElement => BoundaryElement % BoundaryInfo % Right
377 …IF (ParentElement % BodyId == other_body_id) ParentElement => BoundaryElement % BoundaryInfo % Le…
399 CALL LocalMatrixBCSSA( STIFF, FORCE, BoundaryElement, n, ElementNodes,&
|
| H A D | AdjointSSA_GradientSolver.F90 | 125 TYPE(Element_t),POINTER :: CurrentElement, Element, ParentElement, BoundaryElement local
461 BoundaryElement => GetBoundaryElement(t)
464 IF ( .NOT. ActiveBoundaryElement(BoundaryElement,Solver) ) CYCLE
467 NodeIndexes => BoundaryElement % NodeIndexes
471 n = GetElementNOFNodes(BoundaryElement)
503 other_body_id = BoundaryElement % BoundaryInfo % outbody
505 ParentElement => BoundaryElement % BoundaryInfo % Right
506 … IF ( .NOT. ASSOCIATED(ParentElement) ) ParentElement => BoundaryElement % BoundaryInfo % Left
508 ParentElement => BoundaryElement % BoundaryInfo % Right
509 …IF (ParentElement % BodyId == other_body_id) ParentElement => BoundaryElement % BoundaryInfo % Le…
[all …]
|
| /dports/math/freefem++/FreeFem-sources-4.6/src/femlib/ |
| H A D | mortar.cpp | 92 neb += split[Th.BoundaryElement(ieb,jj)]; in Mesh()
126 int kold = Th.BoundaryElement(ieb,jj); in Mesh()
|
| /dports/science/elmerfem/elmerfem-release-9.0/fem/src/ |
| H A D | ParticleUtils.F90 | 490 BoundaryElement => Mesh % Faces( j )
493 BoundaryElement => Mesh % Edges(j)
3415 BoundaryElement => Mesh % Faces( j )
3418 BoundaryElement => Mesh % Edges(j)
3507 BoundaryElement => Mesh % Faces( j )
3510 BoundaryElement => Mesh % Edges(j)
3521 FaceElement => BoundaryElement
3610 BoundaryElement => Mesh % Faces( j )
3613 BoundaryElement => Mesh % Edges(j)
4578 BoundaryElement => Mesh % Faces( j )
[all …]
|
| /dports/math/freefem++/FreeFem-sources-4.6/plugin/seq/ |
| H A D | splitedges.cpp | 62 int ek, k = Th.BoundaryElement(i, ek); in Split_Edges()
187 int ek, k = Th.BoundaryElement(i, ek); in Split_Edges()
|