Fixed uid on source particles.

This commit is contained in:
Paul Romano 2011-07-01 11:38:04 -04:00
parent e4561826f4
commit b4b32e5547

View file

@ -126,7 +126,7 @@ contains
p => source_bank(source_index)
! set uid
p % uid = bank_first + source_index
p % uid = bank_first + source_index - 1
end function get_source_particle