// what is matter? never mind. 
#pragma GCC optimize("Ofast")
#pragma GCC optimize("unroll-loops")
//#pragma GCC target("sse,sse2,sse3,sse4,popcnt,abm,mmx,avx,avx2") 
#include<bits/stdc++.h>
#define For(i,a,b) for(int i=(a);i<=(b);++i)
#define Rep(i,a,b) for(int i=(a);i>=(b);--i)
#define ll long long
#define ull unsigned long long
//#define int long long
using namespace std;
inline int read()
{
    char c=getchar();int x=0;bool f=0;
    for(;!isdigit(c);c=getchar())f^=!(c^45);
    for(;isdigit(c);c=getchar())x=(x<<1)+(x<<3)+(c^48);
    if(f)x=-x;return x;
}

#define fi first
#define se second
#define pb push_back
#define mkp make_pair
typedef pair<int,int>pii;
typedef vector<int>vi;
 
#define maxn 300005
#define inf 0x3f3f3f3f

int n;
vector<array<int,4>>out;
void add(int a,int b,int c,int d){out.pb({a,b,c,d});}

void solve(vi a,vi b,int o){
	int n=a.size();
	if(n==0){
		add(1,b[0],-1,-1);
		return;
	}
	if(n==1){
		add(2,a[0],b[0],-1);
		return;
	}
	if(n==2){
		add(3,a[0],a[1],b[0]);
		return;
	}
	add(3,a[0],b[1],b[0]);
	vi aa=a,bb=b;
	aa.erase(aa.begin());
	bb.erase(bb.begin());
	solve(aa,bb,1);
	add(3,a[0],b[1],b[0]);
	if(o==0) solve(aa,bb,1);
}

signed main()
{
	n=read(),read(),read(),read();
	if(n==0)puts("1"),puts("1 0"),exit(0);
	if(n==1)puts("1"),puts("2 0 1"),exit(0);
	For(_,0,1){
		vi a,b;
		
		For(i,0,n/2-1)a.pb(i); a.pb(n);
		b.pb(n+1); For(i,n/2,n)b.pb(i);
		solve(a,b,0);
		a.clear(),b.clear();
		
		For(i,n/2,n)a.pb(i);
		b.pb(n+1); For(i,0,n/2-1)b.pb(i);
		solve(a,b,0);
	}
	cout<<out.size()<<"\n";
	for(auto [a,b,c,d]:out)cout<<a<<" "<<b<<" "<<c<<" "<<d<<"\n";
    return 0;
}
/*

*/