Problem:
Score : 200 points

Problem Statement

#nck {
width: 30px;
height: auto;
}

We have a grid of H rows and W columns. Initially, there is a stone in the top left cell. Shik is trying to move the stone to the bottom right cell. In each step, he can move the stone one cell to its left, up, right, or down (if such cell exists). It is possible that the stone visits a cell multiple times (including the bottom right and the top left cell).

You are given a matrix of characters a_{ij} (1 \leq i \leq H, 1 \leq j \leq W). After Shik completes all moving actions, a_{ij} is # if the stone had ever located at the i-th row and the j-th column during the process of moving. Otherwise, a_{ij} is .. Please determine whether it is possible that Shik only uses right and down moves in all steps.

Constraints

2 \leq H, W \leq 8

a_{i,j} is either # or ..

There exists a valid sequence of moves for Shik to generate the map a.

Input

The 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

If it is possible that Shik only uses right and down moves, print Possible. Otherwise, print Impossible.

Sample Input 1

4 5
##...
.##..
..##.
...##

Sample Output 1

Possible

The matrix can be generated by a 7-move sequence: right, down, right, down, right, down, and right.

Sample Input 2

5 3
###
..#
###
#..
###

Sample Output 2

Impossible

Sample Input 3

4 5
##...
.###.
.###.
...##

Sample Output 3

Impossible

Solution in Haskell (GHC 7.10.3) (judge verdict: Wrong Answer)

import Data.Array.Unboxed
import Control.Monad( replicateM)
main = do
    [h,w] <- return . map read . words =<< getLine
    lines <- replicateM h getLine
    let arr = listArray ((1,1),(h,w)) $ concat lines::UArray (Int,Int) Char
	proc (i,j)
	  | w==j&&i==h	= True
	  | w==j	= if arr!(i+1,j)=='.' then False else proc (i+1,j)
	  | h==i	= if arr!(i,j+1)=='.' then False else proc (i,j+1)
	  | otherwise   = if arr!(i,j+1)=='#'
			    then if arr!(i+1,j)=='#'
				    then False
				    else proc (i,j+1)
			    else if arr!(i+1,j)=='#'
				    then proc (i+1,j)
				    else False
    putStr $ if proc (1,1) then "Possible" else "Impossible"