[Pkg-octave-commit] [SCM] octave-symbolic branch, master, updated. a718b53403d9f164f8c2a3df521385a01d28a11b

[pkienzle]

The following commit has been merged in the master branch:
commit 7b3e51cf451bfabce847a96286227adb87547014
Author: pkienzle <pkienzle at 416fae20-06d0-4450-9b69-c6c34d4b5f03>
Date:   Tue Mar 26 03:16:45 2002 +0000

    Fix doc strings in preparation for automated index building.
    
    
    git-svn-id: https://octave.svn.sourceforge.net/svnroot/octave/trunk/octave-forge/main/symbolic@225 416fae20-06d0-4450-9b69-c6c34d4b5f03

diff --git a/symbols.cc b/symbols.cc
index 0fc791c..5eebabd 100644
--- a/symbols.cc
+++ b/symbols.cc
@@ -285,7 +285,7 @@ Convert a vpa, string, ex or string type to a double.\n\
 DEFUN_DLD(digits, args, , 
 "-*- texinfo -*-\n\
 @deftypefn {Loadable Function} {@var{dgts} =} digits([@var{num}])\n\
-Change the precision for the vpa type
+Change the precision for the vpa type\n\
 @end deftypefn\n\
 ")
 {
@@ -449,37 +449,38 @@ supplied then a default value of 1 is used.\n\
   return retval;
 }
 
-DEFINE_EX_GINAC_FUNCTION(Cos,cos,"cosine");
-DEFINE_EX_GINAC_FUNCTION(Sin,sin,"sine");
-DEFINE_EX_GINAC_FUNCTION(Tan,tan,"tangent");
-DEFINE_EX_GINAC_FUNCTION(aCos,acos,"inverse cosine");
-DEFINE_EX_GINAC_FUNCTION(aSin,asin,"inverse sine");
-DEFINE_EX_GINAC_FUNCTION(aTan,atan,"inverse tangent");
-DEFINE_EX_GINAC_FUNCTION(Cosh,cosh,"hyperbolic cosine");
-DEFINE_EX_GINAC_FUNCTION(Sinh,sinh,"hyperbolic sine");
-DEFINE_EX_GINAC_FUNCTION(Tanh,tanh,"hyperbolic tangent");
-DEFINE_EX_GINAC_FUNCTION(aCosh,acosh,"inverse hyperbolic cosine");
-DEFINE_EX_GINAC_FUNCTION(aSinh,asinh,"inverse hyperbolic sine");
-DEFINE_EX_GINAC_FUNCTION(aTanh,atanh,"inverse hyperbolic tangent");
-DEFINE_EX_GINAC_FUNCTION(Exp,exp,"exponential");
-DEFINE_EX_GINAC_FUNCTION(Log,log,"logarithm");
-DEFINE_EX_GINAC_FUNCTION(Abs,abs,"absolute value");
-
-DEFINE_EX_SYM_GINAC_FUNCTION(degree, degree,"degree");
-DEFINE_EX_SYM_GINAC_FUNCTION(ldegree, ldegree,"low degree");
-DEFINE_EX_SYM_GINAC_FUNCTION(tcoeff, tcoeff, "trailing coeffiecient");
-DEFINE_EX_SYM_GINAC_FUNCTION(lcoeff, lcoeff, "leading coefficient");
-
-DEFINE_EX_EX_SYM_GINAC_FUNCTION(quotient,quo,"quotient");
-DEFINE_EX_EX_SYM_GINAC_FUNCTION(remainder,rem,"remainder");
-DEFINE_EX_EX_SYM_GINAC_FUNCTION(premainder,prem,"pseudo-remainder");
+DEFUN_DLD_EX_GINAC_FUNCTION(Cos,cos,"cosine");
+DEFUN_DLD_EX_GINAC_FUNCTION(Sin,sin,"sine");
+DEFUN_DLD_EX_GINAC_FUNCTION(Tan,tan,"tangent");
+DEFUN_DLD_EX_GINAC_FUNCTION(aCos,acos,"inverse cosine");
+DEFUN_DLD_EX_GINAC_FUNCTION(aSin,asin,"inverse sine");
+DEFUN_DLD_EX_GINAC_FUNCTION(aTan,atan,"inverse tangent");
+DEFUN_DLD_EX_GINAC_FUNCTION(Cosh,cosh,"hyperbolic cosine");
+DEFUN_DLD_EX_GINAC_FUNCTION(Sinh,sinh,"hyperbolic sine");
+DEFUN_DLD_EX_GINAC_FUNCTION(Tanh,tanh,"hyperbolic tangent");
+DEFUN_DLD_EX_GINAC_FUNCTION(aCosh,acosh,"inverse hyperbolic cosine");
+DEFUN_DLD_EX_GINAC_FUNCTION(aSinh,asinh,"inverse hyperbolic sine");
+DEFUN_DLD_EX_GINAC_FUNCTION(aTanh,atanh,"inverse hyperbolic tangent");
+DEFUN_DLD_EX_GINAC_FUNCTION(Exp,exp,"exponential");
+DEFUN_DLD_EX_GINAC_FUNCTION(Log,log,"logarithm");
+DEFUN_DLD_EX_GINAC_FUNCTION(Abs,abs,"absolute value");
+
+DEFUN_DLD_EX_SYM_GINAC_FUNCTION(degree, degree,"degree");
+DEFUN_DLD_EX_SYM_GINAC_FUNCTION(ldegree, ldegree,"low degree");
+DEFUN_DLD_EX_SYM_GINAC_FUNCTION(tcoeff, tcoeff, "trailing coeffiecient");
+DEFUN_DLD_EX_SYM_GINAC_FUNCTION(lcoeff, lcoeff, "leading coefficient");
+
+DEFUN_DLD_EX_EX_SYM_GINAC_FUNCTION(quotient,quo,"quotient");
+DEFUN_DLD_EX_EX_SYM_GINAC_FUNCTION(remainder,rem,"remainder");
+DEFUN_DLD_EX_EX_SYM_GINAC_FUNCTION(premainder,prem,"pseudo-remainder");
 
 DEFUN_DLD(is_ex,args,,
 "-*- texinfo -*-\n\
 @deftypefn Loadable Function {bool =} is_ex(@var{a})\n\
 \n\
 Return true if an object is of type ex.\n\
- at seealso{is_sym, is_vpa}")
+ at seealso{is_sym, is_vpa}\n\
+ at end deftypefn")
 {
   bool retval;
   retval = (args(0).type_id() == octave_ex::static_type_id());
diff --git a/symbols.h b/symbols.h
index ee996bd..009b278 100644
--- a/symbols.h
+++ b/symbols.h
@@ -2,7 +2,7 @@ bool get_expression(const octave_value arg, GiNaC::ex& expression);
 bool get_symbol(const octave_value arg, GiNaC::symbol& sym);
 bool get_numeric(const octave_value arg, GiNaC::numeric& number);
 
-#define DEFINE_EX_GINAC_FUNCTION(oct_name,ginac_name,description) \
+#define DEFUN_DLD_EX_GINAC_FUNCTION(oct_name,ginac_name,description) \
 DEFUN_DLD(oct_name, args, , \
 "-*- texinfo -*-\n\
 @deftypefn Loadable Function {r =}" # oct_name "(@var{x})\n\
@@ -41,7 +41,7 @@ Return the " description " of a symbolic expression.\n\
   return retval; \
 }
 
-#define DEFINE_EX_SYM_GINAC_FUNCTION(oct_name,ginac_name,description) \
+#define DEFUN_DLD_EX_SYM_GINAC_FUNCTION(oct_name,ginac_name,description) \
 DEFUN_DLD(oct_name, args, , \
 "-*- texinfo -*-\n\
 @deftypefn Loadable Function {r =}" # oct_name "(@var{a}, @var{x})\n\
@@ -88,7 +88,7 @@ Return the " description " of a symbolic expression.\n\
   return octave_value(r); \
 }
 
-#define DEFINE_EX_EX_SYM_GINAC_FUNCTION(oct_name,ginac_name,description) \
+#define DEFUN_DLD_EX_EX_SYM_GINAC_FUNCTION(oct_name,ginac_name,description) \
 DEFUN_DLD(oct_name, args, , \
 "-*- texinfo -*-\n\
 @deftypefn Loadable Function {r =}" # oct_name "(@var{a}, @var{x})\n\

-- 
octave-symbolic