Searched defs:SetParticleVelocities (Results 1 – 1 of 1) sorted by relevance
| /dports/science/elmerfem/elmerfem-release-9.0/fem/src/modules/ |
| H A D | ParticleAdvector.F90 | 384 LOGICAL :: FirstStep
387 INTEGER :: No, Status
388 REAL(KIND=dp) :: Coord(3),Velo(3),GradVelo(3,3)
390 TYPE(Mesh_t), POINTER :: Mesh
392 REAL(KIND=dp) :: VeloAtPoint(3), GradVeloAtPoint(3,3),dtime
393 LOGICAL :: Stat, UseGradVelo, Visited = .FALSE.
394 INTEGER :: i,j,k,l,n,dim,TimeOrder, NewLost(3), OldLost, FixedLost
395 INTEGER, POINTER :: NodeIndexes(:), FieldPerm(:),FieldIndexes(:)
396 REAL(KIND=dp) :: SqrtElementMetric, Weight, Speed, SpeedMin
397 REAL(KIND=dp), POINTER :: Basis(:), dBasisdx(:,:), Coordinate(:,:), Velocity(:,:)
[all …]
|