[genius] Mon Nov 18 17:53:27 2013 Jiri (George) Lebl <jirka 5z com>



commit e17f486c5078260c41b1dd32fa58418bfe3a87c9
Author: Jiri (George) Lebl <jiri lebl gmail com>
Date:   Mon Nov 18 17:53:30 2013 -0600

    Mon Nov 18 17:53:27 2013  Jiri (George) Lebl <jirka 5z com>
    
        * lib/combinatorics/factorial.gel: Fix applying "Triangular" over
          matrices

 ChangeLog                       |    5 +++++
 lib/combinatorics/factorial.gel |    2 +-
 2 files changed, 6 insertions(+), 1 deletions(-)
---
diff --git a/ChangeLog b/ChangeLog
index 18a9747..5266a87 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Mon Nov 18 17:53:27 2013  Jiri (George) Lebl <jirka 5z com>
+
+       * lib/combinatorics/factorial.gel: Fix applying "Triangular" over
+         matrices
+
 Fri Oct 25 08:35:40 2013  Jiri (George) Lebl <jirka 5z com>
 
        * src/graphing.c: improve logic for jump detection (still not
diff --git a/lib/combinatorics/factorial.gel b/lib/combinatorics/factorial.gel
index 4fff94f..d08319e 100644
--- a/lib/combinatorics/factorial.gel
+++ b/lib/combinatorics/factorial.gel
@@ -115,7 +115,7 @@ function Pascal(i) = (
 SetHelp("Triangular", "combinatorics", "Calculate the nth triangular number");
 function Triangular(nth) = (
         if IsMatrix(nth) then
-                return ApplyOverMatrix(nth, triangular)
+                return ApplyOverMatrix(nth, Triangular)
        else if not IsInteger(nth) or not nth>=0 then
                (error("Trianglular: argument not an integer larger than or equal to 0");bailout);
        (nth*(nth+1))/2


[Date Prev][Date Next]   [Thread Prev][Thread Next]   [Thread Index] [Date Index] [Author Index]