/ src / unittest.scad
unittest.scad
 1  module assertEqualPoint(expected, actual, epsilon = 0.0001) {
 2      leng_expected = len(expected);
 3      leng_actual = len(actual);
 4  
 5      assert(
 6          leng_expected == leng_actual,
 7          str("expected length: ", leng_expected, ", but: ", leng_actual)
 8      );
 9  
10      assert(
11          norm(expected - actual) <= epsilon,
12          str("expected: ", expected, ", but: ", actual)
13      );
14  }
15  
16  module assertEqualPoints(expected, actual, epsilon = 0.0001) {
17      leng_expected = len(expected);
18      leng_actual = len(actual);
19  
20      assert(
21          leng_expected == leng_actual, 
22          str("expected length: ", leng_expected, ", but: ", leng_actual)
23      );
24  
25      for(i = [0:len(actual) - 1]) {        
26          assertEqualPoint(expected[i], actual[i], epsilon);
27      }
28  }
29  
30  module assertEqualNum(expected, actual, epsilon = 0.0001) {
31      assert(
32          abs(expected - actual) <= epsilon, 
33          str("expected: ", expected, ", but: ", actual)
34      );
35  }