#include<bits/stdc++.h>
#define ll long long
#define ull unsigned ll
#define INF 0x3f3f3f3f
#define INFLL 0x3f3f3f3f3f3f3f3fll
#define For(i_,l_,r_) for(int i_=(l_);i_<=(r_);i_++)
#define Rep(i_,l_,r_) for(int i_=(l_);i_>=(r_);i_--)
#define Go(u_,i_)     for(int i_=hd[u_],v=e[i_].to;i_;i_=e[i_].nxt,v=e[i_].to)
using namespace std;
#define Ci const int
#define Cl const ll
#define Cil const ull
#define Cc const char
#define _c_ getchar()
#define getchar() (_u==_v&&(_v=(_u=_c)+fread(_c,1,inS,stdin),_u==_v)?EOF:*_u++)
Ci M=998244353;
inline int Add(Ci x){return x>=M?x-M:x;}
inline int Add(Ci x,Ci p){return x>=p?x-p:x;}
const int inS=1<<18,ouS=1<<18;int _p,_l=-1;
char _b[ouS],_d[55],_c[inS],*_u=_c,*_v=_c;
template<typename T=int>inline T read(){
	char ch=_c_;T X=0;bool fl=0;while(ch<48||ch>57)fl|=(ch==45),ch=_c_;
	while(ch>47&&ch<58)X=X*10+(ch^48),ch=_c_;if(fl)return-X;return X;
}
inline char Gec(){char ch=_c_;while(ch<33)ch=_c_;return ch;}
inline int Ges(char*K){
	int L=0;char ch=_c_;while(ch<33)ch=_c_;
	while(ch>32)*K++=ch,ch=_c_,++L;*K++=0;return L;
}
template<typename T>inline void read(T B,const T E){for(;B!=E;B++)*B=read();}
inline void flush(){fwrite(_b,1,_l+1,stdout);_l=-1;}
inline void _pc(Cc&C){if(C!=-1)_b[++_l]=C;}
inline void _chf(){if(_l>(ouS>>1))flush();}
inline void puc(Cc&C){_b[++_l]=C;}
inline void pus(Cc*K,Cc&C=10){while(*K)_b[++_l]=*K++;_pc(C);_chf();}
inline void write(Cc&C){_b[++_l]=C;}
inline void write(Cc*K){while(*K)_b[++_l]=*K++;_chf();}
template<typename T>inline void write(T X,Cc&C=-1){
	if(X<0)_b[++_l]=45,X=-X;do{_d[++_p]=(X%10)|48;}while(X/=10);
	do{_b[++_l]=_d[_p];}while(--_p);_pc(C);_chf();
}
template<typename T,typename...A>void write(const T&X,const A&...a){write(X);write(a...);}
template<typename T>inline void writel(T B,const T E,Cc&c=' ',Cc&e='\n'){
	for(;B!=E;)write(*B),_pc(++B!=E?c:e);
}
#define Writel(x) template<typename T>inline void writel(const x<T>&g,Cc&c=' ',Cc&e='\n'){writel(g.begin(),g.end(),c,e);}
Writel(initializer_list);Writel(vector);Writel(set);Writel(multiset);
Ci N_=1e2+5,M_=1e5+5;
inline void init(){
    // freopen("meow.in","r",stdin);
    // freopen("meow.out","w",stdout);
    atexit(flush);
}
int n,m,p[N_],a[N_],inq[N_],L,q[M_],ql;
bool vis[M_];
ll dis[N_],mn[N_];
struct G{ll x,y,w;}ans[M_];
inline void ypa(){
    n=read(),m=read();read(p+1,p+1+m);
    For(i,2,n)dis[i]=1ll<<60;
    For(i,1,m)a[p[i]]=i;
    For(i,1,n)vis[a[i]]=1;
    For(i,1,m-1){
        int r=i+1;
        while(!vis[r])++r;
        int l=i;i=r-1;
        For(j,1,n)q[j]=0;
        For(j,l+1,r){
            if(q[p[j]]==1)return pus("YouAreFake!");
            ++q[p[j]];
        }
        For(j,l+1,r-1){
            --dis[p[j]];
            mn[p[j]]=(1ll<<60)-dis[p[j]];
            ans[++ql]={p[l],p[j],dis[p[j]]-dis[p[l]]};
        }
        dis[p[r]]=dis[p[l]]+mn[p[l]];
        ans[++ql]={p[l],p[r],mn[p[l]]};
    }
    pus("YouAreWrite!");write(ql,'\n');
    For(i,1,ql)writel({ans[i].x,ans[i].y,ans[i].w});
}
signed main(){init();int T=1;For(i,1,T)ypa();return 0;}