#include <cstdio>
#include <iostream>
#include <vector>
#define macro_expand(x) #x
#define print_macro(x) printf("%s\n",macro_expand(x))
#define FOR(i,l,r) for(int i=(l),i##ADJK=(r);i<=i##ADJK;++i)
#define ROF(i,r,l) for(int i=(r),i##ADJK=(l);i>=i##ADJK;--i)
#define go(p,u) for(int p=head[u];p;p=edge[p].nxt)
#define pii pair<int,int>
#define fi first
#define se second
using namespace std;
typedef long long LL;
const int MN=505,MM=1005;
int N,M,P;
int add(int &x,const int &y){return ((x+=y)>=P)?(x-=P):x;}
int head[MN];
struct E{
	int v,nxt,id;
	E():v(0),nxt(0),id(0){}
	E(int _v,int _nxt,int _id):v(_v),nxt(_nxt),id(_id){}
}edge[MM*2];
int tote;
void AddE(int u,int v,int id){
	edge[++tote]=E(v,head[u],id);
	head[u]=tote;
}
int val[MM],fa[MN],fid[MN];
bool tre[MM],vis[MN],evis[MM];
vector<int> G[MM];
int dep[MN];
void dfs1(int u){
	vis[u]=1;
	go(p,u){
		int v=edge[p].v,id=edge[p].id;
		if(!vis[v]){
			dep[v]=dep[u]+1;
			fa[v]=u,fid[v]=id,tre[id]=1;
			evis[id]=1;
			dfs1(v);
		}else if(!evis[id]){ // 这个地方必须看这条边是不是被访问过了
			evis[id]=1;
			int now=u;
			while(now!=v){
				G[id].push_back(fid[now]);
				G[fid[now]].push_back(id);
				now=fa[now];
			}
		}
	}
}
struct Node{
	int u,v,w;
	Node():u(0),v(0),w(0){}
	Node(int _u,int _v,int _w):u(_u),v(_v),w(_w){}
};
vector<Node> ans;
bool ee[MM]; // 不能用 vis 了
void dfs2(int u){
	ee[u]=1;
	for(int v:G[u]){
		if(!ee[v]){
			dfs2(v);
			ans.push_back(Node(v,u,val[v]));
			add(val[u],val[v]); // 开始这个地方忘了加了
			val[v]=0;
		}
	}
}
void print(int i1,int i2,int v){
	if(v==0)return;
	bool tag=0;
	if(tre[i1])printf("%d ",P-v),tag=1;
	else printf("%d ",v),tag=0;
	FOR(i,1,M)if(tre[i])printf("%d ",i);
	printf("\n");

	if(tag)printf("%d ",v);
	else printf("%d ",P-v);
	if(!tre[i1])printf("%d ",i1);
	else printf("%d ",i2);
	FOR(i,1,M)if(i!=i1&&i!=i2&&tre[i])printf("%d ",i);
	printf("\n");
}
int ksm(int x,int y){
	int ret=1;
	for(;y;y>>=1,x=(LL)x*x%P)if(y&1)ret=(LL)ret*x%P;
	return ret;
}
int main(){
	// freopen("j.in","r",stdin);
	// freopen("j.out","w",stdout);
	scanf("%d%d%d",&N,&M,&P);
	int sum=0;
	FOR(i,1,M){
		int u,v,w;scanf("%d%d%d",&u,&v,&w);
		add(sum,w);
		AddE(u,v,i),AddE(v,u,i);
		if(w)val[i]=P-w;
		else val[i]=0;
	}
	int ztad=0;
	if((N-1)%P==0){
		if(sum%P!=0){
			printf("-1\n");
			return 0;
		}
		ztad=0;
	}else{
		ztad=(LL)ksm((N-1)%P,P-2)*sum%P;
	}
	dfs1(1);
	FOR(i,1,M)if(tre[i])add(val[i],ztad);
	FOR(i,1,M)if(!ee[i])dfs2(i);
	FOR(i,1,M)if(val[i]!=0){
		printf("-1 ???\n");
		return 0;
	}
	int ttt=0;
	for(auto v:ans)ttt+=(v.w!=0);
	printf("%d\n",ttt*2+(ztad!=0));
	if(ztad){
		printf("%d ",ztad);
		FOR(i,1,M)if(tre[i])printf("%d ",i);
		printf("\n");
	}
	for(auto ko:ans)print(ko.u,ko.v,ko.w);
	// fclose(stdin);
	// fclose(stdout);
	return 0;
}