Lines Matching refs:ParticleStatus
3748 ParticleStatus, AccurateAtFace, StopFaceIndex, Lambda, Velo, & argument
3756 INTEGER :: ParticleStatus local
3766 FaceIndex, ParticleStatus )
3770 INTEGER :: FaceIndex, ParticleStatus local
3849 ParticleStatus = PARTICLE_LOST
3900 ParticleStatus = PARTICLE_HIT
3911 ParticleStatus = PARTICLE_HIT
3938 ParticleStatus = PARTICLE_LOST
3942 ParticleStatus = PARTICLE_WALLBOUNDARY
3971 ParticleStatus0 = ParticleStatus
3976 FaceElement % ElementIndex,ParticleStatus)
3979 IF(ParticleStatus == ParticleStatus0 ) THEN
4005 IF( StopAtFace .AND. .NOT. DoInit ) ParticleStatus = PARTICLE_FACEBOUNDARY
4007 ParticleStatus = PARTICLE_WALLBOUNDARY
4012 IF( ParticleStatus == PARTICLE_WALLBOUNDARY .OR. &
4013 ParticleStatus == PARTICLE_FACEBOUNDARY ) THEN
4063 ParticleStatus = PARTICLE_HIT
4081 ParticleStatus = PARTICLE_HIT
4091 ParticleStatus = PARTICLE_LOST
4103 IF( ParticleStatus == PARTICLE_LOST ) THEN
4135 FaceIndex, ParticleStatus )
4139 INTEGER :: FaceIndex, ParticleStatus local