kos59125 · August 11, 2015 15:25
diff --git a/poisson.sh b/poisson.sh
 #!/bin/bash

 LAMBDA=$1
 X=0
 V=0

 while [ `echo "$V <= $LAMBDA" | bc` -eq 1 ]
 do
   W=`echo "$V - l(1 - $RANDOM / 32768)" | bc -l`
   V=$W
   X=`expr $X + 1`
 done

 echo $X
	#!/bin/bash

	LAMBDA=$1
	X=0
	V=0

	while [ `echo "$V <= $LAMBDA" \| bc` -eq 1 ]
	do
	W=`echo "$V - l(1 - $RANDOM / 32768)" \| bc -l`
	V=$W
	X=`expr $X + 1`
	done

	echo $X