# Ingalit sur indices

!distribute items $wims_read_parm into slib_n, slib_type, slib_formula

!default slib_static_random=!randint 10,50
!default slib_dir=!randint 1,4
slib_data=!line $slib_dir of 1,$[$slib_static_random+1],\(<=), infrieurs ou gaux \
	1,$[$slib_static_random],\(<),strictement infrieurs , strictement plus petits que\
	$[$slib_static_random+1],$slib_n,\(>=),suprieurs ou gaux \
	$[$slib_static_random+2],$slib_n,\(>),strictement suprieurs , strictement plus grands que

!distribute item $slib_data into slib_start, slib_end
!if $slib_end>$slib_n
 slib_end=$slib_n
!endif
slib_p=!item 3 to -1 of $slib_data
!default slib_print=!randitem $slib_p

slib_1=!makelist x for x=$slib_start to $slib_end
!if $slib_formula != $empty
 !if $slib_start>$slib_end
  slib_sum=0
 !else
  slib_list=!item $slib_start+3 to $slib_end+3 of $wims_read_parm
  slib_sum=!sum $slib_formula for x in $slib_list
 !endif
!else
 slib_sum=
!endif

slib_ind=!randitem tous les indices,l'ensemble des indices, les indices
slib_2=pour $slib_ind var_i $slib_print $slib_static_random

slib_out=$slib_1\
$slib_2\
$slib_sum

