Allen dreams of one day owning a enormous fleet of electric cars, the car of the future! He knows that this will give him a big status boost. As Allen is planning out all of the different types of cars he will own and how he will arrange them, he realizes that he has a problem. 

Allen's future parking lot can be represented as a rectangle with 4 rows and n (n ≤ 50) columns of rectangular spaces, each of which can contain at most one car at any time. He imagines having k (k ≤ 2n) cars in the grid, and all the cars are initially in the second and third rows. Each of the cars also has a different designated parking space in the first or fourth row. Allen has to put the cars into corresponding parking places.

<image> Illustration to the first example.

However, since Allen would never entrust his cars to anyone else, only one car can be moved at a time. He can drive a car from a space in any of the four cardinal directions to a neighboring empty space. Furthermore, Allen can only move one of his cars into a space on the first or fourth rows if it is the car's designated parking space. 

Allen knows he will be a very busy man, and will only have time to move cars at most 20000 times before he realizes that moving cars is not worth his time. Help Allen determine if he should bother parking his cars or leave it to someone less important.

Input

The first line of the input contains two space-separated integers n and k (1 ≤ n ≤ 50, 1 ≤ k ≤ 2n), representing the number of columns and the number of cars, respectively.

The next four lines will contain n integers each between 0 and k inclusive, representing the initial state of the parking lot. The rows are numbered 1 to 4 from top to bottom and the columns are numbered 1 to n from left to right.

In the first and last line, an integer 1 ≤ x ≤ k represents a parking spot assigned to car x (you can only move this car to this place), while the integer 0 represents a empty space (you can't move any car to this place).

In the second and third line, an integer 1 ≤ x ≤ k represents initial position of car x, while the integer 0 represents an empty space (you can move any car to this place).

Each x between 1 and k appears exactly once in the second and third line, and exactly once in the first and fourth line.

Output

If there is a sequence of moves that brings all of the cars to their parking spaces, with at most 20000 car moves, then print m, the number of moves, on the first line. On the following m lines, print the moves (one move per line) in the format i r c, which corresponds to Allen moving car i to the neighboring space at row r and column c.

If it is not possible for Allen to move all the cars to the correct spaces with at most 20000 car moves, print a single line with the integer -1.

Examples

Input

4 5
1 2 0 4
1 2 0 4
5 0 0 3
0 5 0 3


Output

6
1 1 1
2 1 2
4 1 4
3 4 4
5 3 2
5 4 2


Input

1 2
1
2
1
2


Output

-1


Input

1 2
1
1
2
2


Output

2
1 1 1
2 4 1

Note

In the first sample test case, all cars are in front of their spots except car 5, which is in front of the parking spot adjacent. The example shows the shortest possible sequence of moves, but any sequence of length at most 20000 will be accepted.

In the second sample test case, there is only one column, and the cars are in the wrong order, so no cars can move and the task is impossible.

Source: codeforces | Difficulty: HARD
Tags: Implementation

Constructive algorithms


Solutions:
(n, k) = list(map(int, input().split()))
table = []
for row in range(4):
	table.append(list(map(int, input().split())))
moves = []

def make_move(start, finish):
	moves.append((table[start[0]][start[1]], finish[0] + 1, finish[1] + 1))
	table[finish[0]][finish[1]] = table[start[0]][start[1]]
	table[start[0]][start[1]] = 0

def move_all_to_places():
	for pos in range(n):
		if table[1][pos] == table[0][pos] and table[1][pos]:
			make_move((1, pos), (0, pos))
		if table[2][pos] == table[3][pos] and table[2][pos]:
			make_move((2, pos), (3, pos))
move_all_to_places()
found = False
for pos in range(n):
	if table[1][pos] == 0:
		found = True
		break
	if table[2][pos] == 0:
		found = True
		break
if not found:
	print(-1)
	exit()
for cnt in range(20000):
	if table[1][0] != 0 and table[2][0] == 0:
		make_move((1, 0), (2, 0))
		if n == 1:
			continue
	for pos in range(1, n):
		if table[1][pos - 1] == 0 and table[1][pos] != 0:
			make_move((1, pos), (1, pos - 1))
	move_all_to_places()
	if table[1][n - 1] == 0 and table[2][n - 1] != 0:
		make_move((2, n - 1), (1, n - 1))
	for pos in range(n - 2, -1, -1):
		if table[2][pos + 1] == 0 and table[2][pos] != 0:
			make_move((2, pos), (2, pos + 1))
	move_all_to_places()
if len(moves) > 20000:
	print(-1)
	exit()
print(len(moves))
for m in moves:
	print(*m)


def parknext(N, P, sq, rem):
	for i in range(N):
		if P[0][i] == P[1][i] and P[0][i] > 0:
			sq.append((P[0][i], 1, i + 1))
			P[0][i] = P[1][i] = 0
			rem[0] -= 1
		if P[3][i] == P[2][i] and P[3][i] > 0:
			sq.append((P[3][i], 4, i + 1))
			P[3][i] = P[2][i] = 0
			rem[0] -= 1

def rotnext(N, pos):
	(c, r) = pos
	assert r == 1 or r == 2
	if r == 1 and c == N - 1:
		return (N - 1, 2)
	if r == 2 and c == 0:
		return (0, 1)
	if r == 1:
		return (c + 1, r)
	return (c - 1, r)

def rot(N, P, sq):
	pos = None
	for c in range(N):
		for r in (1, 2):
			if P[r][c] == 0:
				pos = (c, r)
				break
		if pos is not None:
			break
	if pos is None:
		return False
	origpos = pos
	prev = pos
	cur = rotnext(N, pos)
	while cur != origpos:
		(pc, pr) = prev
		(cc, cr) = cur
		assert P[pr][pc] == 0
		if P[cr][cc] > 0:
			sq.append((P[cr][cc], pr + 1, pc + 1))
			P[pr][pc] = P[cr][cc]
			P[cr][cc] = 0
		prev = cur
		cur = rotnext(N, cur)
	return True

def solve(N, K, P):
	sq = []
	rem = [K]
	parknext(N, P, sq, rem)
	while rem[0] > 0:
		if not rot(N, P, sq):
			return -1
		parknext(N, P, sq, rem)
	return sq

def main():
	(N, K) = [int(e) for e in input().split(' ')]
	P = []
	for _ in range(4):
		a = [int(e) for e in input().split(' ')]
		assert len(a) == N
		P.append(a)
	ans = solve(N, K, P)
	if ans == -1:
		print('-1')
	else:
		print(len(ans))
		for l in ans:
			print(' '.join(map(str, l)))
main()


all_the_moves = []
parked = 0
(n, k) = map(int, input().split())
park = []
park += [[int(x) for x in input().split()]]
park += [[int(x) for x in input().split()]]
park += [[int(x) for x in input().split()]]
park += [[int(x) for x in input().split()]]

def add_move(car, r, c):
	global all_the_moves
	if car == 0:
		return
	all_the_moves += [(car, r, c)]

def cycle():
	if len(park[1]) == 1:
		if park[1][0] != 0:
			add_move(park[1][0], 2, 0)
			(park[1][0], park[2][0]) = (park[2][0], park[1][0])
		elif park[2][0] != 0:
			add_move(park[2][0], 1, 0)
			(park[1][0], park[2][0]) = (park[2][0], park[1][0])
		return
	if 0 not in park[1]:
		i = park[2].index(0)
		(park[2][i], park[1][i]) = (park[1][i], park[2][i])
		add_move(park[2][i], 2, i)
	i = park[1].index(0)
	for j in range(i, 0, -1):
		add_move(park[1][j - 1], 1, j)
		(park[1][j], park[1][j - 1]) = (park[1][j - 1], park[1][j])
	add_move(park[2][0], 1, 0)
	(park[1][0], park[2][0]) = (park[2][0], park[1][0])
	for j in range(n - 1):
		add_move(park[2][j + 1], 2, j)
		(park[2][j], park[2][j + 1]) = (park[2][j + 1], park[2][j])
	if i < n - 1:
		add_move(park[1][n - 1], 2, n - 1)
		(park[1][n - 1], park[2][n - 1]) = (park[2][n - 1], park[1][n - 1])
	for j in range(n - 2, i, -1):
		add_move(park[1][j], 1, j + 1)
		(park[1][j], park[1][j + 1]) = (park[1][j + 1], park[1][j])

def cars_to_their_places():
	global all_the_moves
	global parked
	for i in range(n):
		if park[0][i] != 0 and park[0][i] == park[1][i]:
			all_the_moves += [(park[0][i], 0, i)]
			park[1][i] = 0
			parked += 1
	for i in range(n):
		if park[3][i] != 0 and park[3][i] == park[2][i]:
			all_the_moves += [(park[3][i], 3, i)]
			park[2][i] = 0
			parked += 1
cars_to_their_places()
if k == 2 * n and parked == 0:
	print(-1)
else:
	while parked < k:
		cycle()
		cars_to_their_places()
	if len(all_the_moves) <= 2 * 10 ** 4:
		print(len(all_the_moves))
		for (i, r, c) in all_the_moves:
			print(i, r + 1, c + 1)
	else:
		print(-1)


import bisect
import heapq
import math
import random
import sys
from collections import Counter, defaultdict
from decimal import ROUND_CEILING, ROUND_HALF_UP, Decimal
from functools import lru_cache, reduce
from itertools import combinations, combinations_with_replacement, product, permutations
sys.setrecursionlimit(10000)

def read_int():
	return int(input())

def read_int_n():
	return list(map(int, input().split()))

def read_float():
	return float(input())

def read_float_n():
	return list(map(float, input().split()))

def read_str():
	return input()

def read_str_n():
	return list(map(str, input().split()))

def error_print(*args):
	print(*args, file=sys.stderr)

def mt(f):
	import time

	def wrap(*args, **kwargs):
		s = time.time()
		ret = f(*args, **kwargs)
		e = time.time()
		error_print(e - s, 'sec')
		return ret
	return wrap

@mt
def slv(N, K, S):
	error_print('------')
	for s in S:
		error_print(s)
	ans = []
	for (i, (p, c)) in enumerate(zip(S[0], S[1])):
		if c != 0 and p == c:
			ans.append((c, 1, i + 1))
			S[1][i] = 0
	for (i, (p, c)) in enumerate(zip(S[3], S[2])):
		if c != 0 and p == c:
			ans.append((c, 4, i + 1))
			S[2][i] = 0
	while len(ans) <= 20000 and sum(S[1]) + sum(S[2]) != 0:
		error_print('------')
		m = len(ans)
		for s in S:
			error_print(s)
		S1 = [c for c in S[1]]
		S2 = [c for c in S[2]]
		for i in range(N):
			c = S[1][i]
			if i == 0:
				if c != 0 and S[2][0] == 0:
					ans.append((c, 3, i + 1))
					S1[i] = 0
					S2[i] = c
			elif c != 0 and S[1][i - 1] == 0:
				ans.append((c, 2, i))
				S1[i] = 0
				S1[i - 1] = c
		for i in range(0, N)[::-1]:
			c = S[2][i]
			if i == N - 1:
				if c != 0 and S[1][i] == 0:
					ans.append((c, 2, i + 1))
					S2[i] = 0
					S1[i] = c
			elif c != 0 and S[2][i + 1] == 0:
				ans.append((c, 3, i + 2))
				S2[i] = 0
				S2[i + 1] = c
		S[1] = S1
		S[2] = S2
		for (i, (p, c)) in enumerate(zip(S[0], S[1])):
			if c != 0 and p == c:
				ans.append((c, 1, i + 1))
				S[1][i] = 0
		for (i, (p, c)) in enumerate(zip(S[3], S[2])):
			if c != 0 and p == c:
				ans.append((c, 4, i + 1))
				S[2][i] = 0
		if len(ans) == m:
			break
	if len(ans) > 20000:
		return -1
	if sum(S[1]) + sum(S[2]) != 0:
		return -1
	error_print('------')
	for s in S:
		error_print(s)
	return str(len(ans)) + '\n' + '\n'.join(map(lambda x: ' '.join(map(str, x)), ans))

def main():
	(N, K) = read_int_n()
	S = [read_int_n() for _ in range(4)]
	print(slv(N, K, S))
main()


(n, k) = map(int, input().strip().split())
p = list()
for _ in range(4):
	p.append(list(map(int, input().strip().split())))

def find():
	for i in range(n):
		if p[1][i] != 0 and p[0][i] == p[1][i]:
			car = p[1][i]
			p[1][i] = 0
			return [car, 1, i + 1]
		if p[2][i] != 0 and p[3][i] == p[2][i]:
			car = p[2][i]
			p[2][i] = 0
			return [car, 4, i + 1]
	return list()

def rotate():
	for c in range(n):
		if p[1][c] != 0:
			nc = c + 1
			nr = 1
			if nc == n:
				nc = n - 1
				nr = 2
			if p[nr][nc] == 0:
				ans.append([p[1][c], nr + 1, nc + 1])
				p[nr][nc] = p[1][c]
				p[1][c] = 0
				return
	for c in range(n):
		if p[2][c] != 0:
			nc = c - 1
			nr = 2
			if nc == -1:
				nc = 0
				nr = 1
			if p[nr][nc] == 0:
				ans.append([p[2][c], nr + 1, nc + 1])
				p[nr][nc] = p[2][c]
				p[2][c] = 0
				return
cnt = 0
ans = list()
while cnt < k:
	cur = find()
	if len(cur) == 0 and k == 2 * n and (cnt == 0):
		print(-1)
		exit(0)
	if cur:
		ans.append(cur)
		cnt += 1
	rotate()
print(len(ans))
for e in ans:
	print(' '.join(map(str, e)))


import time
max = 20000

def test(x1, x2, n, s):
	for i in range(x1 + 1, x2 + 1):
		if s[n][i] != 0:
			return False
	return True

def lastshift(n, s, a):
	m = 0
	for i in range(n):
		if s[1][i] != 0 and s[1][i] == s[0][i]:
			s[1][i] = 0
			m += 1
			a.append([s[0][i], 1, i + 1])
		if s[2][i] != 0 and s[2][i] == s[3][i]:
			s[2][i] = 0
			m += 1
			a.append([s[3][i], 4, i + 1])
	return m
(n, k) = (int(i) for i in input().split())
s = []
s.append([int(i) for i in input().split()])
s.append([int(i) for i in input().split()])
s.append([int(i) for i in input().split()])
s.append([int(i) for i in input().split()])
start = time.time()
a = []
m = lastshift(n, s, a)
I = -1
z = 0
for i in range(n):
	if s[1][i] == 0:
		l = 1
		I = i
		break
	if s[2][i] == 0:
		l = 2
		I = i
		break
if I >= 0:
	while m < k:
		b = s[1][0]
		e = s[2][n - 1]
		if l == 1:
			for i in range(I, n - 1):
				s[1][i] = s[1][i + 1]
				if s[1][i + 1] != 0:
					a.append([s[1][i + 1], 2, i + 1])
			if e != 0:
				a.append([e, 2, n])
			for i in range(n - 1, 0, -1):
				s[2][i] = s[2][i - 1]
				if s[2][i] != 0:
					a.append([s[2][i], 3, i + 1])
			if b != 0:
				a.append([b, 3, 1])
			for i in range(I - 1):
				s[1][i] = s[1][i + 1]
				if s[1][i + 1] != 0:
					a.append([s[1][i + 1], 2, i + 1])
			s[1][n - 1] = e
			s[2][0] = b
		else:
			for i in range(I, 0, -1):
				s[2][i] = s[2][i - 1]
				if s[2][i] != 0:
					a.append([s[2][i], 3, i + 1])
			if b != 0:
				a.append([b, 3, 1])
			for i in range(n - 1):
				s[1][i] = s[1][i + 1]
				if s[1][i] != 0:
					a.append([s[1][i], 2, i + 1])
			if e != 0:
				a.append([e, 2, n])
			s[1][n - 1] = e
			s[2][0] = b
			for i in range(n - 1, I + 1, -1):
				s[2][i] = s[2][i - 1]
				if s[2][i] != 0:
					a.append([s[2][i], 3, i + 1])
		I += 2 * l - 3
		if I == -1:
			I = 0
			l = 2
		if I == n:
			I = n - 1
			l = 1
		s[l][I] = 0
		m += lastshift(n, s, a)
	print(len(a))
	for i in range(len(a)):
		print(a[i][0], a[i][1], a[i][2])
else:
	print(-1)
finish = time.time()