| 1696 | #undef WA |
| 1697 | |
| 1698 | static void copy_and_norm(double *c, double *p1, size_t n, double fct) |
| 1699 | { |
| 1700 | if (p1!=c) |
| 1701 | { |
| 1702 | if (fct!=1.) |
| 1703 | for (size_t i=0; i<n; ++i) |
| 1704 | c[i] = fct*p1[i]; |
| 1705 | else |
| 1706 | memcpy (c,p1,n*sizeof(double)); |
| 1707 | } |
| 1708 | else |
| 1709 | if (fct!=1.) |
| 1710 | for (size_t i=0; i<n; ++i) |
| 1711 | c[i] *= fct; |
| 1712 | } |
| 1713 | |
| 1714 | WARN_UNUSED_RESULT |
| 1715 | static int rfftp_forward(rfftp_plan plan, double c[], double fct) |
no outgoing calls
no test coverage detected