ll@K,N[2]={K/2,K},B=1<<26;modint f[15]={1,117175975,638916270,565479858,864357307,988122582,711403642,928062158,373979365,861919911,963971145,976333508,183143523,885152995,894672548},a[2];rep(e,2){a[e]=f[N[e]/B];REP(i,N[e]/B*B+1,N[e]+1)a[e]*=i;}wt(K%2?*a*0:a[1]/a[0]**2);