"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "src/computils.c" between
grace-5.1.24.tar.gz and grace-5.1.25.tar.gz

About: GRACE (GRaphing, Advanced Computation and Exploration of data) is a WYSIWYG 2D plotting tool (a descendant of and replacement for ACE/gr respectively xmgr).

computils.c  (grace-5.1.24):computils.c  (grace-5.1.25)
skipping to change at line 774 skipping to change at line 774
switch (load) { switch (load) {
case 0: case 0:
delt = (x[ilen-1] - x[0])/(ilen -1.0); delt = (x[ilen-1] - x[0])/(ilen -1.0);
T = (x[ilen - 1] - x[0]); T = (x[ilen - 1] - x[0]);
xx = getx(get_cg(), specset); xx = getx(get_cg(), specset);
yy = gety(get_cg(), specset); yy = gety(get_cg(), specset);
for (i = 0; i < ilen / 2; i++) { for (i = 0; i < ilen / 2; i++) {
/* carefully get amplitude of complex xform: /* carefully get amplitude of complex xform:
use abs(a[i]) + abs(a[-i]) except for zero term */ use abs(a[i]) + abs(a[-i]) except for zero term */
if(i) yy[i] = hypot(xx[i], yy[i])+hypot(xx[ilen-i], yy[ilen-i]); if(i) yy[i] = hypot(xx[i], yy[i])+hypot(xx[ilen-i], yy[ilen-i]);
else yy[i]=fabs(xx[i]); else yy[i]=2*fabs(xx[i]);
switch (loadx) { switch (loadx) {
case 0: case 0:
xx[i] = i; xx[i] = i;
break; break;
case 1: case 1:
/* xx[i] = 2.0 * M_PI * i / ilen; */ /* xx[i] = 2.0 * M_PI * i / ilen; */
xx[i] = i / T; xx[i] = i / T;
break; break;
case 2: case 2:
if (i == 0) { if (i == 0) {
 End of changes. 1 change blocks. 
1 lines changed or deleted 1 lines changed or added

Home  |  About  |  All  |  Newest  |  Fossies Dox  |  Screenshots  |  Comments  |  Imprint  |  Privacy  |  HTTPS