diff --git a/src/symba/symba_frag_pos.f90 b/src/symba/symba_frag_pos.f90 index e68e84d9c..a6a099cd9 100644 --- a/src/symba/symba_frag_pos.f90 +++ b/src/symba/symba_frag_pos.f90 @@ -453,7 +453,7 @@ subroutine set_fragment_position_vectors() x_frag(:, 1) = -y_col_unit(:) * r_max x_frag(:, 2) = y_col_unit(:) * r_max - call random_number(x_frag(:,2:nfrag)) + call random_number(x_frag(:,3:nfrag)) loverlap(:) = .true. do while (any(loverlap(3:nfrag))) do i = 3, nfrag