Commit 07ba4d9b authored by Michael Sherman's avatar Michael Sherman
Browse files

Fix double-to-float warnings.

parent 0794ef42
...@@ -100,8 +100,8 @@ fftpack_passf3(int ido, ...@@ -100,8 +100,8 @@ fftpack_passf3(int ido,
RealOpenMM wa2[], RealOpenMM wa2[],
int isign) int isign)
{ {
const RealOpenMM taur = -0.5; const RealOpenMM taur = (RealOpenMM)-0.5;
const RealOpenMM taui = 0.866025403784439; const RealOpenMM taui = (RealOpenMM)0.866025403784439;
int i, k, ac, ah; int i, k, ac, ah;
RealOpenMM ci2, ci3, di2, di3, cr2, cr3, dr2, dr3, ti2, tr2; RealOpenMM ci2, ci3, di2, di3, cr2, cr3, dr2, dr3, ti2, tr2;
...@@ -242,10 +242,10 @@ fftpack_passf5(int ido, ...@@ -242,10 +242,10 @@ fftpack_passf5(int ido,
RealOpenMM wa4[], RealOpenMM wa4[],
int isign) int isign)
{ {
const RealOpenMM tr11 = 0.309016994374947; const RealOpenMM tr11 = (RealOpenMM)0.309016994374947;
const RealOpenMM ti11 = 0.951056516295154; const RealOpenMM ti11 = (RealOpenMM)0.951056516295154;
const RealOpenMM tr12 = -0.809016994374947; const RealOpenMM tr12 = (RealOpenMM)-0.809016994374947;
const RealOpenMM ti12 = 0.587785252292473; const RealOpenMM ti12 = (RealOpenMM)0.587785252292473;
int i, k, ac, ah; int i, k, ac, ah;
RealOpenMM ci2, ci3, ci4, ci5, di3, di4, di5, di2, cr2, cr3, cr5, cr4, ti2, ti3, RealOpenMM ci2, ci3, ci4, ci5, di3, di4, di5, di2, cr2, cr3, cr5, cr4, ti2, ti3,
...@@ -610,7 +610,7 @@ fftpack_cffti1(int n, ...@@ -610,7 +610,7 @@ fftpack_cffti1(int n,
RealOpenMM wa[], RealOpenMM wa[],
int ifac[15]) int ifac[15])
{ {
const RealOpenMM twopi = 6.28318530717959; const RealOpenMM twopi = (RealOpenMM)6.28318530717959;
RealOpenMM arg, argh, argld, fi; RealOpenMM arg, argh, argld, fi;
int idot, i, j; int idot, i, j;
int i1, k1, l1, l2; int i1, k1, l1, l2;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment