Subversion Repositories wimsdev

!if $wims_read_parm!=slib_header
  !goto proc
!endif

slib_parms=2\
 ,m\
 ,lambda
slib_author=Adeline, Grelot; Bernadette, PERRIN-RIOU

slib_comment= \lambda*exp(-\lambda*x)
slib_example=5,6
!exit

:proc
slib_out=
!distribute item $wims_read_parm into slib_m, slib_lambda
slib_out=!random 0,1 repeat $slib_m
slib_out=!values -log(x)/$slib_lambda for x in $slib_out

slib_out=!trim $slib_out