namespace Solution {
	open Microsoft.Quantum.Primitive;
	open Microsoft.Quantum.Canon;

	operation F2 (x : Qubit[], y : Qubit) : Unit {
		F1(x, y);
	}

	operation F1 (x : Qubit[], y : Qubit) : Unit {
		if (Length(x) > 1) {
			F2(x[0..Length(x)-2], y);
		}
		else {
			X(y);
		}
	}

	operation Solve (x : Qubit[], y : Qubit) : Unit
	{
		F1(x, y);
	}
}