#include<iostream>
#include<algorithm>
#include<cstring>
#include<cstdio>
#include<bitset>
#include<random>
#include<cmath>
#include<ctime>
#include<queue>
#include<map>
#include<set>

#define int long long
#define fi first
#define se second
#define max Max
#define min Min
#define abs Abs
#define lc (x<<1)
#define rc (x<<1|1)
#define mid ((l+r)>>1)
#define pb(x) push_back(x)
#define lowbit(x) ((x)&(-(x)))
#define fan(x) ((((x)-1)^1)+1)
#define mp(x,y) make_pair(x,y)
#define clr(f,n) memset(f,0,sizeof(int)*(n))
#define cpy(f,g,n) memcpy(f,g,sizeof(int)*(n))
#define SZ(x) ((int)(x.size()))
#define INF 0x3f3f3f3f

using namespace std;

inline int read()
{
	int ans=0,f=1;
	char c=getchar();
	while(c>'9'||c<'0'){if(c=='-')f=-1;c=getchar();}
	while(c>='0'&&c<='9'){ans=(ans<<1)+(ans<<3)+c-'0';c=getchar();}
	return ans*f;
}

inline void write(int x)
{
	if(x<0) putchar('-'),x=-x;
	if(x/10) write(x/10);
	putchar((char)(x%10)+'0');
}

template<typename T>inline T Abs(T a){return a>0?a:-a;};
template<typename T,typename TT>inline T Min(T a,TT b){return a<b?a:b;}
template<typename T,typename TT> inline T Max(T a,TT b){return a<b?b:a;}

const int N=3005;
int n,m,p,f[N][N],jc[N*N],inv[N*N];

inline int q_pow(int a,int b)
{
	int c=1;
	while(b)
	{
		if(b&1) c=a*c%p;
		a=a*a%p;b>>=1;
	}
	return c;
}

inline void init(int x)
{
	jc[0]=1;
	for(int i=1;i<=x;++i)
		jc[i]=jc[i-1]*i%p;
	inv[x]=q_pow(jc[x],p-2);
	for(int i=x-1;i>=0;--i)
		inv[i]=inv[i+1]*(i+1)%p;
}

inline int C(int n,int m)
{
	return n<m?0:jc[n]*inv[m]%p*inv[n-m]%p;
}

signed main()
{
	n=read();m=read();p=read();
	init(n*m);f[1][1]=n*m%p;
	for(int i=1;i<=n;++i)
		for(int j=1;j<=m;++j)
		{
			if(i!=n) f[i+1][j]=(f[i+1][j]+f[i][j]*(n-i)*j%p*jc[n*m-i*j-1]%p*inv[n*m-(i+1)*j])%p;
			if(j!=m) f[i][j+1]=(f[i][j+1]+f[i][j]*(m-j)*i%p*jc[n*m-i*j-1]%p*inv[n*m-i*(j+1)])%p;
		}
	write(f[n][m]);
	return 0;
}