day4/getbits.TXT


1
2
3
4
5
6
7
8
9
10
11

\START92\
\COMMENT=Gets l bits starting at p from i
\NAME=getbits
\FILE=day4.getbits.92f
(i,p,l)
Func
\(C)\subtract 1 of p, so index starts at 1
mod(floor(i/2^(p-1)),2^l)
EndFunc

\STOP92\