# HG changeset patch
# User Mike Miller <mtmiller@ieee.org>
# Date 1367191550 14400
# Node ID a3fdd6041e6486d08ce0a56556fa5d229cba7cf5
# Parent  f423873d32755e17a98e93cddfe3bc708bb72d8b
Fix ellipj, ellipke, and expint docstrings

* ellipj.cc, ellipke.m, expint.m: Fix docstring signatures and wording.

diff -r f423873d3275 -r a3fdd6041e64 libinterp/corefcn/ellipj.cc
--- a/libinterp/corefcn/ellipj.cc	Sun Apr 28 18:50:51 2013 -0400
+++ b/libinterp/corefcn/ellipj.cc	Sun Apr 28 19:25:50 2013 -0400
@@ -136,9 +136,9 @@
 
 DEFUN (ellipj, args, nargout,
   "-*- texinfo -*-\n\
-@deftypefn {Built-in Function} {[@var{sn}, @var{cn}, @var{dn}] =} \
-ellipj (@var{u}, @var{m}, @var{err})\n\
-Compute the Jacobi elliptic functions sn, cn, dn of complex argument and real parameter.\n\
+@deftypefn {Built-in Function} {[@var{sn}, @var{cn}, @var{dn}, @var{err}] =} ellipj (@var{u}, @var{m})\n\
+Compute the Jacobi elliptic functions @var{sn}, @var{cn}, and @var{dn}\n\
+of complex argument @var{u} and real parameter @var{m}.\n\
 \n\
 If @var{m} is a scalar, the results are the same size as @var{u}.\n\
 If @var{u} is a scalar, the results are the same size as @var{m}.\n\
@@ -163,6 +163,7 @@
  Ref: Abramowitz, Milton and Stegun, Irene A\n\
       Handbook of Mathematical Functions, Dover, 1965\n\
       Chapter 16 (Sections 16.4, 16.13 and 16.15)\n\
+@seealso{ellipke}\n\
 @end deftypefn")
 {
   octave_value_list retval;
diff -r f423873d3275 -r a3fdd6041e64 scripts/specfun/ellipke.m
--- a/scripts/specfun/ellipke.m	Sun Apr 28 18:50:51 2013 -0400
+++ b/scripts/specfun/ellipke.m	Sun Apr 28 19:25:50 2013 -0400
@@ -22,12 +22,13 @@
 ## @deftypefn  {Function File} {} ellipke (@var{m})
 ## @deftypefnx {Function File} {} ellipke (@var{m}, @var{tol})
 ## @deftypefnx {Function File} {[@var{k}, @var{e}] =} ellipke (@dots{})
-## Compute complete elliptic integral of first K(@var{m}) and second E(@var{m}).
+## Compute complete elliptic integral of the first K(@var{m}) and second
+## E(@var{m}) kind.
 ##
-## @var{m} is either real array or scalar with 0 <= m <= 1
+## @var{m} is either real array or scalar with 0 <= m <= 1.
 ##
-## @var{tol} will be ignored (@sc{Matlab} uses this to allow faster, less
-## accurate approximation)
+## @var{tol} is currently ignored (@sc{Matlab} uses this to allow faster,
+## less accurate approximation).
 ##
 ## Ref: Abramowitz, Milton and Stegun, Irene A. Handbook of Mathematical
 ## Functions, Dover, 1965, Chapter 17.
diff -r f423873d3275 -r a3fdd6041e64 scripts/specfun/expint.m
--- a/scripts/specfun/expint.m	Sun Apr 28 18:50:51 2013 -0400
+++ b/scripts/specfun/expint.m	Sun Apr 28 19:25:50 2013 -0400
@@ -19,13 +19,24 @@
 ## -*- texinfo -*-
 ## @deftypefn {Function File} {} expint (@var{x})
 ## Compute the exponential integral,
-## @verbatim
-##                    infinity
-##                   /
-##       expint(x) = | exp(t)/t dt
-##                   /
-##                  x
-## @end verbatim
+## @tex
+## $$
+##  E_1 (x) = \int_x^\infty {e^{-t} \over t} dt.
+## $$
+## @end tex
+## @ifnottex
+##
+## @example
+## @group
+##               infinity
+##              /
+## expint (x) = | exp (-t)/t dt
+##              /
+##             x
+## @end group
+## @end example
+##
+## @end ifnottex
 ## @end deftypefn
 
 function y = expint (x)
@@ -44,7 +55,7 @@
 ## @verbatim
 ##                    infinity
 ##                   /
-##       expint(x) = | exp(t)/t dt
+##       expint(x) = | exp(-t)/t dt
 ##                   /
 ##                  x
 ## @end verbatim