Home
last modified time | relevance | path

Searched refs:BDOFs (Results 1 – 25 of 32) sorted by relevance

12

/dports/science/elmerfem/elmerfem-release-9.0/fem/src/
H A DPElementMaps.F901085 IF (Element % BDOFs > 0) THEN
1090 nb = MAX( GetBubbleDOFs( Element, bubbleP ), Element % BDOFs )
1094 nb = MAX( GetBubbleDOFs( Element, bubbleP ), Element % BDOFs )
1099 nb = MAX( GetBubbleDOFs(Element, bubbleP ), Element % BDOFs )
1104 nb = MAX( GetBubbleDOFs(Element, bubbleP ), Element % BDOFs )
1109 nb = MAX( GetBubbleDOFs( Element, bubbleP ), Element % BDOFs )
1114 nb = MAX( GetBubbleDOFs(Element, bubbleP ), Element % BDOFs )
1129 IF ( .NOT.(Element % PDefs % P < 4 .AND. Element % BDOFs>0) ) THEN
1187 IF (Edge % BDOFs <= 0) CYCLE
1216 IF (Face % BDOFs <= 0) CYCLE
[all …]
H A DElementUtils.F90330 BDOFs = Mesh % MaxBDOFs
731 IF ( GB ) n = n + Element % BDOFs
773 DO i=1,Element % BDOFs
1008 BDOFs = Mesh % MaxBDOFs
1179 IF ( GB ) n = n + Element % BDOFs
1225 DO i=1,Element % BDOFs
1544 minFaceDOFs, maxFaceDOFs, BDOFs, cols, istat local
1588 BDOFs = 0
1598 minEdgeDOFs = MIN( minEdgeDOFs, Mesh % Edges(i) % BDOFs )
1610 BDOFs = MAX( BDOFs, Mesh % Elements(i) % BDOFs )
[all …]
H A DElementDescription.F90618 Elm % BDOFs = 0
2115 DO k=1,Edge % BDOFs
2148 DO k=1,Edge % BDOFs
2252 DO k=1,Edge % BDOFs
2334 DO k=1,Edge % BDOFs
2421 DO k=1,Edge % BDOFs
2640 DO k=1,Edge % BDOFs
2710 DO k=1,Edge % BDOFs
2878 DO k=1,Edge % BDOFs
3273 Bubble % BDOFs = 0
[all …]
H A DDefUtils.F901811 EDOFs = Element % BDOFs
1836 FDOFs = Element % BDOFs
1846 DO i=1,Element % BDOFs
1898 CurrElement % BDOFs = n
1900 n = CurrElement % BDOFs
1903 n = CurrElement % BDOFs
6253 DO i=1,Element % BDOFs
6277 DO j=1,Edge % BDOFs
6291 DO i=1,Face % BDOFs
6381 DO j=1,Edge % BDOFs
[all …]
H A DMeshUtils.F9070 Element % BDOFs = 0
2902 Element % BDOFs = MAX(Element % BDOFs, MAX(0,InDOFs(el_id+6,5)))
2916 Element % BDOFs = MAX(Element % BDOFs, MAX(0,InDOFs(el_id+6,5)))
3058 Element % BDOFs, &
3156 Edge % BDOFs = MAX(Edge % BDOFs, Edge % PDefs % P - 1)
3170 Edge % BDOFs = MAX(EdgeDOFs(i), Edge % BDOFs)
3172 Edge % BDOFs = Max(1, Edge % BDOFs)
3200 Face % BDOFs = MAX(FaceDOFs(i), Face % BDOFs)
3201 IF ( PRESENT(inDOFs) ) Face % BDOFs = MAX(Face % BDOFs, InDOFs(el_id+6,5))
3274 Element % BDOFs, &
[all …]
H A DDiffuseConvectiveAnisotropic.F90193 PBubbles = isActivePElement(Element) .AND. Element % BDOFs > 0
195 NBasis = n + Element % BDOFs
H A DParallelUtils.F90210 DO j=1,Element % BDOFs
246 DO j=1,Element % BDOFs
278 Solver % Def_Dofs(j,Element % Bodyid,6)>1) bdofs = Element % BDOFs
H A DAdaptive.F901558 IF ( RefElement % BDOFs > 0 ) THEN
1559 ALLOCATE( RefElement % BubbleIndexes(RefElement % BDOFs) )
1560 DO j=1,RefElement % BDOFs
H A DSParIterComm.F901211 buf(2*mm) = Mesh % Edges(l) % BDOFs
1247 Mesh % Edges(k) % BDOFs=MAX(Mesh % Edges(k) % BDOFs,bd)
1753 buf(2*mm) = Mesh % Faces(l) % BDOFs
1787 Mesh % Faces(k) % BDOFs = MAX(Mesh % Faces(k) % BDOFs,bd)
H A DNavierStokesCylindrical.F90197 PBubbles = isActivePelement(Element) .AND. Element % BDOFs > 0
199 NBasis = n + Element % BDOFs
H A DTypes.F90665 INTEGER :: ElementIndex=-1, GElementIndex=-1, PartIndex=-1, NDOFs=0, BDOFs=0, DGDOFs=0 component
H A DMultigrid.F901282 INTEGER :: nb,i,j,EDOFs, FDOFs, BDOFs,FaceDOFs, EdgeDOFs, BubbleDOFs local
1329 EDOFs = Solver % Mesh % Edges( Element % EdgeIndexes(j) ) % BDOFs
1340 FDOFs = Solver % Mesh % Faces( Element % FaceIndexes(j) ) % BDOFs
1361 EDOFs = Element % BDOFs
1370 FDOFs = Element % BDOFs
1379 DO i=1,Element % BDOFs
5994 INTEGER :: i, j, n, SolverAddr, BDOFs, execi, timestep, maxdim local
H A DMainUtils.F901418 MaxEDOFs = MAX( MaxEDOFs, CurrentElement % BDOFs )
1424 MaxFDOFs = MAX( MaxFDOFs, CurrentElement % BDOFs )
1430 MaxBDOFs = MAX( MaxBDOFs, CurrentElement % BDOFs )
4983 INTEGER :: i, j, k, l, col, row, n, BDOFs, maxdim, dsize, size0 local
5197 INTEGER :: i, j, k, n, BDOFs, timestep, timei, timei0, PassiveBcId, Execi local
/dports/science/elmerfem/elmerfem-release-9.0/fem/tests/LinearFormsAssembly/
H A DLinearFormsAssembly.F90630 Mesh % Edges(edge) % BDOFs = GetBubbleDofs(Mesh % Edges(edge), P)
631 Mesh % MinEdgeDofs = MIN(Mesh % MinEdgeDofs, Mesh % Edges(edge) % BDOFs)
632 Mesh % MaxEdgeDofs = MAX(Mesh % MaxEdgeDofs, Mesh % Edges(edge) % BDOFs)
680 Mesh % Faces(face) % BDOFs = GetBubbleDofs(Mesh % Faces(face), P)
681 Mesh % MinFaceDofs = MAX(Mesh % MinFaceDofs, Mesh % Faces(face) % BDOFs)
682 Mesh % MaxFaceDofs = MAX(Mesh % MaxFaceDofs, Mesh % Faces(face) % BDOFs)
698 PElement % BDOFs
707 Element % BDOFs = 0
730 ClonedElement % BDOFs = Element % BDOFs
/dports/science/elmerfem/elmerfem-release-9.0/fem/tests/StokesPFEM/
H A DStokes.f9053 INTEGER :: i,j,k,n, nb, nd, t, istat, dim, BDOFs=1,Active local
70 n = (dim+1)*(Mesh % MaxElementDOFs+BDOFs) ! just big enough for elemental arrays
/dports/science/elmerfem/elmerfem-release-9.0/fem/tests/Q1Q0/
H A DQ1Q0.f9037 INTEGER :: i,j,k,l,n, nb, nd, t, istat, dim, BDOFs=1,Active, dofs local
57 n = (dim+1)*(Mesh % MaxElementDOFs+BDOFs) ! just big enough for elemental arrays
/dports/science/elmerfem/elmerfem-release-9.0/fem/tests/StokesProj/
H A DPressure.f90179 BDOFs(i) = i+n
/dports/science/elmerfem/elmerfem-release-9.0/elmerice/Solvers/
H A DFrontDisplacement.F90509 DO p=MAX(n+1,nd-Element % BDOFs+1),nd
603 DO p=MAX(n+1,nd-Element % BDOFs+1),nd
H A DTemperateIce.F90751 IF(isActivePElement(Element).AND.Element % BDOFs>0) THEN
752 CALL CondensateP( N, Element % BDOFs, STIFF, FORCE, TimeForce )
/dports/science/elmerfem/elmerfem-release-9.0/fem/src/modules/
H A DMeshSolve.F90533 DO p=MAX(n+1,nd-Element % BDOFs+1),nd
626 DO p=MAX(n+1,nd-Element % BDOFs+1),nd
H A DNonphysicalMeshSolve.F90487 DO p=nd-Element % BDOFs+1,nd
635 DO p=nd-Element % BDOFs+1,nd
H A DModelMixedPoisson.F90312 FDOFs = Face % BDOFs
H A DCompressibleNS.F9072 MaxIterations, NumberOfNormalTractionNodes, BDOFs=0, NormalDir local
/dports/science/elmerfem/elmerfem-release-9.0/fem/tests/HelmholtzEdge/
H A DHrot.f90428 DO k=1,Edge % BDOFs
476 DO k=1,Face % BDOFs
/dports/science/elmerfem/elmerfem-release-9.0/fem/tests/HelmholtzFace/
H A DHelmholtz.f90451 DO k=1,Edge % BDOFs
499 DO k=1,Face % BDOFs

12