#include<bits/stdc++.h>
using namespace std;
#ifdef DEBUG
#include"debug.h"
#else
#define debug(...) void()
#endif
#define all(x) (x).begin(),(x).end()
template<class T>
auto ary(T *a,int l,int r){
	return vector<T>{a+l,a+1+r};
}
using ll=long long;
using ull=unsigned long long;
const int N=1e6+10,K=__lg(N)+1;
int n;
char a[N],b[N];
struct SA{
	int sa[N],rk[N],h[K][N];
	void getsa(char *a,int m=127){
		static int cnt[N],old[N<<1],p[N],id[N];
		for(int i=1;i<=n;i++)cnt[rk[i]=a[i]]++;
		for(int i=1;i<=m;i++)cnt[i]+=cnt[i-1];
		for(int i=1;i<=n;i++)sa[cnt[rk[i]]--]=i;
		fill(cnt,cnt+1+m,0);
		for(int len=1,k;len==1||m^n;len<<=1){
			k=0;
			for(int i=n-len+1;i<=n;i++)p[++k]=i;
			for(int i=1;i<=n;i++)if(sa[i]>len)p[++k]=sa[i]-len;
			for(int i=1;i<=n;i++)cnt[id[i]=rk[p[i]]]++;
			for(int i=1;i<=m;i++)cnt[i]+=cnt[i-1];
			for(int i=n;i>=1;i--)sa[cnt[id[i]]--]=p[i];
			copy(rk,rk+1+n,old),fill(cnt,cnt+1+m,0),m=0;
			for(int i=1;i<=n;i++){
				rk[sa[i]]=old[sa[i]]==old[sa[i-1]]&&old[sa[i]+len]==old[sa[i-1]+len]?m:++m;
			}
		}
		for(int i=1,x=0;i<=n;i++){
			for(x-=!!x;max(i,sa[rk[i]-1])+x<=n&&a[i+x]==a[sa[rk[i]-1]+x];x++);
			h[0][rk[i]]=x;
		}
		for(int i=1;(1<<i)<=n;i++){
			for(int j=1;j+(1<<i)-1<=n;j++){
				h[i][j]=min(h[i-1][j],h[i-1][j+(1<<i-1)]);
			}
		}
	}
	int LCP(int l,int r){
		if(l=rk[l],r=rk[r],l>r)swap(l,r);
		int k=__lg(r-l++);
		return min(h[k][l],h[k][r-(1<<k)+1]);
	}
}A,B;
int LCP(int x,int y){
	return A.LCP(x,y);
}
int LCS(int x,int y){
	return B.LCP(n-x+1,n-y+1);
}
vector<tuple<int,int,int>>ans;
void insert(int x,int y){
	if(x>y)swap(x,y);
	int s=x-LCS(x,y)+1,t=y+LCP(x,y)-1,d=y-x;
	if(t-s+1>=d*2)ans.push_back({s,t,d});
}
int main(){
	scanf("%s",a+1),n=strlen(a+1);
	for(int i=1;i<=n;i++)b[n-i+1]=a[i];
	A.getsa(a),B.getsa(b);
	static int top,stk[N];
	for(int i=n;i>=1;i--){
		for(;top&&A.rk[stk[top]]>A.rk[i];top--);
		if(top)insert(stk[top],i);
		stk[++top]=i;
	}
	top=0;
	for(int i=n;i>=1;i--){
		for(;top&&A.rk[stk[top]]<A.rk[i];top--);
		if(top)insert(stk[top],i);
		stk[++top]=i;
	}
	sort(all(ans)),ans.erase(unique(all(ans)),ans.end());
	printf("%ld\n",ans.size());
	for(auto [x,y,z]:ans)printf("%d %d %d\n",x,y,z);
	return 0;
}
#ifdef DEBUG
#include"debug.hpp"
#endif