Problem:
Score : 300 points

Problem Statement

We will play a one-player game using a number line and N pieces.

First, we place each of these pieces at some integer coordinate.

Here, multiple pieces can be placed at the same coordinate.

Our objective is to visit all of the M coordinates X_1, X_2, ..., X_M with these pieces, by repeating the following move:

Move: Choose a piece and let x be its coordinate. Put that piece at coordinate x+1 or x-1.

Note that the coordinates where we initially place the pieces are already regarded as visited.

Find the minimum number of moves required to achieve the objective.

Constraints

All values in input are integers.

1 \leq N \leq 10^5

1 \leq M \leq 10^5

-10^5 \leq X_i \leq 10^5

X_1, X_2, ..., X_M are all different.

Input

Input is given from Standard Input in the following format:

N M
X_1 X_2 ... X_M

Output

Find the minimum number of moves required to achieve the objective.

Sample Input 1

2 5
10 12 1 2 14

Sample Output 1

5

The objective can be achieved in five moves as follows, and this is the minimum number of moves required.

Initially, put the two pieces at coordinates 1 and 10.

Move the piece at coordinate 1 to 2.

Move the piece at coordinate 10 to 11.

Move the piece at coordinate 11 to 12.

Move the piece at coordinate 12 to 13.

Move the piece at coordinate 13 to 14.

Sample Input 2

3 7
-10 -3 0 9 -100 2 17

Sample Output 2

19

Sample Input 3

100 1
-100000

Sample Output 3

0

Solution in Ruby (2.3.3) (judge verdict: Time Limit Exceeded)

n, m = gets.chomp.split(' ').map(&:to_i)
if m <= n
  puts 0
  exit 0
end
xs = gets.chomp.split(' ').map(&:to_i).sort

def get_longest_index(xs)
  index = -1
  longest = 0

  xs.each_with_index do |item, idx|
    next if idx == 0
    d = xs[idx] - xs[idx - 1]
    if d > longest
      longest = d
      index = idx
    end
  end

  return index - 1, longest
end

def divide(xs)
  p, _ = get_longest_index(xs)

  first = xs.dup.slice(0, p + 1)
  last = xs.dup.slice(p + 1, xs.length)

  return first, last
end

def which_divide(xs)
  p = -1
  i = -1
  xs.each_with_index do |x, idx|
    _, l = get_longest_index(x)
    if p < l
      p = l
      i = idx
    end
  end

  i
end

xs = [xs]
while xs.length < n do
  i = which_divide(xs)
  break if i == -1
  j, k = divide(xs[i])
  xs.delete_at(i)
  xs.insert(i, j, k)
end

ans = 0
xs.each do |item|
  ans += (item.last - item.first).abs
end

puts ans