@a=(1,1,3,3,4,8);$a[6]=(2*$a[0]+$a[1]+$a[2]+$a[3])%(1e9+7),shift@a for 2..<>;print$a[0]