      integer(16) :: stone(-1000000:1000000)
      integer(16) :: k,x,i,up,bottom
      
      read*,k,x
      
      stone(-1000000) = -1000000
      do i = -1000000+1,1000000
        stone(i) = stone(i-1) + 1
      end do
      
      
      up = x - k + 1
      bottom = x + k -1
      
      print'(*(I0,x))',stone(up:bottom)
      end