Mercurial > hg > octave-nkf

diff scripts/deprecated/exponential_cdf.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 2a16423e4aa0
children 93c65f2a5668
line wrap: on
line diff
--- a/scripts/deprecated/exponential_cdf.m
+++ b/scripts/deprecated/exponential_cdf.m
@@ -31,6 +31,10 @@
 
 function cdf = exponential_cdf (varargin)
 
+ if (nargin > 1)
+   varargin{2} = 1 ./ varargin{2};
+ endif
+
  cdf =  expcdf (varargin{:});
 
 endfunction