25 #ifndef WSYMMETRICSPHERICALHARMONIC_TEST_H
26 #define WSYMMETRICSPHERICALHARMONIC_TEST_H
39 #include <cxxtest/TestSuite.h>
41 #include "../WMatrix.h"
42 #include "../linearAlgebra/WLinearAlgebra.h"
43 #include "../WValue.h"
45 #include "../WGeometryFunctions.h"
46 #include "../WSymmetricSphericalHarmonic.h"
47 #include "../WTensorSym.h"
48 #include "../WTensorFunctions.h"
50 #include "WMatrixTraits.h"
69 reference( 0, 0 ) = 2.0 * piDouble;
70 for(
size_t i = 1; i <= 5; i++ )
72 reference( i, i ) = -2.0 * piDouble * 1.0 / 2.0;
74 for(
size_t i = 6; i <= 14; i++ )
76 reference( i, i ) = 2.0 * piDouble * 3.0 / 8.0;
79 for(
size_t i = 0; i < 15; ++i )
81 for(
size_t j = 0; j < 15; ++j )
83 TS_ASSERT_DELTA( result( i, j ), reference( i, j ), 1e-9 );
99 reference( 0, 0 ) = 0.0;
100 for(
size_t i = 1; i <= 5; i++ )
102 reference( i, i ) = 36.0;
104 for(
size_t i = 6; i <= 14; i++ )
106 reference( i, i ) = 400.0;
109 for(
size_t i = 0; i < 15; ++i )
111 for(
size_t j = 0; j < 15; ++j )
113 TS_ASSERT_DELTA( result( i, j ), reference( i, j ), 1e-9 );
197 #endif // WSYMMETRICSPHERICALHARMONIC_TEST_H