| 1724 | } |
| 1725 | |
| 1726 | void accumC(double* Cs, double* C, int lMax, int nMax, int typeI, int i, int nCoeffs) |
| 1727 | { |
| 1728 | for (int n = 0; n < nMax; n++) { |
| 1729 | for (int l = 0; l < lMax+1; l++) { |
| 1730 | for (int m = 0; m < l+1; m++) { |
| 1731 | Cs[i*nCoeffs+2*typeI*(lMax+1)*(lMax+1)*nMax +2*(lMax+1)*(lMax+1)*n + l*2*(lMax+1) + 2*m ] = C[2*(lMax+1)*(lMax+1)*n + l*2*(lMax+1) + 2*m ]; |
| 1732 | Cs[i*nCoeffs+2*typeI*(lMax+1)*(lMax+1)*nMax +2*(lMax+1)*(lMax+1)*n + l*2*(lMax+1) + 2*m + 1] = C[2*(lMax+1)*(lMax+1)*n + l*2*(lMax+1) + 2*m + 1]; |
| 1733 | } |
| 1734 | } |
| 1735 | } |
| 1736 | } |
| 1737 | |
| 1738 | /** |
| 1739 | * Used to calculate the partial power spectrum. |