#include<bits/stdc++.h>
#define ll long long
#define Il inline
#define mem(u,v) memset(u,v,sizeof(u))
#define rep(i,a,b) for(int i=(a),KKK##i=(b);i<=KKK##i;i++)
#define drep(i,a,b) for(int i=(a),KKK##i=(b);i>=KKK##i;i--)
#define go(u) for(int i=head[u],v=e[i].to;i;i=e[i].nxt,v=e[i].to)
#define _go(u) for(int i=Head[u],v=E[i].to;i;i=E[i].nxt,v=E[i].to)
#define writesp(x) write(x),putchar(' ')
#define writeln(x) write(x),puts("")
//#define getchar nc
inline char nc(){static char buf[1000000],*p1=buf,*p2=buf;return p1==p2&&(p2=(p1=buf)+fread(buf,1,1000000,stdin),p1==p2)?EOF:*p1++;}
using namespace std;
Il ll read(){ll sum=0,f=0;char ch=getchar();for(;!isdigit(ch);ch=getchar())f|=(ch=='-');for(;isdigit(ch);ch=getchar())sum=((sum<<1)+(sum<<3)+(ch^48));return f?-sum:sum;}
void write(const ll x){if(x<0){putchar('-');write(-x);return;}if(x>9)write(x/10);putchar(x%10+'0');}
char getc(){char ch=getchar();while(ch!='0'&&ch!='1')ch=getchar();return ch^48;}
#define N 5500
ll n,m,p,f[N][N],sum[N],ans;
void inc(ll &a,ll b){a+=b;if(a>=p)a-=p;}
int main(){
	n=read();m=read();p=read();
	f[0][0]=1;
	rep(i,1,n){
		rep(j,1,m-1)f[i][j]=f[i-1][j-1]*(m-j+1)%p,inc(f[i][j],sum[j]);
		drep(j,m-1,1)sum[j]=(sum[j+1]+f[i][j])%p;
	}
	rep(j,1,m-1)inc(ans,f[n][j]);
	writeln(ans);
}