bubble sort of a multidemensional array in fortran

create a program that bubble sorts a multidimensional array without changing the row.

the data.txt file looks something like this where the first line is the size of the array

4 3

1 1 1

2 2 2

3 3 3

4 4 4

the program created will have an output that looks something like this

4 3

3 3 3

2 2 2

1 1 1

4 4 4