Searched refs:CurrGroup (Results 1 – 3 of 3) sorted by relevance
/dports/science/elmerfem/elmerfem-release-9.0/fem/src/modules/ |
H A D | ParticleDynamics.F90 | 874 INTEGER :: i,j,k,l,n,dim,TimeOrder,NoGroups, MaxField, PrevGroup, CurrGroup local 1163 CurrGroup = GetParticleGroup( Particles, No ) 1165 IF( CurrGroup /= PrevGroup ) THEN 1166 IF(GotMass) mass = massv(MIN(SIZE(massv),CurrGroup)) 1167 IF(GotDamping) damping = dampingv(MIN(SIZE(dampingv),CurrGroup)) 1168 IF(GotRad) rad = radv(MIN(SIZE(radv),CurrGroup)) 1169 IF(GotCharge) charge = chargev(MIN(SIZE(chargev),CurrGroup)) 1170 IF(GotDrag) dragcoeff = dragcoeffv(MIN(SIZE(dragcoeffv),CurrGroup)) 1180 PrevGroup = CurrGroup 1329 IF( CurrGroup /= l ) CYCLE
|
/dports/devel/binaryen/binaryen-version_98/src/cfg/ |
H A D | Relooper.cpp | 1364 BlockSet& CurrGroup = IndependentGroups[Entry]; in Calculate() local 1366 for (auto* Child : CurrGroup) { in Calculate()
|
/dports/science/elmerfem/elmerfem-release-9.0/fem/src/ |
H A D | ParticleUtils.F90 | 5261 INTEGER :: CurrGroup, PrevGroup, NoGroups local 5358 CurrGroup = GetParticleGroup(Particles,No) 5359 IF( CurrGroup /= PrevGroup ) THEN 5361 mass = massv(MIN(SIZE(massv),CurrGroup)) 5363 IF(GotDrag) drag = dragv(MIN(SIZE(dragv),CurrGroup)) 5365 PrevGroup = CurrGroup
|