Home
last modified time | relevance | path

Searched refs:ExtPressure (Results 1 – 6 of 6) sorted by relevance

/dports/science/elmerfem/elmerfem-release-9.0/elmerice/Solvers/
H A DAdjointSolver.F9079 …REAL(KIND=dp),ALLOCATABLE :: STIFF(:,:),FORCE(:),ExtPressure(:),LoadVector(:,:),Alpha(:),Beta(:),S… local
92 save SolverName,Firsttime,SolverInd,STIFF,FORCE,ExtPressure,LoadVector,Alpha,Beta,SlipCoeff,w
117 allocate(FORCE( 2*NSDOFs*N ),STIFF( 2*NSDOFs*N,2*NSDOFs*N ),ExtPressure(N), &
208 ExtPressure=0.0
221 LoadVector, Alpha, Beta, ExtPressure, SlipCoeff, NormalTangential, &
/dports/science/elmerfem/elmerfem-release-9.0/fem/src/modules/
H A DFlowSolve.F90141 ExtPressure(:),PrevPressure(:), HeatExpansionCoeff(:), & local
312 ExtPressure, STAT=istat )
337 ExtPressure( N ), STAT=istat )
1069 ExtPressure = 0.0d0
1086 ExtPressure(1:n) = GetReal( BC, 'External Pressure', GotForceBC )
1144 FORCE, LoadVector, Alpha, Beta, ExtPressure, SlipCoeff, &
1150 FORCE, LoadVector, Alpha, Beta, ExtPressure, SlipCoeff, &
1500 REAL(KIND=dp), ALLOCATABLE :: x(:), y(:), z(:), ExtPressure(:) local
1621 ExtPressure(1:En) = ListGetReal( Model % BCs(bc) % Values, &
1733 SUM( ExtPressure(1:En) * EdgeBasis(1:En) ) * Normal
[all …]
H A DParStokes.F90138 Velocity(:,:), LoadVector(:,:), SlipCoeff(:,:), ExtPressure(:) local
144 LoadVector, SlipCoeff, ExtPressure
269 ExtPressure(p), &
490 ExtPressure = 0.0d0
491 ExtPressure(1:n) = GetReal( BC, 'Normal Surface Traction', GotForceBC )
492 IF (.NOT. GotForceBC) ExtPressure(1:n) = GetReal( BC, 'External Pressure', GotForceBC )
523 LoadVector, ExtPressure, SlipCoeff, NormalTangential, &
H A DIncompressibleNSVec.F90964 REAL(KIND=dp) :: ExtPressure, s, detJ local
1035 … ExtPressure = ListGetElementReal( ExtPressure_h, Basis, Element, HavePres, GaussPoint = t )
1048 SurfaceTraction(1) = SurfaceTraction(1) + ExtPressure
1050 SurfaceTraction = SurfaceTraction + ExtPressure * Normal
H A DStressSolve.F902800 REAL(KIND=dp), ALLOCATABLE :: x(:), y(:), z(:), ExtPressure(:) local
2859 ExtPressure(En), Basis(nd), dBasisdx(nd,3), Force(3,En), &
2907 ExtPressure(1:En) = GetReal( BC, 'Normal Force', Found )
2970 SUM( ExtPressure(1:En) * EdgeBasis(1:En) ) * Normal
2986 DEALLOCATE( EdgeBasis, dEdgeBasisdx, x, y, z, ExtPressure, Basis, &
H A DElasticSolve.F904498 REAL(KIND=dp), ALLOCATABLE :: x(:), y(:), z(:), ExtPressure(:) local
4574 Basis(Pn), dBasisdx(Pn,3), Force(3,En), ExtPressure(En), &
4653 ExtPressure(1:En) = ListGetReal( Model % BCs(j) % Values, &
4729 SUM( ExtPressure(1:En) * EdgeBasis(1:En) ) * Normal
4750 Force, ExtPressure, NodalDisplacement, NodalYoungsModulus, &