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