func main()
	var n: int :: cui@inputInt()
	var k: int :: cui@inputInt()
	var a: []int :: #[n]int
	for i(0, n - 1)
		do a[i] :: cui@inputInt()
	end for
	do a.sort()
	
	var ans: int :: 0
	for id(0, 2 ^ n - 1)
		var bit: int :: id
		var cnt: int :: 0
		for i(0, n - 1)
			do cnt :+ bit % 2
			do bit :/ 2
		end for
		
		var b: []int :: #[cnt]int
		var ib: int :: cnt - 1
		do bit :: id
		for i(0, n - 1)
			if(bit % 2 = 1)
				do b[ib] :: a[i]
				do ib :- 1
			end if
			do bit :/ 2
		end for
		var val: int :: k
		for i(0, cnt - 1)
			do val :% b[i]
		end for
		do bit :: id
		for i(0, n - 1)
			if(bit % 2 = 0)
				do val :% a[i]
			end if
			do bit :/ 2
		end for
		do ans :: [ans, val].max()
	end for
	
	do cui@print("\{ans}\n")
end func