Problem:
Score : 1000 points

Problem Statement

Note the unusual memory limit.

For a rectangular grid where each square is painted white or black, we define its complexity as follows:

If all the squares are black or all the squares are white, the complexity is 0.

Otherwise, divide the grid into two subgrids by a line parallel to one of the sides of the grid, and let c_1 and c_2 be the complexities of the subgrids. There can be multiple ways to perform the division, and let m be the minimum value of \max(c_1, c_2) in those divisions. The complexity of the grid is m+1.

You are given a grid with H horizontal rows and W vertical columns where each square is painted white or black.
HW characters from A_{11} to A_{HW} represent the colors of the squares.
A_{ij} is # if the square at the i-th row from the top and the j-th column from the left is black, and A_{ij} is . if that square is white.

Find the complexity of the given grid.

Constraints

1 \leq H,W \leq 185

A_{ij} is # or ..

Input

Input is given from Standard Input in the following format:

H W
A_{11}A_{12}...A_{1W}
:
A_{H1}A_{H2}...A_{HW}

Output

Print the complexity of the given grid.

Sample Input 1

3 3
...
.##
.##

Sample Output 1

2

Let us divide the grid by the boundary line between the first and second columns.
The subgrid consisting of the first column has the complexity of 0, and the subgrid consisting of the second and third columns has the complexity of 1, so the whole grid has the complexity of at most 2.

Sample Input 2

6 7
.####.#
#....#.
#....#.
#....#.
.####.#
#....##

Sample Output 2

4

Solution in Rust (1.15.1) (judge verdict: Time Limit Exceeded)

use std::fmt;
use std::io::stdin;
use std::io::BufRead;
use std::str;
use std::str::FromStr;
use std::vec::Vec;

fn main() {
    const K:usize = 16;

    let stdin = stdin();
    let mut scan = InputScanner::new(stdin.lock(), 256);

    let h:usize = scan.next();
    let w:usize = scan.next();

    let a:Vec<Vec<char>> = (0..h).map(|_| scan.next::<String>().chars().collect()).collect();

    let mut sum:Vec<Vec<i64>> = (0..(h+1)).map(|_| (0..(w+1)).map(|_| 0).collect::<Vec<i64>>()).collect();

    for y in 0..h {
        for x in 0..w {
            sum[y+1][x+1] = sum[y][x+1] + sum[y+1][x] - sum[y][x] + if a[y][x] == '#' {
                1
            } else {
                0
            };
        }
    }

    let mut dp1:Vec<Vec<Vec<Vec<u16>>>> = Vec::with_capacity(w+1);
    {
        let mut k = Vec::new();
        k.resize(2,0);

        let mut h1 = Vec::with_capacity(h+1);
        h1.resize(h+1,k);

        let mut w2 = Vec::with_capacity(w+1);

        w2.resize(w+1,h1);

        dp1.resize(w+1,w2);
    }

    let mut dp2:Vec<Vec<Vec<Vec<u16>>>> = Vec::with_capacity(h+1);
    {
        let mut k = Vec::new();
        k.resize(2,0);

        let mut w1 = Vec::with_capacity(w+1);
        w1.resize(w+1,k);

        let mut h2 = Vec::with_capacity(h+1);

        h2.resize(h+1,w1);

        dp2.resize(h+1,h2);
    }

    for w1 in 0..(w+1) {
        for w2 in w1..(w+1) {
            let mut h2 = 0;

            for h1 in 0..(h+1) {
                if h2 < h1 {
                    h2 = h1;
                }

                while h2 < h {
                    let c = sum[h1][w1] + sum[h2+1][w2] - sum[h1][w2] - sum[h2+1][w1];

                    if c == 0 || c == (h2+1 - h1) as i64 * (w2 - w1) as i64 {
                        h2 += 1;
                    } else {
                        break;
                    }
                }

                dp1[w1][w2][h1][0] = h2 as u16;
            }
        }
    }

    for h1 in 0..(h+1) {
        for h2 in h1..(h+1) {
            let mut w2 = 0;

            for w1 in 0..(w+1) {
                if w2 < w1 {
                    w2 = w1;
                }

                while w2 < w {
                    let c = sum[h1][w1] + sum[h2][w2+1] - sum[h1][w2+1] - sum[h2][w1];

                    if c == 0 || c == (h2 - h1) as i64 * (w2+1 - w1) as i64 {
                        w2 += 1;
                    } else {
                        break;
                    }
                }

                dp2[h1][h2][w1][0] = w2 as u16;
            }
        }
    }

    let mut answer = K;

    for k in 0..K {
        for w1 in 0..(w+1) {
            for w2 in w1..(w+1) {
                for h1 in 0..(h+1) {
                    let h = dp1[w1][w2][h1][k % 2];

                    if dp1[w1][w2][h1][(k + 1) % 2] < dp1[w1][w2][h as usize][k % 2] {
                        dp1[w1][w2][h1][(k + 1) % 2] = dp1[w1][w2][h as usize][k % 2];
                    }
                }

                let mut h2 = 0;

                for h1 in 0..(h+1) {
                    if h2 < h1 {
                        h2 = h1;
                    }

                    while h2 < h {
                        if dp2[h1][h2+1][dp2[h1][h2+1][w1][k%2] as usize][k%2] >= w2 as u16 {
                            h2 += 1;
                        } else {
                            break;
                        }
                    }

                    if dp1[w1][w2][h1][(k+1)%2] < h2 as u16 {
                        dp1[w1][w2][h1][(k + 1) % 2] = h2 as u16;
                    }
                }
            }
        }

        for h1 in 0..(h+1) {
            for h2 in h1..(h+1) {
                for w1 in 0..(w+1) {
                    let w = dp2[h1][h2][w1][k % 2];

                    if dp2[h1][h2][w1][(k + 1) % 2] < dp2[h1][h2][w as usize][k % 2] {
                        dp2[h1][h2][w1][(k + 1) % 2] = dp2[h1][h2][w as usize][k % 2];
                    }
                }

                let mut w2 = 0;

                for w1 in 0..(w+1) {
                    if w2 < w1 {
                        w2 = w1;
                    }

                    while w2 < w {
                        if dp1[w1][w2+1][dp1[w1][w2+1][h1][k%2] as usize][k%2] >= h2 as u16 {
                            w2 += 1;
                        } else {
                            break;
                        }
                    }

                    if dp2[h1][h2][w1][(k+1)%2] < w2 as u16 {
                        dp2[h1][h2][w1][(k + 1) % 2] = w2 as u16;
                    }
                }
            }
        }

        if dp1[0][w][0][k%2] == h as u16 || dp2[0][h][0][k%2] == w as u16 {
            answer = k;
            break;
        }

        for w1 in 0..(w+1) {
            for w2 in 0..(w+1) {
                for h1 in 0..(h+1) {
                    dp1[w1][w2][h1][k%2] = 0;
                }
            }
        }

        for h1 in 0..(h+1) {
            for h2 in 0..(h+1) {
                for w1 in 0..(w+1) {
                     dp2[h1][h2][w1][k%2] = 0;
                }
            }
        }
    }

    println!("{}",answer);
}
struct InputScanner<R: BufRead> {
	reader: R,
	buf: Vec<u8>, // Should never be empty
	pos: usize,   // Should never be out of bounds as long as the input ends with '\n'
}
impl<R: BufRead> InputScanner<R> {
	fn new(reader: R, capacity: usize) -> Self {
		InputScanner {
			reader: reader,
			buf: Vec::with_capacity(capacity),
			pos: 0,
		}
	}

	#[inline]
	fn next<T: FromStr>(&mut self) -> T
	where
		T::Err: fmt::Debug,
	{
		if self.buf.is_empty() {
			self._read_next_line();
		}
		let mut start = None;
		loop {
			match (self.buf[self.pos], start.is_some()) {
				(b' ', true) | (b'\n', true) | (b'\r', true) => break,
				(_, true) | (b' ', false) => self.pos += 1,
				(b'\n', false) | (b'\r', false) => self._read_next_line(),
				(_, false) => start = Some(self.pos),
			}
		}
		let target = &self.buf[start.unwrap()..self.pos];
		unsafe { str::from_utf8_unchecked(target) }.parse().unwrap()
	}

	#[inline]
	fn _read_next_line(&mut self) {
		self.pos = 0;
		self.buf.clear();
		if self.reader.read_until(b'\n', &mut self.buf).unwrap() == 0 {
			panic!("Reached EOF");
		}
	}
}