Home
last modified time | relevance | path

Searched refs:Bdofs (Results 1 – 22 of 22) sorted by relevance

/dports/science/elmerfem/elmerfem-release-9.0/fem/tests/pmultg/
H A DPoisson.f90140 INTEGER :: m, i, j, l, p, Ldofs(N), Bdofs(Nb) local
145 Bdofs = (/ (i, i=n+1,n+nb) /)
147 Kbb = K(Bdofs,Bdofs)
148 Kbl = K(Bdofs,Ldofs)
149 Klb = K(Ldofs,Bdofs)
150 Fb = F(Bdofs)
/dports/science/elmerfem/elmerfem-release-9.0/fem/tests/PoissonPFEM/
H A DPoisson.f90140 INTEGER :: m, i, j, l, p, Ldofs(N), Bdofs(Nb) local
145 Bdofs = (/ (i, i=n+1,n+nb) /)
147 Kbb = K(Bdofs,Bdofs)
148 Kbl = K(Bdofs,Ldofs)
149 Klb = K(Ldofs,Bdofs)
150 Fb = F(Bdofs)
/dports/science/elmerfem/elmerfem-release-9.0/fem/tests/ExtrudedMesh/
H A DPoisson.f90142 INTEGER :: m, i, j, l, p, Ldofs(N), Bdofs(Nb) local
147 Bdofs = (/ (i, i=n+1,n+nb) /)
149 Kbb = K(Bdofs,Bdofs)
150 Kbl = K(Bdofs,Ldofs)
151 Klb = K(Ldofs,Bdofs)
152 Fb = F(Bdofs)
/dports/science/elmerfem/elmerfem-release-9.0/fem/tests/ExtrudedMeshBaseline1/
H A DPoisson.f90142 INTEGER :: m, i, j, l, p, Ldofs(N), Bdofs(Nb) local
147 Bdofs = (/ (i, i=n+1,n+nb) /)
149 Kbb = K(Bdofs,Bdofs)
150 Kbl = K(Bdofs,Ldofs)
151 Klb = K(Ldofs,Bdofs)
152 Fb = F(Bdofs)
/dports/science/elmerfem/elmerfem-release-9.0/fem/tests/StokesProj/
H A DPressure.f90172 INTEGER :: m, i, j, l, p, Cdofs(n), Bdofs(nb) local
182 Kbb = K(Bdofs,Bdofs)
183 Kbl = K(Bdofs,Cdofs)
184 Klb = K(Cdofs,Bdofs)
185 Fb = F(Bdofs)
H A DVelocity.f90215 INTEGER :: m, i, j, l, p, Cdofs((dim)*n), Bdofs(dim*nb) local
229 Bdofs(m) = (dim)*(p-1) + i + n*(dim)
233 Kbb = K(Bdofs,Bdofs)
234 Kbl = K(Bdofs,Cdofs)
235 Klb = K(Cdofs,Bdofs)
236 Fb = F(Bdofs)
/dports/science/elmerfem/elmerfem-release-9.0/fem/tests/ModelPDEhandle/
H A DModelPDEhandle.F90252 INTEGER :: m, i, j, l, p, Ldofs(N), Bdofs(Nb) local
257 Bdofs = (/ (i, i=n+1,n+nb) /)
259 Kbb = K(Bdofs,Bdofs)
260 Kbl = K(Bdofs,Ldofs)
261 Klb = K(Ldofs,Bdofs)
262 Fb = F(Bdofs)
/dports/science/elmerfem/elmerfem-release-9.0/fem/tests/StokesPFEM/
H A DStokes.f90248 INTEGER :: m, i, j, l, p, Cdofs((dim+1)*n), Bdofs(dim*nb) local
262 Bdofs(m) = (dim+1)*(p-1) + i + n*(dim+1)
266 Kbb = K(Bdofs,Bdofs)
267 Kbl = K(Bdofs,Cdofs)
268 Klb = K(Cdofs,Bdofs)
269 Fb = F(Bdofs)
/dports/science/elmerfem/elmerfem-release-9.0/fem/tests/ModelPDEipadapt/
H A DModelPDEhandle.F90253 INTEGER :: m, i, j, l, p, Ldofs(N), Bdofs(Nb) local
258 Bdofs = (/ (i, i=n+1,n+nb) /)
260 Kbb = K(Bdofs,Bdofs)
261 Kbl = K(Bdofs,Ldofs)
262 Klb = K(Ldofs,Bdofs)
263 Fb = F(Bdofs)
/dports/science/elmerfem/elmerfem-release-9.0/fem/tests/ModelPDEsplitted/
H A DModelPDEsplitted.f90137 INTEGER :: m, i, j, l, p, Ldofs(N), Bdofs(Nb) local
142 Bdofs = (/ (i, i=n+1,n+nb) /)
144 Kbb = K(Bdofs,Bdofs)
145 Kbl = K(Bdofs,Ldofs)
146 Klb = K(Ldofs,Bdofs)
147 Fb = F(Bdofs)
/dports/science/elmerfem/elmerfem-release-9.0/fem/tests/Lua/
H A DModelPDEevol.F90369 INTEGER :: m, i, j, l, p, Ldofs(N), Bdofs(Nb) local
374 Bdofs = (/ (i, i=n+1,n+nb) /)
376 Kbb = K(Bdofs,Bdofs)
377 Kbl = K(Bdofs,Ldofs)
378 Klb = K(Ldofs,Bdofs)
379 Fb = F(Bdofs)
H A DModelPDEthreaded.F90404 INTEGER :: m, i, j, l, p, Ldofs(N), Bdofs(Nb) local
409 Bdofs = (/ (i, i=n+1,n+nb) /)
411 Kbb = K(Bdofs,Bdofs)
412 Kbl = K(Bdofs,Ldofs)
413 Klb = K(Ldofs,Bdofs)
414 Fb = F(Bdofs)
/dports/science/elmerfem/elmerfem-release-9.0/fem/tests/ModelPDEthreaded/
H A DModelPDEthreaded.F90404 INTEGER :: m, i, j, l, p, Ldofs(N), Bdofs(Nb) local
409 Bdofs = (/ (i, i=n+1,n+nb) /)
411 Kbb = K(Bdofs,Bdofs)
412 Kbl = K(Bdofs,Ldofs)
413 Klb = K(Ldofs,Bdofs)
414 Fb = F(Bdofs)
/dports/science/elmerfem/elmerfem-release-9.0/fem/src/modules/
H A DWPotentialSolver.F90382 INTEGER :: m, i, j, l, p, Ldofs(N), Bdofs(Nb) local
387 Bdofs = (/ (i, i=n+1,n+nb) /)
389 Kbb = K(Bdofs,Bdofs)
390 Kbl = K(Bdofs,Ldofs)
391 Klb = K(Ldofs,Bdofs)
392 Fb = F(Bdofs)
H A DIncompressibleNSVec.F90876 INTEGER :: p, q, Cdofs((dim+1)*n), Bdofs(dim*nb) local
898 Bdofs(q) = DOFs*(p-1) + i + n*DOFs
926 Kbb = K(Bdofs,Bdofs)
927 Kbl = K(Bdofs,Cdofs)
928 Klb = K(Cdofs,Bdofs)
929 Fb = F(Bdofs)
H A DCoupledNSUpdate.F901122 INTEGER :: i, Ldofs((dim+1)*nd-nd+n), Bdofs local
1125 Bdofs = n*(dim+1)
1127 Kbb(1,1) = K(Bdofs,Bdofs)
1129 Kbl(1,1:dim*n-1) = K(Bdofs,Ldofs)
1130 Klb(1:dim*n-1,1) = K(Ldofs,Bdofs)
H A DParStokes.F901441 INTEGER :: m, i, j, l, p, Cdofs((dim+1)*n), Bdofs(dim*nb) local
1455 Bdofs(m) = (dim+1)*(p-1) + i + n*(dim+1)
1459 Kbb = K(Bdofs,Bdofs)
1460 Kbl = K(Bdofs,Cdofs)
1461 Klb = K(Cdofs,Bdofs)
1462 Fb = F(Bdofs)
H A DStokes.F901262 INTEGER :: i, Ldofs((dim+1)*nd-nd+n), Bdofs local
1265 Bdofs = n*(dim+1)
1267 Kbb(1,1) = K(Bdofs,Bdofs)
1269 Kbl(1,1:dim*n-1) = K(Bdofs,Ldofs)
1270 Klb(1:dim*n-1,1) = K(Ldofs,Bdofs)
H A DAcoustics.F905790 Bdofs = (/ ((dim+2)*n+i, i=1, dim*nb) /)
5792 Kbb = K(Bdofs,Bdofs)
5793 Kbl = K(Bdofs,Ldofs)
5794 Klb = K(Ldofs,Bdofs)
5795 Fb = F(Bdofs)
5823 INTEGER :: i, Ldofs((dim+2)*n), Bdofs(dim*n) local
5826 Bdofs = (/ ((dim+2)*n+i, i=1, dim*n) /)
5828 Kbb = K(Bdofs,Bdofs)
5829 Kbl = K(Bdofs,Ldofs)
5830 Klb = K(Ldofs,Bdofs)
[all …]
/dports/science/elmerfem/elmerfem-release-9.0/fem/src/
H A DSolidMechanicsUtils.F90444 INTEGER :: i, m, p, Cdofs(dofs*n), Bdofs(dim*nb) local
453 Bdofs(m) = dofs*(n+p-1) + i
457 Kbb = K(Bdofs,Bdofs)
458 Kbl = K(Bdofs,Cdofs)
459 Klb = K(Cdofs,Bdofs)
460 Fb = F(Bdofs)
469 Fb = F1(Bdofs)
H A DSolverUtils.F9014660 Kbb = K(Bdofs,Bdofs)
14661 Kbl = K(Bdofs,Cdofs)
14662 Klb = K(Cdofs,Bdofs)
14663 Fb = F(Bdofs)
14672 Fb = F1(Bdofs)
14722 Kbb = K(Bdofs,Bdofs)
14725 Fb = F(Bdofs)
14731 Fb = F1(Bdofs)
14761 Kbb = K(Bdofs,Bdofs)
14764 Fb = F(Bdofs)
[all …]
/dports/science/elmerfem/elmerfem-release-9.0/fem/src/modules/SaveData/
H A DSaveScalars.F902931 SideElement % Bdofs = 0