!!!**********************************************************************
program main
!!!**********************************************************************

  implicit none

  integer :: K, X, i

!!!----------------------------------------------------------------------

  read ( *, * ) K, X

  do i = X - K + 1, X + K - 1
  
     write ( unit = *, fmt = '(i0)', advance =  'no' ) i

     write ( unit = *, fmt = '(a1)', advance =  'no' ) ' '     
     
  end do


!!!**********************************************************************  
end program main
!!!**********************************************************************
