Mercurial > octave

diff liboctave/numeric/LSODE.cc @ 30898:51a3d3a69193

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
maint: Use "fcn" as preferred abbreviation for "function" in liboctave/. * DAEFunc.h, DASPK.cc, DASSL.cc, LSODE.cc, ODEFunc.h, eigs-base.cc, eigs-base.h, oct-norm.cc, mx-inlines.cc: Replace "func", "fun" in documentation and variable names with "fcn".
author Rik <rik@octave.org>
date Tue, 05 Apr 2022 13:20:48 -0700
parents 796f54d4ddbf
children de6fc38c78c6
line wrap: on
line diff
--- a/liboctave/numeric/LSODE.cc	Tue Apr 05 08:55:38 2022 -0700
+++ b/liboctave/numeric/LSODE.cc	Tue Apr 05 13:20:48 2022 -0700
@@ -52,7 +52,7 @@
                              F77_INT&);
 }
 
-static ODEFunc::ODERHSFunc user_fun;
+static ODEFunc::ODERHSFunc user_fcn;
 static ODEFunc::ODEJacFunc user_jac;
 static ColumnVector *tmp_x;
 
@@ -66,7 +66,7 @@
   //       In that case we have to create a temporary vector object
   //       and copy.
 
-  tmp_deriv = (*user_fun) (*tmp_x, time);
+  tmp_deriv = (*user_fcn) (*tmp_x, time);
 
   if (tmp_deriv.isempty ())
     ierr = -1;
@@ -192,10 +192,10 @@
 
       tmp_x = &m_x;
 
-      user_fun = function ();
+      user_fcn = function ();
       user_jac = jacobian_function ();
 
-      ColumnVector m_xdot = (*user_fun) (m_x, m_t);
+      ColumnVector m_xdot = (*user_fcn) (m_x, m_t);
 
       if (m_x.numel () != m_xdot.numel ())
         {