openscad/BOSL2
1
0
Fork 0
mirror of https://github.com/revarbat/BOSL2.git synced 2025-08-28 03:30:06 +02:00
Code Issues Projects Releases Wiki Activity

Added null_space and diagonal_matrix

Browse Source
This commit is contained in:
Adrian Mariano
2020-09-01 18:38:31 -04:00
parent 3caeeff2cd
commit 399c40f7a6
4 changed files with 58 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

23
tests/test_math.scad
View File

@@ -969,6 +969,29 @@ module test_quadratic_roots(){
}
test_quadratic_roots();
module test_null_space(){
assert_equal(null_space([[3,2,1],[3,6,3],[3,9,-3]]),[]);
function nullcheck(A,dim) =
let(v=null_space(A))
len(v)==dim && is_zero(A*transpose(v),eps=1e-12);
A = [[-1, 2, -5, 2],[-3,-1,3,-3],[5,0,5,0],[3,-4,11,-4]];
assert(nullcheck(A,1));
B = [
[ 4, 1, 8, 6, -2, 3],
[ 10, 5, 10, 10, 0, 5],
[ 8, 1, 8, 8, -6, 1],
[ -8, -8, 6, -1, -8, -1],
[ 2, 2, 0, 1, 2, 1],
[ 2, -3, 10, 6, -8, 1],
];
assert(nullcheck(B,3));
}
test_null_space();
module test_qr_factor() {
// Check that R is upper triangular
function is_ut(R) =