Commit 5cc200cc672b685e30ef14d1cb5960e5d688ae8e

Missing in-package in dirichlet.lisp
Add make-dist.sh
documentation updates.

Commit diff

cl-randist.asd

 
55
66(defsystem :cl-randist
77 :description "Random Distribution Generation"
8 :version "0.2"
8 :version "0.3.1"
99 :author "Leonardo Varuzza <varuzza@gmail.com>"
1010 :license "GPLv3"
1111 :serial t
toggle raw diff

cl-randist.html

 
3939
4040<p>
4141<font color=red>Download shortcut:</font> <a
42href="http://lambdatau.com/cl-randist/cl-randist.tar.gz">http://lambdatau.com/cl-randist/cl-randist.tar.gz</a>.
42href="http://cl-randist.googlecode.com/files/cl-randist.tar.gz">http://cl-randist.googlecode.com/files/cl-randist.tar.gz</a>.
43
44<p> Latest development version can by download with git: git clone http://lambdatau.com/git/cl-randist</p>
45
4346</blockquote>
4447
4548<br>&nbsp;<br><h3><a class=none name="contents">Contents</a></h3>
7575<br>&nbsp;<br><h3><a class=none name="download">Download</a></h3>
7676
7777RANDOM-DISTRIBUTIONS together with this documentation can be downloaded from <a
78href="http://lambdatau.com/cl-randist/cl-randist.tar.gz">http://lambdatau.com/cl-randist/cl-randist.tar.gz</a>. The
79current version is 0.1.0.
78href="http://cl-randist.googlecode.com/files/cl-randist.tar.gz">http://cl-randist.googlecode.com/files/cl-randist.tar.gz</a>. The
79current version is 0.3.0.
8080
8181<br>&nbsp;<br><h3><a class=none name="dictionary">The RANDOM-DISTRIBUTIONS dictionary</a></h3>
8282
205205<p><br>[Function]<br><a class=none name='random-gamma-int'><b>random-gamma-int</b> <i>a</i> =&gt; <i>result</i></a>
206206<blockquote><br>
207207
208
208 Random variable with gamma distribution with integer parameter.
209209
210210</blockquote>
211211
toggle raw diff

dirichlet.lisp

 
1
1(in-package :randist)
22
33;; /* The Dirichlet probability distribution of order K-1 is
44
toggle raw diff

gamma.lisp

 
100100 (inline random-gamma-int))
101101
102102(defun random-gamma-int (a)
103"Random variable with gamma distribution with integer parameter."
103104 (declare (fixnum a))
104105 (if (< a 12)
105106 (do ((i 0 (1+ i))
toggle raw diff

make-dist.sh

 
1tar czvf cl-randist.tar.gz *.lisp cl-randist.asd cl-randist.html
2gpg -a -b cl-randist.tar.gz
toggle raw diff