<div class="notebook">

<div class="nb-cell program" name="p1">
f([X|T],C):-nth0(C,X,0),(T==[];f(T,C);D is mod(C+1,2),f([X|T],D)).
</div>

<div class="nb-cell query" name="q1">
f([[0,1],[0,1],[0,0],[1,0],[1,0],[0,0],[0,1]],0)
</div>

</div>