program main implicit none integer*8::N,M,res=1 integer::i integer*8,parameter::modulo=1000000007 read *,N do i=N,1,-1 M = 2*i res = MOD(res*i,modulo) res = MOD(res*(M-1),modulo) end do print '(i0)',res end program main