/[ascend]/trunk/ascend/linear/test/test_qr2x2.c
ViewVC logotype

Diff of /trunk/ascend/linear/test/test_qr2x2.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 2526 by jpye, Wed Jan 5 09:24:59 2011 UTC revision 2527 by jpye, Fri Jan 20 00:44:37 2012 UTC
# Line 28  Line 28 
28  #include <test/assertimpl.h>  #include <test/assertimpl.h>
29    
30  /*  /*
31      Test the rank of matrix      Test the rank of matrix
32    
33      [ 1 ]      [ 1 ]
34  */  */
# Line 51  static void test_qr1x1(void){ Line 51  static void test_qr1x1(void){
51      G.row = R;      G.row = R;
52      G.col = R;      G.col = R;
53    
54    #ifdef ASC_WITH_MMIO
55      mtx_write_region_mmio(stderr,M,&G);      mtx_write_region_mmio(stderr,M,&G);
56    #endif
57    
58      L = linsolqr_create_default();      L = linsolqr_create_default();
59      linsolqr_set_matrix(L,M);      linsolqr_set_matrix(L,M);
# Line 65  static void test_qr1x1(void){ Line 67  static void test_qr1x1(void){
67  }  }
68    
69  /*  /*
70      Test the rank of matrix      Test the rank of matrix
71    
72      [ 1 0      [ 1 0
73        1 1 ]        1 1 ]
# Line 91  static void test_qr2x2(void){ Line 93  static void test_qr2x2(void){
93      G.row = R;      G.row = R;
94      G.col = R;      G.col = R;
95    
96    #ifdef ASC_WITH_MMIO
97      mtx_write_region_mmio(stderr,M,&G);      mtx_write_region_mmio(stderr,M,&G);
98    #endif
99    
100      L = linsolqr_create_default();      L = linsolqr_create_default();
101      linsolqr_set_matrix(L,M);      linsolqr_set_matrix(L,M);
# Line 105  static void test_qr2x2(void){ Line 109  static void test_qr2x2(void){
109  }  }
110    
111  /*  /*
112      Test the rank of matrix      Test the rank of matrix
113    
114      [ 2 0 1      [ 2 0 1
115        1 1 1        1 1 1
116        0 1 1 ]        0 1 1 ]
117  */  */
118  static void test_qr3x3(void){  static void test_qr3x3(void){
# Line 136  static void test_qr3x3(void){ Line 140  static void test_qr3x3(void){
140      G.row = R;      G.row = R;
141      G.col = R;      G.col = R;
142    
143    #ifdef ASC_WITH_MMIO
144      mtx_write_region_mmio(stderr,M,&G);      mtx_write_region_mmio(stderr,M,&G);
145    #endif
146    
147      L = linsolqr_create_default();      L = linsolqr_create_default();
148      linsolqr_set_matrix(L,M);      linsolqr_set_matrix(L,M);

Legend:
Removed from v.2526  
changed lines
  Added in v.2527

john.pye@anu.edu.au
ViewVC Help
Powered by ViewVC 1.1.22