summaryrefslogtreecommitdiff
path: root/math/rlab/patches/patch-ar
blob: ee5809d376da2659b4551c3a729411b283c25fd4 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
$NetBSD: patch-ar,v 1.1 2003/01/28 01:18:22 uebayasi Exp $

--- msrf2.c.orig	Sun Apr 25 22:48:13 1999
+++ msrf2.c
@@ -694,7 +694,7 @@
 #undef _C
 #undef _Z
 
-#include "supermatrix.h"
+#include <superlu/dsp_defs.h>
 
 #define  Matrix SuperMatrix
 
@@ -886,9 +886,9 @@
    * Setup the SuperLU [A] from [a]
    */
 
-  A.Stype = NC;
-  A.Dtype = _D;
-  A.Mtype = GE;
+  A.Stype = SLU_NC;
+  A.Dtype = SLU_D;
+  A.Mtype = SLU_GE;
   A.nrow  = n;
   A.ncol  = n;   
   A.Store = GC_MALLOC(sizeof(NCformat));
@@ -902,9 +902,9 @@
    * Setup the SuperLU RHS from [x] (a copy of [b]).
    */
 
-  B.Stype = DN;
-  B.Dtype = _D;
-  B.Mtype = GE;
+  B.Stype = SLU_DN;
+  B.Dtype = SLU_D;
+  B.Mtype = SLU_GE;
   B.nrow  = n;
   B.ncol  = MNC (b);
   B.Store = (DNformat *) GC_MALLOC (sizeof(DNformat)); 
@@ -1162,9 +1162,9 @@
 
   perm_r = (int *) GC_MAIOP(n*sizeof(int));
  
-  A.Stype = NC;
-  A.Dtype = _D;
-  A.Mtype = GE;
+  A.Stype = SLU_NC;
+  A.Dtype = SLU_D;
+  A.Mtype = SLU_GE;
   A.nrow  = n;
   A.ncol  = n;   
   A.Store = GC_MALLOC(sizeof(NCformat));