Problem:
Score : 700 points

Problem Statement

There are N bags, each containing two white balls. The i-th box contains two balls with integers x_i and y_i written on them, respectively.

For each of these bags, you will paint one of the balls red, and paint the other blue.

Afterwards, the 2N balls will be classified according to color.

Then, we will define the following:

R_{max}: the maximum integer written on a ball painted in red

R_{min}: the minimum integer written on a ball painted in red

B_{max}: the maximum integer written on a ball painted in blue

B_{min}: the minimum integer written on a ball painted in blue

Find the minimum possible value of (R_{max} - R_{min}) \times (B_{max} - B_{min}).

Constraints

1 ≤ N ≤ 200,000

1 ≤ x_i, y_i ≤ 10^9

Input

Input is given from Standard Input in the following format:

N
x_1 y_1
x_2 y_2
:
x_N y_N

Output

Print the minimum possible value.

Sample Input 1

3
1 2
3 4
5 6

Sample Output 1

15

The optimal solution is to paint the balls with x_1, x_2, y_3 red, and paint the balls with y_1, y_2, x_3 blue.

Sample Input 2

3
1010 10
1000 1
20 1020

Sample Output 2

380

Sample Input 3

2
1 1
1000000000 1000000000

Sample Output 3

999999998000000001

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

use std::io::{stdin, Read};
use std::str::FromStr;
use std::{cmp, mem, process};
use std::collections::{HashSet, HashMap, BTreeSet};


fn main() {
    let n = read::<usize>();
    let mut q = vec![(0, 0); n];

    let mut s = HashMap::<usize, HashSet<usize>>::new();
    let mut max_element = 0;
    let mut min_element = 10000000000;
    for i in 0..n {
        let mut x = read::<usize>();
        let mut y = read::<usize>();
        if x > y {
            mem::swap(&mut x, &mut y);
        }
        q[i] = (x, y);
        for j in &[x, y] {
            let hoge = s.entry(*j).or_insert(HashSet::<usize>::new());
            hoge.insert(i);
            max_element = cmp::max(max_element, *j);
            min_element = cmp::min(min_element, *j);
        }
        //println!("{:?}", &s);
    }
    q.sort();
    if s.get(&max_element).unwrap().len() == 1 && s.get(&min_element).unwrap().len() == 1 {
        if s.get(&max_element).unwrap() == s.get(&min_element).unwrap() {
            // 別々のみ
            let mut r_min = max_element;
            let mut b_max = min_element;
            for i in &q {
                let (l, r) = *i;
                r_min = cmp::min(r, r_min);
                b_max = cmp::max(l, b_max);
            }
            //println!("{}", (max_element - r_min) * (b_max - min_element));
            process::exit(0);
        }
    }
    let mut r_min = max_element;
    let mut b_max = min_element;
    for i in &q {
        let (l, r) = *i;
        r_min = cmp::min(r, r_min);
        b_max = cmp::max(l, b_max);
    }
    let mut ans = (max_element - r_min) * (b_max - min_element);
    let temp = max_element - min_element;
    max_element = q[n - 1].0;
    min_element = q[0].0;
    ans = cmp::min(temp * (max_element - min_element), ans);

    let mut sets1 = BTreeSet::new();
    let mut sets2 = BTreeSet::new();

    for i in 0..n {
        sets1.insert((q[i].0, i));
        sets2.insert((-(q[i].0 as i64), i));

    }
    q.push((10000000, 0));
    for i in 0..n {
        sets1.remove(&(q[i].0, i));
        sets1.insert((q[i].1, i));

        sets2.remove(&(-(q[i].0 as i64), i));
        sets2.insert((-(q[i].1 as i64), i));

        min_element = (*sets1.iter().next().unwrap()).0;
        max_element = -(*sets2.iter().next().unwrap()).0 as usize;
        ans = cmp::min(temp * (max_element - min_element), ans);
        //println!("{}", ans);
    }
    println!("{}", ans);
}


#[allow(dead_code)]
fn read_vec<T: FromStr>(n: usize) -> Vec<T> {
    let mut v = vec![];
    for i in 0..n {
        let a = read::<T>();
        v.push(a);
    }
    v
}
#[allow(dead_code)]
fn read_str() -> Vec<char> {
    let s: String = read();
    s.chars().collect::<Vec<char>>()
}
#[allow(dead_code)]
fn read<T: FromStr>() -> T {
    let stdin = stdin();
    let stdin = stdin.lock();
    let s = stdin
        .bytes()
        .map(|c| c.unwrap() as char)
        .skip_while(|c| c.is_whitespace())
        .take_while(|c| !c.is_whitespace())
        .collect::<String>();
    s.parse::<T>().unwrap_or_else(
        |_| panic!("Faild to parse {}", s),
    )
}