# Parit d'indices

!distribute items $wims_read_parm into slib_n, slib_type, slib_formula

!default slib_static_random=!randitem 0,1
!if $slib_static_random=1
 slib_p=impairs
!else
 slib_p=pairs
!endif

slib_1=!makelist x for x=1+$slib_static_random to $slib_n step 2
!if $slib_formula != $empty
 slib_list=!item 4 to -1 of $wims_read_parm
 slib_list=!item $slib_1 of $slib_list
 slib_sum=!sum $slib_formula for x in $slib_list
!else
 slib_sum=
!endif

slib_pour=!randitem pour,sur
slib_2=!randitem $slib_pour l'ensemble des indices $slib_p var_i,\
	$slib_pour tous les indices $slib_p var_i,\
	$slib_pour les indices var_i qui sont $slib_p

slib_out=$slib_1\
$slib_2\
$slib_sum

