#include <vector>
#include <map>
#include <set>
#include <cmath>
#include <iostream>
#include <algorithm>
#include <queue>
#include <iomanip>
#include <list>
#include <string>

typedef char                SINT8;
typedef short               SINT16;
typedef int                 SINT32;
typedef long long           SINT64;
typedef double              DOUBLE;

#define MAX(a,b) ((a)>(b)?(a):(b))
#define MIN(a,b) ((a)<(b)?(a):(b))
#define ABS(a) ((a)>(0)?(a):-(a))
#define rep(i,a,b) for(SINT64 (i)=SINT64(a);(i)<SINT64(b);(i)++)
#define rrep(i,a,b) for(SINT64 (i)=SINT64(a);(i)>=SINT64(b);(i)--)

#define put(a) cout << (a) << endl
#define puts(a) cout << (a) << " "
#define pute(a) cout << endl


#define INF 1000000001
#define MOD 1000000007
#define INF64 1000000000000000001

#define F first
#define S second

#define Pii  pair<SINT32,SINT32>
#define Pll  pair<SINT64,SINT64>
#define Piii pair<SINT32,pair<SINT32,SINT32>>
#define Plll pair<SINT64,pair<SINT64,SINT64>>

#define Vll(a,b,c)    vector<vector<SINT64>> (a)((b),vector<SINT64>((c))
#define Vlll(a,b,c,d) vector<vector<vector<SINT64>>> (a)((b),vector<vector<SINT64>>((c),vector<SINT64>((d)))


using namespace std;

bool sortcompare(Pll A, Pll B) {
    if(A.S == B.S){
        return A.F < B.F;
    } else {
        return A.S < B.S;
    }
}



int main() {

	SINT64 H;	cin >> H;
	SINT64 W;	cin >> W;

	vector<Pll> data;

	vector<Pll> net;
	
	rep(i,0,H) {
		rep(j,0,W) {
			SINT64 buf;
			cin >> buf;
			if ((buf%2) == 1) {
				Pll aaa;
				aaa.F = i+1;
				aaa.S = j+1;
				data.emplace_back(aaa);
			}
		}
	}
	sort(data.begin(),data.end(),sortcompare);



	vector<tuple<SINT64,SINT64,SINT64,SINT64>> ans;
	SINT64 cnt = 0;
	while(1) {
		while(1) {
			if (cnt == ((SINT64)data.size()-1)) {
				net.emplace_back(data[cnt]);
				break;
			} else if (cnt >= ((SINT64)data.size()-1)) {
				break;
			}

			if (data[cnt].S != data[cnt+1].S) {
				net.emplace_back(data[cnt]);
				cnt++;
			} else {
				break;
			}
		}
		if (cnt >= ((SINT64)data.size()-1)) {
			break;
		}
		while(1) {
			SINT64 a,b,c,d;


			if (data[cnt].F == data[cnt+1].F) {
				cnt++;
				break;
			}
			a = data[cnt].F;
			b = data[cnt].S;
			c = data[cnt].F;
			d = data[cnt].S;

			if (data[cnt].F > data[cnt+1].F) {
				c = data[cnt].F - 1;
				data[cnt].F--;
			} else if (data[cnt].F < data[cnt+1].F) {
				c = data[cnt].F + 1;
				data[cnt].F++;
			} else if (data[cnt].S > data[cnt+1].S) {
				d = data[cnt].S - 1;
				data[cnt].S--;
			} else if (data[cnt].S < data[cnt+1].S) {
				d = data[cnt].S + 1;
				data[cnt].S++;
			}
			ans.emplace_back(a,b,c,d);
		}
		cnt++;
	}


	cnt = 0;
	while(1) {
		if (cnt >= ((SINT64)net.size()-1)) {
			break;
		}

		while(net[cnt].F != H) {
			
			ans.emplace_back(net[cnt].F,net[cnt].S,net[cnt].F+1,net[cnt].S);
			net[cnt].F++;
		}

		while(1) {
			SINT64 a,b,c,d;

			if ((net[cnt].F == net[cnt+1].F) && (net[cnt].S == net[cnt+1].S)) {
				cnt++;
				break;
			}
			a = net[cnt].F;
			b = net[cnt].S;
			c = net[cnt].F;
			d = net[cnt].S;

			if (net[cnt].F < net[cnt+1].F) {
				c = net[cnt].F + 1;
				net[cnt].F++;
			} else if (net[cnt].S < net[cnt+1].S) {
				d = net[cnt].S + 1;
				net[cnt].S++;

			} else if (net[cnt].F > net[cnt+1].F) {
				c = net[cnt].F - 1;
				net[cnt].F--;

			} else if (net[cnt].S > net[cnt+1].S) {
				d = net[cnt].S - 1;
				net[cnt].S--;
			}

			ans.emplace_back(a,b,c,d);
		}
		cnt++;
	}



	put(ans.size());
	rep(i,0,ans.size()) {
		puts(get<0>(ans[i]));
		puts(get<1>(ans[i]));
		puts(get<2>(ans[i]));
		put(get<3>(ans[i]));
	} 
	return 0;
}


//	vector<vector<SINT64>> data(N,vector<SINT32>(3));										//2次元配列
//	vector<vector<vector<SINT64>>> data(N,vector<vector<SINT64>>(3,vector<SINT64>(3)));		//3次元配列

//	Vll(data,N,N);		//2次元配列
//	Vlll(data,N,N,N);	//3次元配列

//	sort(data.begin(),data.end());
//	sort(data.begin(),data.end(),std::greater<SINT64>());
//	__gcd(A,B);


/* 複数条件ソート
bool sortcompare(Pll A, Pll B) {
    if(A.F == B.F){
        return A.S > B.S;
    } else {
        return A.F < B.F;
    }
}

sort(data.begin(),data.end(),sortcompare);
*/


//	data.emplace_back(BUF);			//後ろに追加

//  data.erase(std::unique(data.begin(), data.end()), data.end());	//ソート後に使用 同じ値を消す

//	data.insert(data.begin() + X, 0);	//X番目の要素に0を挿入


//	隣接リスト
//	vector<vector<SINT64>> data(N);
//	data[ A ].emplace_back( B );


/*
	vector<Pll> data(N);
	rep(i,0,N) {
		cin >> data[i].F;
		cin >> data[i].S;
	}
	sort(data.begin(),data.end());
*/

/*
	vector<Plll> data(N);
	rep(i,0,N) {
		cin >> data[i].F;
		cin >> data[i].S.F;
		cin >> data[i].S.S;
	}
	sort(data.begin(),data.end());
*/


// posi = lower_bound(data.begin(),data.end(), X) - data.begin();				// X以上を探す
// posi = lower_bound(data.begin(),data.end(),make_pair(X,0)) - data.begin();	//pair


/* 文字列回転
	string N;
	cin >> N;
	N = N[N.length()-1] + N.substr(0,N.length()-1);


	s = to_string(i);	//ストリング変換
*/
/* 文字列合成
	string N,M;
	cin >> N >> M;
	SINT64 ans = 0;
	ans = stoi(N+M);
*/

/*
//ワーシャルフロイド
vector<vector<SINT32>> dist(N,vector<SINT32>(N));
rep(i,0,N) {
	rep(j,0,N) {
		if (i != j) {
			dist[i][j] = INF;
		}
	}
}
rep(k,0,N) {
	rep(i,0,N) {
		rep(j,0,N) {
			dist[i][j] = MIN(dist[i][j], dist[i][k]+dist[k][j]);
		}
	}
}
*/

/*  優先度付きキュー
	priority_queue<SINT64, vector<SINT64>, greater<SINT64>> bufq;	//小さいほうから取り出せる
	priority_queue<SINT64, vector<SINT64>> bufq;					//大きいほうから取り出せる

	bufq.push(X);	//X を挿入
	bufq.top();		//先頭データ読み
	bufq.pop();		//先頭データ削除
*/

/* キュー
	queue<SINT64> bufq;	//宣言
	bufq.push(0);	//挿入
	bufq.front();	//先頭データ読み
	bufq.pop();		//先頭データ削除
*/





/* SET コンテナ
	set<SINT64> data;
	data.insert(X);				//X を挿入
	data.erase(data.begin());	//先頭を削除
	data.erase(--data.end());	//末尾を削除
	*data.begin();				//先頭要素にアクセス
	*data.rbegin();				//末尾要素にアクセス

	//全表示
    set<SINT64>::iterator it; //イテレータを用意
    for(it = data.begin(); it != data.end(); it++) {
        cout << *it << " ";
    }
	cout << endl;

	//N番目を一部表示
	set<SINT64>::iterator it; //  イテレータを用意
	it = data.begin();
	rep (i,0,N) {
		it++;
	}
	cout << *it << endl;
*/

/* map
	map<string,SINT32> mp;
	SINT32 N = 0;
	SINT32 mx = 0;

	cin >> N;
	for (SINT32 i = 0; i < N; i++) {
		string s;
		cin >> s;
		mp[s]++;
	}
	for(auto it=mp.begin();it!=mp.end();it++) {
		mx=max(mx,it->second);
	}
*/

/*
	//順列全表示
	//sortしてからでないと全列挙にならない
	sort(data.begin(),data.end());
	do {
		cout << buf << endl;
		rep(i,0,R) {
			cout << data[i] << " ";
		}
		cout << endl;

    } while (next_permutation(data.begin(),data.end()));
*/

//  桁指定表示
//  ans = ans * M_PI;
//	cout << setprecision(15) << ans << endl;


// 逆元　コンビネーション
/*
SINT64 modpow(SINT64 a, SINT64 p) {
	if (p == 0) return 1;
	if (p % 2 == 0) {
		//pが偶数の時
		SINT64 halfP = p / 2;
		SINT64 half = modpow(a, halfP);
		//a^(p/2) をhalfとして、half*halfを計算
		return half * half % MOD;
	} else {
		//pが奇数の時は、偶数にするために1減らす
		return a * modpow(a, p - 1) % MOD;
	}
}

SINT64 calcComb(SINT64 a, SINT64 b) {
	SINT64 Mul = 1;
	SINT64 Div = 1;
	SINT64 ans = 0;

	if (b > a - b) {
		return calcComb(a, a - b);
	}
 
	rep(i,0,b) {
		Mul *= (a - i);
		Div *= (i + 1);
		Mul %= MOD;
		Div %= MOD;
	}
	ans = Mul * modpow(Div, MOD - 2) % MOD;
	return ans;
}
*/


/* UNION FIND
class UnionFind {
public:
	vector<SINT64> parent;

	UnionFind(SINT64 N) {
		parent = vector<SINT64>(N+10, -1);	//少し多めに
	}
	
	SINT64 root(SINT64 A) {
		if (parent[A] < 0) {
			return A;
		} else {
			parent[A] = root(parent[A]);
			return parent[A];
		}
	}

	SINT64 size(SINT64 A) {
		return parent[root(A)] * (-1);
	}

	bool judge(SINT64 A, SINT64 B) {
		A = root(A);
		B = root(B);
		if (A == B) {
			return true;	//同じグループ
		} else {
			return false;	//違うグループ
		}
	}

	void connect(SINT64 A, SINT64 B) {
		A = root(A);
		B = root(B);
		if (A != B) {
			if (size(A) < size(B)) {
				swap(A, B);
			}
			parent[A] += parent[B];
			parent[B] = A;
		}
	}
};
UnionFind uni(N);
 */

Measured memory_bytes: 10988