Problem:
Problem B: Lattice Practices

Once upon a time, there was a king who loved beautiful costumes very much. The king had a special cocoon bed to make excellent cloth of silk. The cocoon bed had 16 small square rooms, forming a 4 × 4 lattice, for 16 silkworms. The cocoon bed can be depicted as follows:

The cocoon bed can be divided into 10 rectangular boards, each of which has 5 slits:

Note that, except for the slit depth, there is no difference between the left side and the right side of the board (or, between the front and the back); thus, we cannot distinguish a symmetric board from its rotated image as is shown in the following:

Slits have two kinds of depth, either shallow or deep. The cocoon bed should be constructed by fitting five of the boards vertically and the others horizontally, matching a shallow slit with a deep slit.

Your job is to write a program that calculates the number of possible configurations to make the lattice. You may assume that there is no pair of identical boards. Notice that we are interested in the number of essentially different configurations and therefore you should not count mirror image configurations and rotated configurations separately as different configurations.

The following is an example of mirror image and rotated configurations, showing vertical and horizontal boards separately, where shallow and deep slits are denoted by '1' and '0' respectively.

Notice that a rotation may exchange position of a vertical board and a horizontal board.

Input

The input consists of multiple data sets, each in a line. A data set gives the patterns of slits of 10 boards used to construct the lattice. The format of a data set is as follows:

XXXXX XXXXX XXXXX XXXXX XXXXX XXXXX XXXXX XXXXX XXXXX XXXXX

Each x is either '0' or '1'. '0' means a deep slit, and '1' a shallow slit. A block of five slit descriptions corresponds to a board. There are 10 blocks of slit descriptions in a line. Two adjacent blocks are separated by a space.

For example, the first data set in the Sample Input means the set of the following 10 boards:

The end of the input is indicated by a line consisting solely of three characters "END".

Output

For each data set, the number of possible configurations to make the lattice from the given 10 boards should be output, each in a separate line.

Sample Input

10000 01000 00100 11000 01100 11111 01110 11100 10110 11110
10101 01000 00000 11001 01100 11101 01110 11100 10110 11010
END

Output for the Sample Input

40
6

Solution in Ruby (judge verdict: Accepted)

### subroutines

def match?(ls, k, br)
  for i in (0...5)
    return false if ls[i][k] && ls[i][k] == br[i]
  end
  true
end

def vrec()
  k = 0
  while k < 5 && ! $vls[k].empty?
    k += 1
  end
  return 1 if k >= 5

  count = 0
  for i in (0...10)
    next if $used[i]

    if match?($hls, k, $brds[i])
      $used[i] = true
      $vls[k] = $brds[i]
      count += hrec()
      $vls[k] = []
      $used[i] = false
    end
    next if $brds[i] == $rbrds[i]
    
    if match?($hls, k, $rbrds[i])
      $used[i] = true
      $vls[k] = $rbrds[i]
      count += hrec()
      $vls[k] = []
      $used[i] = false
    end
  end
  count
end

def hrec()
  k = 0
  while k < 5 && ! $hls[k].empty?
    k += 1
  end
  return 1 if k >= 5

  count = 0
  for i in (0...10)
    next if $used[i]

    if match?($vls, k, $brds[i])
      $used[i] = true
      $hls[k] = $brds[i]
      count += vrec()
      $hls[k] = []
      $used[i] = false
    end
    next if $brds[i] == $rbrds[i]
    
    if match?($vls, k, $rbrds[i])
      $used[i] = true
      $hls[k] = $rbrds[i]
      count += vrec()
      $hls[k] = []
      $used[i] = false
    end
  end
  count
end

def kaibun?(br)
  br[0] == br[4] && br[1] == br[3]
end

### main

loop do
  line = gets.strip
  break if line == 'END'

  $brds = line.split.map{|str| str.split('').map{|b| b.to_i}}
  $rbrds = $brds.map{|br| br.reverse}
  #p $brds
  #p $rbrds
  
  $hls = 5.times.map{[]}
  $vls = 5.times.map{[]}
  $used = 10.times.map{false}

  $used[0] = true
  count = 0

  $hls[0] = $brds[0]
  count += vrec()
  $hls[0] = []

  $hls[1] = $brds[0]
  count += vrec()
  $hls[1] = []

  $hls[2] = $brds[0]
  count += vrec() / 2
  $hls[2] = []

  count /= 2 if kaibun?($brds[0])
  
  puts count
end