15 July 2016 07:47:00 AM
R8RI_PRB
C++ version
Test the R8RI library.
R8RI_DIF2_TEST
R8RI_DIF2 sets up an R8RI indicator matrix.
Matrix order N = 5
Storage NZ = 14
The R8RI second difference matrix:
Col: 0 1 2 3 4
Row
---
0 2 -1 0 0 0
1 -1 2 -1 0 0
2 0 -1 2 -1 0
3 0 0 -1 2 -1
4 0 0 0 -1 2
R8RI_INDICATOR_TEST
R8RI_INDICATOR returns an R8RI indicator matrix
for a given sparsity pattern.
Matrix order N = 5
Storage NZ = 11
The R8RI matrix:
Col: 0 1 2 3 4
Row
---
0 11 0 13 0 0
1 0 22 0 0 0
2 0 32 33 34 0
3 0 0 0 44 45
4 0 0 0 54 55
R8RI_MTV_TEST
R8RI_MTV computes b=A'*x, where A is an R8RI matrix.
Matrix order N = 5
Storage NZ = 11
The R8RI matrix:
Col: 0 1 2 3 4
Row
---
0 3 0 1 0 0
1 0 4 0 0 0
2 0 7 5 9 0
3 0 0 0 0 2
4 0 0 0 6 8
The vector x:
1 1
2 2
3 3
4 4
5 5
The product b=A'*x:
1 3
2 29
3 16
4 57
5 48
R8RI_MV_TEST
R8RI_MV computes b=A*x, where A is an R8RI matrix.
Matrix order N = 5
Storage NZ = 11
The R8RI matrix:
Col: 0 1 2 3 4
Row
---
0 3 0 1 0 0
1 0 4 0 0 0
2 0 7 5 9 0
3 0 0 0 0 2
4 0 0 0 6 8
The vector x:
1 1
2 2
3 3
4 4
5 5
The product b=A*x:
1 6
2 8
3 65
4 10
5 64
R8RI_PRINT_TEST
R8RI_PRINT prints an R8RI matrix.
Matrix order N = 5
Storage NZ = 11
The R8RI matrix:
Col: 0 1 2 3 4
Row
---
0 3 0 1 0 0
1 0 4 0 0 0
2 0 7 5 9 0
3 0 0 0 0 2
4 0 0 0 6 8
R8RI_PRINT_SOME_TEST
R8RI_PRINT_SOME prints some of an R8RI matrix.
Matrix order N = 9
Storage NZ = 34
Rows(0-8), Cols(3-5):
Col: 3 4 5
Row
---
0 -1 0 0
1 0 -1 0
2 0 0 -1
3 4 -1 0
4 -1 4 -1
5 0 -1 4
6 -1 0 0
7 0 -1 0
8 0 0 -1
R8RI_RANDOM_TEST
R8RI_RANDOM randomizes an R8RI matrix.
Matrix order N = 5
Storage NZ = 11
The R8RI matrix:
Col: 0 1 2 3 4
Row
---
0 0.218418 0 0.0661187 0 0
1 0 0.956318 0 0 0
2 0 0.257578 0.829509 0.109957 0
3 0 0 0 0.561695 0.043829
4 0 0 0 0.633966 0.415307
R8RI_TO_R8GE_TEST
R8RI_TO_R8GE converts an R8RI matrix to R8GE format.
Matrix order N = 5
Storage NZ = 11
The R8RI matrix:
Col: 0 1 2 3 4
Row
---
0 11 0 13 0 0
1 0 22 0 0 0
2 0 32 33 34 0
3 0 0 0 44 45
4 0 0 0 54 55
The R8GE matrix:
Col: 1 2 3 4 5
Row
---
1 11 0 13 0 0
2 0 22 0 0 0
3 0 32 33 34 0
4 0 0 0 44 45
5 0 0 0 54 55
R8RI_ZEROS_TEST
R8RI_ZEROS zeros an R8RI matrix.
Matrix order N = 5
Storage NZ = 11
The R8RI matrix:
Col: 0 1 2 3 4
Row
---
0 0 0 0 0 0
1 0 0 0 0 0
2 0 0 0 0 0
3 0 0 0 0 0
4 0 0 0 0 0
R8RI_PRB
Normal end of execution.
15 July 2016 07:47:00 AM