#include<bits/stdc++.h> 
#define int long long
using namespace std;
inline int read(){
	register int x=0;
	register bool f=0;
	register char c=getchar();
	while(c<'0'||c>'9'){
		if(c=='-') f=1;
		c=getchar();
	}
	while(c>='0'&&c<='9'){
		x=(x<<3)+(x<<1)+c-48;
		c=getchar();
	}
	return f?-x:x;
}
char cr[200],str[200];int tt;
inline void print(int x,char k='\n') {
    if(!x) putchar('0');
    if(x < 0) putchar('-'),x=-x;
    while(x) cr[++tt]=x%10+'0',x/=10;
    while(tt) putchar(cr[tt--]);
    putchar(k);
}
const int maxn=2233;
int p,f[maxn*3][maxn*6],n,ans;
signed main(){
	n=read()*3;p=read();
	f[0][3000]=1;
	for(int i=0;i<n;i++){
		for(int j=-i;j<=i;j++){
			(f[i+1][j+1+3000]+=f[i][j+3000])%=p;
            (f[i+2][j-1+3000]+=f[i][j+3000]*(i+1))%=p;
            (f[i+3][j+3000]+=f[i][j+3000]*(i+1)*(i+2))%=p;
		}
	}
	for(int j=3000;j<=3000+n;j++)(ans+=f[n][j])%=p;
    print(ans);
	return 0;
}