# Parity of items

!distribute items $wims_read_parm into slib_n, slib_type, slib_formula
slib_1=!item 4 to -1 of $wims_read_parm

!default slib_static_random=!randitem 0,1
!if $slib_static_random=1
 slib_p=odd
!else
 slib_p=even
!endif

slib_x=!values (x%2+2)%2 for x in $slib_1
slib_x=!positionof item $slib_static_random in $slib_x
!if $slib_formula != $empty
 slib_list=!item $slib_x of $slib_1
 slib_sum=!sum $slib_formula for x in $slib_list
!else
 slib_sum=
!endif

slib_tq=!randitem such that, for which, where

!if $slib_type=count
 slib_2=that are $slib_p
!else
 slib_2=for all indices var_i $slib_tq var_l[var_i] is $slib_p
!endif

slib_out=$slib_x\
$slib_2\
$slib_sum

