File: expo

package info (click to toggle)
wims 2%3A4.29a%2Bdfsg1-3
  • links: PTS, VCS
  • area: main
  • in suites: trixie
  • size: 185,704 kB
  • sloc: xml: 366,687; javascript: 120,570; ansic: 62,341; java: 62,170; sh: 7,744; perl: 3,937; yacc: 3,217; cpp: 1,915; lex: 1,805; makefile: 1,084; lisp: 914; pascal: 601; python: 520; php: 318; asm: 7
file content (21 lines) | stat: -rw-r--r-- 404 bytes parent folder | download | duplicates (7) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 
!!do not use, use exponential

!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)
!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