/[escript]/trunk/paso/src/Pattern.h
ViewVC logotype

Annotation of /trunk/paso/src/Pattern.h

Parent Directory Parent Directory | Revision Log Revision Log


Revision 3005 - (hide annotations)
Thu Apr 22 05:59:31 2010 UTC (9 years, 6 months ago) by gross
File MIME type: text/plain
File size: 3240 byte(s)
early call of setPreconditioner in FCT solver removed.
1 ksteube 1313
2     /*******************************************************
3 ksteube 1811 *
4 jfenwick 2881 * Copyright (c) 2003-2010 by University of Queensland
5 ksteube 1811 * Earth Systems Science Computational Center (ESSCC)
6     * http://www.uq.edu.au/esscc
7     *
8     * Primary Business: Queensland, Australia
9     * Licensed under the Open Software License version 3.0
10     * http://www.opensource.org/licenses/osl-3.0.php
11     *
12     *******************************************************/
13 ksteube 1313
14 ksteube 1811
15 ksteube 1313 /**************************************************************/
16    
17     /* Paso: pattern */
18    
19     /**************************************************************/
20    
21 jfenwick 2608 /* Author: Lutz Gross, l.gross@uq.edu.au */
22 ksteube 1313
23     /**************************************************************/
24    
25     #ifndef INC_PASO_PATTERN
26     #define INC_PASO_PATTERN
27    
28     #include "Common.h"
29    
30     /**************************************************************/
31    
32     #define PATTERN_FORMAT_DEFAULT 0
33     #define PATTERN_FORMAT_SYM 1
34     #define PATTERN_FORMAT_OFFSET1 2
35    
36     typedef struct Paso_Pattern {
37     int type;
38 jfenwick 2965 dim_t numOutput; /* Number of rows the ptr array [CSR] for CSC it's the number of cols*/
39     dim_t numInput; /* Number of cols [CSR] */
40     dim_t len; /* number of non-zeros */
41     index_t* ptr; /* ptr[n] to ptr[n+1] lists indicies (in index) of non-zeros in row n*/
42     index_t* index; /* Non-major indicies of non-zeros (in CSR this will be col numbers) */
43 gross 3005 index_t *main_iptr; /* pointer to main diagonal entry */
44 ksteube 1313 dim_t reference_counter;
45     } Paso_Pattern;
46    
47 artak 1881 #define INDEXLIST_LENGTH 85
48    
49     typedef struct Paso_IndexList {
50     index_t index[INDEXLIST_LENGTH];
51     dim_t n;
52     struct Paso_IndexList *extension;
53     } Paso_IndexList;
54 ksteube 1313 /* interfaces: */
55    
56 phornby 2071
57     PASO_DLL_API
58 gross 2551 Paso_Pattern* Paso_Pattern_alloc(int type, dim_t numOutput, dim_t numInput, index_t* ptr, index_t* index);
59 phornby 2071
60     PASO_DLL_API
61    
62     PASO_DLL_API
63 ksteube 1313 Paso_Pattern* Paso_Pattern_getReference(Paso_Pattern*);
64 phornby 2071
65     PASO_DLL_API
66 ksteube 1313 void Paso_Pattern_free(Paso_Pattern*);
67 phornby 2071
68     PASO_DLL_API
69 ksteube 1313 int Paso_comparIndex(const void *,const void *);
70 phornby 2071
71     PASO_DLL_API
72 ksteube 1313 Paso_Pattern* Paso_Pattern_unrollBlocks(Paso_Pattern*,int, dim_t,dim_t);
73 phornby 2071
74     PASO_DLL_API
75 ksteube 1313 Paso_Pattern* Paso_Pattern_getSubpattern(Paso_Pattern*,dim_t,dim_t,index_t*,index_t*);
76 phornby 2071
77     PASO_DLL_API
78 ksteube 1313 bool_t Paso_Pattern_isEmpty(Paso_Pattern* in);
79 phornby 2071
80     PASO_DLL_API
81 ksteube 1313 void Paso_Pattern_mis(Paso_Pattern* pattern_p, index_t* mis_marker);
82 phornby 2071
83     PASO_DLL_API
84 ksteube 1313 void Paso_Pattern_reduceBandwidth(Paso_Pattern* self,index_t* oldToNew);
85 phornby 2071
86     PASO_DLL_API
87 gross 1361 void Paso_Pattern_color(Paso_Pattern* patter, index_t* num_colors, index_t* colorOf);
88 artak 1881 Paso_Pattern* Paso_Pattern_multiply(int type, Paso_Pattern* A, Paso_Pattern* B);
89 phornby 2071
90     PASO_DLL_API
91 artak 1881 Paso_Pattern* Paso_Pattern_binop(int type, Paso_Pattern* A, Paso_Pattern* B);
92 ksteube 1313
93 gross 3005 PASO_DLL_API
94     index_t* Paso_Pattern_borrowMainDiagonalPointer(Paso_Pattern* A);
95 phornby 2071
96     PASO_DLL_API
97 artak 1881 void Paso_IndexList_insertIndex(Paso_IndexList*, index_t);
98 phornby 2071
99     PASO_DLL_API
100 artak 1881 void Paso_IndexList_toArray(Paso_IndexList*, index_t*, index_t, index_t, index_t);
101 phornby 2071
102     PASO_DLL_API
103 artak 1881 dim_t Paso_IndexList_count(Paso_IndexList*, index_t, index_t);
104 phornby 2071
105     PASO_DLL_API
106 artak 1881 void Paso_IndexList_free(Paso_IndexList*);
107 phornby 2071
108     PASO_DLL_API
109 artak 1881 Paso_Pattern* Paso_IndexList_createPattern(dim_t n0, dim_t n,Paso_IndexList* index_list,index_t range_min,index_t range_max, index_t index_offset);
110    
111 gross 3005
112    
113 ksteube 1313 #endif /* #ifndef INC_PASO_SYSTEMPATTERN */

  ViewVC Help
Powered by ViewVC 1.1.26