spacecruft
/
strf
1
0
Fork 0
Code Releases Activity

Computing amplitude correctly

pull/10/head
Cees Bassa 2015-04-28 19:00:51 +02:00
parent 3a7dd8e6e3
commit 9be501dafd
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
rffft.c
View File

@ -208,7 +208,7 @@ int main(int argc,char *argv[])
else
l=i-nchan/2;
z[l]+=d[i][0]*d[i][0]+d[i][1]*d[i][1];
z[l]+=sqrt(d[i][0]*d[i][0]+d[i][1]*d[i][1]);
}
}
@ -228,7 +228,7 @@ int main(int argc,char *argv[])
strftime(tbuf,30,"%Y-%m-%dT%T",gmtime(&start.tv_sec));
sprintf(nfd,"%s.%03ld",tbuf,start.tv_usec/1000);
} else {
mjd2nfd(mjd+(m*tint*nsub+k)/86400.0,nfd);
mjd2nfd(mjd+(m*nsub+k)*tint/86400.0,nfd);
length=tint;
}