r =: 1000000007 S =: {{ _6+y-~(10 r&|@^<.y%9)*+/6,2+i.9|y }}"0 fib =: (-&1 +&$: -&2) ^: (1&<) "0 M. problem684 =: r|+/S fib x:2+i.89