Mercurial > hg > octave-nkf

diff scripts/deprecated/gamma_pdf.m @ 6777:4775fc1aa728

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-07-18 16:32:51 by dbateman]
author dbateman
date Wed, 18 Jul 2007 16:32:52 +0000
parents bee21f388110
children 93c65f2a5668
line wrap: on
line diff
--- a/scripts/deprecated/gamma_pdf.m
+++ b/scripts/deprecated/gamma_pdf.m
@@ -29,6 +29,10 @@
 
 function pdf = gamma_pdf (varargin)
 
+ if (nargin > 2)
+   varargin{3} = 1 ./ varargin{3};
+ endif
+
  pdf =  gampdf (varargin{:});
 
 endfunction